On 8/27/06, Steve Comstock <[EMAIL PROTECTED]> wrote:



So your equivalent COBOL logic is something like this?

perform until end-filea or end-fileb
  perform until end-fileb or filea-act > fileb-act
    if filea-act = fileb-act
      move filea-amt to fileb-amt
      rewrite fileb-rec
    end-if
    read fileb at end set end-fileb
  end-perform
  read filea at end set end-filea
end-perform

close filea fileb

Kind regards,

-Steve Comstock


Steve, yes. Exactly the same.

Actully the PL/i program logic is simple and since it's
our customer's production program, i think maybe something
wrong with our ADCD system?

Now i'm writing a test PL/I program and to see if any difference.




--
Best Regards,
Johnny Luo

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to