DBA Data[Home] [Help]

APPS.PA_PRJ_PROGRESS_REPORTS_PKG dependencies on FND_API

Line 565: x_return_status := FND_API.G_RET_STS_SUCCESS;

561: l_row_id varchar2(40);
562: CURSOR C IS SELECT rowid FROM PA_PROJ_PROGRESS_REPORTS
563: WHERE progress_report_id = l_progress_report_id;
564: BEGIN
565: x_return_status := FND_API.G_RET_STS_SUCCESS;
566:
567: --Fetch the next sequence number for progres report
568: SELECT PA_PROJ_PROGRESS_REPORTS_S.NEXTVAL
569: INTO l_progress_report_id

Line 630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

626: end if;
627: CLOSE C;
628: EXCEPTION
629: WHEN OTHERS THEN
630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
631: RAISE;
632:
633: END Insert_Row;
634:

Line 673: x_return_status := FND_API.G_RET_STS_SUCCESS;

669: l_row_id varchar2(60);
670: l_progress_report_id number := null;
671:
672: BEGIN
673: x_return_status := FND_API.G_RET_STS_SUCCESS;
674:
675: UPDATE PA_PROJ_PROGRESS_REPORTS
676: SET RECORD_VERSION_NUMBER = P_RECORD_VERSION_NUMBER + 1
677: ,PROJECT_ID = P_PROJECT_ID

Line 704: --PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

700: WHERE PROGRESS_REPORT_ID = P_PROGRESS_REPORT_ID
701: AND NVL(P_RECORD_VERSION_NUMBER,RECORD_VERSION_NUMBER) = RECORD_VERSION_NUMBER;
702: IF (SQL%NOTFOUND) THEN
703: PA_UTILS.Add_Message ( p_app_short_name => 'PA',p_msg_name => 'PA_XC_RECORD_CHANGED');
704: --PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
705: x_return_status := FND_API.G_RET_STS_ERROR;
706: x_msg_data := 'PA_XC_RECORD_CHANGED';
707: return;
708: END IF;

Line 705: x_return_status := FND_API.G_RET_STS_ERROR;

701: AND NVL(P_RECORD_VERSION_NUMBER,RECORD_VERSION_NUMBER) = RECORD_VERSION_NUMBER;
702: IF (SQL%NOTFOUND) THEN
703: PA_UTILS.Add_Message ( p_app_short_name => 'PA',p_msg_name => 'PA_XC_RECORD_CHANGED');
704: --PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
705: x_return_status := FND_API.G_RET_STS_ERROR;
706: x_msg_data := 'PA_XC_RECORD_CHANGED';
707: return;
708: END IF;
709: /**

Line 746: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

742: **/
743: --
744: EXCEPTION
745: WHEN OTHERS THEN -- catch the exceptins here
746: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
747: RAISE;
748: END Update_row;
749:
750:

Line 758: x_return_status := FND_API.G_RET_STS_SUCCESS;

754: ,x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
755: )
756: is
757: BEGIN
758: x_return_status := FND_API.G_RET_STS_SUCCESS;
759: DELETE FROM PA_PROJ_PROGRESS_REPORTS
760: WHERE progress_report_id = p_progress_report_id;
761: IF (SQL%NOTFOUND) THEN
762: PA_UTILS.Add_Message ( p_app_short_name => 'PA', p_msg_name => 'PA_XC_RECORD_CHANGED');

Line 763: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;

759: DELETE FROM PA_PROJ_PROGRESS_REPORTS
760: WHERE progress_report_id = p_progress_report_id;
761: IF (SQL%NOTFOUND) THEN
762: PA_UTILS.Add_Message ( p_app_short_name => 'PA', p_msg_name => 'PA_XC_RECORD_CHANGED');
763: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
764: END IF;
765:
766: EXCEPTION
767: WHEN OTHERS THEN

Line 768: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

764: END IF;
765:
766: EXCEPTION
767: WHEN OTHERS THEN
768: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
769: RAISE;
770: END Delete_Row;
771:
772: PROCEDURE Copy_lastpublished_report(