Dans la sous-routine Main1 en J, nous obtenons l'en-tête au début de l'espace utilisateur : cela nous renseigne sur les données chargées dans l'espace. J'ai séparé cela dans une sous-routine différente, GetSpcHdr, pour faciliter le couper/coller du code dans d'autres programmes. Je me prémunis aussi contre le renvoi d'entrées (c'est-à -dire,
Sous-routine Main1
qu’il n’existe pas d’objets programme dans la bibliothèque). Notez également
la présence d’une boucle do qui
s’indexe au travers du nombre d’entrées
pour extraire les enregistrements
de données.
En K, la sous-routine GetHpcHdr
emploie l’API QUSRTVUS définie dans
le prototype UsrSpcEnt (en section E).
Notons que l’en-tête démarre à la position
1 pour la longueur du format
d’en-tête prédéfini Qush0100. Cela
renvoie dans le format Qush0100
(entre d’autres données) le point de
départ de la liste dans Qusold (OLD =
Offset to List Data), la longueur de
l’entrée Qussee (cette valeur devrait
correspondre à la longueur de la
structure de données OBJL0400) et
Qusnbrle (le nombre d’entrées de la
liste). Comme nous réutilisons cette
structure de données, ces trois champs sont sauvegardés comme
champs de travail. Voyons maintenant
la sous-routine GetSpcDtl.
Téléchargez cette ressource
Microsoft 365 : 5 erreurs de sécurité
A l’heure où les données des solutions Microsoft 365 sont devenues indispensables au bon fonctionnement de l’entreprise, êtes-vous certain de pouvoir compter sur votre plan de sécurité des données et de sauvegarde des identités ? Découvrez le Top 5 des erreurs à ne pas commettre et les meilleures pratiques recommandées par les Experts DIB France.
Les articles les plus consultés
A travers cette chaîne
A travers ITPro
