Skip to content

Instantly share code, notes, and snippets.

View wolandtel's full-sized avatar

Mikhail Kotelnikov wolandtel

View GitHub Profile
-- Подключаться пользователем DEV[:USER]
declare
vnUSER NUMBER(17);
vsSYSUSER VARCHAR2(100) := 'DEV';
vnLPU NUMBER(17) := 10903;
begin
select ID
INTO vnUSER
from D_V_USERS
where USERNAME = :USER;
declare
vnWITH_SAVE_FORCE NUMBER;
vsPROJECT VARCHAR(20) := 'MEDDEV';
vsFULLNAME VARCHAR2(500) := 'Михаил Котельников';
vsEMAIL VARCHAR2(100) := '[email protected]';
begin
-- vnWITH_SAVE_FORCE := 2; -- Если сегодня объект кто-то редактировал
D_PKG_SES.DEV_HELLO(psUSER_FULLNAME => vsFULLNAME,
psUSER_EMAIL => vsEMAIL);
D_PKG_SES.SET_MED_TASK(psVALUE => :nTASK_ID,