Cours DFU 400

BoTTom |    Changer de couleur
               Utilitaire de maintenance de fichiers - DFU AS/400 
 
 
 
 
 
       But:    Création de pgm de maintenance de fichier
 
 
 
       Commande : STRDFU 
 
 
 
 
 
 
 
 
 
 
 


|    Changer de couleur
               Utilitaire de maintenance de fichiers - DFU AS/400 
 
 Choisissez l'une des options suivantes : 
 
      1. Exécution d'un programme DFU     (Existant) 
      2. Création d'un programme DFU 
      3. Modification d'un programme DFU 
      4. Suppression d'un programme DFU 
      5. Mise à jour de données à l'aide d'un programme temporaire 
                                          (Cde UPDDTA) 
 
 
 
 
 
 
 
 
 Option ou commande 
 ===> 2
                                                                                
 F3=Exit   F4=Invite   F9=Rappel   F12=Annuler 


|    Changer de couleur
  ##########                Création d'un programme DFU          
 
 Indiquez vos choix, puis appuyez sur ENTREE.                                   
 
   Programme . . . . . . . . .   DFUPGM        Nom, F4 pour liste              
     Bibliothèque  . . . . . .   STAGXX        Nom, *CURLIB                    
 
   Fichier de données  . . . .   FICP1         Nom, F4 pour liste              
     Bibliothèque  . . . . . .   STAGXX        Nom, *LIBL, *CURLIB             
 
 
 
 
 
 
 
 
 
 
 
 
 F3=Exit     F4=Invite     F12=Annuler                                         


|    Changer de couleur
                       Fichier non indexé - Généralités              
 
 Indiquez vos choix, puis appuyez sur ENTREE.                                 
 
   Titre du travail  . . . . . . .   <---- texte explicatif ------------> 
   Format d'affichage  . . . . . . . . .   2          1=1 col, 2=Plusieurs col  
                                                      3=Maximum de zones        
                                                      4=Orienté ligne           
   Liste de contrôle . . . . . . . . . .   N          O=Oui, N=Non             
   Présentation 36 . . . . . . . . . . .   N          O=Oui, N=Non             
   Suppression des erreurs . . . . . . .   N          O=Oui, N=Non             
   Edition données numériques  . . . . .   O          O=Oui, N=Non             
   Mises à jour en cours de défilement .   O          O=Oui, N=Non             
   Numéros d'enregistrements :            
     Génération  . . . . . . . . . . . .   N          O=Oui, N=Non             
     Stockage dans une zone  . . . . . .   N          O=Oui, N=Non             
     En-tête . . . . . . . . . . . . . .   *RECNBR              
                                                                
                                                                
   Traitement  . . . . . . . . . . . . .   2          1=Direct                 
                                                      2=Séquentiel             
 F3=Exit      F12=Annuler       F14=Afficher définition                         


|    Changer de couleur
                       Fichier non indexé - Généralités              
 
 Indiquez vos choix, puis appuyez sur ENTREE.                                 
 
   Titre du travail  . . . . . . .   <---- texte explicatif ------------> 
   Format d'affichage  . . . . . . . . .   2          1=1 col, 2=Plusieurs col  
                                                      3=Maximum de zones        
                                                      4=Orienté ligne           
   Liste de contrôle . . . . . . . . . .   N <-  ########################      
   Présentation 36 . . . . . . . . . . .   N     # Cette option permet  #      
   Suppression des erreurs . . . . . . .   N     # de demander une      #      
   Edition données numériques  . . . . .   O     # liste des ajouts     #      
   Mises à jour en cours de défilement .   O     # modifs,sup en fin    #      
   Numéros d'enregistrements :                   # d'exécution du DFU   # 
     Génération  . . . . . . . . . . . .   N     #                      #      
     Stockage dans une zone  . . . . . .   N     ########################      
     En-tête . . . . . . . . . . . . . .   *RECNBR              
                                                                
                                                                
   Traitement  . . . . . . . . . . . . .   2          1=Direct                 
                                                      2=Séquentiel             
 F3=Exit      F12=Annuler       F14=Afficher définition                         


