APPS.AMS_IBA_PS_STRATS_B_PKG dependencies on AMS_IBA_PS_STRATS_B

Line 1: PACKAGE BODY AMS_IBA_PS_STRATS_B_PKG as

1: PACKAGE BODY AMS_IBA_PS_STRATS_B_PKG as
2: /* $Header: amststrb.pls 120.1 2006/09/21 07:38:16 mayjain noship $ */
3: -- ===============================================================
4: -- Start of Comments
5: -- Package name

Line 6: -- AMS_IBA_PS_STRATS_B_PKG

2: /* $Header: amststrb.pls 120.1 2006/09/21 07:38:16 mayjain noship $ */
3: -- ===============================================================
4: -- Start of Comments
5: -- Package name
6: -- AMS_IBA_PS_STRATS_B_PKG
7: -- Purpose
8: --
9: -- History
10: --

Line 16: G_PKG_NAME CONSTANT VARCHAR2(30):= 'AMS_IBA_PS_STRATS_B_PKG';

12: --
13: -- End of Comments
14: -- ===============================================================
15:
16: G_PKG_NAME CONSTANT VARCHAR2(30):= 'AMS_IBA_PS_STRATS_B_PKG';
17: G_FILE_NAME CONSTANT VARCHAR2(12) := 'amststrb.pls';
18:
19: ----------------------------------------------------------
20: ---- MEDIA ----

Line 58: INSERT INTO AMS_IBA_PS_STRATS_B(

54: BEGIN
55:
56: px_object_version_number := 1;
57:
58: INSERT INTO AMS_IBA_PS_STRATS_B(
59: created_by,
60: creation_date,
61: last_updated_by,
62: last_update_date,

Line 153: Update AMS_IBA_PS_STRATS_B

149: p_strategy_description IN VARCHAR2)
150:
151: IS
152: BEGIN
153: Update AMS_IBA_PS_STRATS_B
154: SET
155: created_by = DECODE( p_created_by, FND_API.g_miss_num, created_by, p_created_by),
156: creation_date = DECODE( p_creation_date, FND_API.g_miss_date, creation_date, p_creation_date),
157: last_updated_by = DECODE( p_last_updated_by, FND_API.g_miss_num, last_updated_by, p_last_updated_by),

Line 210: DELETE FROM AMS_IBA_PS_STRATS_B

206: PROCEDURE Delete_Row(
207: p_STRATEGY_ID NUMBER)
208: IS
209: BEGIN
210: DELETE FROM AMS_IBA_PS_STRATS_B
211: WHERE STRATEGY_ID = p_STRATEGY_ID;
212: If (SQL%NOTFOUND) then
213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
214: End If;

Line 230: from AMS_IBA_PS_STRATS_B B

226: begin
227: delete from AMS_IBA_PS_STRATS_TL T
228: where not exists
229: (select NULL
230: from AMS_IBA_PS_STRATS_B B
231: where B.STRATEGY_ID = T.STRATEGY_ID
232: );
233:
234: update AMS_IBA_PS_STRATS_TL T set (

Line 325: FROM AMS_IBA_PS_STRATS_B

321:
322: IS
323: CURSOR C IS
324: SELECT *
325: FROM AMS_IBA_PS_STRATS_B
326: WHERE STRATEGY_ID = p_STRATEGY_ID
327: FOR UPDATE of STRATEGY_ID NOWAIT;
328: Recinfo C%ROWTYPE;
329: BEGIN

Line 441: from ams_iba_ps_strats_b

437: l_db_luby_id number;
438: /*
439: cursor c_obj_verno is
440: select object_version_number
441: from ams_iba_ps_strats_b
442: where strategy_id = x_strategy_id;
443: */
444: cursor c_db_data_details is
445: select last_updated_by, nvl(object_version_number,1)

Line 446: from ams_iba_ps_strats_b

442: where strategy_id = x_strategy_id;
443: */
444: cursor c_db_data_details is
445: select last_updated_by, nvl(object_version_number,1)
446: from ams_iba_ps_strats_b
447: where strategy_id = x_strategy_id;
448:
449: cursor c_chk_strategy_exists is
450: select 'x'

Line 451: from ams_iba_ps_strats_b

447: where strategy_id = x_strategy_id;
448:
449: cursor c_chk_strategy_exists is
450: select 'x'
451: from ams_iba_ps_strats_b
452: where strategy_id = x_strategy_id;
453:
454: cursor c_get_strategy_id is
455: select ams_iba_ps_strats_b_s.nextval

Line 455: select ams_iba_ps_strats_b_s.nextval

451: from ams_iba_ps_strats_b
452: where strategy_id = x_strategy_id;
453:
454: cursor c_get_strategy_id is
455: select ams_iba_ps_strats_b_s.nextval
456: from dual;
457: BEGIN
458:
459: if X_OWNER = 'SEED' then

Line 480: AMS_IBA_PS_STRATS_B_PKG.INSERT_ROW (

476: end if;
477:
478: l_obj_verno := 1;
479:
480: AMS_IBA_PS_STRATS_B_PKG.INSERT_ROW (
481: p_created_by => l_user_id,
482: p_creation_date => SYSDATE,
483: p_last_updated_by => l_user_id,
484: p_last_update_date => SYSDATE,

Line 505: AMS_IBA_PS_STRATS_B_PKG.UPDATE_ROW (

501: if (l_db_luby_id IN (0, 1, 2) or NVL(x_custom_mode, 'PRESERVE')='FORCE')
502: then
503: l_strategy_id := x_strategy_id;
504:
505: AMS_IBA_PS_STRATS_B_PKG.UPDATE_ROW (
506: p_created_by => l_user_id,
507: p_creation_date => SYSDATE,
508: p_last_updated_by => l_user_id,
509: p_last_update_date => SYSDATE,

Line 527: END AMS_IBA_PS_STRATS_B_PKG;

523: end if;
524: close c_chk_strategy_exists;
525: END LOAD_ROW;
526:
527: END AMS_IBA_PS_STRATS_B_PKG;