| 
A* 91/10/24 11:28:06 PILOU REL-R03M00 5728-PW1
A DSPSIZ(24 80 *DS3)
A R SFL01 SFL
A* 91/10/24 11:28:06 PILOU REL-R03M00 5728-PW1
A TEXT('format du sous fichier')
A DTA 50A B 8 16LOWER
A NUM 4 O 8 4
A R CTL01 SFLCTL(SFL01)
A* 91/10/24 11:28:06 PILOU REL-R03M00 5728-PW1
A TEXT('format de controle')
A CA03(03 'Fin de programme')
A CA05(05 'Réaffichage')
A CA09(09 'Ligne de commande')
A CA12(03 'Annuler')
A OVERLAY
A 31 SFLDSP
A SFLDSPCTL
A 30 SFLCLR
A N30 SFLEND
A SFLSIZ(0040)
A SFLPAG(0012)
A 23 2'F3=Exit'
A 23 12'F12=Annuler'
A 23 26'F5=réafficher'
A 23 42'F9=Ligne de commande'
A R FMT01
A* 91/10/24 11:28:06 PILOU REL-R03M00 5728-PW1
A TEXT('format fin de page')
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 10 O 3 27
A LONG 10 O 4 27
A 5 2'Texte . . . . . . . . :'
|
|
A TEXTE 50 O 5 27 A N21 2 40'Bibliothèque :' A N21 LIB 10 O 2 56 |