|    Changer de couleur
                       Fichier non indexé - Généralités              
 
 Indiquez vos choix, puis appuyez sur ENTREE.                                 
 
   Titre du travail  . . . . . . .   <---- texte explicatif ------------> 
   Format d'affichage  . . . . . . . . .   2          1=1 col, 2=Plusieurs col  
                                                      3=Maximum de zones        
                                                      4=Orienté ligne           
   Liste de contrôle . . . . . . . . . .   N     ########################      
   Présentation 36 . . . . . . . . . . .   N     # Cette option permet  #      
   Suppression des erreurs . . . . . . .   N     # de Saisir les zones  #      
   Edition données numériques  . . . . .   O <-  # numériques avec une  #      
   Mises à jour en cours de défilement .   O     # virgule 4,15 au lieu #      
   Numéros d'enregistrements :                   # de 415 pour 4 francs # 
     Génération  . . . . . . . . . . . .   N     # 15 centimes.         #      
     Stockage dans une zone  . . . . . .   N     ########################      
     En-tête . . . . . . . . . . . . . .   *RECNBR              
                                                                
                                                                
   Traitement  . . . . . . . . . . . . .   2          1=Direct                 
                                                      2=Séquentiel             
 F3=Exit      F12=Annuler       F14=Afficher définition                         


|    Changer de couleur
                       Fichier non indexé - Généralités              
 
 Indiquez vos choix, puis appuyez sur ENTREE.                                 
 
   Titre du travail  . . . . . . .   <---- texte explicatif ------------> 
   Format d'affichage  . . . . . . . . .   2          1=1 col, 2=Plusieurs col  
                                                      3=Maximum de zones        
                                                      4=Orienté ligne           
   Liste de contrôle . . . . . . . . . .   N     ########################      
   Présentation 36 . . . . . . . . . . .   N     # Cette option permet  #      
   Suppression des erreurs . . . . . . .   N     # de demander a DFU    #      
   Edition données numériques  . . . . .   O     # de tenir compte des  #      
   Mises à jour en cours de défilement .   O <-  # modifs apres avoir   #      
   Numéros d'enregistrements :                   # utilisée la touche   # 
     Génération  . . . . . . . . . . . .   N     # "ROLLUP".            #      
     Stockage dans une zone  . . . . . .   N     ########################      
     En-tête . . . . . . . . . . . . . .   *RECNBR              
                                                                
                                                                
   Traitement  . . . . . . . . . . . . .   2          1=Direct                 
                                                      2=Séquentiel             
 F3=Exit      F12=Annuler       F14=Afficher définition                         


|    Changer de couleur
                          Sélection des options de contrôle           
 
 Indiquez vos choix, puis appuyez sur ENTREE.              
 
   Impression des ajouts . . . . .   O             O=Oui, N=Non               
   Impression des modifications  .   O             O=Oui, N=Non               
   Impression des suppressions . .   O             O=Oui, N=Non               
   Imprimante               
     Longueur de ligne . . . . . .   198 <---      60-198          
     Espacement des colonnes . . .   1             0-9          
 
 
 
     Sélection des critères pour la liste de contrôle 
 
 
 
 
 
 
 
 F3=Exit      F12=Annuler       F14=Afficher définition                         


|    Changer de couleur
                       Sélection de formats d'enregistrement               
 
 Fichier  . :   FICP1                           Bibliothèque . . :   STAGXX     
 
 Indiquez vos options, puis appuyez sur ENTREE (F21=Tous les formats).          
   2=Choisir   4=Supprimer
 
                                                                                
 Opt  Format      Défini   Description                                          
  2   FICF1          N     FICHIER DES STAGIAIRES                             
 
 
 
      Les fichiers ne possedent en général qu'un seul format
                   (sauf les logiques multi-formats)
      Le choix est donc simple
 
 
 
                                                                            Fin 
 F3=Exit définition          F5=Réafficher       F12=Annuler                   
 F14=Afficher définition     F21=Tous les formats                              


