DBA Data[Home] [Help]

APPS.PA_PURGE_VALIDATE_COSTING dependencies on FND_MSG_PUB

Line 427: fnd_msg_pub.add;

423: Open IsCostDistributed ;
424: Fetch IsCostDistributed into l_dummy ;
425: If l_dummy is not null then
426: fnd_message.set_name('PA', 'PA_ARPR_NOT_COSTED');
427: fnd_msg_pub.add;
428: l_err_code := 10 ;
429:
430: l_err_stage := 'After open cursor IsCostDistributed' ;
431: l_err_stack := l_err_stack ||

Line 446: fnd_msg_pub.add;

442: Open IsTransImported ;
443: Fetch IsTransImported into l_dummy ;
444: If l_dummy is not null then
445: fnd_message.set_name('PA', 'PA_ARPR_NOT_TR_IMPORTED');
446: fnd_msg_pub.add;
447: l_err_code := 10 ;
448:
449: l_err_stage := 'After open cursor IsTransImported' ;
450: l_err_stack := l_err_stack || ' ->After open cursor IsTransImported' ;

Line 473: fnd_msg_pub.add;

469: Open IsInterfaced(l_User_Source_Name) ;
470: Fetch IsInterfaced into l_dummy ;
471: If l_dummy is not null then
472: fnd_message.set_name('PA', 'PA_ARPR_NOT_INFCED');
473: fnd_msg_pub.add;
474: l_err_code := 10 ;
475:
476: l_err_stage := 'After transfer check' ;
477: l_err_stack := l_err_stack || ' ->After transfer check' ;

Line 493: fnd_msg_pub.add;

489: Open IsMRCInterfaced(l_User_Source_Name) ;
490: Fetch IsMRCInterfaced into l_dummy ;
491: If l_dummy is not null then
492: fnd_message.set_name('PA', 'PA_MRC_ARPR_NOT_INFCED');
493: fnd_msg_pub.add;
494: l_err_code := 10 ;
495: l_err_stage := 'After transfer check' ;
496: l_err_stack := l_err_stack || ' ->After transfer check' ;
497: pa_debug.debug(' * Not all MRC costs are transferred for the project ' || to_char(p_project_id));

Line 518: fnd_msg_pub.add;

514: Open IsResAccumulated ;
515: Fetch IsResAccumulated into l_dummy ;
516: If l_dummy is not null then
517: fnd_message.set_name('PA', 'PA_ARPR_NOT_RES_ACCUM');
518: fnd_msg_pub.add;
519: l_err_code := 10 ;
520:
521: l_err_stage := 'After resource accumulation check ' ;
522: l_err_stack := l_err_stack || ' ->After resource accumulation check ' ;

Line 535: fnd_msg_pub.add;

531: Open IsBurdenDistributed ;
532: Fetch IsBurdenDistributed into l_dummy ;
533: If l_dummy is not null then
534: fnd_message.set_name('PA', 'PA_ARPR_NOT_BRDN_DIST');
535: fnd_msg_pub.add;
536: l_err_code := 10 ;
537:
538: l_err_stage := 'After Burden Cost Dist. check ' ;
539: l_err_stack := l_err_stack || ' ->After Burden Cost Dist. check ' ;

Line 553: fnd_msg_pub.add;

549: Open IsIntercompany;
550: Fetch IsIntercompany into l_dummy;
551: If l_dummy is not null then
552: fnd_message.set_name('PA','PA_ARPR_IC_TRX_EXISTS');
553: fnd_msg_pub.add;
554: l_err_code := 10;
555: l_err_stage := 'After intercompany check ';
556: l_err_stack := l_err_stack|| ' -> After intercompany check';
557: pa_debug.debug(' * Intercompany transactions exists for the project '||to_char(p_project_id));

Line 569: fnd_msg_pub.add;

565: Open IsBorrLentDistributed;
566: Fetch IsBorrLentDistributed into l_dummy;
567: If l_dummy is not null then
568: fnd_message.set_name('PA','PA_ARPR_NOT_BL_DIST');
569: fnd_msg_pub.add;
570: l_err_code := 10;
571: l_err_stage := 'After Borrowed and Lent Dist check ';
572: l_err_stack := l_err_stack|| ' -> After Borrwed and Lent Dist Check ';
573: pa_debug.debug(' * Eligible Borrowed and Lent EIs are not BL distributed for project '||to_char(p_project_id));

Line 584: fnd_msg_pub.add;

