How to specify Compiler Options from COBOL Program

shriya reddy · New User Joined: 05 Jun 2004 Posts: 43

Hi Friends,

I have one dought.

HOW I CAN OVERWRITE THE PARAMETERS OF COMPILER USING COBOL PROGRAM. IS IT POSSIBLE? IF POSSIBLE GIVE ME SOLUTION.

bye
SHRIYA

mmwife · Super Moderator Joined: 30 May 2003 Posts: 1592

Hi SHRIYA,

It would help if you provide the JCL in the proc you are executing. There are a few ways of presenting option entries in JCK. It depends on what your shop uses.

Regards, Jack.

weejaireddy · New User Joined: 22 Feb 2005 Posts: 2 Location: pune.india

Hi shriya,

as for my knowledge we can overwrite the parameters of compiler using cobol programs.

On top of the program write CBL (COMPILER OPTIONS).This will change the default parameters of compiler

Regards, vijay Reddy.

lnvrn · New User Joined: 24 Feb 2005 Posts: 8 Location: Mumbai

Hi Folks,

Why can't we overwrite this compiler options by using JCL.
All options are welcome.

Thanks & Regards

Rajshekhar V Patil · New User Joined: 23 Feb 2005 Posts: 7 Location: Mumbai

COBOL codeing

IN linkage section we are going to define the parms.
According to that in JCL u going to override the parms .
For example:

12900**************************************************01290000
013000 LINKAGE SECTION. 013100***********************************************01310000
013200 01 LINK-PARAMETERS.
013300 49 LINK-PARM-LENGTH PIC S9(04) COMP.
013400 49 LINK-PARM-TEXT PIC X(1).

015070 EVALUATE LINK-PARM-TEXT
015080
015090 WHEN ?1?
015091 OPEN INPUT RATKLI
015092 IF NOT RATKLI-OKAY
015093 DISPLAY '**************************************'
015094 DISPLAY '* ERROR ON RATKLI(OPEN) *'
015095 DISPLAY '* FILE STATUS: ' WS-RATKLI-STATUS
015096 DISPLAY '**************************************'
015097 GOBACK
015098 END-IF
015099 WHEN ?2?
015100 OPEN INPUT RATELI
015111 IF NOT RATELI-OKAY
015120 DISPLAY '**************************************
015130 DISPLAY '* ERROR ON RATELI(OPEN) *'
015140 DISPLAY '* FILE STATUS: ' WS-RATELI-STATUS
015150 DISPLAY '**************************************'
015160 GOBACK
015170 END-IF
015171 END-EVALUATE.

Like this you read & close the files.
????????..
In JCL
//STEP010 exec pgm=name ,parm=?1?
.
.
//step020 exec pgm=name, parm=?2?

Like this.
That all

mmwife · Super Moderator Joined: 30 May 2003 Posts: 1592

Raj, I think you misunderstood BVR's question. He's referring to the COMPILER options.

BVR, take a look at your compile JCL. In the compile step, as part of the EXEC stmt there should be a PARM. This parm should contain the compiler options. Just override this PARM by including those already stated and adding your own. Remember that some compiler options may be mutually exclusive.

Also, some compiler procs use symbolics to send options to the compiler. You may have to use a different approach in that case.

mcmillan · Site Admin Joined: 18 May 2003 Posts: 1210 Location: India

But the question is: