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

ADD base exec block

main
Ernest Litvinenko 2024-06-28 11:59:22 +03:00
parent 57432aad07
commit 8468755cdf
1 changed files with 42 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

44
32_7.sql
View File

@ -97,13 +97,53 @@ begin
E.APP_EVENT_IMP, E.APP_EVENT_CR, E.APP_EVENT_WCR, E.APP_EVENT_CH, E.APP_EVENT_WCH, E.APP_EVENT_SEANS, E.APP_EVENT_IMP, E.APP_EVENT_CR, E.APP_EVENT_WCR, E.APP_EVENT_CH, E.APP_EVENT_WCH, E.APP_EVENT_SEANS,
E.APP_EVENT_OWNERMST, E.APP_EVENT_FIMP, E.APP_EVENT_MPOST E.APP_EVENT_OWNERMST, E.APP_EVENT_FIMP, E.APP_EVENT_MPOST
from APP_EVENT E from APP_EVENT E
where E.APP_EVENT_ID_REC = :F_APP_EVENT_ID_REC order by E.APP_EVENT_DT where E.APP_EVENT_ID_REC = :F_APP_EVENT_ID_REC and E.APP_EVENT_DEL = 0 order by E.APP_EVENT_DT
into :F_ID_APP_EVENT, :F_APP_EVENT_ID_SOTR, :F_APP_EVENT_ID_REC, :F_APP_EVENT_VID, :F_APP_EVENT_TIP, :F_APP_EVENT_DT, into :F_ID_APP_EVENT, :F_APP_EVENT_ID_SOTR, :F_APP_EVENT_ID_REC, :F_APP_EVENT_VID, :F_APP_EVENT_TIP, :F_APP_EVENT_DT,
:F_APP_EVENT_TEXT, :F_APP_EVENT_PARAM, :F_APP_EVENT_DATA, :F_APP_EVENT_DEL, :F_APP_EVENT_IMP, :F_APP_EVENT_CR, :F_APP_EVENT_TEXT, :F_APP_EVENT_PARAM, :F_APP_EVENT_DATA, :F_APP_EVENT_DEL, :F_APP_EVENT_IMP, :F_APP_EVENT_CR,
:F_APP_EVENT_WCR, :F_APP_EVENT_CH, :F_APP_EVENT_WCH, :F_APP_EVENT_SEANS, :F_APP_EVENT_OWNERMST, :F_APP_EVENT_WCR, :F_APP_EVENT_CH, :F_APP_EVENT_WCH, :F_APP_EVENT_SEANS, :F_APP_EVENT_OWNERMST,
:F_APP_EVENT_FIMP, :F_APP_EVENT_MPOST DO :F_APP_EVENT_FIMP, :F_APP_EVENT_MPOST DO
begin begin
/*TODO COMPLETE*/
if (:F_APP_EVENT_VID = 8795) then
begin
NEW_ID_APP_NOTE = :F_APP_EVENT_ID_REC;
NEW_APP_NOTE_ID_SOTR = :F_APP_EVENT_ID_SOTR;
NEW_APP_NOTE_ID_APP_TASK = 0;
NEW_APP_NOTE_STATUS = 0;
NEW_APP_NOTE_TIP = F_APP_EVENT_TIP;
NEW_APP_NOTE_TEXT = F_APP_EVENT_TEXT;
NEW_APP_NOTE_DEL = F_APP_EVENT_DATA;
NEW_APP_NOTE_CR = F_APP_EVENT_CR;
NEW_APP_NOTE_WCR = F_APP_EVENT_WCR;
NEW_APP_NOTE_CH = F_APP_EVENT_CH;
NEW_APP_NOTE_WCH = F_APP_EVENT_WCH;
end; end;
end;
update or insert 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
) matching (ID_APP_NOTE)
end end