|
if you are using RPGIV/RPGLE and it support extmbr keyword, you can do it without CL. (note: haven't tested. hopefully it work :)) * read from file FMYFILE IF E K DISK extmbr(mbr1) * output to file (program decribe file) FMYFILEOUT OF F 1024 DISK extfile('MYFILE') F extmbr(mbr2) * declare a temp file that is the same length as the output file * (notice the pointer point back to the MYFILEDS) D MYFILEOUTDS DS 1024 based(pMYFILEOUTDS) D pMYFILEOUTDS S * inz(%addr(MYFILEDS)) D MYFILEDS E DS extname(MYFILE) C read MYFILEFmt C write MYFILEOUT MYFILEOUTDS C delete MYFILE -----Original Message----- From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of venkateshwar.raman@xxxxxxxxx Sent: Thursday, November 11, 2004 5:42 AM To: RPG400-L@xxxxxxxxxxxx Subject: Processes two members of the same file in a RPG program. Importance: High Hi All, I have a requirement where I need to read records from one member of a file, then write the record to another member of the same file and then once written to the other member, remove the records from the first member. Can somebody tell me how this can be done from a RPG program. How do I process the Overrides from the calling CL so that this requirements is satisfied. Regards, Venky Confidentiality Notice The information contained in this electronic message and any attachments to this message are intended for the exclusive use of the addressee(s) and may contain confidential or privileged information. If you are not the intended recipient, please notify the sender at Wipro or Mailadmin@xxxxxxxxx immediately and destroy all copies of this message and any attachments.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.