NUMERO : Insérer de la logique dans un compteur

Utilisez le point d’entrée NUMERO pour prendre la main en affectation du numéro d’un compteur.

Contexte et mode de fonctionnement

Les tables suivantes sont en ligne :

Table

Contenu significatif

Intitulé Table

AVALNUM [AVN]

Oui

Valeurs des compteurs

ACODNUM [ANM]

Oui

Compteurs document

Même si, dans la plupart des cas, une transaction est en cours, cela ne dépend pas du programme d'appel. De même, en fonction du contexte, il peut, ou non, y avoir un fichier trace ouvert.

Les variables suivantes sont en ligne :

Variable ou masque

Définition

Char COMPTEUR

Nom du compteur

Char SIT

Site

Date DAT

Date

Char COMP

Valeur de la zone complément

Char VALEUR

Valeur du compteur

Integer STAT

Statut erreur (0=ok, sinon erreur)

Integer PERIODE

Période

Il est possible, par exemple, de réaffecter la valeur de COMP en fonction de la valeur de COMPTEUR et du contexte appelant. Vous devez alors vous assurer que le compteur ne peut être utilisé que par un seul programme ou dans un même contexte.

La variable GPE est testée au retour du point d'entrée. Sa mise à zéro provoque la sortie du sous-programme et la suite du traitement standard n’est pas exécuté. Incrémentation du compteur (table AVALNUM) et retour VALEUR du numéro de compteur.

NUMEROCHG : Modifier un compteur

Utilisez le point d’entrée NUMEROCHG pour modifier le numéro affecté à partir d’un compteur.

Contexte et mode de fonctionnement

Les tables suivantes sont en ligne :

Table

Contenu significatif

Intitulé Table

AVALNUM [AVN]

Oui

Valeurs des compteurs

ACODNUM [ANM]

Oui

Compteurs document

Même si, dans la plupart des cas, une transaction est en cours, cela ne dépend pas du programme d'appel. De même, en fonction du contexte, il peut, ou non, y avoir un fichier trace ouvert.

Les variables suivantes sont en ligne :

Variable ou masque

Définition

Char COMPTEUR

Nom du compteur

Char SIT

Site

Date DAT

Date

Char COMP

Valeur de la zone complément

Char VALEUR

Valeur du compteur

Integer STAT

Statut erreur (0=ok, sinon erreur)

Integer PERIODE

Période

Il est possible de modifier la valeur de VALEUR en fonction de la valeur de COMPTEUR et du contexte appelant. Vous devez alors vous assurer que le compteur ne peut être utilisé que par un seul programme ou dans un même contexte.