Diverses API V2R30: *LIBL,RNMOBJ,WRKSYSSTS,SYSVAL

BoTTom |   
 
 Diverses API V2R30
 
              + QWCCCJOB 
 
                modifie le code d'exit F3 / F12 (récupérable par QUSRJOBI)
 
                - CHAR(??) infos à modifier, découpé comme suit:
 
                  - BIN(4) nombre d'informations modifiées
 
                  - CHAR(??) informations, sous la forme
                                             . BIN(4) clé 1= touche F3
                                                          2= touche F12
                                             . BIN(4) lg nouvelle valeur
                                             . CHAR(1) nouvelle valeur
                                                       0=touche utilisée
                                                       1=non utilisée
 
 
 
 


|   
 
              + QWCRNETA 
 
                retrouve les attributs réseau
 
                - CHAR(??) variable en retour
 
                - BIN(4) lg de la variable en retour
 
                - BIN(4) nbr d'attributs réseau à extraire
 
                - CHAR(??) x fois CHAR(10) = les attributs réseau
 
                             DFTMODE = mode par défaut
                             DTACPR  = compression APPC
                             LCLNETID = ID réseau locale
                             NODETYPE = type de noeud
                             SYSNAME  = nom de système
                              ...
 
                - CHAR(??) code erreur
 


|   
 
 la variable en retour est découpée de la manière suivante:
 
    - BIN(4) nombre d'attributs extraits
 
    - CHAR(??) x fois BIN(4) = déplacement pour atteindre la table
                                d'information de cet attribut réseau
 
    - CHAR(??) tables d'information des attributs réseau
               x fois le découpage suivant:
 
                 . CHAR(10) nom de l'attribut réseau
                 . CHAR(1)  type de valeur retournée  C=caractère
                                                      B=binaire
                 . BIN(4)   lg de la valeur
                 .  ???     valeur
 
 
 
 
 
 


|   
 
              + QWCRSVAL 
 
                retrouve une ou plusieurs valeurs système
 
                - CHAR(??) variable en retour
 
                - BIN(4) lg de la variable en retour
 
                - BIN(4) nbr de valeurs système à extraire
 
                - CHAR(??) x fois CHAR(10) = les valeurs système
 
                             Q...    = les valeurs système
 
                - CHAR(??) code erreur
 
 
 
 
 
 


|   
 
 la variable en retour est découpée de la manière suivante:
 
    - BIN(4) nombre de valeurs système extraites
 
    - CHAR(??) x fois BIN(4) = déplacement pour atteindre la table
                                d'information de cette valeur système
 
    - CHAR(??) tables d'information des valeurs système,
               x fois le découpage suivant:
 
                 . CHAR(10) nom de la valeurs système
                 . CHAR(1)  type de valeur retournée  C=caractère
                                                      B=binaire
                 . CHAR(1)  état : ' ' valeur système disponible et extraite
                                   'L' valeur système indisponible (LOCK)
                 . BIN(4)   lg de la valeur
                 .  ???     valeur
 
 
 
 


|   
 
              + QWCRSSTS 
 
                renvoi l'équivalent du WRKSYSSTS
 
                - CHAR(??) variable en retour
 
                - BIN(4) lg de la variable en retour
 
                - CHAR(8) format : SSTS0100 = infos générales sur les jobs
                                              (nbr de jobs actifs,...)
                                   SSTS0200 = infos générales / système
                                              (% CPU, % ASP, ...)
                                   SSTS0300 = infos par pool système
                                              (table de X pools systèmes)
 
                - CHAR(10) réinitialiser les stats (*YES/*NO)
 
                - CHAR(??) code erreur
 
 
 


|   
 
              + QLICHGLL 
 
                modifie *LIBL
 
                - CHAR(11) CURLIB  un nom ou *CRTDFT ou *SAME
 
                - CHAR(11) 1ère bibliothèque produit: un nom,*NONE,*SAME
 
                - CHAR(11) 2ème bibliothèque produit  -----idem---------
 
                - CHAR(??) partie utilisateur de *LIBL
 
                           x fois CHAR(11)
 
                - BIN(4)   nbr de biblothèques dans la variable précédente
                           un chiffre
                           -1 = la partie *USRLIBL ne change pas
                            0 = la partie *USRLIBL est mise à blanc.
 
                - CHAR(??) code erreur
 


|   
 
              + QLIRNMO  
 
                renomme ou déplace (ou les deux) un objet avec remplacement.
 
                - CHAR(20) coordonnées actuelles <--nom(10c)-><-bibli(10c)->
 
                - CHAR(10) type d'objet
 
                - CHAR(20) coordonnées futures <--nom(10c)-><-bibli(10c)->
 
                - CHAR(1)  option de remplacement
                           0 = si l'objet existe déja ==> erreur
                           1 = si l'objet existe déja ==> remplacement
                en cas de remplacement: 
                        le propriétaire est celui du nouvel objet
                        les autorisations, les params USRPRF et USEADPAUT
                          sont ceux de l'objet remplacé.
                        s'il s'agit d'un pgm il est placé dans QRPLOBJ
                         sinon, il est supprimé.
 
                - CHAR(??) code erreur


|   
 
              + QSPRWTRI 
 
                extrait des informations concernants un éditeur de spool
 
                - CHAR(??) variable en retour
 
                - BINR(4)  lg de la variable en retour
 
                - CHAR(8) FORMAT = WTRI0100
 
                - CHAR(10) imprimante
 
                - CHAR(??) code erreur




©AF400