Contrôle d'un incident

La fonction Controler_Incident de GRTM000 contrôle un code incident en saisie.
En cas d'erreur, si 'err' est renseigné, le message 'err' s'affiche et provoque le retour en saisie. L'enregistrement lu est chargé dans GRTINC. En cas d'échec dans la recherche GRTINC est initialisé à espace. Attention le code est passé par adresse.
Prototype de la fonction
Controler_Incident (&Incident,err)
INCIDENT
Code incident
Paramètre obligatoire
ERR
Numéro du message d'erreur si on souhaite un affichage automatique.
Paramètre facultatif
Valeur par défaut 0

Retour de la fonction
0ok
9enregistrement non trouvé