DBA Data[Home] [Help]

APPS.PA_BUDGET_LINES_V_PKG dependencies on PA_BUDGET_LINES

Line 1: package body PA_BUDGET_LINES_V_PKG as

1: package body PA_BUDGET_LINES_V_PKG as
2: -- $Header: PAXBUBLB.pls 120.3 2005/09/23 12:17:59 rnamburi noship $
3:
4:
5: --Name: Insert_Row

Line 109: CURSOR C IS SELECT rowid FROM pa_budget_lines

105: )
106:
107: IS
108:
109: CURSOR C IS SELECT rowid FROM pa_budget_lines
110: WHERE resource_assignment_id = X_Resource_Assignment_Id
111: AND start_date = X_Start_Date;
112:
113: cursor get_budget_type_code is

Line 126: l_projfunc_currency_code pa_budget_lines.projfunc_currency_code%TYPE := NULL;

122:
123: l_rows_inserted NUMBER := 0;
124:
125:
126: l_projfunc_currency_code pa_budget_lines.projfunc_currency_code%TYPE := NULL;
127: l_project_currency_code pa_budget_lines.project_currency_code%TYPE := NULL;
128: l_txn_currency_code pa_budget_lines.txn_currency_code%TYPE := NULL;
129:
130: l_Return_Status VARCHAR2(1) :=NULL;

Line 127: l_project_currency_code pa_budget_lines.project_currency_code%TYPE := NULL;

123: l_rows_inserted NUMBER := 0;
124:
125:
126: l_projfunc_currency_code pa_budget_lines.projfunc_currency_code%TYPE := NULL;
127: l_project_currency_code pa_budget_lines.project_currency_code%TYPE := NULL;
128: l_txn_currency_code pa_budget_lines.txn_currency_code%TYPE := NULL;
129:
130: l_Return_Status VARCHAR2(1) :=NULL;
131: l_Msg_Data VARCHAR2(2000) :=NULL;

Line 128: l_txn_currency_code pa_budget_lines.txn_currency_code%TYPE := NULL;

124:
125:
126: l_projfunc_currency_code pa_budget_lines.projfunc_currency_code%TYPE := NULL;
127: l_project_currency_code pa_budget_lines.project_currency_code%TYPE := NULL;
128: l_txn_currency_code pa_budget_lines.txn_currency_code%TYPE := NULL;
129:
130: l_Return_Status VARCHAR2(1) :=NULL;
131: l_Msg_Data VARCHAR2(2000) :=NULL;
132: l_Msg_Count NUMBER := 0;

Line 134: l_budget_line_id pa_budget_lines.budget_line_id%TYPE;

130: l_Return_Status VARCHAR2(1) :=NULL;
131: l_Msg_Data VARCHAR2(2000) :=NULL;
132: l_Msg_Count NUMBER := 0;
133:
134: l_budget_line_id pa_budget_lines.budget_line_id%TYPE;
135:
136: nc_Rowid VARCHAR2(30);
137: nc_Resource_Assignment_Id NUMBER;
138: nc_Quantity NUMBER;

Line 325: SELECT pa_budget_lines_s.nextval

