Ecran pour LSTDLSG

BoTTom |
     A*%%TS  SD  19960822  181601  AF400CM     REL-V3R6M0  5716-PW1
     A*%%EC
     A                                      DSPSIZ(24 80 *DS3)
     A          R TITRE
     A*%%TS  SD  19960809  160639  AF400CM     REL-V3R6M0  5716-PW1
     A                                  1  3'LSTDLS'
     A                                  1 24'**   Liste des répertoires HFS  **'
     A                                  1 66'le'
     A                                  1 69DATE
     A                                      EDTCDE(Y)
     A            PATH          63A  O  3 17
     A                                  3  1'Chemin'
     A                                  3  8':'
     A                                  5  2'Opt  Document/dir  type  Opt  Docu-
     A                                      ment/dir  type  Opt  Document/dir  -
     A                                      type '
     A                                      DSPATR(UL)
     A                                  4  1'3=Niveau suivant  5=Browse'
     A                                      DSPATR(HI)
     A          R SFL                       SFL
     A*%%TS  SD  19940217  163739  AF400       REL-V2R2M0  5738-PW1
     A            FLD001         1A  I  6  4VALUES(' ' '3' '5')
     A            DOCNAM        12A  O  6  7
     A            TYP            3A  O  6 21
     A          R CTL                       SFLCTL(SFL)
     A*%%TS  SD  19960822  181601  AF400CM     REL-V3R6M0  5716-PW1
     A                                      CA03(03)
     A                                      CA12(12)
     A                                      CF21(21)
     A                                      OVERLAY
     A  30                                  SFLDSP
     A  31                                  SFLDSPCTL
     A N31                                  SFLCLR
     A  30                                  SFLEND(*MORE)
     A                                      SFLSIZ(0052)
     A                                      SFLPAG(0048)
     A  *DS3                                SFLLIN(0005)
     A                                 23  2'F3=Exit'
     A                                      DSPATR(HI)
     A                                 23 12'F12=Niveau précedent'
     A                                      DSPATR(HI)
     A                                 23 36'Système de fichier :'
     A            SYSHFS         4A  B 23 59
     A                                 23 65'(QDLS/QOPT)'


|
     A                                 24 36'Si QOPT, Nom de Volume'
     A            VOLUME        20A  B 24 59
     A                                 24  2'F21 = Gérer les noms de volume.'
     A                                      DSPATR(HI)
     A          R VIDE
     A*%%TS  SD  19940204  115508  AF400       REL-V2R2M0  5738-PW1
     A                                       OVERLAY
     A                                       ERASE(SFL)
     A                                 10  2'(aucun dossier/document)'
     A                                      DSPATR(HI)




©AF400