Ces micro-patterns conditionnent l'exécution des traitements associés à un niveau fonction ou sous-fonction ou à un niveau COBOL 99 à partir de tests sur des dates. Vous pouvez les insérer dans le code d'un Programme, d'un Ecran, d'un Serveur ou d'une Macro.
Les micro-patterns DCF et DCD conditionnent l'exécution des traitements à la véfication d'une comparaison entre deux dates. Si la comparaison est vraie (par exemple, si la première date est supérieure à la deuxième date), alors le traitement est effectué. Le micro-pattern DCF s'applique à un niveau fonction ou sous-fonction. Le micro-pattern DCD s'applique à un niveau COBOL 99.
*!DCD "xy ffnn-date1 ope ffnn-date2"
NEXT SENTENCE ELSE GO TO Fffss-FN.
ffss représente la fonction ou sous-fonction sur laquelle le micro-pattern s'applique.
Les micro-patterns DVF et DVD conditionnent l'exécution des traitements à la validité d'une date. Si la date est valide, alors le traitement est effectué. Le micro-pattern DVF s'applique à un niveau fonction ou sous-fonction. Le micro-pattern DVD s'applique à un niveau COBOL 99.
*!DVD "x ffnn-date1"
La regénération du Programme, de l'Ecran ou du Serveur prend en compte le micro-pattern. La sous-fonction F95ER est générée pour les erreurs.
IF EN-PRE=’1’
IF EN-PRE=’1’
NEXT SENTENCE ELSE GO TO Fffss-FN
ffss représente la fonction ou sous-fonction sur laquelle le micro-pattern s'applique.
Les micro-patterns DIF et DID conditionnent l'exécution des traitements à l'invalidité d'une date. Si la date est invalide, alors le traitement est effectué. Le micro-pattern DIF s'applique à un niveau fonction ou sous-fonction. Le micro-pattern DID s'applique à un niveau COBOL 99.
*!DID "x ffnn-date1"
La regénération du Programme, de l'Ecran ou du Serveur prend en compte le micro-pattern. La sous-fonction F95ER est générée pour les erreurs.
IF EN-PRE>’1’
IF EN-PRE>’1’
NEXT SENTENCE ELSE GO TO Fffss-FN
ffss représente la fonction ou sous-fonction sur laquelle le micro-pattern s'applique.