What was the release date on that?
________________________________
From: IBM Mainframe Discussion List <[email protected]> on behalf of 
Charles Mills <[email protected]>
Sent: Sunday, May 21, 2023 1:46 PM
To: [email protected] <[email protected]>
Subject: Re: LENGTH OF in COBOL (was: ISPF HILITE Question)

VS COBOL II Release 4 -- change bars on the doc:

x LENGTH OF Special Register
x     The LENGTH OF special register contains the number of bytes used by an
x     identifier.

x     LENGTH OF creates an implicit special register whose content is equal
x     to the current byte length of the data item referenced by the
x     identifier.

x     Note:  For DBCS data items, each character occupies 2 bytes of
x     storage.

... and more

Charles

On Sun, 21 May 2023 00:51:33 +0000, Frank Swarbrick 
<[email protected]> wrote:

>At least VS COBOL II, as far as I can remember.  This is when CICS added the 
>COBOL2 translate option to allow the LENGTH argument to be omitted, since it 
>used LENGTH OF under the covers.
>Also, it's called a "special register" rather than built-in function; though 
>now there is also an intrinsic function LENGTH, as well as BYTE-LENGTH.

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

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

Reply via email to