RE: Processing... Please Wait... But with a subfile

The ever popular: Session or device error occurred in file ORDDSLCT (C G
D F).
Major Return code 83:
"the error occurred during an I/O operation and the session or device is
still active" 

My relative record # is 1.
The error occurs when the display indicator is on or off.

It must be something I'm doing wrong (well of course, right?)... Because
at the end of processing, I do this:
Write wdwctl;
Exfmt wdw;
... And that displays the subfile I just built.

Kurt Anderson
Application Developer
Highsmith Inc

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of RPower@xxxxxxxxxx
Sent: Thursday, May 26, 2005 11:45 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: Processing... Please Wait... But with a subfile

What is the error you are getting?

Ron Power
Programmer
Information Services
City Of St. John's, NL
P.O. Box 908
St. John's, NL
A1C 5M2
Tel: 709-576-8132
Email: rpower@xxxxxxxxxx
Website: http://www.stjohns.ca/
________________________________________________________________________
___
Success is going from failure to failure without a loss of enthusiasm. -
Sir Winston Churchill




"Kurt Anderson" <kjanderson@xxxxxxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
26/05/2005 02:10 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Processing... Please Wait... But with a  subfile






I just read the thread about informing the user that processing is
occurring.  My options include sndpgmmsg or issuing a Write (w/FrcDta
keyword on record format).   I want to go with the latter, and I'm
looking to do a little bit more.  I'd like to display a subfile as it's
being built w/o waiting for the user.  Essentially the user would see
the 'processing...' message above the subfile column headings, but would
also see any exception messages pop up at the same time.   At the end,
the window footer would display command keys appropriate to the result
of the processing.
 
My window is as such:
 
 * subfile
A R WdwSfl
 
 * subfile control (header)
A R WdwCtl    SflCtl( WdwSfl )
A                   Window(Wdw)
A                   FrcDta
A    96            SflDsp
A  N98            SflDspCtl
A    98            SflClr
A    96            SflEnd( *ScrBar )
 
 * window definition (footer)
A R Wdw
 
In the code:
// build record to write to subfile
SflClr = *Off               (in98)
WdwSflDsp = *On;     (in96)
WdwRRN += 1;
Write WdwSfl;
Write WdwCtl;    <------- error
Write Wdw;
 
If I remove the error statement, I only get a window (subfile is not
displayed).
 
Thanks,
 
Kurt Anderson
Application Developer
Highsmith Inc.
W5527 State Road 106, P.O. Box 800
Fort Atkinson, WI 53538-0800
TEL (920) 563-9571  FAX (920) 563-7395
EMAIL kjanderson@xxxxxxxxxxxxx