RE: sys 36 internal display file

[Chris Bipes <chris.bipes@xxxxxxxxxxxxxxx>]

I might be able to help.  I have been re-writing S36 &*() to RPGIV.  Send me
the source for the display and RPG and I will take a look.  You may send as
TXT file attachments directly to my e-mail below.

One of the first thing to look for is the RPG cycle being used for the
input/output?  Also you must have the proper output indicators set prior to
the EXCPT.

Christopher K. Bipes    mailto:ChrisB@Cross-Check.com
Sr. Programmer/Analyst  mailto:Chris_Bipes@Yahoo.com
CrossCheck, Inc.        http://www.cross-check.com
6119 State Farm Drive   Phone: 707 586-0551 x 1102
Rohnert Park CA  94928  Fax: 707 586-1884

If consistency is the hobgoblin of little minds, only geniuses work here.
Karen Herbelin - Readers Digest 3/2000

-----Original Message-----
From: Kmh0421@aol.com [mailto:Kmh0421@aol.com]
Sent: Monday, October 02, 2000 2:10 PM
To: RPG400-L@midrange.com
Subject: Re: sys 36 internal display file


Hello, and TIA for any help I get. I am modifying some old Sys 36 WSU stuff.

I had to internally define the display file (per the client request, another

long conversation) and let's just say per the client, it must be done this 
way. Anyway, I have 3 screens on the input specs and output specs. I have 
indicators on the output specs for the correct screen to display. Screen one

display fine for the user to enter a batch number and proceed to display
two. 
Display 2 comes up fine, but when I enter data and press enter, the screen
is 
cleared and redisplayed blank with errors. Since this must all stay in 36 
mode, an EXCPT is required for the output spec (SCRN1,2,3 etc), and a READ
on 
the screen format DE123SFM. Any ideas on why the screen is being cleared? I 
took out the #of lines to clear in the 'S' sequence of the S&D specs just
for 
yuks and it didn't help. I tried using indicators on the various screen
input 
specs with the same result. I am puzzled. There is obviously something I am 
missing..... can you help?
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---