IBM0121S
ONCODE=oncode-value The RECORD condition was raised because the length of the record variable was less than the record length (FILE= or ONFILE= file-name).

Explanation

This message was produced for records that were longer than the associated PL/I variable.

  1. For a READ statement, the record was truncated to the length of the variable in the INTO option.
  2. For a LOCATE statement (F-format records only), a buffer was not allocated.
  3. For a WRITE statement (F-format records only), the record was transmitted with the appropriate number of padding bytes added to equal the length of the record on the data set. The contents of the padding bytes were undefined.
  4. For a REWRITE statement, the record was replaced by the shorter record with the appropriate number of padding bytes added to equal the length of the record on the data set. The contents of the padding bytes were undefined.

System action

The ERROR condition is raised.

Programmer response

Either supply an ON-unit for the RECORD condition so the program can continue running, or modify the program to make the length of the record variable the same as the length of the records on the data set. Refer to the language reference manual for this compiler for details of how such records are handled when the RECORD condition is raised.

Symbolic Feedback Code

IBM03P