IBM Mainframe Forum

whenever i implement this logic last record is getting copied twice..

Can some help me to resolve it.
Thank you.

Is this related to any of the old topic?

Ensure if you have something like this

Yes but the doubt is new one.so i created another thread.I checked it several times.But i cannot understand why it is happening everytime.Can you please help?

Thank you for your fast reply.

When the READ is done as the first line of the PERFORM loop, end-of-file is set. However, a PERFORM loop does not break on the condition -- rather, the condition is tested either before the loop begins or after the loop finishes. So the statements after the READ in the PERFORM loop are executed, and since the data did not change due to hitting end of file there's no new data to process and the last record gets processed a second time. When the end of the PERFORM loop is reached, THEN the program detects end of file and terminates the PERFORM loop.

When we told you to read the first record, then set up your PERFORM so the last thing it does is another READ, we had a reason for saying this -- we don't just arbitrarily tell you things. YOU may not know the reason some things get said, but we always have a reason for saying what we say.

These users thanked the author Robert Sample for the post (total 2):

VIJAY1 (Fri Oct 26, 2012 12:28 am) • Pandora-Box (Thu Oct 25, 2012 6:35 pm)

Thanks Robert.you made it extremely clear.

Hello,

YOU may not know the reason some things get said, but we always have a reason for saying what we say.

To paraphrase what one of our best uses as a byline:

"We can explain it to you, but we cannot understand it for you".

When one of the seniors provides direction, it would be a very good practice to make sure it is not only usable, but understood. When there are further doubts - ask, someone will be able to help clarify.