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.4 2006/05/03 04:20:33 sunkalya noship $ */
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 94: CURSOR C IS SELECT rowid FROM PA_TASKS

90: x_revenue_accrual_method varchar2 default null,
91: x_invoice_method varchar2 default null,
92: x_gen_etc_src_code VARCHAR2 default NULL
93: ) IS
94: CURSOR C IS SELECT rowid FROM PA_TASKS
95: WHERE task_id = X_Task_Id;
96: CURSOR C2 IS SELECT pa_tasks_s.nextval FROM sys.dual;
97:
98: -- 4537865

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

92: x_gen_etc_src_code VARCHAR2 default NULL
93: ) IS
94: CURSOR C IS SELECT rowid FROM PA_TASKS
95: WHERE task_id = X_Task_Id;
96: CURSOR C2 IS SELECT pa_tasks_s.nextval FROM sys.dual;
97:
98: -- 4537865
99: l_incoming_taskid pa_tasks.task_id%type ;
100: BEGIN

Line 99: l_incoming_taskid pa_tasks.task_id%type ;

95: WHERE task_id = X_Task_Id;
96: CURSOR C2 IS SELECT pa_tasks_s.nextval FROM sys.dual;
97:
98: -- 4537865
99: l_incoming_taskid pa_tasks.task_id%type ;
100: BEGIN
101: l_incoming_taskid := x_task_id ;
102:
103: if (X_Task_Id is NULL) then

Line 109: INSERT INTO PA_TASKS(

105: FETCH C2 INTO X_Task_Id;
106: CLOSE C2;
107: end if;
108:
109: INSERT INTO PA_TASKS(
110: task_id,
111: project_id,
112: task_number,
113: creation_date,

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

283: X_Rowid := NULL ;
284: X_Task_Id := l_incoming_taskid ;
285:
286: -- Populate error stack and RAISE
287: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_PKG',
288: p_procedure_name => 'Insert_Row',
289: p_error_text => SUBSTRB(SQLERRM,1,240));
290: RAISE;
291: END Insert_Row;

Line 376: FROM PA_TASKS

372: x_cint_stop_date DATE
373: ) IS
374: CURSOR C IS
375: SELECT *
376: FROM PA_TASKS
377: WHERE rowid = X_Rowid
378: FOR UPDATE of Task_Id NOWAIT;
379: Recinfo C%ROWTYPE;
380:

Line 712: UPDATE PA_TASKS

708: x_cint_stop_date DATE,
709: x_gen_etc_src_code VARCHAR2
710: ) IS
711: BEGIN
712: UPDATE PA_TASKS
713: SET
714: task_id = X_Task_Id,
715: project_id = X_Project_Id,
716: task_number = SUBSTRB( X_Task_Number, 1, 25 ), -- 4537865 : Replaced SUBSTR with SUBSTRB

Line 801: DELETE FROM PA_TASKS

797: END Update_Row;
798:
799: PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
800: BEGIN
801: DELETE FROM PA_TASKS
802: WHERE rowid = X_Rowid;
803:
804: if (SQL%NOTFOUND) then
805: Raise NO_DATA_FOUND;

Line 830: from pa_tasks t1

826: x_return_status := 0;
827: begin
828: select task_id
829: into x_dummy
830: from pa_tasks t1
831: where not exists
832: (select *
833: from pa_tasks t2
834: where t1.task_id = t2.parent_task_id)

Line 833: from pa_tasks t2

829: into x_dummy
830: from pa_tasks t1
831: where not exists
832: (select *
833: from pa_tasks t2
834: where t1.task_id = t2.parent_task_id)
835: and t1.task_id = x_task_id;
836:
837: x_return_status := 0;

Line 848: END PA_TASKS_PKG;

844: end;
845:
846: end verify_lowest_level_task;
847:
848: END PA_TASKS_PKG;