The linkage of the exit routine identified in the product PDS COPY by the kDCWRTW source includes the following fields.
01 kDCWRT-REC. 05 kDCWRT-FLOPER PIC X(001). 05 kDCWRT-LREC PIC S9(009) COMP. 05 kDCWRT-DSNAME. 10 kDCWRT-DSNAME-52 PIC X(056) VALUE SPACE. 10 PIC X(001) VALUE LOW-VALUE. 05 kDCWRT-RETCODE PIC X(002). 01 kDCWRT-RECORD PIC X(16000).
These fields are described in the following table:
Field name | Input/Output | Description |
---|---|---|
kDCWRT-FLOPER | Input | Flag describing the action to be performed. Possible values: O - indicates that the call has been performed in the File opening mode C - indicates that the call has been performed in the File closing mode W - indicates that the call has been performed in the File writing mode |
kDWRT-LREC | Input | Length of the record layout that will be written. |
kDCWRT-DSNAME | Input | Name of the output sequential file. |
kDCWRT-RETCODE | Output | Return code. If the return code is left BLANK, it means that the routine has been run successfully. |
kDCWRT-RECORD | Output | File new record. |