Vous pouvez insérer ces micro-patterns dans le code d'un Programme, d'un Ecran, d'un Serveur ou d'une Macro.
*!ADF "date1 date2"
*!ADn "xy date1 date2"
où
:Valeurs du format | Formats générés |
---|---|
I | An, mois, jour (AAMMJJ) |
D | Jour, mois, an (JJMMAA) ou Mois, jour, an (MMJJAA) selon le type de format demandé dans la zone Position Jour/Mois dans la date de la Définition de la Bibliothèque |
E | Jour/mois/an (JJ/MM/AA) ou Mois/jour/an (MM/JJ/AA) selon le type de format demandé dans la zone Position Jour/Mois dans la date de la Définition de la Bibliothèque Ces dates ont un format étendu. |
S | Siècle, an, mois, jour (SSAAMMJJ) |
G | Siècle an - mois - jour (SSAA-MM-JJ) |
C | Jour, mois, siècle, an (JJMMSSAA) ou Mois, jour, siècle, an (MMJJSSAA) selon le type de format demandé dans la zone Position Jour/Mois dans la date de la Définition de la Bibliothèque |
M | Jour/mois/siècle an (JJ/MM/SSAA) ou Mois/jour/siècle an (MM/JJ/SSAA) selon le type de format demandé dans la zone Position Jour/Mois dans la date de la Définition de la Bibliothèque |
Vous pouvez demander l'inversion d'une date, ou sa mise en forme avec des barres obliques.
Identifiant du micro-pattern | Fonction du micro-pattern et contenu des opérandes |
---|---|
ADI | Inversion des deux premiers et derniers caractères
d'une date de six caractères. Une date JJMMAA devient AAMMJJ et
inversement. Indiquez :
où date1 et date2 sont
deux Rubriques date de six caractères. date2 n'est
pas obligatoire. Dans ce cas, date1 récupère la date
inversée. |
ADS | Inversion d'une date avec le siècle. Une
date SSAAMMJJ devient JJMMSSAA,
et inversement. Indiquez :
où date1 et date2 sont
deux Rubriques date de huit caractères. date2 n'est
pas obligatoire. Dans ce cas, date1 récupère la date
inversée. |
ADE | Mise en forme d'une date de six caractères par
insertion de barres obliques. Une date JJMMAA, par
exemple, devient JJ/MM/AA. Indiquez :
où date1 est
une Rubrique date de six caractères et date2 une
Rubrique date de huit caractères. |
ADM | Mise en forme d'une date avec siècle par insertion
de barres obliques. Une date JJMMSSAA, par exemple,
devient JJ/MM/SSAA. Indiquez :
où date1 est
une Rubrique date de huit caractères et date2 une
Rubrique date de dix caractères. |
Identifiant du micro-pattern | Fonction du micro-pattern et contenu des opérandes |
---|---|
DAD | Calcul du nombre de jours entre deux dates. Indiquez
:
où :x est le format de date1 (facultatif). Si vous n'indiquez aucun format, il sera extrait du référentiel si la Rubrique a un format date. y est le format de date2 (facultatif). Si vous n'indiquez aucun format, il sera extrait du référentiel si la Rubrique a un format date. Le résultat de la comparaison est mis dans la zone NUM-DAYS, qui est automatiquement déclarée dans la WORKING-STORAGE SECTION. |
DAO | Addition ou soustraction de jours à une date. Indiquez
:
où :x est le format de date1 (facultatif). Si vous n'indiquez aucun format, il sera extrait du référentiel si la Rubrique a un format date. s est le signe (+ pour une addition ou - pour une soustraction). number est le nombre à ajouter ou retrancher à la date. Il peut être un entier ou une zone de travail. ffnn-date1 est la zone date en entrée. ffnn-date2 est la zone date résultat (facultative). |
Identifiant du micro-pattern | Fonction du micro-pattern et contenu des opérandes |
---|---|
TIM | Fournit l'heure sous la forme HHMMSS à
partir de la zone EIBTIME pour CICS, et TIME pour
les autres matériels. Indiquez :
où CORUB1 est
une Rubrique de six caractères. |
TIF | Transforme le format de l'heure HHMMSS en HH:MM:SS. Indiquez
:
où CORUB1 est
une Rubrique sur six caractère et CORUB2 est une
Rubrique de huit caractères |