DBA Data[Home] [Help]

APPS.PA_TASK_APPROVAL_PKG dependencies on PA_TASK_APPROVAL_PKG

Line 1: PACKAGE BODY PA_TASK_APPROVAL_PKG AS

1: PACKAGE BODY PA_TASK_APPROVAL_PKG AS
2: /* $Header: PATSKPKB.pls 120.3.12010000.2 2009/08/19 12:46:13 anuragar noship $ */
3:
4: p_debug_mode VARCHAR2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:

Line 38: log_message('Inside PA_TASK_APPROVAL_PKG.Is_Child_Task',3);

34: AND relationship_type = 'S');
35:
36: l_is_child_task VARCHAR2(1) :='N';
37: BEGIN
38: log_message('Inside PA_TASK_APPROVAL_PKG.Is_Child_Task',3);
39: p_return_status := 'S';
40: OPEN C1;
41: FETCH C1 INTO l_is_child_task;
42: CLOSE C1;

Line 99: log_message('Inside PA_TASK_APPROVAL_PKG.Is_Parent_Task_Approved',3);

95: AND relationship_type = 'S');
96:
97: l_is_parent_tsk_aprvd VARCHAR2(1) := 'N';
98: BEGIN
99: log_message('Inside PA_TASK_APPROVAL_PKG.Is_Parent_Task_Approved',3);
100: p_return_status := 'S';
101: OPEN C1;
102: FETCH C1 INTO l_is_parent_tsk_aprvd;
103: CLOSE C1;

Line 144: log_message('Inside PA_TASK_APPROVAL_PKG.Submit_Task',3);

140: x_err_stack VARCHAR2(2000);
141: x_err_stage VARCHAR2(100);
142: x_err_code NUMBER;
143: BEGIN
144: log_message('Inside PA_TASK_APPROVAL_PKG.Submit_Task',3);
145: p_return_status := 'S';
146:
147: --b6694902_debug.debug('Before calling Start_Task_Aprv_Wf ');
148: --b6694902_debug.debug('Before calling Start_Task_Aprv_Wf for task '||p_task_id);

Line 210: log_message('Inside PA_TASK_APPROVAL_PKG.Check_UsedTask_Status',3);

206: and not exists (select 1 from pa_tasks where task_id = pra.task_id and project_id = pra.project_id);
207:
208: l_unapproved_task_cnt NUMBER;
209: BEGIN
210: log_message('Inside PA_TASK_APPROVAL_PKG.Check_UsedTask_Status',3);
211: p_return_status := 'S';
212: OPEN C1;
213: FETCH C1 INTO l_unapproved_task_cnt;
214: CLOSE C1;

Line 229: log_message('Inside PA_TASK_APPROVAL_PKG.Mark_CO_Status',3);

225: ,p_msg_count OUT NOCOPY NUMBER
226: ,p_msg_data OUT NOCOPY VARCHAR2
227: ,p_return_status OUT NOCOPY VARCHAR2) IS
228: BEGIN
229: log_message('Inside PA_TASK_APPROVAL_PKG.Mark_CO_Status',3);
230: p_return_status := 'S';
231: UPDATE pa_control_items SET status_code = 'CI_SUBMITTED' WHERE ci_id = p_ci_id;
232: EXCEPTION
233: WHEN OTHERS THEN

Line 234: log_message('Inside WHEBN OTHERS exception of PA_TASK_APPROVAL_PKG.Mark_CO_Status',3);

230: p_return_status := 'S';
231: UPDATE pa_control_items SET status_code = 'CI_SUBMITTED' WHERE ci_id = p_ci_id;
232: EXCEPTION
233: WHEN OTHERS THEN
234: log_message('Inside WHEBN OTHERS exception of PA_TASK_APPROVAL_PKG.Mark_CO_Status',3);
235: p_return_status := 'E';
236: p_msg_data := SQLERRM;
237: END;
238:

Line 239: END PA_TASK_APPROVAL_PKG;

235: p_return_status := 'E';
236: p_msg_data := SQLERRM;
237: END;
238:
239: END PA_TASK_APPROVAL_PKG;