forked from CITKParus/P8-ExchangeService
50 lines
1.6 KiB
Plaintext
50 lines
1.6 KiB
Plaintext
create or replace package UDO_PKG_EXS_ATOL as
|
|
|
|
/* Îòðàáîòêà îòâåòîâ ÀÒÎË íà îòïðàâêó ÷åêà */
|
|
procedure PROCESS_SEND_CHECK_RESP
|
|
(
|
|
NIDENT in number, -- Èäåíòèôèêàòîð ïðîöåññà
|
|
NSRV_TYPE in number, -- Òèï ñåðâèñà (ñì. êîíñòàíòû PKG_EXS.NSRV_TYPE*)
|
|
NEXSQUEUE in number -- Ðåãèñòðàöèîííûé íîìåð îáðàáàòûâàåìîé ïîçèöèè î÷åðåäè îáìåíà
|
|
);
|
|
|
|
/* Îòðàáîòêà îòâåòîâ ÎÔÄ íà çàïðîñ ïå÷àòíîé âåðñèè ÷åêà */
|
|
procedure PROCESS_CHECK_PRINT_RESP
|
|
(
|
|
NIDENT in number, -- Èäåíòèôèêàòîð ïðîöåññà
|
|
NSRV_TYPE in number, -- Òèï ñåðâèñà (ñì. êîíñòàíòû PKG_EXS.NSRV_TYPE*)
|
|
NEXSQUEUE in number -- Ðåãèñòðàöèîííûé íîìåð îáðàáàòûâàåìîé ïîçèöèè î÷åðåäè îáìåíà
|
|
);
|
|
|
|
end;
|
|
/
|
|
create or replace package body UDO_PKG_EXS_ATOL as
|
|
|
|
/* Îòðàáîòêà îòâåòîâ ÀÒÎË íà îòïðàâêó ÷åêà */
|
|
procedure PROCESS_SEND_CHECK_RESP
|
|
(
|
|
NIDENT in number, -- Èäåíòèôèêàòîð ïðîöåññà
|
|
NSRV_TYPE in number, -- Òèï ñåðâèñà (ñì. êîíñòàíòû PKG_EXS.NSRV_TYPE*)
|
|
NEXSQUEUE in number -- Ðåãèñòðàöèîííûé íîìåð îáðàáàòûâàåìîé ïîçèöèè î÷åðåäè îáìåíà
|
|
)
|
|
is
|
|
begin
|
|
null;
|
|
end;
|
|
|
|
/* Îòðàáîòêà îòâåòîâ ÎÔÄ íà çàïðîñ ïå÷àòíîé âåðñèè ÷åêà */
|
|
procedure PROCESS_CHECK_PRINT_RESP
|
|
(
|
|
NIDENT in number, -- Èäåíòèôèêàòîð ïðîöåññà
|
|
NSRV_TYPE in number, -- Òèï ñåðâèñà (ñì. êîíñòàíòû PKG_EXS.NSRV_TYPE*)
|
|
NEXSQUEUE in number -- Ðåãèñòðàöèîííûé íîìåð îáðàáàòûâàåìîé ïîçèöèè î÷åðåäè îáìåíà
|
|
)
|
|
is
|
|
begin
|
|
null;
|
|
end;
|
|
|
|
|
|
end;
|
|
/
|