APPS.PA_TASKS_PKG dependencies on PA_TASKS

Line 1: PACKAGE BODY PA_TASKS_PKG as

1: PACKAGE BODY PA_TASKS_PKG as
2: /* $Header: PAXTASKB.pls 120.9 2011/03/21 10:50:08 pcheruvu ship $ */
3:
4: PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
5: X_Task_Id IN OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895

Line 97: CURSOR C IS SELECT rowid FROM PA_TASKS

93: x_ADJ_ON_STD_INV VARCHAR2 default 'N' /* Added for 12.2 Payroll billing ER 11847616 */
94:
95: ) IS
96:
97: CURSOR C IS SELECT rowid FROM PA_TASKS
98: WHERE task_id = X_Task_Id;
99: CURSOR C2 IS SELECT pa_tasks_s.nextval FROM sys.dual;
100:
101: -- 4537865

Line 99: CURSOR C2 IS SELECT pa_tasks_s.nextval FROM sys.dual;

95: ) IS
96:
97: CURSOR C IS SELECT rowid FROM PA_TASKS
98: WHERE task_id = X_Task_Id;
99: CURSOR C2 IS SELECT pa_tasks_s.nextval FROM sys.dual;
100:
101: -- 4537865
102: l_incoming_taskid pa_tasks.task_id%type ;
103:

Line 102: l_incoming_taskid pa_tasks.task_id%type ;

98: WHERE task_id = X_Task_Id;
99: CURSOR C2 IS SELECT pa_tasks_s.nextval FROM sys.dual;
100:
101: -- 4537865
102: l_incoming_taskid pa_tasks.task_id%type ;
103:
104: BEGIN
105: l_incoming_taskid := x_task_id ;
106:

Line 113: INSERT INTO PA_TASKS(

109: FETCH C2 INTO X_Task_Id;
110: CLOSE C2;
111: end if;
112:
113: INSERT INTO PA_TASKS(
114: task_id,
115: project_id,
116: task_number,
117: creation_date,

Line 294: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_PKG',

290: X_Rowid := NULL ;
291: X_Task_Id := l_incoming_taskid ;
292:
293: -- Populate error stack and RAISE
294: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_PKG',
295: p_procedure_name => 'Insert_Row',
296: p_error_text => SUBSTRB(SQLERRM,1,240));
297: RAISE;
298: END Insert_Row;

Line 384: FROM PA_TASKS

380:
381: ) IS
382: CURSOR C IS
383: SELECT *
384: FROM PA_TASKS
385: WHERE rowid = X_Rowid
386: FOR UPDATE of Task_Id NOWAIT;
387: Recinfo C%ROWTYPE;
388:

Line 727: UPDATE PA_TASKS

723:
724: BEGIN
725:
726:
727: UPDATE PA_TASKS
728: SET
729: task_id = X_Task_Id,
730: project_id = X_Project_Id,
731: task_number = SUBSTRB( X_Task_Number, 1, 25 ), -- 4537865 : Replaced SUBSTR with SUBSTRB

Line 818: DELETE FROM PA_TASKS

814: END Update_Row;
815:
816: PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
817: BEGIN
818: DELETE FROM PA_TASKS
819: WHERE rowid = X_Rowid;
820:
821: if (SQL%NOTFOUND) then
822: Raise NO_DATA_FOUND;

Line 847: from pa_tasks t1

843: x_return_status := 0;
844: begin
845: select task_id
846: into x_dummy
847: from pa_tasks t1
848: where not exists
849: (select *
850: from pa_tasks t2
851: where t1.task_id = t2.parent_task_id)

Line 850: from pa_tasks t2

846: into x_dummy
847: from pa_tasks t1
848: where not exists
849: (select *
850: from pa_tasks t2
851: where t1.task_id = t2.parent_task_id)
852: and t1.task_id = x_task_id;
853:
854: x_return_status := 0;

Line 865: END PA_TASKS_PKG;

861: end;
862:
863: end verify_lowest_level_task;
864:
865: END PA_TASKS_PKG;
866: