
|
A*%%TS SD 19940621 151401 AF400 REL-V2R3M0 5738-PW1
A*%%EC
A DSPSIZ(24 80 *DS3)
A R BIDON
A*%%TS SD 19930921 085025 AF400 REL-V2R2M0 5738-PW1
A ASSUME
A 1 3' '
A R FMTSFL SFL
A*%%TS SD 19930921 085025 AF400 REL-V2R2M0 5738-PW1
A OPT 1 I 3 1VALUES('1' ' ')
A OBJN 10 O 3 3
A TEXTE 50 O 3 15
A OBJL 10 H
A OBJT 10 H
A R FMTCTL SFLCTL(FMTSFL)
A*%%TS SD 19940621 151401 AF400 REL-V2R3M0 5738-PW1
A SFLSIZ(0011)
A SFLPAG(0010)
A WINDOW(CDE)
A CA03(03)
A CA12(03)
A OVERLAY
A 30 SFLDSP
A 31 SFLDSPCTL
A N31 SFLCLR
A 30 SFLEND(*MORE)
A 1 22'* choix d''un objet *'
A DSPATR(HI)
A OBJTYP 10A O 2 56DSPATR(UL)
A BIBLI 10A O 1 56
A 1 50'Bib :'
A 2 1'1'
A COLOR(BLU)
A 1 1DATE
A EDTCDE(Y)
A LIGNE 4S 0H SFLRCDNBR(CURSOR)
A 2 3' nom texte -
A type:'
A DSPATR(UL)
A R CDE
A*%%TS SD 19940621 151401 AF400 REL-V2R3M0 5738-PW1
A WINDOW(4 5 15 65)
A 14 2'1 = Choisir. -
A F12 = Retour.'
|
A COLOR(BLU) |