How to UNPACK variable felds in a Copybook

ksannigeri · New User Joined: 08 Apr 2005 Posts: 18

Hello,
I have a requirement to unpack some of the fileds from my existing copybook.This is a Output file copybook.

The existing copybook has
ABC---s9(5)v99 Comp-3
XYZ--- 9(3) comp-3

I need to change the Copybook to unpack these fields.
Could you pls let me know if I can Just change the fields to
ABC---s9(5)v99
XYZ--- 9(3)

By removing the comp-3

Thanks

ksannigeri · New User Joined: 08 Apr 2005 Posts: 18

I have already tried it..its coming fine..but not sure..whether this is the right thing to unpack the fields..as the Copybook record length will Change after unpacking the fields.

Pandora-Box · Posted: Wed May 30, 2012 11:10 am

Phew check with the person who had assigned you this or try answering these questions work why you are doing this xhange ? what is actually required and what is the output required and what needs to be done with increased lrecl will prorams using these files wont be impacted and so as copybooks

If you could answer these yourself you could get more clarity

Ppl here never know what is needed unless you explain for better guidance\suggestions

Nic Clouston · Posted: Wed May 30, 2012 12:15 pm

How else do you propose to convert from packed dec to zoned dec? What do you mean by "output" copybook. One assumes that it will be an "input" copybook in another process. Is that other process expecting zoned decimal numbers or is it a new downstream process using a similar layout but zoned dec? If the latter, and existing programs using the copybook are not changing, then you need a new copybook.

dick scherrer · Posted: Wed May 30, 2012 9:37 pm

Hello,

Be aware that if you change the copybook, all of the existing files will have to be converted. The original data will no longer be easily usable. . .

Also, any jcl that references this file format (i.e. lrecl/blksize) will have to be changed.

Anuj Dhawan · Posted: Thu May 31, 2012 2:13 pm

Your question is hard to comprehend.

If this is the current definition

dick scherrer · Posted: Thu May 31, 2012 7:05 pm

Hello,

Even if the definitions are changed to preserve the record length, all of the existing files will still have to be converted. The content would not match the revised copybook.

ksannigeri · New User Joined: 08 Apr 2005 Posts: 18

Hello,

thanks all for your suggestion and valuable guidance.

the output file which is being created was using this Copybook and since we needed to unpack the fields in the output file.So I have unpacked the Fields from the Copybook.
ABC & XYZ are the output file fields.

In the program to create the o/p file, they were moving some

move 111 to ABC
Move 222 to XYZ.

111 & 222 were unpacked alphanumeric fields.So I have unpacked ABC & XYZ to include the PIC clause of the 111 & 222.

After unpack, the record length of the copybook, so as the output file increases.
I have changed(Increased) the LRECL of the output file to accommodate the unpacked fields.Similarly the File Record length has been changed in the program.

Now I am able to see the output in a readable format.

Thanks

Anuj Dhawan · Posted: Fri Jun 01, 2012 4:46 pm

dick scherrer · Posted: Fri Jun 01, 2012 6:46 pm

Hello,