A*%%TS  SD  19940104  163445  AF400       REL-V2R2M0  5738-PW1
     A*%%EC
     A                                      DSPSIZ(24 80 *DS3)
     A          R TITRE
     A*%%TS  SD  19940104  104627  AF400       REL-V2R2M0  5738-PW1
     A                                  1  3'SQLDYN'
     A                                  1 26' ** Choix d''un cours AF400 ** '
     A                                      DSPATR(HI)
     A                                      DSPATR(UL)
     A                                  1 71DATE
     A                                      EDTCDE(Y)
     A          R ENTETE
     A*%%TS  SD  19940104  163445  AF400       REL-V2R2M0  5738-PW1
     A                                      OVERLAY
     A                                      CA03(03)
     A                                      ERASE(CTLCRS)
     A                                  4  3'Indiquez'
     A                                  4 12'vos'
     A                                  4 16'critères'
     A                                  4 25'de'
     A                                  4 28'sélection'
     A                                  4 38':'
     A            SELEC        240A  B  6  1
     A                                 11  3'Indiquez'
     A                                 11 12'vos'
     A                                 11 16'critères'
     A                                 11 25'de'
     A                                 11 28'tri'
     A                                 11 32':'
     A            CLE1          10A  B 13  4
     A                                 13  1'1:'
     A                                      DSPATR(HI)
     A                                 13 16'2:'
     A                                      DSPATR(HI)
     A            CLE2          10A  B 13 19
     A                                 13 30'3:'
     A                                      DSPATR(HI)
     A            CLE3          10A  B 13 33
     A                                 15  3'Liste des zones du fichiers utilis-
     A                                      ables pour la sélection et le tri :'
     A                                      DSPATR(UL)
     A                                  4 43'(Syntaxe'
     A                                  4 52'SQL'
     A                                  4 56'sans'

     A                                      DSPATR(UL)
     A                                  4 61'le'
     A                                  4 64'mot-clé'
     A                                  4 72'WHERE)'
     A                                 11 43'(un'
     A                                 11 47'à'
     A                                 11 49'trois'
     A                                 11 55'nom'
     A                                 11 59'de'
     A                                 11 62'zone)'
     A                                  9 47'non renseigné = pas de sélection'
     A                                 13 47'non renseigné = pas de classement'
     A          R SFLZON                    SFL
     A*%%TS  SD  19940104  104627  AF400       REL-V2R2M0  5738-PW1
     A            ZONE          10   O 17  6
     A            TEXTE         50   O 17 21
     A          R CTLZON                    SFLCTL(SFLZON) OVERLAY
     A*%%TS  SD  19940104  104627  AF400       REL-V2R2M0  5738-PW1
     A N30                                  SFLDSP
     A N30                                  SFLDSPCTL
     A  30                                  SFLCLR
     A N30                                  SFLEND(*MORE)
     A                                      SFLSIZ(0006)
     A                                      SFLPAG(0005)
     A                                 23  3'F3=Exit'
     A          R SFLCRS                    SFL
     A*%%TS  SD  19940104  104627  AF400       REL-V2R2M0  5738-PW1
     A            AF4MDL    R        O  4  2REFFLD(AF4MBRF1/AF4MDL AF400/AF4MBR-
     A                                      P1)
     A            AF4MBR    R        O  4 13REFFLD(AF4MBRF1/AF4MBR AF400/AF4MBR-
     A                                      P1)
     A            AF4TXT    R        O  4 24REFFLD(AF4MBRF1/AF4TXT AF400/AF4MBR-
     A                                      P1)
     A            DISPO     R        O  4 76REFFLD(AF4MBRF1/DISPO AF400/AF4MBRP-
     A                                      1)
     A          R CTLCRS                    SFLCTL(SFLCRS)
     A*%%TS  SD  19940104  153842  AF400       REL-V2R2M0  5738-PW1
     A                                      CA03(03)
     A                                      CA12(12)
     A  33                                  ROLLUP(80)
     A                                      OVERLAY
     A  32                                  SFLDSP
     A N31                                  SFLDSPCTL
     A  31                                  SFLCLR

     A N33                                  SFLEND(*MORE)
     A                                      SFLSIZ(0019)
     A                                      SFLPAG(0018)
     A            LIGNE          4S 0H      SFLRCDNBR
     A                                  3  2'Module     Cours      Texte descri-
     A                                      ptif                               -
     A                                         dispo'
     A                                      DSPATR(UL)
     A          R PIED                      OVERLAY ERASE(ENTETE SFLZON CTLZON)
     A*%%TS  SD  19940104  104627  AF400       REL-V2R2M0  5738-PW1
     A                                 23  2'F3=Exit'
     A                                 23 61'F12=Retour'