IBM Mainframe Forum

Hi All,

Could you please help me out?

Could some one know sort card for below requirement please help me out

I have 2 input file one is transaction file (File-1) and master file (File-2)
Lay out as below
File-1 (transaction file)

File-2 (master file)


If (F1C1=F2C1 AND F1C2=F2C2 AND F1C3=F2C3)
Then out put file has to fill with F2C1 F2C2 F2C3 F2C4 F2C5
Else depending up on condition
Display F1C1 is not matched
Display F1C2 is not matched
Display F1C3 is not matched and abend the job

Regards,
Kiran

I'm not sure I'm clear on this. The match is easy, a JOINKEYS.

IF F1C1 not on file, might make some sense. But what do you mean about F1C2? Do you mean if there is no value of that "secondary" key anyhere on the file, or just under F1C1? Similar question with F1C3.

Can you have the situation where a key consisting of all three fields would be duplicate on either file? If so, what then?

So, the main part JOINKEYS with REFORMAT. It would be possible to include the F1C1 test at the same time, but unless there is no direct connection between the elements of the keys, the other tests don't seem to make sense. Keys matched, fields out. Major key not matched, abend. Whole key not matched, abend. The "minor" parts of the keys can be done, if you can reasobably explain how your data requires that.

Can some one please help me out?
Below is my requirement.

Senario 1:
If field 1,2,3 of transaction file is equals to master file,
then respective recorded in master file has to write into output data set




=======================================
Senario 2:
If field 1 of transaction file is NOT equals to master file-filed1, then
job has to abend and message has to display as "AAAA4 is not there in master fie"


Expected Output:
Job has to abend and has to displaying mesage

========================================
Senario 3:
If field 2 of transaction file is NOT equals to master file-filed2,
then job has to abend and message has to display as "BBB5 is not there for AAAA1 in master fie"


Expected Output:
Job has to abend and has to displaying mesage

==============================================
Senario 4:
If field 3 of transaction file is NOT equals to master file-filed3,
then job has to abend and message has to display as " CCC6 is not there for AAAA1 in master fie"


Expected Output:

Job has to abend and has to displaying mesage

What's the little complaint for? I'm trying to help, but no one can do anything until the requirement is clear anyway.

Three Keys, A B and C.

If A value does not exist at all on Masterfile, abend with message for A

If A value does exist, but B value does not exist within A value, abend with message for B

If A and B value do exist, but C value does not exist with A and B value combination, abend with message for C

Or,

If A value does not exist at all on Masterfile, abend with message for A

If B value does not exist at all on Masterfile, abend with message for B

If C value does not exist at all on Masterfile, abend with message for C


I'd expect the first, but don't want to go down that route if it turns out to be the second.

Would some one help me out?

In my data set one record occupies 3 rows (3 rows=1 recorded)

Key starts on 2nd position,
If key matches with input file then I want some numeric data which is there next to next line (last line/3rd row of the record) from 13th position to 20th position, say FIELD-A

Expected output is
FIELD-A yesterdays date(mm/dd/yy)





In my data set one record occupies 3 rows (3 rows=1 recorded)

Key starts on 2nd position,
If key matches then I want some numeric data which is there next to next line (lastline/3rd row of the record)
from 13th position to 20th position, say FIELD-A

Expected output is
FIELD-A yesterdays date(mm/dd/yy)

kiran_wiproblr wrote:Would some one help me out?

No.

Kiran,

Request you to start a new topic for your second question. Multiple questions will lead to confusion.

Thanks
-3nadh