Yes, the ISPF COBOL highlight is not up to date at the moment. They got up to
date a few releases back, but at least on my system they are not up to date
with COBOL 6.3 and 6.4 at the least.
Not sure you need BYTE-LENGTH for this, though. FUNCTION LENGTH() or LENGTH OF
works just fine for ODO.
I recommend using the following to eliminate the need for the FUNCTION keyword.
And it will eliminate the "error" highlight you are seeing, since that keys of
the FUNCTION keyword.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
REPOSITORY.
FUNCTION ALL INTRINSIC.
COMPUTE L = LENGTH(MYFIELD)
-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of
Steve Thompson
Sent: Thursday, May 18, 2023 2:20 PM
To: [email protected]
Subject: ISPF HILITE Question
I have been chasing through a few IBM ISPF manuals and I am trying to figure
out why, when HILITE is COBOL, certain words are "pink". Now I thought this was
used to show a logic error, such as an "IF" with a missing "END-IF", or an
extraneous "END-IF".
Where my curiosity/confusion is, is this:
COBOL has [intrinsic] FUNCTIONs. And I'm trying to make use of one, but it is
getting colored pink. Could this be because ISPF doesn't know about new
functions in COBOL? In this case it is "BYTE-LENGTH" (because I need to know at
execution time what the size of the named label is -- "Depending on" is being
used).
Could someone point me in the approximate correct direction?
Or have I stumbled on a situation where ISPF and COBOL 6.x are not in synch?
TIA,
Steve Thompson
----------------------------------------------------------------------
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