580: Open IsCCDLInterfaced(l_User_Source_Name) ;
581: Fetch IsCCDLInterfaced into l_dummy ;
582: If l_dummy is not null then
583: fnd_message.set_name('PA', 'PA_ARPR_BL_NOT_IFCD');
584: fnd_msg_pub.add;
585: l_err_code := 10 ;
586: l_err_stage := 'After BL transfer check' ;
587: l_err_stack := l_err_stack || ' ->After BL transfer check' ;
588: pa_debug.debug(' * Not all BL costs are transferred for the project '||to_char(p_project_id));

Line 599: fnd_msg_pub.add;

595: Open IsDestProjectType;
596: Fetch IsDestProjectType into l_dummy;
597: If l_dummy is not null then
598: fnd_message.set_name('PA', 'PA_ARPR_DEST_PRJ_TYPE');
599: fnd_msg_pub.add;
600: l_err_code := 10 ;
601: l_err_stage := 'After destination project in project type check' ;
602: l_err_stack := l_err_stack || ' ->After destination project in project type check' ;
603: pa_debug.debug(' * The project '||to_char(p_project_id)||' is defined as a destination project in project type check ');

Line 624: fnd_msg_pub.add;

620: --IF l_used_in_OTL Commented for Bug 2726711
621: IF NOT l_purgeable
622: THEN
623: fnd_message.set_name('PA', 'PA_ARPR_OTL_NOT_IFCD');
624: fnd_msg_pub.add;
625: l_err_code := 10;
626: l_err_stage := 'After OTL check' ;
627: l_err_stack := l_err_stack || ' ->After OTL check' ;
628: pa_debug.debug(' * OTL records exists for the project '||to_char(p_project_id));

Line 640: fnd_msg_pub.add;

636: x_target => l_target_project,
637: x_offset => l_offset_project);
638: IF l_source_project = 1 THEN
639: fnd_message.set_name('PA', 'PA_ARPR_SOURCE_PROJECT');
640: fnd_msg_pub.add;
641: l_err_code := 10 ;
642:
643: l_err_stage := 'After checking for source project' ;
644: l_err_stack := l_err_stack ||

Line 652: fnd_msg_pub.add;

648: END IF;
649:
650: IF l_target_project = 1 THEN
651: fnd_message.set_name('PA', 'PA_ARPR_TARGET_PROJECT');
652: fnd_msg_pub.add;
653: l_err_code := 10 ;
654:
655: l_err_stage := 'After checking for tartget project' ;
656: l_err_stack := l_err_stack ||

Line 664: fnd_msg_pub.add;

660: END IF;
661:
662: IF l_offset_project = 1 THEN
663: fnd_message.set_name('PA', 'PA_ARPR_OFFSET_PROJECT');
664: fnd_msg_pub.add;
665: l_err_code := 10 ;
666:
667: l_err_stage := 'After checking for offset project' ;
668: l_err_stack := l_err_stack ||

Line 677: fnd_msg_pub.add;

673:
674: /* checking for the project in property manager */
675: IF ( NOT PNP_OTH_PROD.delete_project (p_project_id) ) then
676: fnd_message.set_name('PA', 'PA_ARPR_PROJ_INUSE_PROP_MGR');
677: fnd_msg_pub.add;
678: l_err_code := 10 ;
679:
680: l_err_stage := 'After checking for the project in property manager';
681: l_err_stack := l_err_stack ||

Line 692: fnd_msg_pub.add;

