fixed OI messaging form validation issue
This commit is contained in:
parent
f77f3c1207
commit
e0bc1ef6f2
File diff suppressed because it is too large
Load Diff
@ -15,6 +15,7 @@ equ invalid_nomsg$ to 3 ;* bad but do not print the error message window
|
||||
|
||||
status() = Valid$
|
||||
* Allows you to force the current username in forced fields
|
||||
convert '~' to @fm in SubrLabel
|
||||
convert '|' to @fm in SubrLabel
|
||||
swap '@USERNAME' with @user4 in SubrLabel
|
||||
ForcedValues = field( SubrLabel<4>, '*', 2 )
|
||||
@ -153,3 +154,4 @@ begin case
|
||||
end case
|
||||
return
|
||||
|
||||
|
||||
|
@ -568,7 +568,7 @@ Forward_Event(NextColumn,NextRow)
|
||||
|
||||
CurrRow = Get_Property(@WINDOW:'.SEND_TO','ROWDATA')
|
||||
|
||||
CurrRow<1,COL$ST_NAME> = OCONV(CurrRow<1,COL$ST_ID>,'[XLATE_CONV,LSL_USERS*FIRST_LAST]')
|
||||
CurrRow<COL$ST_NAME> = OCONV(CurrRow<1,COL$ST_ID>,'[XLATE_CONV,LSL_USERS*FIRST_LAST]')
|
||||
|
||||
Set_Property(@WINDOW:'.SEND_TO','ROWDATA',CurrRow)
|
||||
|
||||
@ -650,3 +650,4 @@ RETURN
|
||||
|
||||
|
||||
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user