fixed OI messaging form validation issue

This commit is contained in:
Infineon\StieberD 2024-09-16 11:30:45 -07:00 committed by Stieber Daniel (IT FI MES)
parent f77f3c1207
commit e0bc1ef6f2
3 changed files with 3161 additions and 534 deletions

File diff suppressed because it is too large Load Diff

View File

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

View File

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