1: package body PER_CALENDAR_ENTRIES_LOAD_PKG as
2: /* $Header: peentlct.pkb 120.0 2005/05/31 08:08 appldev noship $ */
3:
4: procedure KEY_TO_IDS (
5: X_IDENTIFIER_KEY in VARCHAR2,
259: else
260: user_id := 0;
261: end if;
262:
263: PER_CALENDAR_ENTRIES_LOAD_PKG.UPDATE_ROW (
264: X_CALENDAR_ENTRY_ID => X_CALENDAR_ENTRY_ID
265: ,X_NAME => X_NAME
266: ,X_TYPE => X_TYPE
267: ,X_START_DATE => to_date(X_START_DATE,'DD/MM/YYYY')
283: when NO_DATA_FOUND then
284: -- insert a row with NULL business group (meaningless)
285: -- as data is created at Legislation level.
286: -- (UI restricts on BG, or Leg Code).
287: PER_CALENDAR_ENTRIES_LOAD_PKG.INSERT_ROW (
288: X_CALENDAR_ENTRY_ID => X_CALENDAR_ENTRY_ID
289: ,X_NAME => X_NAME
290: ,X_TYPE => X_TYPE
291: ,X_START_DATE => to_date(X_START_DATE,'DD/MM/YYYY')
353: end if;
354:
355: end UPDATE_ROW;
356:
357: end PER_CALENDAR_ENTRIES_LOAD_PKG;