Re: Still having a problem with windowed subfile

I thought it was the other way around.....goes to show you what an idiot I 
am LOL


On Thu, 12 Jan 2006 14:12:57 -0500, Bruce Frederick wrote
> Douglas:
> 
> You may want to try using CA04 rather than CF04.  When using CF 
> indicators you will loss any data you users have entered, using the 
> CA indicators you will not loss the data.
> 
> Bruce Frederick
> 
> 
=============================================================================
==============================================================
> 
> "Douglas W. Palme" <dpalme@xxxxxxxxxxx> 
> Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> 01/12/2006 10:58 AM
> Please respond to
> RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> 
> To
> "RPG Group" <rpg400-l@xxxxxxxxxxxx>
> cc
> 
> Subject
> Still having a problem with windowed subfile
> 
> I am still having a problem with overwriting subfile A after 
> receiving a selection from subfile B (windowed subfile).
> 
> Here are the steps I am going through:
> 
> 1. Load subfile A wth one blank record, it has among others a 
> numeric field for date, ref, GL account no, etc.
> 
> 2. Enter into loop and EXFMT subfile A to await user action.
> 
> 3. READC on subfile A after user makes a selection
> 
> 4. IF user selects F04 (*IN04 coded as CF04) we EXSR LOADCA which 
> will load subfile B.
> 
> 5. Display subfile B and await user selection
> 
> 6. Upon return execute a READC to check for any user selections.
> 
> 7. Chain to subfile A based on the RRN and then move the new GL 
> account number to the appropriate field on subfileA
> 
> 8. update subfile A.
> 
> 9. Control now drops all the way back to the main procedure which 
> loops back to EXFMT subfile A.
> 
> >From what I can tell in theory everything should work, but when it 
> redisplays subfile A it blanks out all fields with the exception of 
> the GL
> 
> account number.
> 
> Suggestions? Hints? Tell me to change jobs? :)
> 
> ****************************************************************
> CONFIDENTIALITY NOTE:  All e-mail sent to or from this address is 
> processed by the Waterfield Group corporate e-mail system and is 
> subject to archival, monitoring, and/or review by someone other than 
> the recipient or the sender.
> 
> This e-mail and any of its attachments may contain proprietary 
> information which is privileged and confidential.  This e-mail is 
> intended solely for the use of the individual or entity to which it 
> is addressed.  If you are not the intended recipient of this e-mail, 
> you are hereby notified that any dissemination, distribution,
>  copying, or action taken in relation to the contents or attachments 
> of this e-mail is strictly prohibited and may be unlawful.  If you 
> have received this e-mail in error, please notify the sender 
> immediately and permanently delete the original, any copies, and any 
> printouts of this e-mail.
> 
> Thank you.
> ****************************************************************
> 
> -- 
> 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.


If you bought it, it was hauled by a truck - somewhere, sometime.