phares3757/open-insight
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

pre cutover push

Browse Source
This commit is contained in:
Infineon\StieberD
2024-09-04 20:33:41 -07:00
parent 6ea6969f4b
commit 7762b129af
2072 changed files with 130000 additions and 95295 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
LSL2/OIEVENT/CLICK/NOTES.SAVE_SEND.json
View File

@ -5,7 +5,7 @@
},
"body": {
"record1": {
"<1>": "DECLARE FUNCTION RowExists, Send_Event\r\nDECLARE SUBROUTINE ErrMsg\r\n\r\n$insert lsl_common\r\n$insert logical\r\n\r\nIF @USERNAME = 'BRYCE_BARB' THEN DEBUG\r\n\r\nif rowexists( 'NOTES', .seq->text ) then\r\n\r\n\tErrMsg('Contact FI immediately. Your are looking at the bug in the eMail system.')\r\n\t\r\n\t@@window->savewarn = 0\r\n\tVoid = send_event( @window, 'CLEAR', 0, 1, 1, '' )\r\n\tvoid = send_event( @window, 'CLOSE' )\r\n\tMisc@<CenterWindow$> = false$\r\n\treturn 0\r\nend else\r\n return 1\r\nend\r\n"
"<1>": "DECLARE FUNCTION RowExists, Send_Event\r\nDECLARE SUBROUTINE ErrMsg\r\n\r\n$insert lsl_common\r\n$insert logical\r\n\r\nif rowexists( 'NOTES', .seq->text ) then\r\n\r\n\tErrMsg('Contact FI immediately. Your are looking at the bug in the eMail system.')\r\n\t\r\n\t@@window->savewarn = 0\r\n\tVoid = send_event( @window, 'CLEAR', 0, 1, 1, '' )\r\n\tvoid = send_event( @window, 'CLOSE' )\r\n\tMisc@<CenterWindow$> = false$\r\n\treturn 0\r\nend else\r\n return 1\r\nend\r\n"
}
}
}