1: package body FND_SVC_COMP_PARAM_VALS_PKG as
2: /* $Header: AFSVCVTB.pls 115.6 2002/12/27 20:33:49 ankung noship $ */
3:
4: procedure INSERT_ROW (
5: X_ROWID in out nocopy VARCHAR2,
55: close c;
56:
57: exception
58: when others then
59: wf_core.context('FND_SVC_COMP_PARAM_VALS_PKG', 'Insert_Row', X_COMPONENT_PARAMETER_ID);
60: raise;
61: end INSERT_ROW;
62:
63:
104: return;
105:
106: exception
107: when others then
108: wf_core.context('FND_SVC_COMP_PARAM_VALS_PKG', 'Lock_Row', X_COMPONENT_PARAMETER_ID);
109: raise;
110: end LOCK_ROW;
111:
112: procedure UPDATE_ROW (
283: end if;
284:
285: exception
286: when others then
287: wf_core.context('FND_SVC_COMP_PARAM_VALS_PKG', 'Update_Row', X_COMPONENT_PARAMETER_ID);
288: raise;
289: end UPDATE_ROW;
290:
291: procedure DELETE_ROW (
309: end if;
310: end if;
311: exception
312: when others then
313: wf_core.context('FND_SVC_COMP_PARAM_VALS_PKG', 'Delete_Row', X_COMPONENT_PARAMETER_ID);
314: raise;
315:
316: end DELETE_ROW;
317:
359: FROM fnd_svc_comp_param_vals
360: WHERE component_id = l_component_id
361: AND parameter_id = l_parameter_id;
362:
363: FND_SVC_COMP_PARAM_VALS_PKG.UPDATE_ROW (
364: X_COMPONENT_PARAMETER_ID => l_component_parameter_id,
365: X_COMPONENT_ID => l_component_id,
366: X_PARAMETER_ID => l_parameter_id,
367: X_PARAMETER_VALUE => X_PARAMETER_VALUE,
376: SELECT fnd_svc_comp_param_vals_s.nextval
377: INTO l_component_parameter_id
378: FROM dual;
379:
380: FND_SVC_COMP_PARAM_VALS_PKG.INSERT_ROW (
381: X_ROWID => row_id,
382: X_COMPONENT_PARAMETER_ID => l_component_parameter_id,
383: X_COMPONENT_ID => l_component_id,
384: X_PARAMETER_ID => l_parameter_id,
393: END;
394: end LOAD_ROW;
395:
396:
397: end FND_SVC_COMP_PARAM_VALS_PKG;