X"91" function 46

Enables insertion of a null character x"00" before data characters whose value is less than x"20" in line sequential files.

Syntax:
call x"91" using result
                 function-code
                 parameter
Parameters:
Using call prototype (see Library Routines - Key) Picture (32-bit systems)
result cblt-x1-compx pic x comp-x.
function-code cblt-x1-compx pic x comp-x.
parameter FD name of file
On Entry:
function-code Value 46
parameter The file-identifier specified in the File Description (FD). Must refer to a line sequential file which is currently open.
On Exit:
result Set to zero if the call was successful, nonzero otherwise.
Comments:

If you want to include non-ASCII data in a file then you must enable null insertion. This function lets you enable null insertion for individual files regardless of the setting of the run-time switch N.

Example:
 fd payroll-file
      ...
     call x"91" using result
                      function-code
                      payroll-file
See Also: