DSPF pour EDTDACPP

BoTTom |
     A*%%TS  SD  19940318  133412  AF400       REL-V2R3M0  5738-PW1
     A*%%EC
     A                                      DSPSIZ(24 80 *DS3)
     A          R FMT
     A*%%TS  SD  19940318  133412  AF400       REL-V2R3M0  5738-PW1
     A                                      CHGINPDFT
     A                                      CA03(03)
     A  60                                  ROLLUP(80)
     A  61                                  ROLLDOWN(81)
     A                                      CA05(05)
     A                                  1 23'Modification zone de données'
     A                                  1 59'Système:'
     A                                  1 68SYSNAME
     A                                  2  2'Zone de données . . . :'
     A                                  4  2'Longueur  . . . . . . :'
     A            NOM           10A  O  2 27
     A                                  6 16'Valeur'
     A                                      DSPATR(HI)
     A                                  7 16'*...+....1....+....2....+....3....-
     A                                      +....4....+....5'
     A                                  7  4'Position'
     A                                      DSPATR(HI)
     A                                  3  2'Type  . . . . . . . . :'
     A            TYPE          10A  O  3 27
     A            LENW           5S 0O  4 27
     A  62        DEC            2S 0O  4 33
     A                                  5  2'Texte . . . . . . . . :'
     A            TEXTE         50A  O  5 27
     A                                  2 40'Bibliothèque :'
     A            LIB           10A  O  2 56
     A            DATA         800A  B  8 16CNTFLD(50) LOWER
     A                                 24  4'F3 = Exit, F5 = Refresh.'
     A            P1             4Y 0O  8  6EDTWRD('  0 ')
     A            P2             4Y 0O  9  6EDTCDE(Z)
     A            P3             4Y 0O 10  6EDTCDE(Z)
     A            P4             4Y 0O 11  6EDTCDE(Z)
     A            P5             4Y 0O 12  6EDTCDE(Z)
     A            P6             4Y 0O 13  6EDTCDE(Z)
     A            P7             4Y 0O 14  6EDTCDE(Z)
     A            P8             4Y 0O 15  6EDTCDE(Z)
     A            P9             4Y 0O 16  6EDTCDE(Z)
     A            P10            4Y 0O 17  6EDTCDE(Z)
     A            P11            4Y 0O 18  6EDTCDE(Z)
     A            P12            4Y 0O 19  6EDTCDE(Z)


|
     A            P13            4Y 0O 20  6EDTCDE(Z)
     A            P14            4Y 0O 21  6EDTCDE(Z)
     A            P15            4Y 0O 22  6EDTCDE(Z)
     A            P16            4Y 0O 23  6EDTCDE(Z)
     A                                  8 13'['
     A  60                             23 70'A suivre...'
     A                                      DSPATR(HI)
     A N60                             23 70'Fin.'
     A                                      DSPATR(HI)
     A  60                             24 29'Rollup= défil/haut'
     A  61                             24 48'Rolldown= défil/bas'




©AF400