eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_RBS_ASGMT_PVT dependencies on FND_API

Line 92: x_return_status := FND_API.G_RET_STS_SUCCESS;

88: l_msg_code Number;
89: l_sys_program_flag Varchar2(1);
90: BEGIN
91: x_msg_count := 0;
92: x_return_status := FND_API.G_RET_STS_SUCCESS;
93:
94: -- Check to see if the flag parameters have been defaulted or passed
95: -- in as Y or N.
96: l_prog_flag := nvl(p_prog_rep_usage_flag, 'N');

Line 112: x_return_status := FND_API.G_RET_STS_ERROR;

108: FROM pa_rbs_headers_b
109: WHERE rbs_header_id = p_rbs_header_id;
110: EXCEPTION
111: WHEN NO_DATA_FOUND THEN
112: x_return_status := FND_API.G_RET_STS_ERROR;
113: x_msg_count := x_msg_count + 1;
114: --Need to get a message for this.
115: x_error_msg_data := 'PA_INVALID_HEADER_ID';
116: PA_UTILS.Add_Message ('PA', x_error_msg_data);

Line 119: x_return_status := FND_API.G_RET_STS_ERROR;

115: x_error_msg_data := 'PA_INVALID_HEADER_ID';
116: PA_UTILS.Add_Message ('PA', x_error_msg_data);
117: Return;
118: WHEN OTHERS THEN
119: x_return_status := FND_API.G_RET_STS_ERROR;
120: x_msg_count := x_msg_count + 1;
121: x_error_msg_data := 'PA_INVALID_HEADER_ID';
122: PA_UTILS.Add_Message ('PA', x_error_msg_data);
123: Return;

Line 155: x_return_status := FND_API.G_RET_STS_ERROR;

151: END IF;
152:
153: EXCEPTION
154: WHEN NO_DATA_FOUND THEN
155: x_return_status := FND_API.G_RET_STS_ERROR;
156: x_msg_count := x_msg_count + 1;
157: --Need to get a message for this.
158: x_error_msg_data := 'PA_VER_NOT_CORR_HEADER';
159: PA_UTILS.Add_Message ('PA', x_error_msg_data);

Line 162: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

158: x_error_msg_data := 'PA_VER_NOT_CORR_HEADER';
159: PA_UTILS.Add_Message ('PA', x_error_msg_data);
160: RETURN;
161: WHEN OTHERS THEN
162: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
163: x_msg_count := x_msg_count + 1;
164: RETURN;
165: END;
166: END IF;

Line 182: x_return_status := FND_API.G_RET_STS_ERROR;

178: FROM pa_projects_all
179: WHERE project_id = p_project_id;
180:
181: IF p_prog_rep_usage_flag = 'Y' AND l_sys_program_flag = 'N' THEN
182: x_return_status := FND_API.G_RET_STS_ERROR;
183: x_msg_count := x_msg_count + 1;
184: --Need to get a message for this.
185: x_error_msg_data := 'PA_RBS_NOT_A_PROGRAM';
186: PA_UTILS.Add_Message ('PA', x_error_msg_data);

Line 199: x_return_status := FND_API.G_RET_STS_ERROR;

195: * of 'Y'. If yes then throw an error message and Return.
196: ****************************************************/
197: IF p_primary_rep_flag = 'Y' THEN
198: IF Check_Primary_rep_flag(p_project_id,p_rbs_header_id) = 'Y' THEN
199: x_return_status := FND_API.G_RET_STS_ERROR;
200: x_msg_count := x_msg_count + 1;
201: --Need to get a message for this.
202: x_error_msg_data := 'PA_EXISTS_PRIM_REP';
203: PA_UTILS.Add_Message ('PA', x_error_msg_data);

Line 309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

305: AND rbs_header_id = p_rbs_header_id
306: AND rbs_version_id = l_rbs_version_id; -- changed 7376494 to pass on value of max frozen RBS version id
307: EXCEPTION
308: WHEN OTHERS THEN
309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
310: x_msg_count := x_msg_count + 1;
311: RETURN;
312: END;
313:

Line 328: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

324: p_primary_rep_flag => p_primary_rep_flag,
325: p_record_version_number => l_record_version_number,
326: x_return_status => l_return_status );
327:
328: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
330: x_msg_count := x_msg_count + 1;
331: RETURN;
332: END IF;

Line 329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

325: p_record_version_number => l_record_version_number,
326: x_return_status => l_return_status );
327:
328: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
330: x_msg_count := x_msg_count + 1;
331: RETURN;
332: END IF;
333: ELSE

Line 370: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

366: p_prog_rep_usage_flag => l_prog_flag,
367: p_primary_rep_flag => l_primary_assignment,
368: x_return_status => l_return_status);
369:
370: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
372: x_msg_count := x_msg_count + 1;
373: RETURN;
374: END IF;

Line 371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

