A*%%TS  SD  19940317  160731  AF400       REL-V2R3M0  5738-PW1
     A*%%EC
     A                                      DSPSIZ(24 80 *DS3)
     A          R FMT
     A*%%TS  SD  19940317  160731  AF400       REL-V2R3M0  5738-PW1
     A                                      CA03(03)
     A                                  1  2'DSPSRTSEQ'
     A                                  1 22'** affichage d''une séquence de tr-
     A                                      i **'
     A                                      DSPATR(UL)
     A                                  1 65'le:'
     A                                  1 69DATE
     A                                      EDTCDE(Y)
     A                                  4  3'Table:'
     A            TBL           10A  O  4 11
     A                                  4 24'Bibli:'
     A            BIB           10A  O  4 32
     A                                  4 55'CCSID:'
     A            CCSID          5S 0O  4 62
     A                                  4 44'Poids:'
     A            WEIGHT         1A  O  4 52
     A                                  6  3'JOB'
     A                                  6  8':'
     A            JOBTBL        10A  O  6 11
     A            JOBBIB        10A  O  6 32
     A                                  6 44'LANGID'
     A            LANGID         3A  O  6 52
     A                                  6 57'Pays'
     A            CNTRYID        2A  O  6 63
     A                                 20 19'0123456789ABCDEF0123456789ABCDEF'
     A                                      DSPATR(HI)
     A                                 11 16'0'
     A                                      DSPATR(HI)
     A                                 12 16'2'
     A                                      DSPATR(HI)
     A                                 13 16'4'
     A                                      DSPATR(HI)
     A                                 14 16'6'
     A                                      DSPATR(HI)
     A                                 15 16'8'
     A                                      DSPATR(HI)
     A                                 16 16'A'
     A                                      DSPATR(HI)
     A                                 17 16'C'

     A                                      DSPATR(HI)
     A                                 18 16'E'
     A                                      DSPATR(HI)
     A            SRCTBL       256A  B 11 19CNTFLD(32)
     A                                      DSPATR(PR)
     A                                 11 53'1'
     A                                      DSPATR(HI)
     A                                 12 53'3'
     A                                      DSPATR(HI)
     A                                 13 53'5'
     A                                      DSPATR(HI)
     A                                 14 53'7'
     A                                      DSPATR(HI)
     A                                 15 53'9'
     A                                      DSPATR(HI)
     A                                 16 53'B'
     A                                      DSPATR(HI)
     A                                 17 53'D'
     A                                      DSPATR(HI)
     A                                 18 53'F'
     A                                      DSPATR(HI)
     A                                  9 19'0123456789ABCDEF0123456789ABCDEF'
     A                                      DSPATR(HI)
     A                                 23  2'F3 = Exit.'