FUNCTION DecodeAgeGenderGroup(sExtName VARCHAR2, iExtRegionID PLS_INTEGER, iStrict PLS_INTEGER) RETURN PLS_INTEGER;

Декодирует наименование поло-возрастной группы животных.
Параметры:

• sExtName - наименование поло-возрастной группы животного по внешнему классификатору;
  
• iExtRegionID - ID внутреннего района записи соответствия;
  
• iStrict - определяет поведение при неудачном поиске.

FUNCTION DecodeDepartureReason(sExtName VARCHAR2, iExtRegionID PLS_INTEGER, iStrict PLS_INTEGER) RETURN PLS_INTEGER;

Декодирует наименование причины выбытия животного.
Параметры:

• sExtName - наименование причины по внешнему классификатору;
  
• iExtRegionID - ID внутреннего района записи соответствия;
  
• iStrict - определяет поведение при неудачном поиске.

FUNCTION DecodeRegionID(sExtName VARCHAR2, iExtRegionID PLS_INTEGER, iStrict PLS_INTEGER) RETURN PLS_INTEGER;

Декодирует наименование района.
Параметры:

• sExtName - наименование района по внешнему классификатору;
  
• iExtRegionID - ID внутреннего района записи соответствия;
  
• iStrict - определяет поведение при неудачном поиске.

FUNCTION AllocateNewDeerID RETURN PLS_INTEGER;

Возвращает новый ID записи в реестре оленей.

FUNCTION AllocateNewDeerHistID RETURN PLS_INTEGER;

Возвращает новый ID записи во таблице истории изменения характеристик северного оленя.

PROCEDURE ClearTempRegistry;

Очищает временную таблицу для хранения загруженных данных по северным оленям.

PROCEDURE ApplyTempRegistry(
  dLoadDate DATE, iIsFull PLS_INTEGER,
  LOG IN OUT NOCOPY uszn.pkServerOps.TServerOpLog, iTaskRecID PLS_INTEGER, iLogLevel PLS_INTEGER,
  iErrorCount IN OUT NOCOPY PLS_INTEGER, iWarningCount IN OUT NOCOPY PLS_INTEGER);
 
-- Привязывает данные оленей к собственникам.
-- Параметры:
--   iRegionID     - ID рабочего района;
--   dLoadDate     - дата загрузки сведений;
--   Log           - протокол;
--   iTaskRecID    - ID записи серверной операции; null, если серверная операция отсутствует;
--   iLogLevel     - уровень отступа для протоколирования;
--   iErrorCount   - количество сбоев в процессе обработки;
--   iWarningCount - количество предупреждений в процессе обработки;
--   iAudOriginID  - ID источника события для аудита;
--   sAudNotes     - примечания для аудита.
PROCEDURE LinkRegistryToOwners(
  iRegionID PLS_INTEGER, dLoadDate DATE,
  LOG IN OUT NOCOPY uszn.pkServerOps.TServerOpLog, iTaskRecID PLS_INTEGER, iLogLevel PLS_INTEGER,
  iErrorCount IN OUT NOCOPY PLS_INTEGER, iWarningCount IN OUT NOCOPY PLS_INTEGER,
  iAudOriginID PLS_INTEGER, sAudNotes VARCHAR2 := NULL);

Переносит данные из временной таблицы загруженных данных по северным оленям к реестру.
Параметры:

• dLoadDate - дата, от которой загружена информация;
  
• iIsFull - является ли выгрузка полной (0/1);
  
• Log - протокол;
  
• iTaskRecID - ID записи серверной операции; null, если серверная операция отсутствует;
  
• iLogLevel - уровень отступа для протоколирования;
  
• iErrorCount - количество сбоев в процессе обработки;
  
• iWarningCount - количество предупреждений в процессе обработки.

PROCEDURE LinkRegistryToOwners(
  iRegionID PLS_INTEGER, dLoadDate DATE,
  LOG IN OUT NOCOPY uszn.pkServerOps.TServerOpLog, iTaskRecID PLS_INTEGER, iLogLevel PLS_INTEGER,
  iErrorCount IN OUT NOCOPY PLS_INTEGER, iWarningCount IN OUT NOCOPY PLS_INTEGER,
  iAudOriginID PLS_INTEGER, sAudNotes VARCHAR2 := NULL);
 
END;
 
/
CREATE OR REPLACE PACKAGE BODY uszn.pkVetRegistry IS
 
-- Информация о владельце оленя
TYPE TDeerOwnerInfo IS RECORD(
  name         uszn.r_kmns_deer_registry.owner_name%TYPE,       -- ФИО либо наименование организации
  inn          uszn.r_kmns_deer_registry.owner_inn%TYPE,        -- ИНН организации; для ФЛ - неизвестно, будут ли
  birth_date   uszn.r_kmns_deer_registry.owner_birth_date%TYPE, -- дата рождения для ФЛ; для организации - непонятно
  iPCID        PLS_INTEGER,                                     -- ID человека/коллектива; null, если не найден
  iDeerCount   PLS_INTEGER,                                     -- общее количество оленей во временном реестре
  iActualCount PLS_INTEGER                                      -- количество актуальных оленей во временном реестре
);
TYPE TDeerOwnerInfoList IS TABLE OF TDeerOwnerInfo INDEX BY BINARY_INTEGER;

Привязывает данные оленей к собственникам.
Параметры:

• iRegionID - ID рабочего района;
  
• dLoadDate - дата загрузки сведений;
  
• Log - протокол;
  
• iTaskRecID - ID записи серверной операции; null, если серверная операция отсутствует;
  
• iLogLevel - уровень отступа для протоколирования;
  
• iErrorCount - количество сбоев в процессе обработки;
  
• iWarningCount - количество предупреждений в процессе обработки;
  
• iAudOriginID - ID источника события для аудита;
  
• sAudNotes - примечания для аудита.