1: PACKAGE BODY AMS_CTDS_PKG as
2: /* $Header: amstctdb.pls 120.1 2005/06/03 12:41:22 appldev $ */
3: -- ===============================================================
4: -- Start of Comments
5: -- Package name
2: /* $Header: amstctdb.pls 120.1 2005/06/03 12:41:22 appldev $ */
3: -- ===============================================================
4: -- Start of Comments
5: -- Package name
6: -- AMS_CTDS_PKG
7: -- Purpose
8: --
9: -- History
10: --
13: -- End of Comments
14: -- ===============================================================
15:
16:
17: G_PKG_NAME CONSTANT VARCHAR2(30):= 'AMS_CTDS_PKG';
18: G_FILE_NAME CONSTANT VARCHAR2(12) := 'amstctdb.pls';
19:
20:
21: ----------------------------------------------------------
337: end if;
338:
339: close c_chk_ctd_exists;
340: l_obj_verno := 1;
341: AMS_CTDS_PKG.INSERT_ROW (
342: px_ctd_id => l_ctd_id,
343: p_action_id => X_ACTION_ID,
344: p_forward_url => x_forward_url,
345: p_track_url => x_track_url,
365:
366: if (l_last_updated_by in (1,2,0) OR
367: NVL(x_custom_mode,'PRESERVE')='FORCE') THEN
368:
369: AMS_CTDS_PKG.UPDATE_ROW(
370: p_ctd_id => X_CTD_ID,
371: p_action_id => X_ACTION_ID,
372: p_forward_url => X_FORWARD_URL,
373: p_track_url => X_TRACK_URL,
414: select sysdate into l_date from dual;
415: END TRANSLATE_ROW;
416:
417:
418: END AMS_CTDS_PKG;