I haven't played with COBOL in a long while, but is the leading apostrophe needed on the continuation line?
Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile +1 (412) 877-2809 | FAX: +1 (412) 490-9230 [email protected] | www.thermofisher.com WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of this e-mail or the information herein by anyone other than the intended recipient, or an employee or agent of a system responsible for delivering the message to the intended recipient, is prohibited. If you are not the intended recipient, please inform the sender and delete all copies. -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Charles Mills Sent: Thursday, July 16, 2015 10: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. I am getting the following diagnostics. What the heck is the compiler talking about? I see lots of blanks before column 23. I verified with HEX ON. 5136 1 DISPLAY ' YOU HAVE ACTIVATED STATISTICS WITH EXPLAI 5137 1 - ' BUT HAVE NOT CREATED THE PLAN_TABLE.' 5137==> IGYPS0001-W A blank was missing before character "'" in column 23. A bl assumed. 5138 1 DISPLAY ' EXPLAIN HAS BEEN DEACTIVATED TO ALLOW THE 5139 1 - ' PROGRAM TO RUN TO COMPLETION.' 5139==> IGYPS0001-W A blank was missing before character "'" in column 23. A bl assumed. 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 FROM ' 4403 1 'PSRECTBLSPC WHERE RECNAME = ''' 4404 1 FUNCTION DISPLAY-OF(RECNAME OF W-RUNSTAT-INF 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. A bl assumed. Charles ---------------------------------------------------------------------- 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