|    Changer de couleur
                         Sélection et séquence des zones        
 
 Fichier . . . . . . . . . . :   FICP1          Bibliothèque . . :   STAGXX     
 Format d'enregistrement . . :   FICF1      
 
 Choisissez les zones et leur séquence et faites ENTREE (F21=Toutes les zones). 
                         Vous pouvez ne sélectionner que certaines zones       
                         La séquence déterminera leur ordre d'affichage        
 Séquence  Zone        Attr    Long    Type        Description                  
           NOMSTG                  20  ALPHA       NOM DU STAGIAIRE             
           PRESTG                  25  ALPHA       PRENOM DU STAGIAIRE          
           ENTSTG                 6,0  ETENDU      DATE D'ENTRE                 
           SORSTG                 6,0  ETENDU      DATE DE SORTIE               
           ADRSTG                  35  ALPHA       ADRESSE STAGIAIRE            
           AD2STG                  35  ALPHA       ADRESSE STAGIAIRE            
           VILSTG                  15  ALPHA       VILLE DU STAGIAIRE           
           DEPSTG                 2,0  ETENDU      DEPARTEMENT STG              
           BURSTG                 3,0  CONDENSE    BUR DIST STG                 
                                                                            ... 
 F3=Exit            F5=Réafficher       F12=Annuler      F14=Afficher définition
 F20=Renuméroter    F21=Toutes les zones                                        
 


|    Changer de couleur
                         Sélection et séquence des zones        
 
 Fichier . . . . . . . . . . :   FICP1          Bibliothèque . . :   STAGXX     
 Format d'enregistrement . . :   FICF1      
 
 Choisissez les zones et leur séquence et faites ENTREE (F21=Toutes les zones). 
                                                                               
                                                                               
 Séquence  Zone        Attr    Long    Type        Description                  
       1   NOMSTG                  20  ALPHA       NOM DU STAGIAIRE             
       2   PRESTG                  25  ALPHA       PRENOM DU STAGIAIRE          
       3   ENTSTG                 6,0  ETENDU      DATE D'ENTRE                 
       4   SORSTG                 6,0  ETENDU      DATE DE SORTIE               
       5   ADRSTG                  35  ALPHA       ADRESSE STAGIAIRE            
       6   AD2STG                  35  ALPHA       ADRESSE STAGIAIRE            
       7   VILSTG                  15  ALPHA       VILLE DU STAGIAIRE           
       8   DEPSTG                 2,0  ETENDU      DEPARTEMENT STG              
       9   BURSTG                 3,0  CONDENSE    BUR DIST STG                 
                                                                                
 F3=Exit            F5=Réafficher       F12=Annuler      F14=Afficher définition
 F17=Accès rapide   F20=Renuméroter     F21=Toutes les zones                    
 Confirmez vos choix (Entrée) ou les valeurs par défaut (F17).                # 


|    Changer de couleur
                                 Définition de zones            
 
 Fichier . . . . . . . . . :     FICP1          Bibliothèque  . :    STAGXX     
 Format d'enregistrement . :     FICF1      
 
 Indiquez vos options, puis appuyez sur ENTREE (F21=Toutes les zones).         
   2=Demander définition complémentaire                                         
   4=Supprimer définition complémentaire                                        
                                   Regardons les définitions complementaires  
                                                                              
                    Complément                                                
 Opt  Zone          définition   En-tête                                       
  2   NOMSTG            N        NOM DU STAGIAIRE     <-- Zone aplha 
      PRESTG            N        PRENOM DU STAGIAIRE  
  2   ENTSTG            N        DATE D'ENTRE         <-- Zone numérique 
      SORSTG            N        DATE DE SORTIE       
      ADRSTG            N        ADRESSE STAGIAIRE    
      AD2STG            N        ADRESSE STAGIAIRE    
      VILSTG            N        VILLE DU STAGIAIRE   
      DEPSTG            N        DEPARTEMENT STG      
 F3=Exit définition          F5=Réafficher       F12=Annuler                   
 F14=Afficher définition     F21=Toutes les zones                              


