PDMOPTW





PDM choix d'une option (RPG)


|
                            PDM - Gestion des membres                  AS400    

 Fichier . . . . .   IFSSRC         Bibliothèque  .     AF4SRCT              Afficher à partir de .              
 Indiquez vos options, puis appuyez sur ENTREE.                                   2=Editer   3=Copier   4=Supprimer   5=Afficher  6=Imprimer  7=Rebaptiser    8=Description  9=Sauvegarder  13=Modifier texte 14=Compiler 15=Créer module...    Opt  Membre      Type        Texte                                               P    API_IFS     RPGLE       API de gestion IFS en RPGLE (extrait redbook)       CHKIFSOBJ   CMD         test existence fichier IFS       CHKIFSOBJC  CLLE        Cpp de la commande CHKIFSOBJ       FILEXIST    RPGLE       test existence fichier par pgm       ICONV       RPGLE       Utilisation des API iconv pour chgt CCSID       IFS_API     RPGLE        déclaration des fonctions pour API IFS en RPG4       IFS_CONST   RPGLE        constantes pour API IFS en RPG4       IFS_CREATE  RPGLE       -- Utilisation de O_TEXT_CREAT (C) Scott Klement                                                                     A suivre...   Paramètres ou commande                                                          ===>                                                                             F3=Exit     F4=Invite                  F5=Réafficher         F6=Créer         

|
           ############# ####################################################   
                         #    8/02/05    PDM Options utlisateur   18:14:11  # 
 Fichier . . . . .   IFS #   Op Commande                                    # 
   Bibliothèque  .     A # 5  A af4s/a &n  /* voir tous les cours d'un sup  #   
                         #    E af4s/edtsup &n /* révision d'un support de  # 
 Indiquez vos options, p #    I af4s/i &n  /* imprimer un support */        #  
  2=Editer   3=Copier    #    Q CPYSRCF FROMFILE(&L/&F) TOFILE(&L/&F) FROM  # 
  8=Description  9=Sauve #    S af4s/s &n  /* reviser entièrement un suppo  # ..
                         #   AD ADDAF4MBR MEMBRE(&N) FICHIER(&L/&F)         # 
 Opt  Membre      Type   #   AL addlible &n                                 # # 
 P    API_IFS     RPGLE  #   AN af400/ANIM MEMBRE(&N) FICHIER(&L/&F)        # 
      CHKIFSOBJ   CMD    #   BL clrpfm &l/&f &n                             # 
      CHKIFSOBJC  CLLE   #   CD strpccmd 'CODEDSU <>&L/&F(&N)'              # 
      FILEXIST    RPGLE  #   CE strpccmd 'CODEEDIT <>&L/&F(&N)'             # 
      ICONV       RPGLE  #   CH AF4ADM/CVTAF4HTML SRCMBR(&N) FROMFILE(&L/ + # 
      IFS_API     RPGLE  #                                                  # 
      IFS_CONST   RPGLE  # Cde ==>                                          # 
      IFS_CREATE  RPGLE  #                                                  # 
                         #  1 = Choisir,5 = Voir détail. <ENTREE> ou F4.    # . 
 Paramètres ou commande  #  F3=Exit,F4=Invite,F5= Réafficher, F21= Cde      #  
 ===>                    #                                                  #   
 F3=Exit     F4=Invite   ####################################################  




©AF400