|
Quick and dirty way to do this is: 1) use USROPN on the F spec. 2) In *inzsr, do: open(e) YOURFILE if %error ... Override to the alternate file. open YOURFILE endif -----Original Message----- From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Bob.Voltz@xxxxxxxxxx Sent: Monday, June 05, 2006 1:02 PM To: RPG400-L@xxxxxxxxxxxx Subject: Handling a File Lock What is the best way to handle this situation? I have searched the archives and didn't find a solution to this. If a chain to a file fails because it is being saved to tape, chain to an alternate file. RPGLE V5.2 Thanks! The information transmitted is intended only for the person or entity to which it is addressed and may contain confidential, proprietary, and/or privileged material. Any review, retransmission, dissemination or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. If you received this in error, please contact the sender and delete the material. -- 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.