321: THEN
322: RAISE FND_API.G_EXC_ERROR;
323: END IF;
324:
325: SELECT pa_budget_lines_s.nextval
326: INTO l_budget_line_id
327: FROM DUAL;
328:
329: INSERT INTO pa_budget_lines(

Line 329: INSERT INTO pa_budget_lines(

325: SELECT pa_budget_lines_s.nextval
326: INTO l_budget_line_id
327: FROM DUAL;
328:
329: INSERT INTO pa_budget_lines(
330: budget_line_id, /* FPB2 */
331: budget_version_id, /* FPB2 */
332: resource_assignment_id,
333: start_date,

Line 504: ( p_pkg_name => 'PA_BUDGET_LINES_V_PKG'

500: EXCEPTION
501: WHEN FND_API.G_EXC_ERROR
502: THEN
503: FND_MSG_PUB.Add_Exc_Msg
504: ( p_pkg_name => 'PA_BUDGET_LINES_V_PKG'
505: , p_procedure_name => 'INSERT_ROW'
506: , p_error_text => l_msg_data || ' ORA-'||LPAD(substr(SQLCODE,2),5,'0')
507: );
508: IF c%ISOPEN THEN /* Bug# 2628072 */

Line 515: ( p_pkg_name => 'PA_BUDGET_LINES_V_PKG'

511: RAISE;
512: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
513: THEN
514: FND_MSG_PUB.Add_Exc_Msg
515: ( p_pkg_name => 'PA_BUDGET_LINES_V_PKG'
516: , p_procedure_name => 'INSERT_ROW'
517: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
518: );
519: IF c%ISOPEN THEN /* Bug# 2628072 */

Line 604: pa_budget_lines l

600: a.resource_list_member_id,
601: a.unit_of_measure,
602: a.track_as_labor_flag
603: FROM pa_resource_assignments a,
604: pa_budget_lines l
605: WHERE l.rowid = X_Rowid
606: AND l.resource_assignment_id = a.resource_assignment_id
607: FOR UPDATE NOWAIT;
608: Recinfo C%ROWTYPE;

Line 833: l_budget_line_id PA_BUDGET_LINES.BUDGET_LINE_ID%TYPE; /* FPB2 */

829: l_Return_Status VARCHAR2(1) :=NULL;
830: l_Msg_Data VARCHAR2(2000) :=NULL;
831: l_Msg_Count NUMBER := 0;
832:
833: l_budget_line_id PA_BUDGET_LINES.BUDGET_LINE_ID%TYPE; /* FPB2 */
834:
835: BEGIN
836: -- Bug Fix: 4569365. Removed MRC code.
837: /* FPB2: MRC */

Line 855: pa_budget_lines_v_pkg.delete_row(x_rowid => x_rowid,

851: last_update_login := fnd_global.login_id;
852:
853: if (x_resource_id <> x_resource_id_old) then
854: -- delete the orignial one, and insert a new one
855: pa_budget_lines_v_pkg.delete_row(x_rowid => x_rowid,
856: x_calling_process => x_calling_process
857: --,
858: -- Bug Fix: 4569365. Removed MRC code.
859: -- x_mrc_flag => x_mrc_flag /* FPB2: for MRC */

Line 862: pa_budget_lines_v_pkg.insert_row(

858: -- Bug Fix: 4569365. Removed MRC code.
859: -- x_mrc_flag => x_mrc_flag /* FPB2: for MRC */
860: );
861:
862: pa_budget_lines_v_pkg.insert_row(
863: X_Rowid => new_rowid,
864: X_Resource_Assignment_Id => res_assignment_id,
865: X_Budget_Version_Id => X_Budget_Version_Id,
866: X_Project_Id => X_Project_Id,

Line 948: UPDATE pa_budget_lines

944: end if;
945:
946:
947:
948: UPDATE pa_budget_lines
949: SET
950: resource_assignment_id = X_Resource_Assignment_Id,
951: start_date = X_Start_Date,
952: last_update_date = X_Last_Update_Date,

Line 1068: ( p_pkg_name => 'PA_BUDGET_LINES_V_PKG'

1064: EXCEPTION
1065: WHEN FND_API.G_EXC_ERROR
1066: THEN
1067: FND_MSG_PUB.Add_Exc_Msg
1068: ( p_pkg_name => 'PA_BUDGET_LINES_V_PKG'
1069: , p_procedure_name => 'UPDATE_ROW'
1070: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
1071: );
1072: RAISE;

Line 1076: ( p_pkg_name => 'PA_BUDGET_LINES_V_PKG'

1072: RAISE;
1073: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
1074: THEN
1075: FND_MSG_PUB.Add_Exc_Msg
1076: ( p_pkg_name => 'PA_BUDGET_LINES_V_PKG'
1077: , p_procedure_name => 'UPDATE_ROW'
1078: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
1079: );
1080: RAISE;

Line 1106: -- l_budget_line_id PA_BUDGET_LINES.BUDGET_LINE_ID%TYPE; /* MRC */

1102: l_Return_Status VARCHAR2(1) :=NULL;
1103: l_Msg_Data VARCHAR2(2000) :=NULL;
1104: l_Msg_Count NUMBER := 0;
1105: -- Bug Fix: 4569365. Removed MRC code.
1106: -- l_budget_line_id PA_BUDGET_LINES.BUDGET_LINE_ID%TYPE; /* MRC */
1107:
1108:
1109: BEGIN
1110: -- Bug Fix: 4569365. Removed MRC code.

Line 1131: pa_budget_lines l

1127: x_quantity,
1128: x_resource_assignment_id,
1129: x_track_as_labor_flag
1130: from pa_resource_assignments a,
1131: pa_budget_lines l
1132: where l.rowid = X_Rowid
1133: and l.resource_assignment_id = a.resource_assignment_id;
1134:
1135: DELETE FROM pa_budget_lines

Line 1135: DELETE FROM pa_budget_lines

1131: pa_budget_lines l
1132: where l.rowid = X_Rowid
1133: and l.resource_assignment_id = a.resource_assignment_id;
1134:
1135: DELETE FROM pa_budget_lines
1136: WHERE rowid = X_Rowid;
1137: -- Bug Fix: 4569365. Removed MRC code.
1138: -- RETURNING budget_line_id INTO l_budget_line_id ; /* FPB2 */
1139:

Line 1153: from pa_budget_lines

1149: delete pa_resource_assignments
1150: where resource_assignment_id = x_resource_assignment_id
1151: and not exists
1152: (select 1
1153: from pa_budget_lines
1154: where resource_assignment_id = x_resource_assignment_id);
1155:
1156: -- Update pa_budget_versions only if the denormalized totals are
1157: -- not being maintained in the form. Example the Copy Actual

Line 1220: Modified the query to be based on pa_budget_lines table to

1216: v_temp varchar2(1);
1217: v_res_assignment_id PA_RESOURCE_ASSIGNMENTS.resource_assignment_id%TYPE; -- Added for bug 3777706
1218: cursor c is
1219: /* commented for bug 3777706 and included modified query.
1220: Modified the query to be based on pa_budget_lines table to
1221: instead of pa_budget_lines_v, as pa_budget_lines_v is based
1222: on pa_budget_lines as well as lookup tables, leading to unnecessary
1223: access of lookup tables which is not required in this case
1224: select a.resource_name

Line 1221: instead of pa_budget_lines_v, as pa_budget_lines_v is based

1217: v_res_assignment_id PA_RESOURCE_ASSIGNMENTS.resource_assignment_id%TYPE; -- Added for bug 3777706
1218: cursor c is
1219: /* commented for bug 3777706 and included modified query.
1220: Modified the query to be based on pa_budget_lines table to
1221: instead of pa_budget_lines_v, as pa_budget_lines_v is based
1222: on pa_budget_lines as well as lookup tables, leading to unnecessary
1223: access of lookup tables which is not required in this case
1224: select a.resource_name
1225: from pa_budget_lines_v a, pa_budget_lines_v b

Line 1222: on pa_budget_lines as well as lookup tables, leading to unnecessary

1218: cursor c is
1219: /* commented for bug 3777706 and included modified query.
1220: Modified the query to be based on pa_budget_lines table to
1221: instead of pa_budget_lines_v, as pa_budget_lines_v is based
1222: on pa_budget_lines as well as lookup tables, leading to unnecessary
1223: access of lookup tables which is not required in this case
1224: select a.resource_name
1225: from pa_budget_lines_v a, pa_budget_lines_v b
1226: where a.budget_version_id = x_budget_version_id

Line 1225: from pa_budget_lines_v a, pa_budget_lines_v b

1221: instead of pa_budget_lines_v, as pa_budget_lines_v is based
1222: on pa_budget_lines as well as lookup tables, leading to unnecessary
1223: access of lookup tables which is not required in this case
1224: select a.resource_name
1225: from pa_budget_lines_v a, pa_budget_lines_v b
1226: where a.budget_version_id = x_budget_version_id
1227: and b.budget_version_id = x_budget_version_id
1228: and a.task_id||null = b.task_id||null
1229: and a.resource_list_member_id = b.resource_list_member_id

Line 1244: PA_BUDGET_LINES I1,

1240: ); */
1241: -- start of modified query bug 3777706
1242: select I1.resource_assignment_id
1243: from
1244: PA_BUDGET_LINES I1,
1245: PA_BUDGET_LINES I2
1246: where
1247: I1.budget_version_id = x_budget_version_id
1248: and I2.budget_version_id = x_budget_version_id

Line 1245: PA_BUDGET_LINES I2

1241: -- start of modified query bug 3777706
1242: select I1.resource_assignment_id
1243: from
1244: PA_BUDGET_LINES I1,
1245: PA_BUDGET_LINES I2
1246: where
1247: I1.budget_version_id = x_budget_version_id
1248: and I2.budget_version_id = x_budget_version_id
1249: and I1.resource_assignment_id = I2.resource_assignment_id

Line 1283: END PA_BUDGET_LINES_V_PKG;

1279: when others then
1280: x_err_code :=sqlcode;
1281: END check_overlapping_dates;
1282:
1283: END PA_BUDGET_LINES_V_PKG;