create or replace PACKAGE PKG_LOADER_CONTACTS_CUSTOM AS

  --------------------------------------------------------------------------------------------------------------
  --Для ручной заливки контактов
  --i_name_registry -- Произвольное наименование реестра
  --i_scenario_code -- Код сценария из D_SCRIPT_SCENARIOS
  --i_is_active     -- 1-активировать реестр. 0-не активировать
  PROCEDURE sp_load_manual(i_name_registry VARCHAR2, i_scenario_code VARCHAR2, i_is_active NUMBER DEFAULT 0);
  --------------------------------------------------------------------------------------------------------------

  PROCEDURE sp_load_universal(i_log NUMBER, i_is_active NUMBER DEFAULT 0);

  -----------------------------------
  --Функция возвращения неформатов
  -----------------------------------
    CURSOR cur_incorrect (i_log NUMBER)
    IS
    SELECT
      l.*

    FROM tmp_loader_contacts l
    LEFT JOIN D_EXCLUD_LEAD_STATUSES exc
          ON exc.id_status = l.fid_status
    WHERE l.fid_log_loader_contact = i_log
    AND l.is_correct = 0
  ;
  TYPE lt_incorrect IS TABLE OF cur_incorrect%rowtype;

  FUNCTION fnc_loader_incorrect
  (i_log NUMBER)

    RETURN lt_incorrect pipelined
  ;

-----------------------------------
  --Функция залитых записей
  -----------------------------------
  CURSOR cur_correct (i_log NUMBER)
    IS
    SELECT
      *
    FROM tmp_loader_contacts
    WHERE fid_log_loader_contact = i_log
      AND is_correct = 1;
  TYPE lt_correct IS TABLE OF cur_correct%rowtype;

  FUNCTION fnc_loader_correct
  (i_log NUMBER)

    RETURN lt_correct pipelined
  ;
END PKG_LOADER_CONTACTS_CUSTOM;