                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 404/408 ------           
                        00321 CALL   SYN RTT00                                                        F3B02140    
       00322  0 76100 0 00000        NOP                                                              F3B02150    
       00323  0 53400 2 02330        LXA M2ECTR,2        LOAD COUNT OF 5 FOR ERROR ROUTINE            F3B02160    
       00324  0 76200 0 00222  RTTD3 RTB 2               SELECT TAPE 2 T0 READ TIFG0                  F3B02170    
       00325  0 70000 0 05471        CPY TIFGO-1                                                      F3B02180    
       00326  0 50000 0 05471        CLA TIFGO-1         IDENTIFICATION FOR TIFG0 TABLE               F3B02190    
       00327  0 40200 0 02276        SUB L(2)            IS TABLE CALLED FOR                          F3B02200    
       00330  0 10000 0 00332        TZE RTTD1           YES                                          F3B02210    
       00331  0 07400 4 00004        TSX 4,4             N0T TIFG0 FILE                               F3B02220    
       00332  0 70000 0 05471  RTTD1 CPY TIFGO-1         GET WORD COUNT                               F3B02230    
       00333  0 53400 1 02274        LXA L(0),1                                                       F3B02240    
       00334  0 50000 0 05471        CLA TIFGO-1         TEST WD. COUNT                               F3B02250    
       00335  0 10000 0 00342        TZE RTTD5           N0 TIFG0 ENTRIES                             F3B02260    
       00336  0 70000 1 05472  RTTD2 CPY TIFGO,1         COPY                                         F3B02270    
       00337  1 77777 1 00336        TXI RTTD2,1,-1      LOOP                                         F3B02280    
       00340  0 07400 4 00004        TSX 4,4             EOF INC0RRECT                                F3B02290    
       00341  0 76600 0 00333        IOD                 EOR                                          F3B02300    
       00342 -0 76000 0 00012  RTTD5 RTT                 IS TAPE CHECK 0N                             F3B02310    
       00343  0 02000 0 00346        TRA RTTD4           YES                                          F3B02320    
       00344 -0 63400 1 05471        SXD TIFGO-1,1       N0                                           F3B02330    
       00345  0 02000 0 00351        TRA RTTE1           T0 READ TRAD TABLE                           F3B02340    
       00346  0 76400 0 00202  RTTD4 BST 2                                                            F3B02350    
       00347  2 00001 2 00324        TIX RTTD3,2,1                                                    F3B02360    
       00350  0 07400 4 00004 C0R4   TSX 4,4             ERROR READING TIFG0 TABLE AFTER 5 TRIES      F3B02370    
                                         PROGRAM T0 READ TRAD TABLE                                   F3B02380    
       00351  0 53400 2 02330 RTTE1  LXA M2ECTR,2        LOAD COUNT OF 5 FOR ERROR ROUTINE            F3B02390    
       00352  0 76200 0 00222  RTTE5 RTB 2               READ TRAD TABLE FR0M TAPE 2                  F3B02400    
       00353  0 70000 0 06766        CPY TRAD-1          IDENTIFICATION NUMBER                        F3B02410    
       00354  0 50000 0 06766        CLA TRAD-1                                                       F3B02420    
       00355  0 40200 0 02331        SUB L(3)            IS TABLE CALLED FOR                          F3B02430    
       00356  0 10000 0 00360        TZE RTTE2           YES                                          F3B02440    
       00357  0 07400 4 00004        TSX 4,4             TRAD TABLE N0T CALLED FOR                    F3B02450    
       00360  0 70000 0 06766  RTTE2 CPY TRAD-1          GET WORD COUNT                               F3B02460    
       00361  0 50000 0 06766        CLA TRAD-1          TEST WORD COUNT FOR NUHBER OF ENTRIES        F3B02470    
       00362  0 10000 0 00370        TZE RTTE6                                                        F3B02480    
       00363  0 53400 1 02274        LXA L(0),1                                                       F3B02490    
       00364  0 70000 1 06767  RTTE3 CPY TRAD,1          COPY TRAD ENTRIES AND GET 2S COMP.           F3B02500    
       00365  1 77777 1 00364        TXI RTTE3,1,-1      OF NUMBER QF ENTRIES.                        F3B02510    
       00366  0 07400 4 00004        TSX 4,4             EOF INC0RRECT                                F3B02520    
       00367  0 76600 0 00333        IOD                 EOR                                          F3B02530    
       00370 -0 76000 0 00012  RTTE6 RTT                 IS TAPE CHECK 0N                             F3B02540    
       00371  0 02000 0 00373        TRA RTTE4           YES                                          F3B02550    
       00372  0 02000 0 00376        TRA RTTC0           N0                                           F3B02560    
       00373  0 76400 0 00202  RTTE4 BST 2               ERROR ROUTINE FOR READING TRAD               F3B02570    
       00374  2 00001 2 00352        TIX RTTE5,2,1       E1TRIES                                      F3B02580    
       00375  0 07400 4 00004 C0R5   TSX 4,4             AFTER 5 TRIES                                F3B02590    
                                         PROGRAM T0 READ TRALEV                                       F3B02600    
       00376  0 76000 0 00000  RTTC0 CLM                 CLEAR ACCUHULAT0R                            F3B02610    
       00377  0 60200 0 03210        SLW TRALEV-1        SET WORD PRECEDING ENTRIES T0 ZER0           F3B02620    
       00400  0 53400 2 02330 RTTC4  LXA M2ECTR,2        LOAD COUNT OF 5 FOR ERROR ROUTINE            F3B02630    
       00401  0 76200 0 00224  RTTC2 RTB 4               READ TRALEV ENTRIES FR0M TP. 4               F3B02640    
       00402  0 70000 0 03211        CPY TRALEV          IDENTIFICATION                               F3B02650    
       00403 -0 76000 0 00012        RTT                 IS TAPE CHECK 0N                             F3B02660    
       00404  0 02000 0 00406        TRA RTTC1           YES                                          F3B02670    
