ADELIA |
VADELIA |
SADELIA |
WADELIA |
EADELIA |
(I/B) |
(I/B) |
(B) |
(I/B) |
(B) |
Description
Permet de calculer le nombre de jours qui séparent deux dates données en format sur 6 positions.
Particularité : le siècle est calculé à l'aide d'une année limite. La règle de calcul est la suivante :
SI Année date >= Année limite
==> SIECLE = 19
SINON
==> SIECLE = 20
La valeur par défaut de cette année limite est 50. Elle peut être changée :
Sur AS/400 (programmes Adélia iSeries RPG ou partie serveur AS/400) : en modifiant la Data Area HA£LYC. La Data Area prise en compte est la première trouvée dans la liste des bibliothèques. A la livraison du produit, elle est stockée dans les bibliothèques HA£XRUN et HA2SLIB.
Sur Windows (programme Visual Adélia client Windows ou parties serveur Windows, programmes ADELIA générés en C) : en l'indiquant dans l'onglet "Affichage" du configurateur d'interface (lancer confintw.exe).
En Java (Client Adélia Cloud, client Adélia Web, serveur Java, client Java) : en modifiant la valeur de la clef DATE6_YEAR_LIMIT dans le fichier CfgConfiguration.properties.
Un contrôle des dates passées en paramètres est effectué. Si l'une d'elles est invalide, la fonction n'est pas exécutée et la zone résultat est remise à zéro.
Syntaxe
Résultat = &ECART_DATES6(Format des dates;Date début;Date fin)
Paramètres
Définition |
Contenu |
Contrôles |
|
Résultat |
Variable numérique sur 7 positions. |
Nombre de jours qui séparent les deux dates passées en paramètres. |
|
Format des dates |
Variable ou constante alphanumérique sur |
Format des dates passées en paramètres. Valeurs possibles : DMY Jour/Mois/Année |
Paramètre obligatoire. |
Date début |
Variable ou constante numérique sur 6 positions. |
Date de début pour le calcul. |
Paramètre obligatoire. |
Date fin |
Variable ou constante numérique sur 6 positions. |
Date de fin pour le calcul. |
Paramètre obligatoire. |
Remarque : la date de début doit être antérieure à la date de fin, sinon le résultat obtenu est négatif.
Par exemple
FORMAT = 'DMY'
DATE_CDE = 311200
DATE REGLEMENT = 200101
DELAI = &ECART_DATES6(FORMAT;DATE_CDE;DATE_REGLEMENT)
*
* DELAI est égal à : 20.
DELAI = &ECART_DATES6(FORMAT;DATE_REGLEMENT;DATE_CDE)
*
* DELAI est égal à : -20.
