Re: Issue with Protect Field Using And Indicators. V7R1 -- MIDRANGE-L

Michael,
Using the ERRMSG/ERRMSGID keywords prevents any data or attributes to be
changed on the screen. It will do a position cursor, reverse image on the
field, but will not allow any data or attributes to be changed.

As was suggested earlier, I would change the ERRMSGID to a DSPATR(RI PC)
and add a ERRMSG field to the bottom of the screen that would be populated
with your message text.

On Mon, Jul 9, 2012 at 4:33 PM, Michael Schutte <mschutte369@xxxxxxxxx>wrote:

File level identifier . . . . . . . . . . . : 1120709155111
*****
Format Fields Length Identifier Type
DETALWDW 35 183 19B326CFBFDF5 WINDOW
Text . . . . . . . . . . . . . . . . . . . :

I didn't see OVRATR in DSPFD, DSPFFD or in the source.

Thank you,

On Mon, Jul 9, 2012 at 4:29 PM, Luis Rodriguez <luisro58@xxxxxxxxx> wrote:

Oops, sorry... Meant "protecting the FIELD again"...

My apologies.

Luis Rodriguez
IBM Certified Systems Expert — eServer i5 iSeries
--

On Mon, Jul 9, 2012 at 3:57 PM, Luis Rodriguez <luisro58@xxxxxxxxx>

wrote:

Michael,

It has been a long time since I have written a complex 5250-DDS program
but as I see it, after the display of the ERRMSGID, *IN62 would be set

to

*OFF, so the 98N62 DSPATR line would be valid, protecting the filed

again.

HTH,

Luis Rodriguez
IBM Certified Systems Expert — eServer i5 iSeries
--

On Mon, Jul 9, 2012 at 3:35 PM, Michael Schutte <mschutte369@xxxxxxxxx
wrote:

We've just upgraded to V7R1 not sure if it makes a difference.

However,

I'm having this strange issue with field protection on this single

record

format display.

*In98 is turned on when it's time for the user to scan in a location

to

put
product away. When 98 is on, I want to protect the @QTY field from

being

changed. However, there's a check after the scanned location is

validated

where the quantity entered is compared to the amount of space that is

left

in the scanned location. If the quantity entered is greater than the

room

left in the location, indicator 62 is turned on and re-displayed to

the

user however, the field is still protected. I'm just not seeing why I
cannot type in that field now. I know that "98N62" is an AND

condition.

Could someone please point out my error?

I know that 62 is turned on because the @QTY is highlighted and

positioned

too. I know that 98 is on because the location field is still shown on

the

display. I've also debugged the program and checked the values prior

to

EXFMT being executed. I thought maybe the screen was locked because of

the

error. But I've pressed reset and tried, still not able to type in the
field.

A @QTY 16A B 5 6

A 62 DSPATR(RI)

A 62 DSPATR(PC)

A 52 ERRMSGID(IDU0503 *LIBL/WISDOMSG

52)

A 62 ERRMSGID(CAP0001 *LIBL/ODWMSGF2

62

-

A &RPLTXT)

A 98N62 DSPATR(PR)
A* suggested putaway location and actual putaway.
A 98 11 1'Sug:'
A DSPATR(HI)
A 98 @SUGLC 16A O 11 6TEXT('Location')
A 53 ERRMSGID(ILU0504 *LIBL/WISDOMSG

53)

A 98 12 1'Loc:'
A COLOR(WHT)
A DSPATR(HI)
A 98 @LOCAT 16A B 12 6TEXT('Location')
A 53 ERRMSGID(ILU0504 *LIBL/WISDOMSG

53)

Let me know if you need more information. I cannot think of anything

else

that you would need. Maybe a PTF is needed?

Here is a screen shot after the capacity check is made.
http://tinypic.com/r/20kf4fa/6

Thank you in advanced.
--
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.

--
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.