|    Changer de couleur
                        Complément de définition de zone                       
 
 Nom de zone  . . . . . :   NOMSTG                Format . . . . :   FICF1      
 
 Indiquez vos choix, puis appuyez sur ENTREE.                                 
 
-> Reproduction automatique  . . . . . .   N             O=Oui, N=Non          
!  Minuscules admises  . . . . . . . . .   O             O=Oui, N=Non          
!  En-tête                                                                    
!    complémentaire  . . . . . . .   NOM DU STAGIAIRE       COLHDG 
!                                                           modifiable 
!                                                         
!  Emplacement de l'en-tête  . . . . . .   *BEFORE       *ABOVE, *BEFORE       
!  Valeur initiale . . . . . . . . . . .                                        
!  Contrôles de validité . . . . . . . .   2 <--         2=Modifier, 4=Supprimer
!
Autorise la touche "DUP" 
A la saisie si l'utilisateur appuis sur "DUP" le pgm DFU dupliquera dans
cette zone la derniere valeur saisie
 
                                          Faire ROLLUP     ---->    A suivre... 
 F3=Exit      F12=Annuler       F14=Afficher définition                        


|    Changer de couleur
                        Complément de définition de zone                       
 
 Zone . . . . . . . . . :   NOMSTG        Format d'enreg  . . . :    STGF1      
 
 Indiquez vos choix, puis appuyez sur ENTREE.                                 
 
   Début sur nouvelle ligne  . . . . . . .   N     O=Oui, N=Non                
   Fin zone obligatoire  . . . . . . . . .   O     O=Oui, N=Non                
   Sortie uniquement . . . . . . . . . . .   N     O=Oui, N=Non                
   Non affichable  . . . . . . . . . . . .   N     O=Oui, N=Non                
   Espacement par défaut . . . . . . . . .   O     O=Oui, N=Non                
     Pour choix N=Non :                        
       Nombre d'espaces  . . . . . . . . .   01    0-40                       
   Caractères alphabétiques                                            
     uniquement  . . . . . . . . . . . . .   N     O=Oui, N=Non                
 
 
 
 
 
                                          Suite à ROLLUP                    ... 
 F3=Exit      F12=Annuler       F14=Afficher définition                        


|    Changer de couleur
                  Définition des contrôles de validité                         
 
 Zone . . . . . . . . . :   NOMSTG        Format d'enreg  . . . :    STGF1      
 
 Indiquez vos choix, puis appuyez sur ENTREE.                                 
 
   Entrée obligatoire  . . . . . .   N             O=Oui, N=Non                
   Remplissage obligatoire . . . .   N             O=Oui, N=Non                
   Vérification de nom . . . . . .   N             O=Oui, N=Non                
   Vérification de nom étendu  . .   N             O=Oui, N=Non                
   Blancs admis  . . . . . . . . .   N             O=Oui, N=Non                
   Opérateur relationnel . . . . .                 EQ, NE, LE, NG, . . .       
     Liste de valeurs  . . . . . .   
 
 
 
                                                   Liste de 1 à 20 valeurs     
 
 
                                          Suite à Option 2 sur    
                                          contrôles de validité.            ... 
 


|    Changer de couleur
                        Complément de définition de zone                       
 
 Zone . . . . . . . . . :   ENTSTG        Format d'enreg  . . . :    STGF1      
 
 Indiquez vos choix, puis appuyez sur ENTREE.                                 
 
   Reproduction automatique  . . . . . .   N             O=Oui, N=Non          
   Totalisation  . . . . . . . . . . . .   N             O=Oui, N=Non          
   En-tête de zone                                                            
     complémentaire  . . . . . . . . . .   DATE D'ENTRE         
                                                                
                                                                
   Emplacement de l'en-tête  . . . . . .   *BEFORE       *ABOVE, *BEFORE       
   Valeur initiale . . . . . . . . . . .                                        
   Incrémentation automatique  . . . . .           
   Contrôles de validité . . . . . . . .   2             2=Modifier, 4=Supprimer
 
 
 
 
                                                                    A suivre... 
 F3=Exit      F12=Annuler       F14=Afficher définition                        