367: p_primary_rep_flag => l_primary_assignment,
368: x_return_status => l_return_status);
369:
370: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
372: x_msg_count := x_msg_count + 1;
373: RETURN;
374: END IF;
375: BEGIN

Line 451: x_return_status := FND_API.G_RET_STS_SUCCESS;

447: l_rbs_version_id Number;
448: l_msg_code Varchar2(30);
449: BEGIN
450: x_msg_count := 0;
451: x_return_status := FND_API.G_RET_STS_SUCCESS;
452: /*************************************************
453: * Derive the Project_id and RBS_header_id based on
454: * the rbs_prj_assignment_id from the
455: * pa_rbs_prj_assignments table. These values will then

Line 465: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

461: FROM pa_rbs_prj_assignments
462: WHERE rbs_prj_assignment_id = p_rbs_prj_assignment_id;
463: EXCEPTION
464: WHEN OTHERS THEN
465: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
466: x_msg_count := x_msg_count + 1;
467: RETURN;
468: END;
469: IF p_set_as_primary = 'Y' THEN

Line 486: x_return_status := FND_API.G_RET_STS_ERROR;

482: * of 'Y'. If yes then throw an error message and Return.
483: ****************************************************/
484: IF p_primary_rep_flag = 'Y' THEN
485: IF Check_Primary_rep_flag(l_project_id,l_rbs_header_id) = 'Y' THEN
486: x_return_status := FND_API.G_RET_STS_ERROR;
487: x_msg_count := x_msg_count + 1;
488: --Need to get a message for this.
489: x_error_msg_data := 'PA_EXISTS_PRIM_REP';
490: PA_UTILS.Add_Message ('PA', x_error_msg_data);

Line 509: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

505: p_primary_rep_flag => p_primary_rep_flag,
506: p_record_version_number => p_record_version_number,
507: x_return_status => l_return_status );
508:
509: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
510: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
511: x_msg_count := x_msg_count + 1;
512: RETURN;
513: END IF;

Line 510: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

506: p_record_version_number => p_record_version_number,
507: x_return_status => l_return_status );
508:
509: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
510: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
511: x_msg_count := x_msg_count + 1;
512: RETURN;
513: END IF;
514: IF p_prog_rep_usage_flag = 'Y' THEN

Line 565: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

561: FROM pa_rbs_prj_assignments
562: WHERE RBS_PRJ_ASSIGNMENT_ID = p_rbs_prj_assignment_id;
563: EXCEPTION
564: WHEN OTHERS THEN
565: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
566: x_msg_count := x_msg_count + 1;
567: RETURN;
568: END;
569: /**************************************************

Line 577: x_return_status := FND_API.G_RET_STS_ERROR;

573: * So we are only allowing removal of records for 'Reporting'.
574: * **************************************************/
575: IF (l_wp_usage_flag = 'Y' OR l_fp_usage_flag = 'Y')
576: THEN
577: x_return_status := FND_API.G_RET_STS_ERROR;
578: x_msg_count := x_msg_count + 1;
579: --Need to get a message for this.
580: --If RBS used for WP FP it cannot be deleted.
581: x_error_msg_data := 'PA_RBS_USED_WP_FP_PR';

Line 589: x_return_status := FND_API.G_RET_STS_ERROR;

585: l_chk_prog := PJI_UTILS.CHECK_PROGRAM_RBS(
586: p_project_id => l_project_id,
587: p_rbs_version_id => l_rbs_version_id);
588: IF l_chk_prog = -1 THEN
589: x_return_status := FND_API.G_RET_STS_ERROR;
590: x_msg_count := x_msg_count + 1;
591: --Need to get a message for this.
592: --If RBS used for Prog Rep it cannot be deleted.
593: x_error_msg_data := 'PA_RBS_USED_PROG_REP';

Line 603: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

599: PA_RBS_ASGMT_PKG.Delete_Row(
600: p_rbs_prj_assignment_id => p_rbs_prj_assignment_id,
601: x_return_status => x_return_status);
602:
603: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
605: x_msg_count := x_msg_count + 1;
606: RETURN;
607: END IF;

Line 604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

600: p_rbs_prj_assignment_id => p_rbs_prj_assignment_id,
601: x_return_status => x_return_status);
602:
603: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
605: x_msg_count := x_msg_count + 1;
606: RETURN;
607: END IF;
608:

Line 616: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

612: , p_project_id => l_project_id
613: , x_return_status => x_return_status
614: , x_msg_code => x_error_msg_data);
615:
616: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
617: x_msg_count := x_msg_count + 1;
618: RETURN;
619: END IF;
620:

Line 644: x_return_status := Fnd_Api.G_Ret_Sts_Success;

