How to find offset in a COBOL program

pramodg · New User Joined: 04 Sep 2012 Posts: 5 Location: India

I am working on a COBOL performance optimization assignment. The strobe report points to a offset in a COBOL program. At my earlier company I was used to locate all the procedure division offsets near the end of the compile listing. But in current case I am not able to locate where they are listed in the compile listing. The program seems to be compiled with OFFSET (YES) and LIST(YES) options. I see this message on the first page of the compile listing -

IGYOS4022-W The "OFFSET" option was discarded due to option conflict resolution. The "L option from "PROCESS/CBL"IST"
statement took precedence.

Attached the program...........

Attachment removed.

pramodg · New User Joined: 04 Sep 2012 Posts: 5 Location: India

[quote="pramodg"]I am working on a COBOL performance optimization assignment. The strobe report points to a offset in a COBOL program. At my earlier company I was used to locate all the procedure division offsets near the end of the compile listing. But in current case I am not able to locate where they are listed in the compile listing. The program seems to be compiled with OFFSET (YES) and LIST(YES) options. I see this message on the first page of the compile listing -

IGYOS4022-W The "OFFSET" option was discarded due to option conflict resolution. The "L option from "PROCESS/CBL"IST"
statement took precedence.

Attached the program...
I am looking for the offset - 00144E.

Bill Woodger · Posted: Tue Sep 18, 2012 3:50 pm

Did you try a FIND on the compile listing? You have option LIST, so you have the detail of everything there is...

dbzTHEdinosauer · Posted: Tue Sep 18, 2012 3:52 pm

maybe, if you recompile with the proper options,
you can get your offset.

pramodg · New User Joined: 04 Sep 2012 Posts: 5 Location: India

Thanks Bil & dick
Unfortunately I am not able to locate the complete listing. May be I do not know where to look for. I scanned the entire compile listing file.

As there are most of such cases it will be difficult to get them to recompile all such programs.
Before complaining, just wanted to re-confirm that there is no way we can locate the offset with the compile listing provided. The module map shows offset 0 to 6348 for the concerned program. So I assume the offset 144E lies within its range. Let me know my understaning is not correct.

Robert Sample · Posted: Tue Sep 18, 2012 4:34 pm

Unless you recompile this program, preferably with VBREF,NOOFFSET,LIST options, you cannot determine the statement having the problem. The compile listing has no offset information included.

pramodg · New User Joined: 04 Sep 2012 Posts: 5 Location: India

Thanks for the reply Robert. Seems I have no option but to go back to the application owner and ask for recompilation.

dbzTHEdinosauer · Posted: Tue Sep 18, 2012 4:52 pm

do you have a resource management tool (changeman/endevor/panvalet?)
or does everybody just do what they want?

i do not understand an organization
that does not require adequate procedures to be followed
when generating production code.

how does anyone debug a problem
when there is a S0Cwhatever
and an offset is provided?

Bill Woodger · Posted: Tue Sep 18, 2012 5:04 pm

Something is unusual. LIST requires NOOFFSET. OFFSET has been discarded. LIST is specified. Yet no LIST output.

The diagnostic message has some "garbling" in it.

If everything is compiled this way, you have no indication of any offsets in your compile listings, either through LIST or OFFSET.

It is unusual to specify everything as CBL cards. Usually you take the installation defaults plus any necessary overrides. Something is messed-up.