ECRIRE_DTAARA

Paragraphe d'utilisation

Tous

Syntaxe

ECRIRE_DTAARA Dtaara

Description

Cet ordre permet de mettre à jour une zone de données Dtaara.

Pour pouvoir écrire dans une zone de données (Data Area), il faut que :

• • le nom de la zone de données soit défini dans le programme par l'ordre DS (programme ADELIA), ou bien par l'ordre DTAARA ou LDA (programme Visual Adélia),

  • la zone de données ait été lue en mode exclusif (sauf pour la LDA) ; voir l'ordre LIRE_DTAARA.

Lorsque cet ordre est utilisé, la zone de données est déverrouillée automatiquement après la mise à jour.

Attention : dans un contexte Visual Adélia, lorsque cet ordre s'applique à la LDA (ECRIRE_DTAARA *LDA), il peut être utilisé dans la partie client ou dans un bloc serveur. Lorsqu'il s'applique sur une Data Area (déclarée avec l'ordre DTAARA), il ne peut être utilisé que dans un bloc serveur AS/400 ou Windows.

Remarque sur la LDA : la LDA est lue de manière implicite au début du programme et elle est écrite de manière implicite à la fin du programme.

Il est possible d'écrire dans la LDA en cours de programme (par exemple avant l'appel d'un autre programme) ; voir l'ordre DS (Local Data Area).

Par exemple

* Le nom de la Data Area est DTADAT. 

* Le format de la date est JJMMAA  

*  

DS DTADAT 6 DATE,1 JOUR,1 MOIS,3 ANNEE,5 MOIS_ANNEE,3  

*  

********************** 

VERIFICATION 01 

********************** 

LIRE_DTAARA DTADAT *LCK 

SI   *BLOQUE = '1' 

PREPARER_MSG 0090 Z_DATE_SELECT

ERREUR

FIN 

DATE = Z_DATE_SELECT 

******************* 

VALIDATION 01 

******************* 

ECRIRE_DTAARA DTADAT

↑ Haut de page