Easytrieve - Check count & loop problem

Khushboo.goel · New User Joined: 22 Feb 2011 Posts: 19 Location: india

Hi..

I need to first check if the data in two input files are zero or not.. if not then have to check whether they match or not..

JOB INPUT (UT01 KEY (INF1-ALL-REC) +
VIRT1 KEY (VIR1-ALL-REC))
IF INF1-ALL-REC = 0 OR VIR1-ALL-REC = 0
RETURN-CODE = 8
STOP
END-IF

JOB INPUT (UT01 KEY (INF1-ALL-REC) +
VIRT1 KEY (VIR1-ALL-REC))
IF MATCHED
RETURN-CODE = 0
ELSE
RETURN-CODE = 12
END-IF.

But this code is not working.. Can u let me know where I am wrong

PeterHolland · Posted: Fri Mar 04, 2011 2:40 pm

If you want to stop when the files are empty you have to use :
STOP EXECUTE

Khushboo.goel · New User Joined: 22 Feb 2011 Posts: 19 Location: india

Ya have changed that... Its working Thanks :-)

But i have got another problem..

JOB INPUT (UT01 KEY (INF1-ALL-REC) +
VIRT1 KEY (VIR1-ALL-REC))
IF INF1-ALL-REC = 0 OR VIR1-ALL-REC = 0

This gives an error that INVALID FILE REFERENCE - VIRT1

could you help me with this?

PeterHolland · Posted: Fri Mar 04, 2011 3:34 pm

That means that VIRT1 has no active record, and that means that the file is empty.

You could test your file like this :

JOB INPUT UT01
IF RECORD-COUNT = 0
RETURN-CODE = 8
STOP EXECUTE
END-IF
STOP
*
JOB INPUT VIRT1
IF RECORD-COUNT = 0
RETURN-CODE = 8
STOP EXECUTE
END-IF
STOP
*
put here your match/merge activity

Khushboo.goel · New User Joined: 22 Feb 2011 Posts: 19 Location: india

Thanks Peter.. But I need to check if the value in the file is zero or not.. M nt cheking whether file is empty or not.

expat · Posted: Fri Mar 04, 2011 4:22 pm

Well, if the input file(s) is / are empty then you can't really check anything.

I believe that Peter has given you some good error checking and handling code which you should incorporate where possible.

PeterHolland · Posted: Fri Mar 04, 2011 4:39 pm

Expat,

thanks for the support. But i totally misinterpreted the TS problem.
Thought he was talking about empty files, but its about fields containing zero. So i have to reconsider his problem.
There are these possibilities :

both files match with zero in both fields
they dont match cause 1 of both files could have zero in the field

or

both files match with non zero values
they dont match with non zero values

so the TS has to write some logic around these conditions.

expat · Posted: Fri Mar 04, 2011 4:42 pm

Peter, at least the OP has the error checking and handling code for free

PeterHolland · Posted: Fri Mar 04, 2011 4:50 pm

PeterHolland · Posted: Fri Mar 04, 2011 5:04 pm

Ok, im not in a too bad mood. So the logic could be something like this :

Khushboo.goel · New User Joined: 22 Feb 2011 Posts: 19 Location: india

Hi Peter..

Thanks for the code... but its not working :-(

even if the counts are similar they go into the non matched loop :-(

my main objective is :

first to check if both the files contain zero or not.. if yes then return maxcc=8

if not then check if the count in both files are equal.. if yes then return maxcc=0 else maxcc=12..

Please help

Khushboo.goel · New User Joined: 22 Feb 2011 Posts: 19 Location: india

This is my code:

Khushboo.goel · New User Joined: 22 Feb 2011 Posts: 19 Location: india

Solved my prob :-)

Thankss a lot Peter for your help

dick scherrer · Posted: Tue Mar 08, 2011 8:53 pm

Good to hear it is working - thank you for letting us know