|    Changer de couleur
                        Complément de définition de zone                       
 
 Zone . . . . . . . . . :   ENTSTG        Format d'enreg  . . . :    STGF1      
 
 Indiquez vos choix, puis appuyez sur ENTREE.                                 
 
   Début sur nouvelle ligne  . . . . . . .   N     O=Oui, N=Non                
   Fin zone obligatoire  . . . . . . . . .   O     O=Oui, N=Non                
   Sortie uniquement . . . . . . . . . . .   N     O=Oui, N=Non                
   Non affichable  . . . . . . . . . . . .   N     O=Oui, N=Non                
   Espacement par défaut . . . . . . . . .   O     O=Oui, N=Non                
     Pour choix N=Non :                        
       Nombre d'espaces  . . . . . . . . .   01    0-40                       
   Code d'édition  . . . . . . . . . . . .   L     Blanc, 1-4, A-D, J-M, . . . 
   Mot d'édition . . . . . . . . . . . . .   
 
 
                                                                
 
 
 
                                                                            Fin 


|    Changer de couleur
                  Définition des contrôles de validité                         
 
 Zone . . . . . . . . . :   ENTSTG        Format d'enreg  . . . :    STGF1      
 
 Indiquez vos choix, puis appuyez sur ENTREE.                                 
 
   Entrée obligatoire  . . . . . .   N             O=Oui, N=Non                
   Remplissage obligatoire . . . .   N             O=Oui, N=Non                
   Contrôle modulo 10  . . . . . .   N             O=Oui, N=Non                
   Contrôle modulo 11  . . . . . .   N             O=Oui, N=Non                
   Opérateur relationnel . . . . .                 EQ, NE, LE, NG, . . .       
     Liste de valeurs  . . . . . .   
 
 
 
                                                   Liste de 1 à 20 valeurs     
 
 
 
 
 
 


|    Changer de couleur
                                 Définition de zones            
 
 Fichier . . . . . . . . . :     FICP1          Bibliothèque  . :    STAGXX     
 Format d'enregistrement . :     FICF1      
 
 Indiquez vos options, puis appuyez sur ENTREE (F21=Toutes les zones).         
   2=Demander définition complémentaire                                         
   4=Supprimer définition complémentaire                                        
                                                 Appuyons sur <ENTREE>        
                                                                              
                    Complément                                                
 Opt  Zone          définition   En-tête                                       
      NOMSTG            O        NOM DU STAGIAIRE     
      PRESTG            N        PRENOM DU STAGIAIRE  
      ENTSTG            O        DATE D'ENTRE         
      SORSTG            N        DATE DE SORTIE       
      ADRSTG            N        ADRESSE STAGIAIRE    
      AD2STG            N        ADRESSE STAGIAIRE    
      VILSTG            N        VILLE DU STAGIAIRE   
      DEPSTG            N        DEPARTEMENT STG      
 F3=Exit définition          F5=Réafficher       F12=Annuler                   
 F14=Afficher définition     F21=Toutes les zones                              


|    Changer de couleur
                        Fin de définition d'un programme DFU         
 
 Indiquez vos choix, puis appuyez sur ENTREE.                                  
 
   Sauvegarde du programme . . . .   O             O=Oui, N=Non                
   Exécution du programme  . . . .   O  <--        O=Oui, N=Non                
     Pour choix O=Oui :                 
       Type d'exécution  . . . . .   1              1=Modifier, 2=Afficher     
   Modification du programme . . .   N  <--        O=Oui, N=Non                
   Sauvegarde du source DDS  . . .   N    !        O=Oui, N=Non                
                                          !---- Retour aux écrans précédents
   Pour Sauvegarde du programme=Oui :
     Programme . . . . . . . . . .   DFUPGM         Nom
       Bibliothèque  . . . . . . .     STAGXX       Nom, *CURLIB, . . .
     Droits  . . . . . . . . . . .   *CHANGE        Nom, *CHANGE, *ALL, . . .
     Texte . . . . . . . . . . . .   <--- titre saisie en début de définitio
 n---->  
   Pour Sauvegarde du source DDS=Oui :
     Fichier source  . . . . . . .                  Nom
       Bibliothèque  . . . . . . .     *CURLIB      Nom, *CURLIB, . . .
     Membre source . . . . . . . .   DFUPGM         Nom
 F3=Exit                F14=Afficher définition                 F17=Accès rapide


