APPS.PA_PLAN_RES_DEFAULTS_PVT dependencies on PA_PLAN_RES_DEFAULTS

Line 1: package body pa_plan_res_defaults_pvt as

1: package body pa_plan_res_defaults_pvt as
2: /* $Header: PARPRDVB.pls 120.1 2005/08/16 23:35:04 avaithia noship $ */
3: procedure INSERT_ROW (
4: X_ROWID in OUT NOCOPY ROWID,
5: X_PLAN_RES_DEFAULT_ID in OUT NOCOPY NUMBER ,

Line 24: l_plan_res_default_id PA_PLAN_RES_DEFAULTS.PLAN_RES_DEFAULT_ID%type;

20: P_LAST_UPDATED_BY in NUMBER ,
21: P_LAST_UPDATE_LOGIN in NUMBER
22: ) is
23:
24: l_plan_res_default_id PA_PLAN_RES_DEFAULTS.PLAN_RES_DEFAULT_ID%type;
25:
26:
27: cursor C is select ROWID from PA_PLAN_RES_DEFAULTS
28: where plan_res_default_id = l_plan_res_default_id;

Line 27: cursor C is select ROWID from PA_PLAN_RES_DEFAULTS

23:
24: l_plan_res_default_id PA_PLAN_RES_DEFAULTS.PLAN_RES_DEFAULT_ID%type;
25:
26:
27: cursor C is select ROWID from PA_PLAN_RES_DEFAULTS
28: where plan_res_default_id = l_plan_res_default_id;
29: begin
30:
31: select nvl(X_PLAN_RES_DEFAULT_ID,PA_PLAN_RES_DEFAULTS_S.nextval)

Line 31: select nvl(X_PLAN_RES_DEFAULT_ID,PA_PLAN_RES_DEFAULTS_S.nextval)

27: cursor C is select ROWID from PA_PLAN_RES_DEFAULTS
28: where plan_res_default_id = l_plan_res_default_id;
29: begin
30:
31: select nvl(X_PLAN_RES_DEFAULT_ID,PA_PLAN_RES_DEFAULTS_S.nextval)
32: into l_plan_res_default_id
33: from dual;
34:
35: insert into PA_PLAN_RES_DEFAULTS (

Line 35: insert into PA_PLAN_RES_DEFAULTS (

31: select nvl(X_PLAN_RES_DEFAULT_ID,PA_PLAN_RES_DEFAULTS_S.nextval)
32: into l_plan_res_default_id
33: from dual;
34:
35: insert into PA_PLAN_RES_DEFAULTS (
36: PLAN_RES_DEFAULT_ID ,
37: RESOURCE_CLASS_ID ,
38: OBJECT_TYPE ,
39: OBJECT_ID ,

Line 110: from PA_PLAN_RES_DEFAULTS

106: ITEM_MASTER_ID ,
107: MFC_COST_TYPE_ID ,
108: ENABLED_FLAG ,
109: RECORD_VERSION_NUMBER
110: from PA_PLAN_RES_DEFAULTS
111: where PLAN_RES_DEFAULT_ID = P_PLAN_RES_DEFAULT_ID
112: for update of PLAN_RES_DEFAULT_ID nowait;
113: recinfo c%rowtype;
114: begin

Line 161: update PA_PLAN_RES_DEFAULTS set

157: x_return_status := FND_API.G_RET_STS_SUCCESS;
158: x_msg_count := 0;
159:
160:
161: update PA_PLAN_RES_DEFAULTS set
162: RESOURCE_CLASS_ID = P_RESOURCE_CLASS_ID,
163: OBJECT_TYPE = P_OBJECT_TYPE,
164: OBJECT_ID = P_OBJECT_ID,
165: SPREAD_CURVE_ID = P_SPREAD_CURVE_ID,

Line 193: => 'pa_plan_res_defaults_pvt.Update_Row'

189:
190: EXCEPTION
191: WHEN OTHERS THEN
192: FND_MSG_PUB.add_exc_msg( p_pkg_name
193: => 'pa_plan_res_defaults_pvt.Update_Row'
194: ,p_procedure_name
195: => PA_DEBUG.G_Err_Stack);
196: x_msg_count := x_msg_count + 1;
197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 207: delete from PA_PLAN_RES_DEFAULTS

203: P_PLAN_RES_DEFAULT_ID in NUMBER
204: ) is
205: begin
206:
207: delete from PA_PLAN_RES_DEFAULTS
208: where PLAN_RES_DEFAULT_ID = P_PLAN_RES_DEFAULT_ID;
209:
210: if (sql%notfound) then
211: raise no_data_found;

Line 260: pa_plan_res_defaults_pvt.UPDATE_ROW (

256: --hr_utility.trace('P_ENABLED_FLAG ' || P_ENABLED_FLAG);
257: --hr_utility.trace('X_RECORD_VERSION_NUMBER ' || X_RECORD_VERSION_NUMBER);
258: --hr_utility.trace('P_MFC_COST_TYPE_ID ' || P_MFC_COST_TYPE_ID);
259: /*
260: pa_plan_res_defaults_pvt.UPDATE_ROW (
261: P_PLAN_RES_DEFAULT_ID => X_PLAN_RES_DEFAULT_ID ,
262: P_RESOURCE_CLASS_ID => P_RESOURCE_CLASS_ID ,
263: P_OBJECT_TYPE => P_OBJECT_TYPE ,
264: P_OBJECT_ID => P_OBJECT_ID ,

Line 291: from pa_plan_res_defaults

287:
288: BEGIN
289: select 'Y'
290: into l_dummy
291: from pa_plan_res_defaults
292: where PLAN_RES_DEFAULT_ID = X_PLAN_RES_DEFAULT_ID;
293:
294: --hr_utility.trace('l_dummy is : ' || l_dummy);
295: EXCEPTION WHEN NO_DATA_FOUND THEN

Line 297: pa_plan_res_defaults_pvt.INSERT_ROW (

293:
294: --hr_utility.trace('l_dummy is : ' || l_dummy);
295: EXCEPTION WHEN NO_DATA_FOUND THEN
296: --hr_utility.trace('before INSERT_ROW');
297: pa_plan_res_defaults_pvt.INSERT_ROW (
298: X_ROWID => l_rowid ,
299: X_PLAN_RES_DEFAULT_ID => X_PLAN_RES_DEFAULT_ID ,
300: P_RESOURCE_CLASS_ID => P_RESOURCE_CLASS_ID ,
301: P_OBJECT_TYPE => P_OBJECT_TYPE ,

Line 322: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_plan_res_defaults_pvt'

318: EXCEPTION
319: WHEN OTHERS THEN
320: X_PLAN_RES_DEFAULT_ID := NULL ;
321: X_RECORD_VERSION_NUMBER := NULL ;
322: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_plan_res_defaults_pvt'
323: ,p_procedure_name => 'Load_Row') ;
324: RAISE ;
325: end LOAD_ROW;
326:

Line 327: end pa_plan_res_defaults_pvt;

323: ,p_procedure_name => 'Load_Row') ;
324: RAISE ;
325: end LOAD_ROW;
326:
327: end pa_plan_res_defaults_pvt;