FLAM4SEPA-API
FLAM4 SEPA Archive Interface (z/OS only)
|
Output structure. More...
#include <FL4SEPA.h>
Data Fields | |
C08 | acRc [F4S_RCLEN] |
C08 | acErrorText [F4S_ERRTXTLEN] |
Output structure.
This structure consists of a two digit return code and 80 bytes of error text. If the error text has been initialized with LOGn, then SYSOUT logging in the defined depth (n=0-9) is activated. Currently, the maximum level is 4 which is used by the update and research function. All other functions have a maximum log level of 3. Additionally, sequential search can be activated for the lookup function with 'SEQ' starting at the 5th byte, which ignores the signature file. This is mainly for verification.
At load, appending (reload) to the archive can be activated if the return code is initialized with '02' or '03' where the latter activates an additional plausibility check of the existing FLAMFILEs. For the initial load an return code of '10' result in open of FLAMFILEs only if records provided. This behavior is default at append since version 5.1.28 of FLAM to prevent the mismatch error of the identifier in the plausibility check at lookup.
At lookup, the first digit of the return code can be used to select one of the following options:
The second digit can be used for:
In case of an error, "12" and an error message is written to these fields.
ATTENTION: It is necessary to deactivate the plausibility check if an append has been made without any records and the signature file is not a KSDS (version 22 or older). In this case the empty member will be found as the first record in the 3 KSDS datasets and as the last record in the signature file and the comparison of the identifier will result in a mismatch. To avoid this error, the second digit of the return code must be initialised with '1' or '2'. With the latest build of version 5.1.28, the 4 FLAMFILES are opened after the first record is read. If no record is provided, the FLAMFILES are not touched. This means that since this change the problem can no longer be produced, but there may still be archives containing this problem.
01 LG-PARMS-OUT. 05 RETCO PIC 9(02). 88 RCOK VALUE ZERO. 88 RCNOK VALUE 12. 05 ERROR-TEXT PIC X(80).
C08 F4sOut::acRc[F4S_RCLEN] |
C08 F4sOut::acErrorText[F4S_ERRTXTLEN] |