ADELIA | VADELIA | SADELIA | WADELIA | EADELIA | (I/B) | (I/B) (C/S) | (B) (S) | (I/B) (C/S) | (B) (C/S) |
|
Type
2.0 N
Use
Case 1 | Reserved word used for UP, DE and CR class management rules. Permits (*MR_ERROR = 0) or prevents (*MR_ERROR <> 0) the creation, updating or deletion procedure. |
|
| Case 2 | When using object modules via the CALL_METHOD instruction (Adelia/400 context), a value can be assigned to *MR_ERROR within the management rule. This value is transmitted to the program using the object module in order to be tested. |
|
Example
Case 1 | In the 4GL source for a UP class management rule: |
|
IF <condition>
*MR_ERROR = 1
END
In the program:
UPDATE VIEW
In the verification list, the following transformation is performed:
*MR_ERROR = 0
CALL_METHOD *UP VIEW (or INSERT_MR *UP VIEW)
IF *MR_ERROR = 0
UPDATE VIEW *NO_MR
END
Case 2 | In the 4GL source for a CA class management rule: |
|
IF <condition>
*MR_ERROR = 2
END
In the program:
*MR_ERROR = 0
CALL_METHOD *CA ZTOTAL_PRICE
IF *MR_ERROR = 2
Adelia instruction
END
↑ Top of page