|
I know this is really long but I wanted to let you know what I am dealing with here. I have this very large array it looks like a three level structure where a file is read and fills out the top level then each of the FORMATxx fields are used to read a different record and fill out the second level and again the FORMATxx records on this level are used to read the file and fill out the last level. What I am trying to see is there a more intuitive way of performing the same function without getting into things like recursion..... D DATA DS D PARMS DIM(10) D CO1 580 OVERLAY(PARMS:1 ) D FSCOA 2 OVERLAY(CO1:1) D FSCOA# 2 0 OVERLAY(CO1:1) D FSBRA 1 OVERLAY(CO1:3) D FSCOBRA# 3 0 OVERLAY(CO1:3) D FORMATA 10 OVERLAY(CO1:5) D SUBS OVERLAY(CO1:15) D SUBSCO1 2 OVERLAY(SUBS:1) D SUBSCO1# 2 0 OVERLAY(SUBS:1) D SUBSBR1 1 OVERLAY(SUBS:3) D SUBCBR1 3 OVERLAY(SUBS:1) D SUBFMT1 10 OVERLAY(SUBS:4 ) D SUBSCO2 2 OVERLAY(SUBS:14) D SUBSCO2# 2 0 OVERLAY(SUBS:14) D SUBSBR2 1 OVERLAY(SUBS:16) D SUBCBR2 3 OVERLAY(SUBS:14) D SUBFMT2 10 OVERLAY(SUBS:17 ) D SUBSCO3 2 OVERLAY(SUBS:27) D SUBSCO3# 2 0 OVERLAY(SUBS:27) D SUBSBR3 1 OVERLAY(SUBS:29) D SUBCBR3 3 OVERLAY(SUBS:27) D SUBFMT3 10 OVERLAY(SUBS:30 ) D SUBSCO4 2 OVERLAY(SUBS:40) D SUBSCO4# 2 0 OVERLAY(SUBS:40) D SUBSBR4 1 OVERLAY(SUBS:42) D SUBCBR4 3 OVERLAY(SUBS:40) D SUBFMT4 10 OVERLAY(SUBS:43 ) D SUBSCO5 2 OVERLAY(SUBS:53) D SUBSCO5# 2 0 OVERLAY(SUBS:53) D SUBSBR5 1 OVERLAY(SUBS:55) D SUBCBR5 3 OVERLAY(SUBS:53) D SUBFMT5 10 OVERLAY(SUBS:56 ) D SUBSCO6 2 OVERLAY(SUBS:66) D SUBSCO6# 2 0 OVERLAY(SUBS:66) D SUBSBR6 1 OVERLAY(SUBS:68) D SUBCBR6 3 OVERLAY(SUBS:66) D SUBFMT6 10 OVERLAY(SUBS:69 ) D SUBSCO7 2 OVERLAY(SUBS:79) D SUBSCO7# 2 0 OVERLAY(SUBS:79) D SUBSBR7 1 OVERLAY(SUBS:81) D SUBCBR7 3 OVERLAY(SUBS:79) D SUBFMT7 10 OVERLAY(SUBS:82 ) D SUBSCO8 2 OVERLAY(SUBS:92) D SUBSCO8# 2 0 OVERLAY(SUBS:92) D SUBSBR8 1 OVERLAY(SUBS:94) D SUBCBR8 3 OVERLAY(SUBS:92) D SUBFMT8 10 OVERLAY(SUBS:95 ) D SUBSCO9 2 OVERLAY(SUBS:105) D SUBSCO9# 2 0 OVERLAY(SUBS:105) D SUBSBR9 1 OVERLAY(SUBS:107) D SUBCBR9 3 OVERLAY(SUBS:105) D SUBFMT9 10 OVERLAY(SUBS:108) D SUBSCO10 2 OVERLAY(SUBS:118) D SUBSCO10# 2 0 OVERLAY(SUBS:118) D SUBSBR10 1 OVERLAY(SUBS:120) D SUBCBR10 3 OVERLAY(SUBS:118) D SUBFMT10 10 OVERLAY(SUBS:121) D SUB1 OVERLAY(CO1:135) D SUB1CO1 2 OVERLAY(SUB1:1) D SUB1CO1# 2 0 OVERLAY(SUB1:1) D SUB1BR1 1 OVERLAY(SUB1:3) D SUB1CBR1 3 OVERLAY(SUB1:1) D SUB1CO2 2 OVERLAY(SUB1:5) D SUB1CO2# 2 0 OVERLAY(SUB1:5) D SUB1BR2 1 OVERLAY(SUB1:7) D SUB1CBR2 3 OVERLAY(SUB1:5) D SUB1CO3 2 OVERLAY(SUB1:9) D SUB1CO3# 2 0 OVERLAY(SUB1:9) D SUB1BR3 1 OVERLAY(SUB1:11) D SUB1CBR3 3 OVERLAY(SUB1:9) D SUB1CO4 2 OVERLAY(SUB1:13) D SUB1CO4# 2 0 OVERLAY(SUB1:13) D SUB1BR4 1 OVERLAY(SUB1:15) D SUB1CBR4 3 OVERLAY(SUB1:13) D SUB1CO5 2 OVERLAY(SUB1:17) D SUB1CO5# 2 0 OVERLAY(SUB1:17) D SUB1BR5 1 OVERLAY(SUB1:19) D SUB1CBR5 3 OVERLAY(SUB1:17) D SUB1CO6 2 OVERLAY(SUB1:21) D SUB1CO6# 2 0 OVERLAY(SUB1:21) D SUB1BR6 1 OVERLAY(SUB1:23) D SUB1CBR6 3 OVERLAY(SUB1:21) D SUB1CO7 2 OVERLAY(SUB1:25) D SUB1CO7# 2 0 OVERLAY(SUB1:25) D SUB1BR7 1 OVERLAY(SUB1:27) D SUB1CBR7 3 OVERLAY(SUB1:25) D SUB1CO8 2 OVERLAY(SUB1:29) D SUB1CO8# 2 0 OVERLAY(SUB1:29) D SUB1BR8 1 OVERLAY(SUB1:31) D SUB1CBR8 3 OVERLAY(SUB1:29) D SUB1CO9 2 OVERLAY(SUB1:33) D SUB1CO9# 2 0 OVERLAY(SUB1:33) D SUB1BR9 1 OVERLAY(SUB1:35) D SUB1CBR9 3 OVERLAY(SUB1:33) D SUB1CO10 2 OVERLAY(SUB1:37) D SUB1CO10# 2 0 OVERLAY(SUB1:37) D SUB1BR10 1 OVERLAY(SUB1:39) D SUB1CBR10 3 OVERLAY(SUB1:37) D SUB2 OVERLAY(CO1:180) D SUB2CO1 2 OVERLAY(SUB2:1) D SUB2CO1# 2 0 OVERLAY(SUB2:1) D SUB2BR1 1 OVERLAY(SUB2:3) D SUB2CBR1 3 OVERLAY(SUB2:1) D SUB2CO2 2 OVERLAY(SUB2:5) D SUB2CO2# 2 0 OVERLAY(SUB2:5) D SUB2BR2 1 OVERLAY(SUB2:7) D SUB2CBR2 3 OVERLAY(SUB2:5) D SUB2CO3 2 OVERLAY(SUB2:9) D SUB2CO3# 2 0 OVERLAY(SUB2:9) D SUB2BR3 1 OVERLAY(SUB2:11) D SUB2CBR3 3 OVERLAY(SUB2:9) D SUB2CO4 2 OVERLAY(SUB2:13) D SUB2CO4# 2 0 OVERLAY(SUB2:13) D SUB2BR4 1 OVERLAY(SUB2:15) D SUB2CBR4 3 OVERLAY(SUB2:13) D SUB2CO5 2 OVERLAY(SUB2:17) D SUB2CO5# 2 0 OVERLAY(SUB2:17) D SUB2BR5 1 OVERLAY(SUB2:19) D SUB2CBR5 3 OVERLAY(SUB2:17) D SUB2CO6 2 OVERLAY(SUB2:21) D SUB2CO6# 2 0 OVERLAY(SUB2:21) D SUB2BR6 1 OVERLAY(SUB2:23) D SUB2CBR6 3 OVERLAY(SUB2:21) D SUB2CO7 2 OVERLAY(SUB2:25) D SUB2CO7# 2 0 OVERLAY(SUB2:25) D SUB2BR7 1 OVERLAY(SUB2:27) D SUB2CBR7 3 OVERLAY(SUB2:25) D SUB2CO8 2 OVERLAY(SUB2:29) D SUB2CO8# 2 0 OVERLAY(SUB2:29) D SUB2BR8 1 OVERLAY(SUB2:31) D SUB2CBR8 3 OVERLAY(SUB2:29) D SUB2CO9 2 OVERLAY(SUB2:33) D SUB2CO9# 2 0 OVERLAY(SUB2:33) D SUB2BR9 1 OVERLAY(SUB2:35) D SUB2CBR9 3 OVERLAY(SUB2:33) D SUB2CO10 2 OVERLAY(SUB2:37) D SUB2CO10# 2 0 OVERLAY(SUB2:37) D SUB2BR10 1 OVERLAY(SUB2:39) D SUB2CBR10 3 OVERLAY(SUB2:37) D SUB3 OVERLAY(CO1:225) D SUB3CO1 2 OVERLAY(SUB3:1) D SUB3CO1# 2 0 OVERLAY(SUB3:1) D SUB3BR1 1 OVERLAY(SUB3:3) D SUB3CBR1 3 OVERLAY(SUB3:1) D SUB3CO2 2 OVERLAY(SUB3:5) D SUB3CO2# 2 0 OVERLAY(SUB3:5) D SUB3BR2 1 OVERLAY(SUB3:7) D SUB3CBR2 3 OVERLAY(SUB3:5) D SUB3CO3 2 OVERLAY(SUB3:9) D SUB3CO3# 2 0 OVERLAY(SUB3:9) D SUB3BR3 1 OVERLAY(SUB3:11) D SUB3CBR3 3 OVERLAY(SUB3:9) D SUB3CO4 2 OVERLAY(SUB3:13) D SUB3CO4# 2 0 OVERLAY(SUB3:13) D SUB3BR4 1 OVERLAY(SUB3:15) D SUB3CBR4 3 OVERLAY(SUB3:13) D SUB3CO5 2 OVERLAY(SUB3:17) D SUB3CO5# 2 0 OVERLAY(SUB3:17) D SUB3BR5 1 OVERLAY(SUB3:19) D SUB3CBR5 3 OVERLAY(SUB3:17) D SUB3CO6 2 OVERLAY(SUB3:21) D SUB3CO6# 2 0 OVERLAY(SUB3:21) D SUB3BR6 1 OVERLAY(SUB3:23) D SUB3CBR6 3 OVERLAY(SUB3:21) D SUB3CO7 2 OVERLAY(SUB3:25) D SUB3CO7# 2 0 OVERLAY(SUB3:25) D SUB3BR7 1 OVERLAY(SUB3:27) D SUB3CBR7 3 OVERLAY(SUB3:25) D SUB3CO8 2 OVERLAY(SUB3:29) D SUB3CO8# 2 0 OVERLAY(SUB3:29) D SUB3BR8 1 OVERLAY(SUB3:31) D SUB3CBR8 3 OVERLAY(SUB3:29) D SUB3CO9 2 OVERLAY(SUB3:33) D SUB3CO9# 2 0 OVERLAY(SUB3:33) D SUB3BR9 1 OVERLAY(SUB3:35) D SUB3CBR9 3 OVERLAY(SUB3:33) D SUB3CO10 2 OVERLAY(SUB3:37) D SUB3CO10# 2 0 OVERLAY(SUB3:37) D SUB3BR10 1 OVERLAY(SUB3:39) D SUB3CBR10 3 OVERLAY(SUB3:37) D SUB4 OVERLAY(CO1:270) D SUB4CO1 2 OVERLAY(SUB4:1) D SUB4CO1# 2 0 OVERLAY(SUB4:1) D SUB4BR1 1 OVERLAY(SUB4:3) D SUB4CBR1 3 OVERLAY(SUB4:1) D SUB4CO2 2 OVERLAY(SUB4:5) D SUB4CO2# 2 0 OVERLAY(SUB4:5) D SUB4BR2 1 OVERLAY(SUB4:7) D SUB4CBR2 3 OVERLAY(SUB4:5) D SUB4CO3 2 OVERLAY(SUB4:9) D SUB4CO3# 2 0 OVERLAY(SUB4:9) D SUB4BR3 1 OVERLAY(SUB4:11) D SUB4CBR3 3 OVERLAY(SUB4:9) D SUB4CO4 2 OVERLAY(SUB4:13) D SUB4CO4# 2 0 OVERLAY(SUB4:13) D SUB4BR4 1 OVERLAY(SUB4:15) D SUB4CBR4 3 OVERLAY(SUB4:13) D SUB4CO5 2 OVERLAY(SUB4:17) D SUB4CO5# 2 0 OVERLAY(SUB4:17) D SUB4BR5 1 OVERLAY(SUB4:19) D SUB4CBR5 3 OVERLAY(SUB4:17) D SUB4CO6 2 OVERLAY(SUB4:21) D SUB4CO6# 2 0 OVERLAY(SUB4:21) D SUB4BR6 1 OVERLAY(SUB4:23) D SUB4CBR6 3 OVERLAY(SUB4:21) D SUB4CO7 2 OVERLAY(SUB4:25) D SUB4CO7# 2 0 OVERLAY(SUB4:25) D SUB4BR7 1 OVERLAY(SUB4:27) D SUB4CBR7 3 OVERLAY(SUB4:25) D SUB4CO8 2 OVERLAY(SUB4:29) D SUB4CO8# 2 0 OVERLAY(SUB4:29) D SUB4BR8 1 OVERLAY(SUB4:31) D SUB4CBR8 3 OVERLAY(SUB4:29) D SUB4CO9 2 OVERLAY(SUB4:33) D SUB4CO9# 2 0 OVERLAY(SUB4:33) D SUB4BR9 1 OVERLAY(SUB4:35) D SUB4CBR9 3 OVERLAY(SUB4:33) D SUB4CO10 2 OVERLAY(SUB4:37) D SUB4CO10# 2 0 OVERLAY(SUB4:37) D SUB4BR10 1 OVERLAY(SUB4:39) D SUB4CBR10 3 OVERLAY(SUB4:37) D SUB5 OVERLAY(CO1:315) D SUB5CO1 2 OVERLAY(SUB5:1) D SUB5CO1# 2 0 OVERLAY(SUB5:1) D SUB5BR1 1 OVERLAY(SUB5:3) D SUB5CBR1 3 OVERLAY(SUB5:1) D SUB5CO2 2 OVERLAY(SUB5:5) D SUB5CO2# 2 0 OVERLAY(SUB5:5) D SUB5BR2 1 OVERLAY(SUB5:7) D SUB5CBR2 3 OVERLAY(SUB5:5) D SUB5CO3 2 OVERLAY(SUB5:9) D SUB5CO3# 2 0 OVERLAY(SUB5:9) D SUB5BR3 1 OVERLAY(SUB5:11) D SUB5CBR3 3 OVERLAY(SUB5:9) D SUB5CO4 2 OVERLAY(SUB5:13) D SUB5CO4# 2 0 OVERLAY(SUB5:13) D SUB5BR4 1 OVERLAY(SUB5:15) D SUB5CBR4 3 OVERLAY(SUB5:13) D SUB5CO5 2 OVERLAY(SUB5:17) D SUB5CO5# 2 0 OVERLAY(SUB5:17) D SUB5BR5 1 OVERLAY(SUB5:19) D SUB5CBR5 3 OVERLAY(SUB5:17) D SUB5CO6 2 OVERLAY(SUB5:21) D SUB5CO6# 2 0 OVERLAY(SUB5:21) D SUB5BR6 1 OVERLAY(SUB5:23) D SUB5CBR6 3 OVERLAY(SUB5:21) D SUB5CO7 2 OVERLAY(SUB5:25) D SUB5CO7# 2 0 OVERLAY(SUB5:25) D SUB5BR7 1 OVERLAY(SUB5:27) D SUB5CBR7 3 OVERLAY(SUB5:25) D SUB5CO8 2 OVERLAY(SUB5:29) D SUB5CO8# 2 0 OVERLAY(SUB5:29) D SUB5BR8 1 OVERLAY(SUB5:31) D SUB5CBR8 3 OVERLAY(SUB5:29) D SUB5CO9 2 OVERLAY(SUB5:33) D SUB5CO9# 2 0 OVERLAY(SUB5:33) D SUB5BR9 1 OVERLAY(SUB5:35) D SUB5CBR9 3 OVERLAY(SUB5:33) D SUB5CO10 2 OVERLAY(SUB5:37) D SUB5CO10# 2 0 OVERLAY(SUB5:37) D SUB5BR10 1 OVERLAY(SUB5:39) D SUB5CBR10 3 OVERLAY(SUB5:37) D SUB6 OVERLAY(CO1:360) D SUB6CO1 2 OVERLAY(SUB6:1) D SUB6CO1# 2 0 OVERLAY(SUB6:1) D SUB6BR1 1 OVERLAY(SUB6:3) D SUB6CBR1 3 OVERLAY(SUB6:1) D SUB6CO2 2 OVERLAY(SUB6:5) D SUB6CO2# 2 0 OVERLAY(SUB6:5) D SUB6BR2 1 OVERLAY(SUB6:7) D SUB6CBR2 3 OVERLAY(SUB6:5) D SUB6CO3 2 OVERLAY(SUB6:9) D SUB6CO3# 2 0 OVERLAY(SUB6:9) D SUB6BR3 1 OVERLAY(SUB6:11) D SUB6CBR3 3 OVERLAY(SUB6:9) D SUB6CO4 2 OVERLAY(SUB6:13) D SUB6CO4# 2 0 OVERLAY(SUB6:13) D SUB6BR4 1 OVERLAY(SUB6:15) D SUB6CBR4 3 OVERLAY(SUB6:13) D SUB6CO5 2 OVERLAY(SUB6:17) D SUB6CO5# 2 0 OVERLAY(SUB6:17) D SUB6BR5 1 OVERLAY(SUB6:19) D SUB6CBR5 3 OVERLAY(SUB6:17) D SUB6CO6 2 OVERLAY(SUB6:21) D SUB6CO6# 2 0 OVERLAY(SUB6:21) D SUB6BR6 1 OVERLAY(SUB6:23) D SUB6CBR6 3 OVERLAY(SUB6:21) D SUB6CO7 2 OVERLAY(SUB6:25) D SUB6CO7# 2 0 OVERLAY(SUB6:25) D SUB6BR7 1 OVERLAY(SUB6:27) D SUB6CBR7 3 OVERLAY(SUB6:25) D SUB6CO8 2 OVERLAY(SUB6:29) D SUB6CO8# 2 0 OVERLAY(SUB6:29) D SUB6BR8 1 OVERLAY(SUB6:31) D SUB6CBR8 3 OVERLAY(SUB6:29) D SUB6CO9 2 OVERLAY(SUB6:33) D SUB6CO9# 2 0 OVERLAY(SUB6:33) D SUB6BR9 1 OVERLAY(SUB6:35) D SUB6CBR9 3 OVERLAY(SUB6:33) D SUB6CO10 2 OVERLAY(SUB6:37) D SUB6CO10# 2 0 OVERLAY(SUB6:37) D SUB6BR10 1 OVERLAY(SUB6:39) D SUB6CBR10 3 OVERLAY(SUB6:37) D SUB7 OVERLAY(CO1:405) D SUB7CO1 2 OVERLAY(SUB7:1) D SUB7CO1# 2 0 OVERLAY(SUB7:1) D SUB7BR1 1 OVERLAY(SUB7:3) D SUB7CBR1 3 OVERLAY(SUB7:1) D SUB7CO2 2 OVERLAY(SUB7:5) D SUB7CO2# 2 0 OVERLAY(SUB7:5) D SUB7BR2 1 OVERLAY(SUB7:7) D SUB7CBR2 3 OVERLAY(SUB7:5) D SUB7CO3 2 OVERLAY(SUB7:9) D SUB7CO3# 2 0 OVERLAY(SUB7:9) D SUB7BR3 1 OVERLAY(SUB7:11) D SUB7CBR3 3 OVERLAY(SUB7:9) D SUB7CO4 2 OVERLAY(SUB7:13) D SUB7CO4# 2 0 OVERLAY(SUB7:13) D SUB7BR4 1 OVERLAY(SUB7:15) D SUB7CBR4 3 OVERLAY(SUB7:13) D SUB7CO5 2 OVERLAY(SUB7:17) D SUB7CO5# 2 0 OVERLAY(SUB7:17) D SUB7BR5 1 OVERLAY(SUB7:19) D SUB7CBR5 3 OVERLAY(SUB7:17) D SUB7CO6 2 OVERLAY(SUB7:21) D SUB7CO6# 2 0 OVERLAY(SUB7:21) D SUB7BR6 1 OVERLAY(SUB7:23) D SUB7CBR6 3 OVERLAY(SUB7:21) D SUB7CO7 2 OVERLAY(SUB7:25) D SUB7CO7# 2 0 OVERLAY(SUB7:25) D SUB7BR7 1 OVERLAY(SUB7:27) D SUB7CBR7 3 OVERLAY(SUB7:25) D SUB7CO8 2 OVERLAY(SUB7:29) D SUB7CO8# 2 0 OVERLAY(SUB7:29) D SUB7BR8 1 OVERLAY(SUB7:31) D SUB7CBR8 3 OVERLAY(SUB7:29) D SUB7CO9 2 OVERLAY(SUB7:33) D SUB7CO9# 2 0 OVERLAY(SUB7:33) D SUB7BR9 1 OVERLAY(SUB7:35) D SUB7CBR9 3 OVERLAY(SUB7:33) D SUB7CO10 2 OVERLAY(SUB7:37) D SUB7CO10# 2 0 OVERLAY(SUB7:37) D SUB7BR10 1 OVERLAY(SUB7:39) D SUB7CBR10 3 OVERLAY(SUB7:37) D SUB8 OVERLAY(CO1:450) D SUB8CO1 2 OVERLAY(SUB8:1) D SUB8CO1# 2 0 OVERLAY(SUB8:1) D SUB8BR1 1 OVERLAY(SUB8:3) D SUB8CBR1 3 OVERLAY(SUB8:1) D SUB8CO2 2 OVERLAY(SUB8:5) D SUB8CO2# 2 0 OVERLAY(SUB8:5) D SUB8BR2 1 OVERLAY(SUB8:7) D SUB8CBR2 3 OVERLAY(SUB8:5) D SUB8CO3 2 OVERLAY(SUB8:9) D SUB8CO3# 2 0 OVERLAY(SUB8:9) D SUB8BR3 1 OVERLAY(SUB8:11) D SUB8CBR3 3 OVERLAY(SUB8:9) D SUB8CO4 2 OVERLAY(SUB8:13) D SUB8CO4# 2 0 OVERLAY(SUB8:13) D SUB8BR4 1 OVERLAY(SUB8:15) D SUB8CBR4 3 OVERLAY(SUB8:13) D SUB8CO5 2 OVERLAY(SUB8:17) D SUB8CO5# 2 0 OVERLAY(SUB8:17) D SUB8BR5 1 OVERLAY(SUB8:19) D SUB8CBR5 3 OVERLAY(SUB8:17) D SUB8CO6 2 OVERLAY(SUB8:21) D SUB8CO6# 2 0 OVERLAY(SUB8:21) D SUB8BR6 1 OVERLAY(SUB8:23) D SUB8CBR6 3 OVERLAY(SUB8:21) D SUB8CO7 2 OVERLAY(SUB8:25) D SUB8CO7# 2 0 OVERLAY(SUB8:25) D SUB8BR7 1 OVERLAY(SUB8:27) D SUB8CBR7 3 OVERLAY(SUB8:25) D SUB8CO8 2 OVERLAY(SUB8:29) D SUB8CO8# 2 0 OVERLAY(SUB8:29) D SUB8BR8 1 OVERLAY(SUB8:31) D SUB8CBR8 3 OVERLAY(SUB8:29) D SUB8CO9 2 OVERLAY(SUB8:33) D SUB8CO9# 2 0 OVERLAY(SUB8:33) D SUB8BR9 1 OVERLAY(SUB8:35) D SUB8CBR9 3 OVERLAY(SUB8:33) D SUB8CO10 2 OVERLAY(SUB8:37) D SUB8CO10# 2 0 OVERLAY(SUB8:37) D SUB8BR10 1 OVERLAY(SUB8:39) D SUB8CBR10 3 OVERLAY(SUB8:37) D SUB9 OVERLAY(CO1:495) D SUB9CO1 2 OVERLAY(SUB9:1) D SUB9CO1# 2 0 OVERLAY(SUB9:1) D SUB9BR1 1 OVERLAY(SUB9:3) D SUB9CBR1 3 OVERLAY(SUB9:1) D SUB9CO2 2 OVERLAY(SUB9:5) D SUB9CO2# 2 0 OVERLAY(SUB9:5) D SUB9BR2 1 OVERLAY(SUB9:7) D SUB9CBR2 3 OVERLAY(SUB9:5) D SUB9CO3 2 OVERLAY(SUB9:9) D SUB9CO3# 2 0 OVERLAY(SUB9:9) D SUB9BR3 1 OVERLAY(SUB9:11) D SUB9CBR3 3 OVERLAY(SUB9:9) D SUB9CO4 2 OVERLAY(SUB9:13) D SUB9CO4# 2 0 OVERLAY(SUB9:13) D SUB9BR4 1 OVERLAY(SUB9:15) D SUB9CBR4 3 OVERLAY(SUB9:13) D SUB9CO5 2 OVERLAY(SUB9:17) D SUB9CO5# 2 0 OVERLAY(SUB9:17) D SUB9BR5 1 OVERLAY(SUB9:19) D SUB9CBR5 3 OVERLAY(SUB9:17) D SUB9CO6 2 OVERLAY(SUB9:21) D SUB9CO6# 2 0 OVERLAY(SUB9:21) D SUB9BR6 1 OVERLAY(SUB9:23) D SUB9CBR6 3 OVERLAY(SUB9:21) D SUB9CO7 2 OVERLAY(SUB9:25) D SUB9CO7# 2 0 OVERLAY(SUB9:25) D SUB9BR7 1 OVERLAY(SUB9:27) D SUB9CBR7 3 OVERLAY(SUB9:25) D SUB9CO8 2 OVERLAY(SUB9:29) D SUB9CO8# 2 0 OVERLAY(SUB9:29) D SUB9BR8 1 OVERLAY(SUB9:31) D SUB9CBR8 3 OVERLAY(SUB9:29) D SUB9CO9 2 OVERLAY(SUB9:33) D SUB9CO9# 2 0 OVERLAY(SUB9:33) D SUB9BR9 1 OVERLAY(SUB9:35) D SUB9CBR9 3 OVERLAY(SUB9:33) D SUB9CO10 2 OVERLAY(SUB9:37) D SUB9CO10# 2 0 OVERLAY(SUB9:37) D SUB9BR10 1 OVERLAY(SUB9:39) D SUB9CBR10 3 OVERLAY(SUB9:37) D SUB10 OVERLAY(CO1:540) D SUB0CO1 2 OVERLAY(SUB10:1) D SUB0CO1# 2 0 OVERLAY(SUB10:1) D SUB0BR1 1 OVERLAY(SUB10:3) D SUB0CBR1 3 OVERLAY(SUB10:1) D SUB0CO2 2 OVERLAY(SUB10:5) D SUB0CO2# 2 0 OVERLAY(SUB10:5) D SUB0BR2 1 OVERLAY(SUB10:7) D SUB0CBR2 3 OVERLAY(SUB10:5) D SUB0CO3 2 OVERLAY(SUB10:9) D SUB0CO3# 2 0 OVERLAY(SUB10:9) D SUB0BR3 1 OVERLAY(SUB10:11) D SUB0CBR3 3 OVERLAY(SUB10:9) D SUB0CO4 2 OVERLAY(SUB10:13) D SUB0CO4# 2 0 OVERLAY(SUB10:13) D SUB0BR4 1 OVERLAY(SUB10:15) D SUB0CBR4 3 OVERLAY(SUB10:13) D SUB0CO5 2 OVERLAY(SUB10:17) D SUB0CO5# 2 0 OVERLAY(SUB10:17) D SUB0BR5 1 OVERLAY(SUB10:19) D SUB0CBR5 3 OVERLAY(SUB10:17) D SUB0CO6 2 OVERLAY(SUB10:21) D SUB0CO6# 2 0 OVERLAY(SUB10:21) D SUB0BR6 1 OVERLAY(SUB10:23) D SUB0CBR6 3 OVERLAY(SUB10:21) D SUB0CO7 2 OVERLAY(SUB10:25) D SUB0CO7# 2 0 OVERLAY(SUB10:25) D SUB0BR7 1 OVERLAY(SUB10:27) D SUB0CBR7 3 OVERLAY(SUB10:25) D SUB0CO8 2 OVERLAY(SUB10:29) D SUB0CO8# 2 0 OVERLAY(SUB10:29) D SUB0BR8 1 OVERLAY(SUB10:31) D SUB0CBR8 3 OVERLAY(SUB10:29) D SUB0CO9 2 OVERLAY(SUB10:33) D SUB0CO9# 2 0 OVERLAY(SUB10:33) D SUB0BR9 1 OVERLAY(SUB10:35) D SUB0CBR9 3 OVERLAY(SUB10:33) D SUB0CO10 2 OVERLAY(SUB10:37) D SUB0CO10# 2 0 OVERLAY(SUB10:37) D SUB0BR10 1 OVERLAY(SUB10:39) D SUB0CBR10 3 OVERLAY(SUB10:37) +--- | This is the RPG/400 Mailing List! | To submit a new message, send your mail to RPG400-L@midrange.com. | To subscribe to this list send email to RPG400-L-SUB@midrange.com. | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.