Re: The Phantom Indicator

[RPower@xxxxxxxxxx]

If *IN33 is on the DLTREC format then the clear is what's doing it.  If 
you clear the format, the indicator gets cleared too I'm pretty certain, 
setting it to it's default state which is *OFF.

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




Matthew Gross <prrgg1@xxxxxxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
15/02/2005 03:29 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
Post AS-400 Language Questions <RPG400-L@xxxxxxxxxxxx>
cc

Subject
The Phantom Indicator






Hope someone has run into this and can provide answer -
 
Subfile program has *IN33 for SFLEND(*MORE).  8 records in PF, PageSize of 
11.
Puts out screen, "Bottom" displays for no more records.
Option "4" will delete record, which puts up a confirmation screen - 
Window, not record.  User can then exit with F3 or Enter to delete record. 
 Prior to EXFMT on DLTREC, I "CLEAR" format DLTREC.  When SFTCTL writes 
back to screen, *IN33 now off and "MORE..." appears.
*In33 is ONLY used in SFLCTL and no where else.  It is ONLY turned on or 
off in SFL load, which is NOT executed because user exited with F3 from 
confirmation screen.  When I took out the "CLEAR" to the format before 
EXFMT, and exited the screen with F3, *IN33 still on and "BOTTOM" 
appeared.
 
Any ideas?  TIA -
 
Matt
-- 
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.