688: /* commneted the code and added the modified code below since the arguments are changed in the
689: call to the procedure IGC_CC_PROJECTS_PKG.delete_project for bug#2272487
690: IF ( NOT IGC_CC_PROJECTS_PKG.delete_project (p_project_id) ) then
691: fnd_message.set_name('PA', 'PA_ARPR_PROJ_INUSE_CNTR_CMTS');
692: fnd_msg_pub.add;
693: l_err_code := 10 ;
694:
695: l_err_stage := 'After checking for the project in contract commitments';
696: l_err_stack := l_err_stack ||

Line 729: fnd_msg_pub.add;

725: DBMS_SQL.CLOSE_CURSOR(V_CursorID);
726:
727: IF ( V_Delete_Allowed = 'N' ) then
728: fnd_message.set_name('PA', 'PA_ARPR_PROJ_INUSE_CNTR_CMTS');
729: fnd_msg_pub.add;
730: l_err_code := 10 ;
731:
732: l_err_stage := 'After checking for the project in contract commitments';
733: l_err_stack := l_err_stack ||

Line 745: fnd_msg_pub.add;

741: Open IsVIPaymentPendg;
742: Fetch IsVIPaymentPendg into l_dummy ;
743: If l_dummy is not null then
744: fnd_message.set_name('PA', 'PA_ARPR_VI_DIS_NOT_PAID');
745: fnd_msg_pub.add;
746: l_err_code := 10 ;
747: l_err_stage := 'After VI discount check' ;
748: l_err_stack := l_err_stack || ' ->After VI discount check' ;
749: pa_debug.debug(' * Supplier invoice eligible for discount not fully paid for project '||to_char(p_project_id));

Line 759: fnd_msg_pub.add;

755: Open ISInterPrjRecvPrj;
756: Fetch ISInterPrjRecvPrj into l_dummy;
757: If l_dummy is not null then
758: fnd_message.set_name('PA','PA_ARPR_IP_RCVR_PROJ');
759: fnd_msg_pub.add;
760: l_err_code := 10 ;
761: l_err_stage := 'After IP receiver project check' ;
762: l_err_stack := l_err_stack || ' ->After IP receiver project check' ;
763: pa_debug.debug(' * This is an inter-project receiver project');

Line 772: fnd_msg_pub.add;

768: Open ISDistLinesIntfed;
769: Fetch ISDistLinesIntfed into l_dummy;
770: If l_dummy is not null then
771: fnd_message.set_name('PA','PA_ARPR_VI_DISC_NOT_IFCD');
772: fnd_msg_pub.add;
773: l_err_code := 10 ;
774: l_err_stage := 'After Vendor invoice discount interface check' ;
775: l_err_stack := l_err_stack || ' ->After Vendor invoice discount interface check' ;
776: pa_debug.debug(' * Supplier invoice discount lines not interfaced');

Line 785: fnd_msg_pub.add;

781: Open ISOrgForecastProject;
782: Fetch ISOrgForecastProject into l_dummy;
783: If l_dummy is not null then
784: fnd_message.set_name('PA','PA_ARPR_ORG_FC_DUM_PRJ');
785: fnd_msg_pub.add;
786: l_err_code := 10 ;
787: l_err_stage := 'After organization forecast project check' ;
788: l_err_stack := l_err_stack || ' ->After organization forecast project check' ;
789: pa_debug.debug(' * This is an organization forecast project');

Line 798: fnd_msg_pub.add;

794: Open IsUnassignedTimeType;
795: Fetch IsUnassignedTimeType into l_dummy;
796: If l_dummy is not null then
797: fnd_message.set_name('PA','PA_ARPR_UNASS_PROJ_TYPE');
798: fnd_msg_pub.add;
799: l_err_code := 10 ;
800: l_err_stage := 'After Unassigned Time project type check' ;
801: l_err_stack := l_err_stack || ' ->After Unassigned Time project type check' ;
802: pa_debug.debug(' * This is an unassigned time project');

Line 836: fnd_msg_pub.add;

832: V_Dummy := DBMS_SQL.EXECUTE(V_CursorID);
833:
834: IF (DBMS_SQL.FETCH_ROWS(V_CursorID) > 0 ) THEN
835: fnd_message.set_name('PA','PA_ARPR_IEXP_TXNS_IMP_PEND');
836: fnd_msg_pub.add;
837: l_err_code := 10 ;
838: l_err_stage := 'After Iexpense transactions transfer check' ;
839: l_err_stack := l_err_stack || ' ->After Iexpense transactions transfer check' ;
840: pa_debug.debug(' * Project related Iexpense transactions are yet to be imported to projects');

Line 851: fnd_msg_pub.add;

847: Open IsIexpenseTxnsPending;
848: Fetch IsIexpenseTxnsPending into l_dummy;
849: If l_dummy is not null then
850: fnd_message.set_name('PA','PA_ARPR_IEXP_TXNS_IMP_PEND');
851: fnd_msg_pub.add;
852: l_err_code := 10 ;
853: l_err_stage := 'After Iexpense transactions transfer check' ;
854: l_err_stack := l_err_stack || ' ->After Iexpense transactions transfer check' ;
855: pa_debug.debug(' * Project related Iexpense transactions are yet to be imported to projects');

Line 864: fnd_msg_pub.add;

860: Open IsERPaymentPendg;
861: Fetch IsERPaymentPendg into l_dummy ;
862: If l_dummy is not null then
863: fnd_message.set_name('PA', 'PA_ARPR_ER_NOT_PAID');
864: fnd_msg_pub.add;
865: l_err_code := 10 ;
866: l_err_stage := 'After ER Payment check' ;
867: l_err_stack := l_err_stack || ' ->After ER Payment check' ;
868: pa_debug.debug(' * Expense reports are yet to be paid for the project '||to_char(p_project_id));