MVSFORUMS.com

sabarisavi

Hi All,

I want to convert the customer

sabarisavi · Posted: Sun Jun 29, 2008 9:41 am Post subject:

The input record structure are below. In the input file, any field may have spaces.

Nic Clouston · Posted: Sun Jun 29, 2008 11:54 pm Post subject:

Well, as you have posted this in the TSO/ISPF forum as opposed to the Utilities forum I presume you are wanting to know how to reformat your data using a rexx program or clist.

By far the easiest is to use Rexx. You can use PARSE to split your input record into its constituent parts and FORMAT or RIGHT or LEFT to make those parts the correct length whilst concatenating them back into one record for rewriting. And your best bet is to use a CSV file out of Excel so that you can parse on the comma or semi-colon (whichever is used to seperate the fields).
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.

jyoung · Posted: Mon Jun 30, 2008 6:03 am Post subject:

I use Active States Perl on my Windows PC to extract the cells from an Excel spread sheet and place them in a text file formatted to what I need. Here is a link:
http://aspn.activestate.com/ASPN/docs/ActivePerl/5.8/faq/Windows/ActivePerl-Winfaq12.html#extract_cells

kolusu · Posted: Mon Jun 30, 2008 10:26 am Post subject:

sabarisavi,

Save the excel file as .CSV (comma separated file) , FTP it and you can use DFSORT to Parse and create the file in the layout that your cobol program requires.

Kolusu

sabarisavi · Posted: Mon Jun 30, 2008 10:42 am Post subject:

Nic and Jyoung, Thanks for your response.

I'm looking for solution, but not using any technology based like Rexx / PARSE. Since, this task will handle by customer. So, they are looking for a simple solution.

Client will send the PRN file. (Which it will open by text format)

I

sabarisavi · Posted: Mon Jun 30, 2008 10:46 am Post subject:

Thanks Kolusu, I think your suggestion make sense. Could you please brief. If i have any spaces in the input field, how can i check?

jyoung · Posted: Mon Jun 30, 2008 10:54 am Post subject:

The problem with saving it as a PRN file is that unless each column in the spread sheet is set to left or right justify you will have problems when you have a mixture of numbers in one cell in the column and letters in another cell in the same column. Excel will left justify the letters and right justify the numbers. Koluso's solution sounds like a better idea if my Perl option will not work.

sabarisavi · Posted: Mon Jun 30, 2008 1:14 pm Post subject:

Kolusu,

Could you please advise that how we can do thru DFSORT to Parse and create the cobol program require file? Since i read couple of Parse example but couldnt be able to build perfect SORT code.

Please help me. Thanks.

kolusu · Posted: Mon Jun 30, 2008 2:36 pm Post subject:

sabarisavi,

Here is a sample DFSORT JCL for the first few fields. I coded up to A- Field-5 .You can use this as template and code for the rest of the fields

sabarisavi · Posted: Tue Jul 01, 2008 11:29 pm Post subject:

Thanks Kolusu. We got another issue, please guide me your easiest approch. since, two days i tried but couldnt achive.

In the Input file, we are receiving blank column. That mean, the entire column of A-FIELD-8 or A-FIELD-10 are receiving spaces. In this scenario, how do we handle it? and the alignment also changing, ie.,all the zeros s are suppressed in the field-2,5,7, and 9.