ernestlitvinenko
/
jde_exec_blocks
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Format code

main
Ernest Litvinenko 2024-06-28 12:11:48 +03:00
parent 88fb1894ac
commit 3d65ceb117
1 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
32_7.sql
View File

@ -1,4 +1,4 @@
execute block (
execute block (
IN_ID_APP_EVENT D_BIGINT = :IN_ID_APP_EVENT)
returns (
output D_SMALLINT)
@ -75,7 +75,8 @@ begin
if (:F_APP_EVENT_VID = 8795 /*Создание уведомления*/ ) then
F_OPER = 1;
else begin
else
begin
output = -2;/*Неизвестная операция*/
suspend;
exit;
@ -128,7 +129,9 @@ begin
update or insert into APP_NOTE (ID_APP_NOTE, APP_NOTE_ID_SOTR, APP_NOTE_ID_APP_TASK, APP_NOTE_STATUS, APP_NOTE_TIP,
APP_NOTE_TEXT, APP_NOTE_DEL, APP_NOTE_CR, APP_NOTE_WCR, APP_NOTE_CH, APP_NOTE_WCH)
values (:NEW_ID_APP_NOTE, :NEW_APP_NOTE_ID_SOTR, :NEW_APP_NOTE_ID_APP_TASK, :NEW_APP_NOTE_STATUS, :NEW_APP_NOTE_TIP,
:NEW_APP_NOTE_TEXT, :NEW_APP_NOTE_DEL, :NEW_APP_NOTE_CR, :NEW_APP_NOTE_WCR, :NEW_APP_NOTE_CH, :NEW_APP_NOTE_WCH)
:NEW_APP_NOTE_TEXT, :NEW_APP_NOTE_DEL, :NEW_APP_NOTE_CR, :NEW_APP_NOTE_WCR, :NEW_APP_NOTE_CH,
:NEW_APP_NOTE_WCH)
matching (ID_APP_NOTE);
end
suspend;
end