|    Changer de couleur
  ##########            Modification d'un fichier de données   
 
 Indiquez vos choix, puis appuyez sur ENTREE.                                   
 
   Programme . . . . . . . . .   DFUPGM        Nom, F4 pour liste              
     Bibliothèque  . . . . . .   STAGXX        Nom, *LIBL, *CURLIB             
 
   Fichier de données  . . . .   FICP1         Nom, *SAME, F4 pour liste       
                                                                               
     Bibliothèque  . . . . . .   STAGXX        Nom, *LIBL, *CURLIB             
   Membre  . . . . . . . . . .   *FIRST        Nom, *FIRST, F4 pour liste      
                                                                               
 
 
            Confirmation de la demande d'exécution 
             renseignée sur l'image précédente 
 
 
                                          !-- Le pgm DFU a été crée
                                          !
 F3=Exit     F4=Invite     F12=Annuler    !                                    
 Sauvegarde du programme DFU effectuée. <--                                   # 


|    Changer de couleur
 DFUPGM                                         Mode . . . . :   SAISIE         
 Format . . . . :   FICF1                       Fichier  . . :   FICP1      
 
  ###########           ######### 
 NOM DU STGAIAIRE:                         
 PRENOM DU STAGIAIRE:                           
 DATE D'ENTRE:             0  
 DATE DE SORTIE:           0  
 ADRESSE STAGIAIRE:                                       
 ADRESSE STAGIAIRE:                                       
 VILLE DU STAGIAIRE:                  
 DEPARTEMENT STG:      0  
 BUR DIST STG:          0                  Si votre fichier est vide DFU 
 NOTE COBOL:           0,00                se met automatiquement en mode 
 NOTE L.C:             0,00                SAISIE (ajout d'enregistrements) 
 NOTE RPG:             0,00  
 PROFIL UTILISATEUR:             
 
 
 
 F3=Exit                 F5=Réafficher            F6=Sélection format           
 F9=Insertion            F10=Saisie               F11=Modification              


|    Changer de couleur
 DFUPGM                                         Mode . . . . :   MODIFICATION   
 Format . . . . :   FICF1                       Fichier  . . :   FICP1      
 
 N° de rang:                 1  
 NOM DU STGAIAIRE:    NOM                       
 PRENOM DU STAGIAIRE: Prénom                    
 DATE D'ENTRE:        XXXXXX  
 DATE DE SORTIE:      YYYYYY  
 ADRESSE STAGIAIRE:   Rue tartempion                      
 ADRESSE STAGIAIRE:                                       
 VILLE DU STAGIAIRE:  NANTES          
 DEPARTEMENT STG:     44  
 BUR DIST STG:        000  
 
 
 
 
 
 
 
 F3=Exit                 F5=Réafficher            F6=Sélection format           
 F9=Insertion            F10=Saisie               F11=Modification              


|    Changer de couleur
                            Saisie de données - Fin                            
 
   Nombre d'enregistrements traités                                            
 
     Ajoutés  . . . . :           1     Les enregistrements 
     Modifiés . . . . :           1     Ajoutés,Modifiés,Supprimés 
     Supprimés  . . . :           0     seront listés 
 
 
 
 
 Indiquez votre choix, puis appuyez sur ENTREE.                                
 
   Fin de la saisie de données . .  O           O=Oui,  N=Non
 
 
 
 
 
 
 
 F3=Exit       F12=Annuler                                                     





©AF400