>PL/I

With "IBM(R) Enterprise PL/I for z/OS V4.R2.M0" the following code:

    DCL SOURCE CHAR(10) INIT('0123456789');              
    PUT SKIP LIST( ">" !! SUBSTR(SOURCE, 8, 5) !! "<" );

leads to msg:
    "IBM1446I E  4.0 Third argument in SUBSTR reference is too big. It
will be trimmed to fit."

and TFM says under SUBStR():
    The STRINGRANGE condition is raised if z is negative or if the
values of y and z are such that the substring does not lie entirely
within the current length of x.

--
Peter Hunkeler

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to