The format for calling DSNTIAR from a COBOL program is:
CALL 'DSNTIAR' USING comm-area
error-message
error-rec-length
The format for calling DSNTIAC from a CICS COBOL program is:
CALL 'DSNTIAC' USING comm-area
error-message
error-rec-length
where:
| comm-area | The communications area to be used, generally set to SQLCA. The SQLCODE element of this area should contain the error code for which DSNTIAR will generate a message. |
| error-message | An array of records of size error-rec-length used to store error message output. The two components of the error-message array are: |
| error-length | containing an integer indicating the length of the second element, error-text. error-length >= 240. |
| error-text | which is the actual message. Generally this message is defined as an array of strings, each having a length of error-rec-length, and occurring n times so that error-length is the larger of 240 and error-rec-length * n. |
| Code | Description |
|---|---|
| Error-rec-length | A n integer indicating the logical record length of output messages. 72 <= error-rec-length <= 240. If the message is longer than error-rec-length, several logical records will be used to store it. |
| 0 | Successful execution. |
| 4 | More data was available than could fit into the provided message area. |
| 8 | The error-rec-length was not within acceptable limits. (72 <= error-rec-length <= 240) |
| 12 | The message area was not large enough. Message length was >= 240. |
| 16 | Error in message routine. |
The following table shows the return codes that result from calling the DSNTIAR or DSNTIAC utility.
| Code | Description |
|---|---|
| 0 | Successful execution. |
| 4 | More data was available than could fit into the provided message area. |
| 8 | The error-rec-length was not within acceptable limits. (72 <= error-rec-length <= 240) |
| 12 | The message area was not large enough. Message length was >= 240. |
| 16 | Error in message routine. |