APPS.PA_PROJECTS_PKG dependencies on PA_PROJECTS

Line 1: PACKAGE BODY PA_PROJECTS_PKG as

1: PACKAGE BODY PA_PROJECTS_PKG as
2: /* $Header: PAXPROJB.pls 120.7 2011/03/18 12:14:56 pcheruvu ship $ */
3:
4: PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2, -- 4537865
5: X_Project_Id IN OUT NOCOPY NUMBER, -- 4537865

Line 197: CURSOR C IS SELECT rowid FROM pa_projects

193: x_adj_on_std_inv VARCHAR2 default 'N'
194: /* Added for 12.2 Payroll billing ER 11847616 */
195: ) IS
196:
197: CURSOR C IS SELECT rowid FROM pa_projects
198: WHERE project_id = X_Project_Id;
199: CURSOR C2 IS SELECT pa_projects_s.nextval FROM sys.dual;
200:
201: l_return_status VARCHAR2(1);

Line 199: CURSOR C2 IS SELECT pa_projects_s.nextval FROM sys.dual;

195: ) IS
196:
197: CURSOR C IS SELECT rowid FROM pa_projects
198: WHERE project_id = X_Project_Id;
199: CURSOR C2 IS SELECT pa_projects_s.nextval FROM sys.dual;
200:
201: l_return_status VARCHAR2(1);
202: BEGIN
203: if (X_Project_Id is NULL) then

Line 209: INSERT INTO pa_projects(

205: FETCH C2 INTO X_Project_Id;
206: CLOSE C2;
207: end if;
208:
209: INSERT INTO pa_projects(
210: project_id,
211: org_id, --R12: Bug 4363092
212: name,
213: long_name,

Line 606: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_PKG'

602: EXCEPTION -- 4537865 Included Exception Block
603: WHEN OTHERS THEN
604: X_Rowid := NULL ;
605: X_Project_Id := NULL;
606: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_PKG'
607: ,p_procedure_name => 'Insert_Row'
608: ,p_error_text => SUBSTRB(SQLERRM,1,240));
609: RAISE;
610: END Insert_Row;

Line 797: FROM pa_projects

793: ) IS
794:
795: CURSOR C IS
796: SELECT *
797: FROM pa_projects
798: WHERE rowid = X_Rowid
799: FOR UPDATE of Project_Id NOWAIT;
800: Recinfo C%ROWTYPE;
801:

Line 1402: END PA_PROJECTS_PKG;

1398: end if;
1399: END Lock_Row;
1400:
1401:
1402: END PA_PROJECTS_PKG;