Products Downloads


French version


 

 

ADELIA

VADELIA

SADELIA

WADELIA

MADELIA

(I/B)

(I/B) (C/S)

(B) (S)

(I/B) (C/S)

(I) (C/S)

 

Section for use

All

 

Syntax

READ_DTAARA Dtaara Parameter

 

Parameter

Þ

LCK | *LCK | None

 

Description

This instruction enables you to read a data communication field Dtaara. The data field name must be defined in the model, using the DS instruction (ADELIA programs), or else using the DTAARA or LDA instruction (Visual Adelia programs).

 

If LCK or *LCK is indicated, the data field is locked as it is read. You can see whether it is already locked by testing the reserved word *LOCKED (if *LOCKED = 1, it is already locked).

 

Important note: LCK or *LCK must not be used in the case of LDAs.

 

Note: In a VADELIA or SADELIA context, this instruction can be used in either the client part of the program or in a server block when it applies to the LDA (READ_DTAARA *LDA).

However, it can only be used in a Windows or AS/400 server block where it applies to a data area (declared using the DTAARA instruction).

 

 

Example

* The name of the data area is DTADAT

* Date format is DDMMCCYY

*

DS DTADAT 8 DATE,1 DAY,1 MONTH,3 YEAR,5 MMCC,3

*

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

VERIFICATION 01

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

READ_DTAARA DTADAT *LCK

IF   *LOCKED = '1'

PREPARE_MSG 0090 Z_SELECT_DATE

ERROR

END

DATE = Z_SELECT_DATE

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

VALIDATION 01

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

WRITE_DTAARA DTADAT

 

↑ Top of page


  • Aucune étiquette