PreviousNext
Help > Développement > Programmes et DataQueues >
Décrire les programmes natifs AS/400

 Voir : Importation de programmes ou de Data Queue

 

EASYCOM permet d’appeler les programmes natifs de l’AS/400, CL, RPG ou encore des procédures stockées.

Pour cela EASYCOM a besoin de la description de ces programmes qu’il stocke sur l’AS/400, dans les fichiers YPROCHDR et YPROCPARMS de la bibliothèque EASYCOM.

 

La description des programmes et des data queues se fait par le constructeur DTAQ-RPC. Le principe de base consiste à préciser l’ensemble des paramètres, leurs types et leur utilisation (entrée, sortie, entrée-sortie) pour l’appel du programme.

Le premier écran présente les procédures existantes (stockées sur l’AS/400) et permet de créer, modifier ou supprimer ces dernières. On peut également sauvegarder dans un fichier au format texte et côté PC ces descriptions pour les transférer ensuite sur un autre AS/400.

 

image\ebx_1367546936.gif

 

Un nouveau nom est donné à la procédure, et n’a pas besoin d’être identique au programme qui lui sera associé.

Un programme natif AS/400 (CL, RPG, COBOL, C, …) est associé à la procédure.

La bibliothèque peut être omise, ou remplacée par *LIBL.

La description est un texte libre qui sera visible lors du parcours des procédures par les postes clients.

Chaque paramètre d’appel du programme est décrit, afin de donner son type et sa taille.

 

image\ebx_697072017.gif

Chaque paramètre peut être considéré comme un champ dans une table de base de données.

Il a donc un nom, auquel l’application pourra faire référence.

Des paramètres destinés à envoyer des valeurs au programme appelé sont considérés comme paramètres en entrée (IN).

Les paramètres destinés à recevoir une valeur au retour de l’appel sont considérés comme paramètres en sortie (OUT).

Des paramètres modifiés par le programme sont en Entrée et Sortie (IN /OUT).

 

Par défaut, tous les paramètres d’un programme de l’AS/400 sont en Entrée et Sortie.

C’est la logique du programme qui peut changer cette propriété.

Si un paramètre d’appel du programme est une structure (DS : Data Structure), chaque champ de la DS doit être décrit individuellement.
Pour le premier champ uniquement, la case à cocher est : "This field is a parameter or the 1st Field of a Data Structure."

 

Le type du paramètre attendu par le programme sur l’AS/400 doit être donné avec exactitude :

 

CHAR :

Donnée de type caractère

BIN2 :

Donnée numérique entière sur 16 bits

BIN4 :

Donnée numérique entière sur 32 bits

PACK :

Donnée numérique condensée (DECIMAL)

 

C’est dans ce format que les données numériques sont gérées par le CL (type CL *DEC)

ZONED :

Donnée numérique étendue (NUMERIC)

DATE :

Date AS/400 sous la forme jj-mm-aaaa

TIME :

Heure dans le format hh :mm :ss

FLOAT :

Valeur numérique en flottant simple précision

DOUBLE :

Valeur numérique en flottant double précision

TIMESTP :

Champ horodatage (timestamp)

GRAPHIC :

Donnée de type caractère, ne devant pas être convertie

EXTERNAL DS :

La structure est décrite par une Data Structure externe, c’est-à-dire un fichier physique

 

image\ebx_1524244762.gif

 

Les programmes décrits pourront ensuite être "ouverts" comme des fichiers, appelés en simulant une écriture et les valeurs en sortie pourront être lues en simulant une lecture.