|
Hello Bryan, Here you have utility for copying SAVF to PF : 1. You should have PF with RCDLEN=528 2. Your source should look like this: FFromSavf IF F 528 disk FToPf o a F 528 disk F* dToData ds 528 IFromSavf aa I 1 528 FromData c* c read FromSavf c Dow not %eof c eval ToData=FromData c Write Topf ToData c read FromSavf c enddo c eval *inlr=*on c return ****************** End of data **************************************** Ella -----Original Message----- From: Bryan Merrell [mailto:bryan.merrell@xxxxxxxxxx] Sent: Thursday, December 16, 2004 12:49 AM To: RPG Midrange List (E-mail) Subject: SAVF info to Physical Has anyone already written a utility that will take a SAVF and list out all of it's contents to a Physical File. I have found the API's necessary to do such (list contents to a user space and then read into a physical) but it seems like something that has been done a million times. Anyone have one that they are willing to share source code? I have searched out on the web and couldn't find anything quickly. (1,330 hits with Google on "Physical SAVF" ). I also couldn't find anything out in the archives. TIA, Bryan Merrell Bryan.merrell@xxxxxxxxxx <mailto:Bryan.merrell@xxxxxxxxxx> -- This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/rpg400-l.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 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.