RE: DDS field that refuses to update no matter what

Have you tried removing the PUTOVR keyword? You already use the OVERLAY
keyword.

If you want to use PUTOVR you also need OVRDTA. With these keywords you
do not need the OVERLAY keyword.

Gary Monnier

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of
daparnin@xxxxxxxxxxxxxx
Sent: Friday, May 20, 2011 11:13 AM
To: Midrange Systems Technical Discussion
Subject: RE: DDS field that refuses to update no matter what

This is the record. The field is XWORKC.


A R PROMPTR TEXT('Change Screen')
A*%%TS DD 20110520 132007 daparnin REL-V5.0.1 WDSc
A SETOF(97)
A BLINK
A OVERLAY
A PUTOVR
A CF03
A CF06
A CF12
A CF08
A CF04
A*
A 1 2'WKFPR100'
A COLOR(BLU)
A 1 73DATE
A EDTCDE(Y)
A 2 2SYSNAME
A 2 20'Nisco Budgeting Workcenter
Percent-
A Change'
A COLOR(BLU)
A 2 73TIME
A XFAC 2 B 6 43TEXT('Facility')
A 8 30'Workcenter:'
A DSPATR(HI)
A XWORKC 6Y 0B 8 43TEXT('Workcenter')
A EDTCDE(3)
A 8 51'*'
A XMSG 78 O 24 2COLOR(WHT)
A DSPATR(HI)
A 23 23'F8=Where Used'
A COLOR(BLU)
A*
A CONAME R O 1 21REFFLD(FLDREFFLE/CONAME)
A DSPATR(HI)
A COLOR(WHT)
A 10 32'% Change:'
A DSPATR(HI)
A 10 51'(xxx.xx %)'
A XPCTCHG 5Y 2B 10 43TEXT('Percentage Change')
A EDTCDE(3)
A 11 51'(1.10 = +10%)'
A 12 51'(0.90 = -10%)'
A 18 27'(Affects BD Routings
Only!)'
A DSPATR(HI)
A 14 34'Method:'
A DSPATR(HI)
A XMETHOD 2 O 14 43TEXT('Method Code')
A 23 3'F3=Exit'
A COLOR(BLU)
A 23 38'F12=Cancel'
A COLOR(BLU)
A 23 12'F4=Prompt'
A COLOR(BLU)
A 6 32'Facility:'
A DSPATR(HI)
A 23 50'F18=Update'
A COLOR(BLU)