Problem in using Copybook variable

Tarun Deep · Posted: Mon Jul 18, 2005 3:46 pm

I have introduced an existing copybook in my cobol program. In the copybook i have introduced a new conditional variable in place of an existing filler so as not to alter the length of the copybook.

A76316 05 ULGBLTDF-BILL-TO-DATE-FLAG PIC X(1).
A76316 88 ULGBLTDN-BILL-TO-DATE-NO VALUE '0'.
A76316 88 ULGBLTDY-BILL-TO-DATE-YES VALUE '1'.
A76316 05 FILLER PIC X(10).
APS161* 05 FILLER PIC X(11).

When ever my program encounters any of the modified copybook variables it throws out a protection error.

I am including this copybook in Linkage Section by the following command -
COPY CKULGPRM.

The calling program to my program sends this copybook and I am defining procedure division as
PROCEDURE DIVISION USING ULGPRM-UNIVERSAL-LIFE-PARMS.

The 01 level varibale of this copybook is ULGPRM-UNIVERSAL-LIFE-PARMS.

Could anyone of you throw some light on this.. I am not able to resolve this problem.

Thanks

Tarun

notonly4u · New User Joined: 26 Apr 2005 Posts: 87 Location: Hyderabad

Dear Tharun,

Since yu are adding the Conditional variable, Iam confused why you need to change the filler? Hope there is not need of changing the filler length.

Moreover what kind of error message that yu are getting.

Regards
Tanden

gsnvsr · New User Joined: 06 Jul 2005 Posts: 40

I agree!

There doesn't seem to be a need to change the filler. You'll have to just recompile the programs using this changed copybook.

Best regards,
Prasad