Thanks everyone for your help on the first diagnostic. How about the second
one?

Charles

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On
Behalf Of Charles Mills
Sent: Thursday, July 16, 2015 7:07 AM
To: [email protected]
Subject: Not understanding COBOL diagnostic

Can somebody humor me? I am not a COBOL programmer - I just sometimes find
myself with a COBOL problem.

<snip>

Ditto for this one. Does anyone know what the correct syntax should be?

4401      1                DISPLAY  FUNCTION DISPLAY-OF(W-TRACE-DETAIL)
4402      1                        'CEX Stmt=SELECT DBNAME, DDLSPACENAME
4403      1                        'PSRECTBLSPC WHERE RECNAME = '''
4404      1                         FUNCTION DISPLAY-OF(RECNAME OF
4405      1                         ''''
4406      1                        'AND DBTYPE = '
4407      1                        '(SELECT MAX(DBTYPE)'
4408      1                        '   FROM PSRECTBLSPC'
4409      1                        '  WHERE DBTYPE IN (' ','1 ')'
4409==> IGYPS0001-W A blank was missing before character "1" in column 48.

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

Reply via email to