MVSFORUMS.com

vak255 · Intermediate Joined: 10 Sep 2004 Posts: 384 Topics: 79

Flagging particular records in a sequential file
I have a file with data as follows

kolusu · Posted: Thu May 25, 2006 8:19 am Post subject:

vak255,

The following DFSORT/ICETOOL JCl will give you the desired results. You need to have z/OS DFSORT V1R5 PTF UQ95214 or DFSORT R14 PTF UQ95213 (Dec, 2004) installed which support KEEPBASE option on SPLICE. KEEPBASE can be used to keep the base records (first duplicate) as well as the spliced records.

vak255 · Intermediate Joined: 10 Sep 2004 Posts: 384 Topics: 79

Thanks kolusu, If this is available in our shop,I will try this and will let you know.
This file is already sorted , so I don't want to sort it.

Thanks a lot Buddy.

kolusu · Posted: Thu May 25, 2006 8:45 am Post subject:

vak255 · Intermediate Joined: 10 Sep 2004 Posts: 384 Topics: 79

Sorry Klusu, I thought it was sorted.I wil check that....

Thanks again.

vak255 · Intermediate Joined: 10 Sep 2004 Posts: 384 Topics: 79

THANKS kolusu, Your JCL is working Great. But there is a small change.
Sorry I have NOT given you the whole record layout above, actually the data is sorted and it looks like below and it does't end with AAA there is some more data beyond that point.

vak255 · Intermediate Joined: 10 Sep 2004 Posts: 384 Topics: 79

There was some problem with the spaces,
Input:

kolusu · Posted: Fri May 26, 2006 7:24 am Post subject:

vak255,

It would be really helpful if you put all the details at once. Most of the solutions provided here can be run on your machine with minimal changes if you post the correct requirements.

Also you say your file is sorted on the Account number starting at pos 9 for a length of 13 bytes, but in reality it is NOT sorted on the ascending sequence of the account number. If you really want to preserve the same sequence then you will need another pass of the data.

Here is the JCL which will give the desired results.

vak255 · Intermediate Joined: 10 Sep 2004 Posts: 384 Topics: 79

Thanks for all the Help!!
Next time I will try to post with all details.

ynbasha · Posted: Fri May 26, 2006 9:24 am Post subject:

hi kolusu,

It's working for FB records ,if the input file has RECFM=VB, how to achieve , even if i add 4 bytes to the corresponding fields it's throwing user abend
_________________
Noor Basha.
Pune.

kolusu · Posted: Fri May 26, 2006 9:46 am Post subject:

Phantom · Posted: Mon May 29, 2006 3:55 am Post subject:

Ynbasha,

Remove DCB parameters from your OUPTUT file (if you have specified any) and then try again. Or use OUTFIL CONVERT.

Hope this helps,

Thanks,
Phantom

vak255 · Intermediate Joined: 10 Sep 2004 Posts: 384 Topics: 79

I got a similar situation here.I got a VB file.

The input file looks like this. Below '---' are the spaces. I don't know why spaces are not displayed when I submitted, so I marked it with '---'

The output file should be sorted on the Main Account numer " eg: 405A551117386".It starts at 9th positon with length 13.

The accounts following the main account is the sub-accout(0540097804).The header and trailer is required to be there in the output file.

If any of the sub-accounts under a main-acct are flagged with any error-code i.e 'LLL'/'ccc' (any charcters, We need to check for non-spaces) in position 982 with length of 3. then the spaces in position 982-984 in all the sub-accts under that main-acct shuld be marked with LLL.

The output required is:

kolusu · Posted: Wed Jun 21, 2006 5:38 am Post subject:

vak255,

*Sigh* Post ALL the details. what is the LRECL and RECFM of the input file and desired output files?

vak255 · Intermediate Joined: 10 Sep 2004 Posts: 384 Topics: 79

Kolusu,

Here is the details
Dsorg: PS
Recfm= VB
Lrecl= 3004