LISTING 4
LISTING 4
1 PROCEDURE compare_all_permutations (
2 program_in IN VARCHAR2
3 ,check_this_in IN PLS_INTEGER
4 ,against_this_in IN PLS_INTEGER
5 )
6 IS
7 BEGIN
8
9 <>
10 FOR check_this_perm IN
11 cc_smartargs.first_permutation (
12 program_in,check_this_in)
13 ..
14 cc_smartargs.last_permutation (
15 program_in, check_this_in)
16 LOOP
17
18 <>
19 FOR against_this_perm IN
20 cc_smartargs.first_permutation (
21 program_in, against_this_in)
22 ..
23 cc_smartargs.last_permutation (
24 program_in, against_this_in)
25 LOOP
26 check_for_similarity (program_in
27 ,check_this_in
28 ,check_this_perm
29 ,against_this_in
30 ,against_this_perm
31 ,show_in
32 );
33 END LOOP against_this;
34 END LOOP check_this;
35 END compare_all_permutations;