640: l_rbs_prj_assignment_id Number;
641: l_record_version_number Number;
642: l_return_status Varchar2(30);
643: BEGIN
644: x_return_status := Fnd_Api.G_Ret_Sts_Success;
645: /***********************************************************
646: * This check is done to determine that the mandatory values
647: * ie p_rbs_header_id is passed in and there is atleast 1
648: * project ID passed in.

Line 651: x_return_status := Fnd_Api.G_Ret_Sts_Unexp_Error;

647: * ie p_rbs_header_id is passed in and there is atleast 1
648: * project ID passed in.
649: **********************************************************/
650: IF (p_project_id_tbl.count = 0) OR (p_rbs_header_id IS NULL) THEN
651: x_return_status := Fnd_Api.G_Ret_Sts_Unexp_Error;
652: RETURN;
653: END IF;
654: /*******************************************************
655: * If no value is passed for the p_rbs_version_id parameter

Line 677: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

673: AND rbs_header_id = p_rbs_header_id
674: AND status_code = 'FROZEN';
675: EXCEPTION
676: WHEN OTHERS THEN
677: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
678: RETURN;
679: END;
680: END IF;
681: /******************************************************

Line 737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

733: AND rbs_header_id = p_rbs_header_id
734: AND rbs_version_id = l_rbs_version_id;
735: EXCEPTION
736: WHEN OTHERS THEN
737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
738: RETURN;
739: END;
740:
741: /************************************************

Line 762: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

758: AND NVL(record_version_number, 0) =
759: NVL(l_record_version_number, 0);
760: EXCEPTION
761: WHEN OTHERS THEN
762: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
763: RETURN;
764: END;
765: ELSE
766: /**************************************

Line 785: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

781: p_prog_rep_usage_flag => 'Y',
782: p_primary_rep_flag => 'N',
783: x_return_status => l_return_status );
784:
785: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
787: RETURN;
788: END IF;
789:

Line 786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

782: p_primary_rep_flag => 'N',
783: x_return_status => l_return_status );
784:
785: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
787: RETURN;
788: END IF;
789:
790: END IF;

Line 810: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

806: x_return_status OUT NOCOPY Varchar2)
807: IS
808: l_rbs_header_id Number;
809: BEGIN
810: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
811: BEGIN
812: SELECT rbs_header_id
813: INTO l_rbs_header_id
814: FROM pa_rbs_versions_b

Line 818: X_Return_Status := Fnd_Api.G_Ret_Sts_UNEXP_ERROR;

814: FROM pa_rbs_versions_b
815: WHERE rbs_version_id = p_rbs_new_version_id;
816: EXCEPTION
817: WHEN OTHERS THEN
818: X_Return_Status := Fnd_Api.G_Ret_Sts_UNEXP_ERROR;
819: Return;
820: END;
821:
822: FORALL i IN p_project_id_tbl.FIRST.. p_project_id_tbl.LAST

Line 830: X_Return_Status := Fnd_Api.G_Ret_Sts_UNEXP_ERROR;

826: AND rbs_header_id = l_rbs_header_id
827: AND assignment_status = 'ACTIVE' ;
828: EXCEPTION
829: WHEN OTHERS THEN
830: X_Return_Status := Fnd_Api.G_Ret_Sts_UNEXP_ERROR;
831: Return;
832: END Assign_New_Version;
833:
834: /*****************************************************

Line 858: x_return_status := Fnd_Api.G_Ret_Sts_SUCCESS;

854: l_return_status VARCHAR2(30);
855: l_msg_code Number;
856: /* Added For Bug 9737483 */
857: BEGIN
858: x_return_status := Fnd_Api.G_Ret_Sts_SUCCESS;
859: IF p_rbs_src_project_id IS NULL OR p_rbs_dest_project_id IS NULL THEN
860: X_Return_Status := Fnd_Api.G_Ret_Sts_UNEXP_ERROR;
861: Return;
862: END IF;

Line 860: X_Return_Status := Fnd_Api.G_Ret_Sts_UNEXP_ERROR;

856: /* Added For Bug 9737483 */
857: BEGIN
858: x_return_status := Fnd_Api.G_Ret_Sts_SUCCESS;
859: IF p_rbs_src_project_id IS NULL OR p_rbs_dest_project_id IS NULL THEN
860: X_Return_Status := Fnd_Api.G_Ret_Sts_UNEXP_ERROR;
861: Return;
862: END IF;
863:
864: BEGIN

Line 926: X_Return_Status := Fnd_Api.G_Ret_Sts_UNEXP_ERROR;

922: /* Added for Bug 9737483 */
923:
924: EXCEPTION
925: WHEN OTHERS THEN
926: X_Return_Status := Fnd_Api.G_Ret_Sts_UNEXP_ERROR;
927: Return;
928: END;
929:
930: EXCEPTION

Line 932: X_Return_Status := Fnd_Api.G_Ret_Sts_UNEXP_ERROR;

928: END;
929:
930: EXCEPTION
931: WHEN OTHERS THEN
932: X_Return_Status := Fnd_Api.G_Ret_Sts_UNEXP_ERROR;
933: Return;
934: END Copy_Project_Assignment;
935:
936: END PA_RBS_ASGMT_PVT;