6. Routines d’existence

CALL RSEXIS (nomsd, iret)

IN	nomsd	K8	nom de la structure de données RESULTAT
OUT	iret	I	code retour : = 0, la structure existe ; ? 0, la structure n’existe pas.

Vérification de l’existence d’une structure SD_RESULTAT.

CALL RSEXPA (nomsd, icode, nompar, iret)

IN	nomsd	K8	nom de la structure de données RESULTAT
IN	icode	I	= 0, variable d’accès = 1, paramètre = 2, variable d’accès ou paramètre
IN	nompar	K16	nom du paramètre ou de la variable d’accès
OUT	iret	I	code retour: = 0, le nom n’existe pas; = 100, le nom existe.

Vérification de l’existence d’un nom de paramètre ou d’un nom de variable d’accès dans une structure SD_RESULTAT.

CALL RSVPAR (nomsd, iordr, nompar, ipar, rpar, kpar, iret)

IN	nomsd	K8	nom de la structure de données RESULTAT
IN	iordr	I	numéro d’ordre
IN	nompar	K16	nom du paramètre à vérifier
IN	ipar	I	valeur du paramètre si entière
IN	rpar	R8	valeur du paramètre si réelle
IN	kpar	K..	valeur du paramètre si caractère
OUT	iret	I	code retour: = 0, ce n’est pas un paramètre = 100, la valeur du paramètre est correcte = 110, la valeur du paramètre n’est pas correcte

Vérification de l’existence d’un nom de paramètre et de sa valeur pour un numéro d’ordre donné dans une structure SD_RESULTAT.