MVSFORUMS.com

ha.rajamohamed · Beginner Joined: 29 Jan 2006 Posts: 71 Topics: 22

Need a generic program that can read any file and given the copy book layout of the file , can convert all COMP, COMP-3 etc into a simple flat file with each field in normal display mode and pipe delimited.

The Program can be Cobol, SAS, REXX, File Aid or any thing else.

This is really helpful for me if this is done... thanks in advance

Note: I have also posted the same query under "Mainframe Challenges"
_________________
RAJA MOHAMED

kolusu · Posted: Fri Aug 18, 2006 5:53 am Post subject:

dz · Beginner Joined: 02 Apr 2006 Posts: 26 Topics: 0

You can do that in both SYSCSORT and DFSORT. For example, I have used the following SYNCSORT statement recently to format PIC S9(09)V9(09) COMP-3 price field into ZD format, and then to get rid of the sign:

kolusu · Posted: Fri Aug 18, 2006 8:44 am Post subject:

dz,

OP does not know the positions of the COMP/COMP-3 variables. He wants a generic program that can write out expanding the non displayable data when supplied with a file layout.

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

coolman · Posted: Fri Aug 18, 2006 12:52 pm Post subject:

Raja,

Can you post as to what have you accomplished so far on this? And we'll give you suggestions to make this better.
________
vaporizer

ha.rajamohamed · Beginner Joined: 29 Jan 2006 Posts: 71 Topics: 22

Coolman,
I have not much proceeded on this. Till now I have coded in COBOL using move CORR. But this is specific to a single file and layout.
I am having 50+ different files with different layouts, so i am in help of a generic program.
_________________
RAJA MOHAMED

kolusu · Posted: Mon Aug 21, 2006 10:25 am Post subject:

ha.rajamohamed,

What is the max lrecl of the files involved? If the file lrecl is less than 100 then you can use VPRINT option from File-aid which will print all the records in a displayable format. Unfortunately the output file lrecl is only limited to 132 bytes.

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

ha.rajamohamed · Beginner Joined: 29 Jan 2006 Posts: 71 Topics: 22

Kolusu,

I am off for couple of days so unable to reply you..

The LRECL are more than 132 bytes, varies between 1000 to 5000 bytes.
_________________
RAJA MOHAMED

ha.rajamohamed · Beginner Joined: 29 Jan 2006 Posts: 71 Topics: 22

I heard there is a posibility through EasyDrive, but I have not worked on EasyDrive.

I browsed around FILEAID, I havn't got any results so far.

Is anyone come up this situations... and sloved it..

Thanks in advance.
_________________
RAJA MOHAMED

kolusu · Posted: Wed Aug 30, 2006 7:17 am Post subject: