RE: Keep background screen on display when using window keyword

RRNA is set up as hidden field on the window subfile control rec. The
subfile rrn "sflrnd" is separate. If I dont get a hit on READC of subfile
for normal keybroad "1" = selection I check

IF RRNA > 0
RRNA CHAIN SUBFILEREC
move in values from subfile
then LEAVE
exit pgm

The Permanant I/O happen after return to main display and user clicks around
screen with mouse. I think it is getting junk data when rstdsp *yes is on
and the write of a common I header record then exfmt of I/O bottom record.
This sytem here is a bad mix of RPGII from S/36,RPGII, RPGIV, RPGILE and
alot of "PGMR STYLES". Window subfile with mouse buttons is RPGIV. Main
Display is converted/changed S/36 code. Think I need to add KEEP OVERLAY
USRSTDSP to Window Control record, KEEP OVERLAY to it Window record, and crt
with RSTDSP *NO then change S/36 main display write of header record to KEEP
and Exfmt bottom record to KEEP OVERLAY crt with rstdsp *no?? Any other
ideas??

Thanks

Bill H.

-----Original Message-----
From: Teijgeler [mailto:coteijgeler@chello.nl]
Sent: Friday, August 23, 2002 12:34 PM
To: rpg400-l@midrange.com
Subject: RE: Keep background screen on display when using window keyword


Bill,

No sample code, sorry for that.

I see  you are using SFLCSRRRN and SFLRCDNBR.
Does your programme move the value of RRNA into SFLDSP? If that is so, you
should check the value of RRNA. If user click the mouse outside the area of
the SFL, RRNA will have the value of 0 (null, zero) and you cannot position
a cursor on SFL record 0. That will cause a permanent I/O error.

Regards,
Carel Teijgeler.

*********** REPLY SEPARATOR  ***********

On 22-8-02 at 13:27 Hopkins, Bill wrote:

>        When returning from window pgmb(restore display *yes, mouse button
>rec selection, scroll,push buttons)  to screen pgma(restore display *yes)
>with a selected value for a specific subfile record and the user clicks
>mutiple times, with left(enter) mouse (through client access) in non input
>area of screen, they get permanant I/O error(CPF5192) on exfmt of screen.
>Normal keying and mouse usage seems OK. Any ideas will be greatly welcome.
>
>A                                      SFLCSRRRN(&RRNA)
>A            SFLPSD         4S 0H      SFLRCDNBR(CURSOR)
>A            RRNA           5S 0H



_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.