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$
|
status() = Valid$
|
||||||
* Allows you to force the current username in forced fields
|
* Allows you to force the current username in forced fields
|
||||||
|
convert '~' to @fm in SubrLabel
|
||||||
convert '|' to @fm in SubrLabel
|
convert '|' to @fm in SubrLabel
|
||||||
swap '@USERNAME' with @user4 in SubrLabel
|
swap '@USERNAME' with @user4 in SubrLabel
|
||||||
ForcedValues = field( SubrLabel<4>, '*', 2 )
|
ForcedValues = field( SubrLabel<4>, '*', 2 )
|
||||||
@ -153,3 +154,4 @@ begin case
|
|||||||
end case
|
end case
|
||||||
return
|
return
|
||||||
|
|
||||||
|
|
||||||
|
@ -568,7 +568,7 @@ Forward_Event(NextColumn,NextRow)
|
|||||||
|
|
||||||
CurrRow = Get_Property(@WINDOW:'.SEND_TO','ROWDATA')
|
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)
|
Set_Property(@WINDOW:'.SEND_TO','ROWDATA',CurrRow)
|
||||||
|
|
||||||
@ -650,3 +650,4 @@ RETURN
|
|||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user