Sous-routine Init

différente
(en G). Pour ce programme exemple, nous limiterons au minimum
le traitement des erreurs. Par conséquent, nous écrivons
un message d’erreur vers le fichier avant de faire avorter
le programme avec un appel adressé à  *Pssr.
Ensuite, en H, nous créons les deux espaces utilisateur à 
l’aide des paramètres suivants :

• le nom de l’espace
• l’attribut d’espace que j’ai arbitrairement défini comme « TEMPORARY »
• une taille initiale (c’est la plus petite
  taille possible, mais les espaces peuvent
  grandir)

• un caractère de remplissage constitué
  par un zéro hexadécimal

• une autorité publique, que j’ai définie
  comme *ALL (mais comme elle est
  dans QTEMP, personne d’autre ne
  peut y parvenir de toute façon)

• du texte
• *YES pour remplacer tout espace
  existant de ce nom

• la structure d’erreur Qusec, qui est
  courante à  tous ces appels d’API

• le domaine dans lequel l’espace est
  placé (*USER)

En I, nous listons les objets dans
l’espace utilisateur avec les paramètres
suivants :

• le nom de l’espace
• le format des données requises
• le nom de l’objet que nous voulons
  lister et sa bibliothèque (ici, nous utilisons
  la valeur spéciale *ALL pour
  tous les noms d’objets, avec le nom
  de bibliothèque venant du paramètre
  d’entrée)

• le type d’objet (*PGM)
• la structure d’erreur

Vous trouverez des détails tels que
les formats et les données renvoyées à 
la page API de l’IBM Information Center
à  http://publib.boulder.ibm.com/iseries/
v5r2/ic2924/info/apis/api.html.