DBA Data[Home] [Help]

APPS.PA_PERCENT_COMPLETES_PKG dependencies on PA_PERCENT_COMPLETES

Line 1: package body PA_PERCENT_COMPLETES_PKG as

1: package body PA_PERCENT_COMPLETES_PKG as
2: /* $Header: PAPCPKGB.pls 120.1 2005/08/05 03:38:26 lveerubh noship $*/
3:
4: procedure INSERT_ROW( p_TASK_ID IN NUMBER,
5: p_DATE_COMPUTED IN DATE,

Line 53: select PA_PERCENT_COMPLETES_S.nextval

49: BEGIN
50: l_percent_complete_id := x_percent_complete_id;
51: IF l_PERCENT_COMPLETE_ID IS NULL
52: THEN
53: select PA_PERCENT_COMPLETES_S.nextval
54: into l_percent_complete_id
55: from dual;
56: END IF;
57: insert into pa_percent_completes(TASK_ID,

Line 57: insert into pa_percent_completes(TASK_ID,

53: select PA_PERCENT_COMPLETES_S.nextval
54: into l_percent_complete_id
55: from dual;
56: END IF;
57: insert into pa_percent_completes(TASK_ID,
58: DATE_COMPUTED,
59: LAST_UPDATE_DATE,
60: LAST_UPDATED_BY,
61: CREATION_DATE,

Line 150: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PERCENT_COMPLETES_PKG',

146: );
147: x_percent_complete_id := l_percent_complete_id;
148: exception when others then
149: x_percent_complete_id := NULL;
150: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PERCENT_COMPLETES_PKG',
151: p_procedure_name => 'INSERT_ROW',
152: p_error_text => SUBSTRB(SQLERRM,1,240));
153: raise;
154: End;

Line 201: update pa_percent_completes

197: ,p_structure_type IN VARCHAR2
198: ) IS
199:
200: BEGIN
201: update pa_percent_completes
202: set
203: OBJECT_VERSION_ID = decode(P_OBJECT_VERSION_ID,FND_API.G_MISS_NUM,OBJECT_VERSION_ID,P_OBJECT_VERSION_ID),
204: OBJECT_TYPE = decode(p_OBJECT_TYPE,FND_API.G_MISS_CHAR,OBJECT_TYPE,p_OBJECT_TYPE),
205: OBJECT_ID = decode(p_OBJECT_ID,FND_API.G_MISS_NUM,OBJECT_ID,p_OBJECT_ID),

Line 270: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PERCENT_COMPLETES_PKG',

266: fnd_msg_pub.add;
267: end if;
268:
269: exception when others then
270: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PERCENT_COMPLETES_PKG',
271: p_procedure_name => 'UPDATE_ROW',
272: p_error_text => SUBSTRB(SQLERRM,1,240));
273: raise;
274: End UPDATE_ROW;

Line 279: DELETE FROM pa_percent_completes

275:
276: Procedure DELETE_ROW(
277: p_row_id VARCHAR2 ) IS
278: BEGIN
279: DELETE FROM pa_percent_completes
280: WHERE rowid = p_row_id;
281: END DELETE_ROW;
282:
283: end;