RE: Display file puzzlement

["Lim Hock-Chai" <Lim.Hock-Chai@xxxxxxxxxxxxxxx>]

Read this IBM doc under the section in <<<<<<< >>>>>>>>>>

Conditions occurring during message display: 

The displaying of a message using ERRMSG and ERRMSGID is similar to the
displaying of messages by the OS/400 program when field validation
errors are detected. 

When a message is displayed because of either the ERRMSG or the ERRMSGID
keyword, all fields on the display are kept, including the field the
message is associated with. Except for option indicators, data in the
output buffer is ignored (that is, any new data from the program is not
sent to the display). 

The function keys valid following display of a message are: 

Function keys specified at the file level Function keys specified for
the record format for which a message is displayed, if selected when the
message is displayed When the message is displayed, the following
conditions occur: 

For all errors: 
The message is highlighted. 
The cursor is blinked and the keyboard locked until the work station
user presses the Reset key. 
For errors associated with input-capable fields: 
All fields in error are displayed with their images reversed. 

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
If a field in error has both the underline (UL) display attribute and
the highlight (HI) attribute or the underline (UL) attribute and
COLOR(BLU, WHT, or YLW) specified, its image is not reversed. 
> > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > >

The cursor is repositioned to the first displayed field that is in
error. 
For errors associated with output-only fields: 
The display attribute of the field is not changed. 
The cursor is not positioned to the field (it does not change position).


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of John McKee
Sent: Tuesday, April 22, 2008 9:10 AM
To: midrange-l@xxxxxxxxxxxx
Subject: Re: Display file puzzlement

Interesting....your example works exactly as you describe.  BUT, when I
add
COLOR(YLW) or COLOR(BLU) to the first data field, that field does not dp
RI.

We don't use PC5250.  My computer has Reflection 7.0.  Shop standard is
that input fields use COLOR(YLW).  Having only tried two colors on the
first field, it may be inaccurate to make a definitive statement, but it
appears that COLOR messes things up in this case.  But, the application
package we use has a multitude of screens where fields are sent as RI
when they were coded as YLW. Just scanned the vendor display file
sources.  Out of a couple of jundred screens, one once is ERRSFL used.
I am not familiar with the program that uses the screen with ERRSFL.
Possibly, it does not work "properly" either.

At least, I now have a better understanding of why some keywords might
not be used.  No matter how practical and nice the intended results
might normally be.

I am wondering, however, if this behavior is specific to Reflection 7.0
or if it applies to othre versions or emulators.

John McKee

Quoting Simon Coulter <shc@xxxxxxxxxxxxxxxxx>:

> On 22/04/2008, at 4:02 AM, John McKee wrote:
> > I removed PUTOVR, OVRATR, and OVRDTA.  Still no RI capability.  With 
> > the ERRSFL, though, I guess I can live with it.
>
> You can have these keywords in the file as long as they are not active

> at the same time as ERRMSG. It appears that ERRMSG takes precedence. 
> In all these cases the correct analysis is to create a test-case that 
> does what you want to determine exactly where the problem lies without

> all the application rubbish getting in the way.
>
> Try the following:
>
> DSPF TSTERRSFLD
> *************** Beginning of data
> ********************************************
>      A                                      DSPSIZ(24 80 *DS3)
>      A                                      CA03(03 'Exit')
>      A                                      ERRSFL
>      A          R THEFORMAT
>      A                                  1 35'Test ERRSFL'
>      A                                      DSPATR(HI)
>      A                                  3  2'Type bad data, press
> Enter.'
>      A                                      COLOR(BLU)
>      A                                  5  5'Have a go ya
> mug . . . . . . .'
>      A            DATA1         10   B  5 37
>      A  98                                  ERRMSG('Bzzt! Wrong
> answer!' 98)
>      A                                  7  5'Have another
> go  . . . . . . .'
>      A            DATA2         10   B  7 37
>      A  99                                  ERRMSG('Bzzt! Wrong
> again!' 99)
>      A                                 23  2'F3=Exit'
>      A                                      COLOR(BLU)
> ****************** End of data
> ***************************************************
>
> RPGLE TSTERRSFLR
> *************** Beginning of data ***********************************
> FTSTERRSFLDCF   E             WORKSTN
> C                   EXFMT     THEFORMAT
> C                   SETON                                        9899
> C                   DOU       *IN03 = *ON
> C                   EXFMT     THEFORMAT
> C                   ENDDO
> C                   SETON                                        LR
> ****************** End of data **************************************
>
> Compile the display file and the RPG. Call the RPG. Press Enter. You 
> should see both input fields reverse-imaged, the cursor should be in 
> the first field, both error messages should be displayed in the error 
> sub-file at the bottom of the screen.
>
> If this is not happening for you then:
> 	1) Check the settings in your emulator--it is possible that RI
is 
> mapped to something else
> 	2) If not using PC5250 then start using it
> 	3) Check the parameters on the CRTDSPF command are the
IBM-shipped ones
> 	4) Check the device type being emulated--it is possible that you
are 
> emulating a device without RI capability (though unlikely)
> 	5) Check for PTFs--perhaps the 5250 data stream is wrong (again
> unlikely)
>
> I expect that my example code will work correctly indicating the 
> problem is in your application display file or code.
>
> Regards,
> Simon Coulter.
> --------------------------------------------------------------------
>    FlyByNight Software         OS/400, i5/OS Technical Specialists
>
>    http://www.flybynight.com.au/
>    Phone: +61 2 6657 8251   Mobile: +61 0411 091 400        /"\
>    Fax:   +61 2 6657 8251                                   \ /
>                                                              X
>                  ASCII Ribbon campaign against HTML E-Mail  / \
> --------------------------------------------------------------------
>
>
>
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

> list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, 
> unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take 
> a moment to review the archives at 
> http://archive.midrange.com/midrange-l.



--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at http://archive.midrange.com/midrange-l.