wolandtel

-- Подключаться пользователем 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;

wolandtel

declare
  vnWITH_SAVE_FORCE NUMBER;
  vsPROJECT         VARCHAR(20)   := 'MEDDEV';
  vsFULLNAME        VARCHAR2(500) := 'Михаил Котельников';
  vsEMAIL           VARCHAR2(100) := 'm.kotelnikov@bars-open.ru';
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,