And one last comment on COBOL coding structure
COBOL source text must be written in COBOL reference format. Reference
format consists of the following areas in a 72-character line:
Sequence number area
Columns 1 through 6
Indicator area
Column 7
Area A
Columns 8 through 11
Area B
Columns 12 through 72
Lizette
> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:[email protected]]
> On Behalf Of Lizette Koehler
> Sent: Thursday, July 16, 2015 7:35 AM
> To: [email protected]
> Subject: Re: Not understanding COBOL diagnostic
>
> Also note from the manual Enterprise COBOL for z/OS Language Reference
> Version 4 Release 2 SC23-8528-01:
>
>
> Any sentence, entry, clause, or phrase that requires more than one line
can
> be continued in Area B of the next line that is neither a comment line nor
a
> blank line.
> The line being continued is a continued line; the succeeding lines are
> continuation lines. Area A of a continuation line must be blank.
>
> If there is no hyphen (-) in the indicator area (column 7) of a line, the
last
> character of the preceding line is assumed to be followed by a space.
>
>
>
> > -----Original Message-----
> > From: IBM Mainframe Discussion List [mailto:IBM-
> [email protected]]
> > On Behalf Of Lizette Koehler
> > Sent: Thursday, July 16, 2015 7:24 AM
> > To: [email protected]
> > Subject: Re: Not understanding COBOL diagnostic
> >
> > Due to text wrap, I cannot tell what the original line looked like.
> >
> > Could you post the original code above the compiler output?
> >
> > Do you have ending single quotes?
> > Have you reviewed the COBOL Programming/Language Guides?
> > Are there double quotes and single quotes in the appropriate places? '
> is
> > single to me " is double to me But I do not know which is coded
> '''
> > or '" is coded
> >
> >
> > Fortunately these are warnings and should not affect the execution of
> > your program.
> >
> > Lizette
> >
> >
> > > -----Original Message-----
> > > From: IBM Mainframe Discussion List [mailto:IBM-
> > [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.
> > >
> > > 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
