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_TRX_IMPORT dependencies on PA_CC_UTILS

Line 527: pa_cc_utils.set_curr_function('GetTrxSrcInfo');

523: PROCEDURE GetTrxSrcInfo ( X_trx_src IN VARCHAR2 )
524: IS
525: BEGIN
526:
527: pa_cc_utils.set_curr_function('GetTrxSrcInfo');
528:
529: -- Modifying this query to check for transaction_source rather than
530: -- user transaction source
531: -- 697638 Bug fix

Line 581: pa_cc_utils.reset_curr_function;

577: pa_transaction_sources ts
578: WHERE
579: ts.transaction_source = X_trx_src;
580:
581: pa_cc_utils.reset_curr_function;
582: EXCEPTION
583: WHEN NO_DATA_FOUND THEN
584: G_trx_link := NULL;
585: pa_cc_utils.reset_curr_function;

Line 585: pa_cc_utils.reset_curr_function;

581: pa_cc_utils.reset_curr_function;
582: EXCEPTION
583: WHEN NO_DATA_FOUND THEN
584: G_trx_link := NULL;
585: pa_cc_utils.reset_curr_function;
586: END GetTrxSrcInfo;
587:
588: -- Get implementation currency information
589: --

Line 593: pa_cc_utils.set_curr_function('GetImpCurrInfo');

589: --
590: PROCEDURE GetImpCurrInfo
591: IS
592: BEGIN
593: pa_cc_utils.set_curr_function('GetImpCurrInfo');
594: IF PG_DEBUG = 'Y' THEN
595: pa_debug.G_err_Stage := 'call to pa_multi_currency.init';
596: log_message('log_message: ' || pa_debug.G_err_Stage);
597: END IF;

Line 608: pa_cc_utils.reset_curr_function;

604: END IF;
605: G_accounting_currency_code := pa_multi_currency.G_accounting_currency_code;
606: G_default_rate_type := pa_multi_currency.G_rate_type;
607:
608: pa_cc_utils.reset_curr_function;
609: EXCEPTION
610: WHEN NO_DATA_FOUND THEN
611: G_default_rate_type := NULL;
612: G_accounting_currency_code := NULL;

Line 613: pa_cc_utils.reset_curr_function;

609: EXCEPTION
610: WHEN NO_DATA_FOUND THEN
611: G_default_rate_type := NULL;
612: G_accounting_currency_code := NULL;
613: pa_cc_utils.reset_curr_function;
614: END GetImpCurrInfo;
615:
616: --
617: -- Get project/task currency information

Line 628: pa_cc_utils.set_curr_function('GetProjCurrInfo');

624: X_projfunc_cost_rate_type IN OUT NOCOPY VARCHAR2)
625: IS
626: BEGIN
627:
628: pa_cc_utils.set_curr_function('GetProjCurrInfo');
629: IF PG_DEBUG = 'Y' THEN
630: pa_debug.G_err_stage := 'Calling get_project_rate_type';
631: log_message('log_message: ' || pa_debug.G_err_Stage);
632: END IF;

Line 680: pa_cc_utils.reset_curr_function;

676:
677:
678: End If;
679:
680: pa_cc_utils.reset_curr_function;
681:
682: END GetProjCurrInfo;
683:
684: --

Line 699: pa_cc_utils.set_curr_function('DefaultCurrAttributes');

695: IS
696:
697: BEGIN
698:
699: pa_cc_utils.set_curr_function('DefaultCurrAttributes');
700:
701: IF ( X_acct_currency_code = X_project_currency_code) THEN
702:
703: X_acct_rate_type := nvl(X_project_rate_type,X_acct_rate_type);

Line 713: pa_cc_utils.reset_curr_function;

709: X_project_exchange_rate := nvl(X_project_exchange_rate, X_acct_exchange_rate) ;
710:
711:
712: END IF;
713: pa_cc_utils.reset_curr_function;
714:
715: END DefaultCurrAttributes;
716:
717: /* PA-I Changes

Line 729: pa_cc_utils.set_curr_function('GetVendorId');

725: PROCEDURE GetVendorId(P_vendor_number IN VARCHAR2)
726: IS
727: BEGIN
728:
729: pa_cc_utils.set_curr_function('GetVendorId');
730:
731: SELECT vendor_ID INTO G_vendor_id
732: FROM po_vendors
733: WHERE segment1 = p_vendor_number;

Line 735: pa_cc_utils.reset_curr_function;

731: SELECT vendor_ID INTO G_vendor_id
732: FROM po_vendors
733: WHERE segment1 = p_vendor_number;
734:
735: pa_cc_utils.reset_curr_function;
736:
737: EXCEPTION WHEN others THEN
738: G_vendor_id := NULL;
739: pa_cc_utils.reset_curr_function;

Line 739: pa_cc_utils.reset_curr_function;

735: pa_cc_utils.reset_curr_function;
736:
737: EXCEPTION WHEN others THEN
738: G_vendor_id := NULL;
739: pa_cc_utils.reset_curr_function;
740: END GetVendorId;
741:
742: --
743: --BUG : 4696351 PJ.R12:DI4:APLINES: VENDOR INFORMATION NOT IMPORTED DURING TRANSACTION IMPORT

Line 749: pa_cc_utils.set_curr_function('GetVendorId for an employee (person_id):'||p_person_id);

745: PROCEDURE GetVendorID ( p_person_id IN NUMBER )
746: IS
747: BEGIN
748:
749: pa_cc_utils.set_curr_function('GetVendorId for an employee (person_id):'||p_person_id);
750:
751: select vendor_id
752: into g_vendor_id
753: from po_vendors

Line 757: pa_cc_utils.reset_curr_function;

753: from po_vendors
754: where employee_id = p_person_id
755: and vendor_type_lookup_code = 'EMPLOYEE' ;
756:
757: pa_cc_utils.reset_curr_function;
758:
759: EXCEPTION WHEN others THEN
760: G_vendor_id := NULL;
761: pa_cc_utils.reset_curr_function;

Line 761: pa_cc_utils.reset_curr_function;

757: pa_cc_utils.reset_curr_function;
758:
759: EXCEPTION WHEN others THEN
760: G_vendor_id := NULL;
761: pa_cc_utils.reset_curr_function;
762: END GetVendorId ;
763:
764: PROCEDURE GetEtypeInfo( X_etype IN VARCHAR2
765: , X_date IN DATE )

Line 769: pa_cc_utils.set_curr_function('GetEtypeInfo');

765: , X_date IN DATE )
766: IS
767: BEGIN
768:
769: pa_cc_utils.set_curr_function('GetEtypeInfo');
770:
771: If (G_ETypeInfoEtype = X_etype AND trunc(G_ETypeInfoDate) = trunc(X_date)) Then
772:
773: IF PG_DEBUG = 'Y' THEN

Line 815: pa_cc_utils.reset_curr_function;

811: G_ETypeInfoDate := X_date;
812:
813: End If;
814:
815: pa_cc_utils.reset_curr_function;
816:
817: EXCEPTION
818: WHEN NO_DATA_FOUND THEN
819: /* G_etype_link := NULL; */ /* Commented for Bug#2726242 */

Line 828: pa_cc_utils.reset_curr_function;

824:
825: G_ETypeInfoEtype := X_etype;
826: G_ETypeInfoDate := X_date;
827:
828: pa_cc_utils.reset_curr_function;
829:
830: END GetEtypeInfo;
831:
832: PROCEDURE GetEtypeEclassInfo( X_etype IN VARCHAR2

Line 837: pa_cc_utils.set_curr_function('GetEtypeEclassInfo');

833: , X_system_linkage IN VARCHAR2 )
834: IS
835: BEGIN
836:
837: pa_cc_utils.set_curr_function('GetEtypeEclassInfo');
838:
839: If (G_EClassInfoEtype = X_etype AND G_EClassInfoSysLink = X_system_linkage) then
840:
841: IF PG_DEBUG = 'Y' THEN

Line 879: pa_cc_utils.reset_curr_function;

875: G_EClassInfoSysLink := X_system_linkage;
876:
877: End If;
878:
879: pa_cc_utils.reset_curr_function;
880:
881: EXCEPTION
882: WHEN NO_DATA_FOUND THEN
883: G_etype_link := NULL;

Line 890: pa_cc_utils.reset_curr_function;

886: G_etype_active := FALSE ;
887: G_EClassInfoEtype := X_etype;
888: G_EClassInfoSysLink := X_system_linkage;
889:
890: pa_cc_utils.reset_curr_function;
891:
892: END GetEtypeEclassInfo;
893:
894: PROCEDURE GetNlrInfo( X_nlr IN VARCHAR2

Line 899: pa_cc_utils.set_curr_function('GetNlrInfo');

895: , X_nlro_id IN NUMBER )
896: IS
897: BEGIN
898:
899: pa_cc_utils.set_curr_function('GetNlrInfo');
900: IF PG_DEBUG = 'Y' THEN
901: pa_debug.G_err_Stage := 'select from pa_non_labor_resources';
902: log_message('log_message: ' || pa_debug.G_err_Stage);
903: END IF;

Line 974: pa_cc_utils.reset_curr_function;

970: G_NlrInfoNlroId := X_nlro_id;
971: G_NlrInfoNlr := X_nlr;
972: END;
973:
974: pa_cc_utils.reset_curr_function;
975: EXCEPTION
976: WHEN NO_DATA_FOUND THEN
977: G_nlr_start := NULL;
978: G_nlr_end := NULL;

Line 982: pa_cc_utils.reset_curr_function;

978: G_nlr_end := NULL;
979: G_nlr_etype := NULL;
980: G_nlro_start := NULL;
981: G_nlro_end := NULL;
982: pa_cc_utils.reset_curr_function;
983:
984: END GetNlrInfo;
985:
986: PROCEDURE CheckDupItem( X_trx_source IN VARCHAR2

Line 993: pa_cc_utils.set_curr_function('CheckDupItem');

989: IS
990: dummy NUMBER;
991: BEGIN
992:
993: pa_cc_utils.set_curr_function('CheckDupItem');
994: BEGIN
995: SELECT
996: 1
997: INTO

Line 1014: pa_cc_utils.reset_curr_function;

1010: END;
1011:
1012: IF ( dummy = 1 ) THEN
1013: X_status := 'DUPLICATE_ITEM';
1014: pa_cc_utils.reset_curr_function;
1015: RETURN;
1016:
1017: ELSIF ( i > 0 ) THEN
1018:

Line 1022: pa_cc_utils.reset_curr_function;

1018:
1019: FOR j IN 1..i LOOP
1020: IF ( pa_transactions.TrxRefTab(j) = X_trx_ref ) THEN
1021: X_status := 'DUPLICATE_ITEM';
1022: pa_cc_utils.reset_curr_function;
1023: RETURN;
1024: END IF;
1025: END LOOP;
1026:

Line 1031: pa_cc_utils.reset_curr_function;

1027: ELSE
1028: X_status := NULL;
1029:
1030: END IF;
1031: pa_cc_utils.reset_curr_function;
1032:
1033: END CheckDupItem;
1034:
1035: PROCEDURE CheckDupAdjItem( X_adj_item_id IN NUMBER

Line 1040: pa_cc_utils.set_curr_function('CheckDupAdjItem');

1036: , X_status OUT NOCOPY VARCHAR2 )
1037: IS
1038: BEGIN
1039:
1040: pa_cc_utils.set_curr_function('CheckDupAdjItem');
1041: IF ( i > 0 ) THEN
1042:
1043: FOR j IN 1..i LOOP
1044: IF ( pa_transactions.AdjEiTab(j) = X_adj_item_id) THEN

Line 1046: pa_cc_utils.reset_curr_function;

1042:
1043: FOR j IN 1..i LOOP
1044: IF ( pa_transactions.AdjEiTab(j) = X_adj_item_id) THEN
1045: X_status := 'DUPLICATE_ADJUST_ITEM';
1046: pa_cc_utils.reset_curr_function;
1047: RETURN;
1048: END IF;
1049: END LOOP;
1050:

Line 1055: pa_cc_utils.reset_curr_function;

1051: ELSE
1052: X_status := NULL;
1053:
1054: END IF;
1055: pa_cc_utils.reset_curr_function;
1056: END CheckDupAdjItem;
1057:
1058: -- SST Change: changed procedure from getprojbcostflag
1059: -- to getprojtypeinfo because we're not only retrieving

Line 1072: pa_cc_utils.set_curr_function('GetProjTypeInfo');

1068: X_Total_Burden_Flag OUT NOCOPY VARCHAR2)
1069:
1070: IS
1071: BEGIN
1072: pa_cc_utils.set_curr_function('GetProjTypeInfo');
1073:
1074: If (X_Project_id = G_PrjInfoPrjId) Then
1075:
1076: IF PG_DEBUG = 'Y' THEN

Line 1113: pa_cc_utils.reset_curr_function;

1109: G_PrjInfoTotBdFlag := X_Total_Burden_Flag;
1110:
1111: End If;
1112:
1113: pa_cc_utils.reset_curr_function;
1114:
1115: EXCEPTION
1116: WHEN NO_DATA_FOUND THEN
1117: X_Proj_bcost_flag := NULL ;

Line 1127: pa_cc_utils.reset_curr_function;

1123: G_PrjInfoTypeClass := X_proj_type_class;
1124: G_PrjInfoBdDisplay := X_burden_amt_display_method;
1125: G_PrjInfoTotBdFlag := X_Total_Burden_Flag;
1126:
1127: pa_cc_utils.reset_curr_function;
1128: END GetProjTypeInfo ;
1129:
1130: FUNCTION CheckCCID ( ccid number ) RETURN NUMBER
1131: IS

Line 1134: -- pa_cc_utils.set_curr_function('CheckCCID');

1130: FUNCTION CheckCCID ( ccid number ) RETURN NUMBER
1131: IS
1132: X_ccid number(15) ;
1133: BEGIN
1134: -- pa_cc_utils.set_curr_function('CheckCCID');
1135: -- not setting error stack because this procedure
1136: -- will be violating its associated pragma.
1137:
1138: If ccid is null Then

Line 1160: --pa_cc_utils.reset_curr_function;

1156: G_PrevRetVal := 1;
1157:
1158: End If;
1159:
1160: --pa_cc_utils.reset_curr_function;
1161: return(X_ccid) ;
1162: EXCEPTION
1163: WHEN NO_DATA_FOUND THEN
1164: G_PrevRetVal := NULL;

Line 1166: --pa_cc_utils.reset_curr_function;

1162: EXCEPTION
1163: WHEN NO_DATA_FOUND THEN
1164: G_PrevRetVal := NULL;
1165: G_PrevCCID := ccid;
1166: --pa_cc_utils.reset_curr_function;
1167: RETURN (NULL) ;
1168: END CheckCCID ;
1169:
1170: -- =============================================================

Line 1276: pa_cc_utils.set_curr_function('validate_exp_date');

1272: END check_active_employee;
1273:
1274: BEGIN
1275:
1276: pa_cc_utils.set_curr_function('validate_exp_date');
1277:
1278: IF x_err_msg_cd is not NULL THEN
1279: x_status := FND_API.G_RET_STS_ERROR ;
1280: RETURN ;

Line 1380: pa_cc_utils.reset_curr_function;

1376: x_status := FND_API.G_RET_STS_ERROR ;
1377: RETURN ;
1378: End if;
1379:
1380: pa_cc_utils.reset_curr_function;
1381:
1382:
1383: END VALIDATE_EXP_DATE ;
1384:

Line 1719: pa_cc_utils.set_curr_function('ValidateItem');

1715: /** *
1716: *** Validate Items Main processing begins here
1717: **/
1718: BEGIN
1719: pa_cc_utils.set_curr_function('ValidateItem');
1720:
1721: IF PG_DEBUG = 'Y' THEN
1722: pa_debug.G_err_stage := 'Inside ValidateItem';
1723: log_message('log_message: ' || pa_debug.G_err_stage);

Line 1815: pa_cc_utils.reset_curr_function;

1811: pa_debug.G_err_Stage := 'Invalid Trx Source';
1812: log_message('log_message: ' || pa_debug.G_err_Stage);
1813: END IF;
1814: X_status := 'INVALID_TRX_SOURCE';
1815: pa_cc_utils.reset_curr_function;
1816: RETURN;
1817: END IF;
1818:
1819: END IF;

Line 1833: pa_cc_utils.reset_curr_function;

1829: X_employee_number => X_enum,
1830: X_result => v_result,
1831: X_status => X_status);
1832: IF (v_result <> 0) THEN
1833: pa_cc_utils.reset_curr_function;
1834: RETURN;
1835: END IF;
1836: END IF;
1837:

Line 1844: pa_cc_utils.reset_curr_function;

1840: --
1841: IF ( trunc(X_ei_date) NOT BETWEEN trunc(G_trx_start)
1842: AND nvl(trunc(G_trx_end), trunc(X_ei_date))) THEN
1843: X_status := 'TRX_SOURCE_INACTIVE';
1844: pa_cc_utils.reset_curr_function;
1845: RETURN;
1846:
1847: END IF;
1848:

Line 1856: pa_cc_utils.reset_curr_function;

1852: -- employee number and organization name
1853: IF ( X_system_linkage NOT IN ('ST', 'OT','ER', 'VI') ) THEN
1854: if ( X_enum IS NULL AND X_ONAME is NULL ) THEN
1855: X_status := 'EMP_OR_ORG_MAND' ;
1856: pa_cc_utils.reset_curr_function;
1857: RETURN ;
1858: end if ;
1859: END IF ;
1860:

Line 1865: pa_cc_utils.reset_curr_function;

1861: -- REL12 AP Lines uptake.
1862: -- Unaccounted Expense report transactions are not allowed.
1863: IF ( X_system_linkage = 'ER' and NVL(g_gl_accted_flag,'N') = 'N' ) then
1864: X_status := 'PA_ER_NOT_ACCOUNTED' ;
1865: pa_cc_utils.reset_curr_function;
1866: RETURN ;
1867: END IF ;
1868:
1869: -- ===========================================================================

Line 1879: pa_cc_utils.reset_curr_function;

1875: log_message('log_message: ' || pa_debug.G_err_Stage);
1876: END IF;
1877: IF (trunc( X_end_date) <> trunc(pa_utils.NewGetWeekEnding( X_end_date )) ) THEN
1878: X_status := 'INVALID_END_DATE';
1879: pa_cc_utils.reset_curr_function;
1880: RETURN;
1881:
1882: -- ===========================================================================
1883: -- Verify that the transaction item date is on or before the week ending

Line 1888: pa_cc_utils.reset_curr_function;

1884: -- date
1885: --
1886: ELSIF ( trunc(X_ei_date) > trunc(X_end_date) ) THEN /* Bug 4284192 */
1887: X_status := 'EI_DATE_AFTER_END_DATE';
1888: pa_cc_utils.reset_curr_function;
1889: RETURN;
1890: END IF; --PA-K Changes: Added 'EndIf' separating the date checks
1891: --from the person and org checks
1892:

Line 1913: pa_cc_utils.reset_curr_function;

1909: X_po_line_num => p_po_line_num);
1910:
1911: IF ( G_job_id IS NULL ) THEN
1912: X_status := 'NO_ASSIGNMENT';
1913: pa_cc_utils.reset_curr_function;
1914: RETURN;
1915: END IF;
1916:
1917: IF PG_DEBUG = 'Y' THEN

Line 1959: pa_cc_utils.reset_curr_function;

1955:
1956:
1957: IF (G_org_id IS NULL) THEN
1958: X_status := 'PA_EXP_ORG_INVALID';
1959: pa_cc_utils.reset_curr_function;
1960: RETURN;
1961: END IF;
1962:
1963: /* PA-K Changes: Commenting the CheckExporg, moved the check to one place below*/

Line 1988: pa_cc_utils.reset_curr_function;

1984: X_Ei_Date );
1985:
1986: IF ( pa_utils2.G_return_status IS NOT NULL ) THEN
1987: X_status := pa_utils2.G_return_status ;
1988: pa_cc_utils.reset_curr_function;
1989: RETURN;
1990: ELSE
1991: last_empno := X_enum;
1992:

Line 2003: pa_cc_utils.reset_curr_function;

1999:
2000: /*Bug 2655157, Commented this code see below for actual code
2001: IF ( X_oname IS NULL ) THEN
2002: X_status := 'PA_EXP_ORG_MANDATORY';
2003: pa_cc_utils.reset_curr_function;
2004: RETURN;
2005: END IF;
2006:
2007: IF PG_DEBUG = 'Y' THEN

Line 2016: pa_cc_utils.reset_curr_function;

2012: G_org_id := pa_utils.GetOrgId(X_oname);
2013:
2014: IF (G_org_id IS NULL) THEN
2015: X_status := 'PA_EXP_ORG_INVALID';
2016: pa_cc_utils.reset_curr_function;
2017: RETURN;
2018: END IF;
2019: */
2020: -- Bug 2655157 : Below code added for the error being raised in

Line 2032: pa_cc_utils.reset_curr_function;

2028: G_org_id := pa_utils.GetEmpOrgId(G_person_id, X_Ei_Date);
2029:
2030: IF ( G_org_id IS NULL ) THEN
2031: X_status := 'PA_EXP_ORG_MANDATORY';
2032: pa_cc_utils.reset_curr_function;
2033: RETURN;
2034: END IF;
2035:
2036: ELSE

Line 2060: pa_cc_utils.reset_curr_function;

2056:
2057:
2058: IF (G_org_id IS NULL) THEN
2059: X_status := 'PA_EXP_ORG_INVALID';
2060: pa_cc_utils.reset_curr_function;
2061: RETURN;
2062: END IF;
2063:
2064: END IF;

Line 2093: -- pa_cc_utils.reset_curr_function;

2089: -- X_status := 'NO_ASSIGNMENT';
2090: -- ELSE
2091: -- X_status := 'NO_PO_ASSIGNMENT';
2092: -- END IF;
2093: -- pa_cc_utils.reset_curr_function;
2094: -- RETURN;
2095:
2096: /*Begin for bug 4531168*/
2097: IF X_trx_src in ('OLD', 'GOLD', 'GOLDE') and p_po_number is null THEN

Line 2109: pa_cc_utils.reset_curr_function;

2105: and psl.SUMMARY_LINE_ID = X_trx_ref;
2106: exception
2107: when OTHERS then
2108: X_status := 'NO_ASSIGNMENT';
2109: pa_cc_utils.reset_curr_function;
2110: RETURN;
2111: end;
2112: ELSIF p_po_number is null then
2113: X_status := 'NO_ASSIGNMENT';

Line 2114: pa_cc_utils.reset_curr_function;

2110: RETURN;
2111: end;
2112: ELSIF p_po_number is null then
2113: X_status := 'NO_ASSIGNMENT';
2114: pa_cc_utils.reset_curr_function;
2115: RETURN;
2116: ELSE
2117: X_status := 'NO_PO_ASSIGNMENT';
2118: pa_cc_utils.reset_curr_function;

Line 2118: pa_cc_utils.reset_curr_function;

2114: pa_cc_utils.reset_curr_function;
2115: RETURN;
2116: ELSE
2117: X_status := 'NO_PO_ASSIGNMENT';
2118: pa_cc_utils.reset_curr_function;
2119: RETURN;
2120: END IF;
2121: /* End for bug 4531168 */
2122:

Line 2156: -- pa_cc_utils.reset_curr_function;

2152: -- X_status := 'NO_ASSIGNMENT';
2153: -- ELSE
2154: -- X_status := 'NO_PO_ASSIGNMENT';
2155: -- END IF;
2156: -- pa_cc_utils.reset_curr_function;
2157: -- RETURN;
2158:
2159: /*Begin for bug 4531168*/
2160: IF X_trx_src in ('OLD', 'GOLD', 'GOLDE') and p_po_number is null THEN

Line 2172: pa_cc_utils.reset_curr_function;

2168: and psl.SUMMARY_LINE_ID = X_trx_ref;
2169: exception
2170: when OTHERS then
2171: X_status := 'NO_ASSIGNMENT';
2172: pa_cc_utils.reset_curr_function;
2173: RETURN;
2174: end;
2175: ELSIF p_po_number is null then
2176: X_status := 'NO_ASSIGNMENT';

Line 2177: pa_cc_utils.reset_curr_function;

2173: RETURN;
2174: end;
2175: ELSIF p_po_number is null then
2176: X_status := 'NO_ASSIGNMENT';
2177: pa_cc_utils.reset_curr_function;
2178: RETURN;
2179: ELSE
2180: X_status := 'NO_PO_ASSIGNMENT';
2181: pa_cc_utils.reset_curr_function;

Line 2181: pa_cc_utils.reset_curr_function;

2177: pa_cc_utils.reset_curr_function;
2178: RETURN;
2179: ELSE
2180: X_status := 'NO_PO_ASSIGNMENT';
2181: pa_cc_utils.reset_curr_function;
2182: RETURN;
2183: END IF;
2184: /* End for bug 4531168 */
2185:

Line 2222: pa_cc_utils.reset_curr_function;

2218:
2219:
2220: IF ( G_org_id IS NULL ) THEN
2221: X_status := 'INVALID_ORGANIZATION';
2222: pa_cc_utils.reset_curr_function;
2223: RETURN;
2224: END IF;
2225:
2226: /* PA-K Changes: Commenting the CheckExporg, moved the check to one place below */

Line 2250: pa_cc_utils.reset_curr_function;

2246: log_message('log_message: ' || 'G_org_id = ' || G_org_id);
2247: END IF;
2248: IF pa_utils2.CheckExporg(G_org_id,X_ei_date) = 'N' then
2249: X_status := 'PA_EXP_ORG_NOT_ACTIVE';
2250: pa_cc_utils.reset_curr_function;
2251: RETURN;
2252: END IF;
2253: END IF;
2254: END IF; /* Added for Bug # 2170237 */

Line 2275: pa_cc_utils.log_message('X_override_to_oname = ' || X_override_to_oname

2271:
2272: --Start of changes for bug 3010848
2273: --G_override_to_org_id := pa_utils.GetOrgId(X_override_to_oname);
2274:
2275: pa_cc_utils.log_message('X_override_to_oname = ' || X_override_to_oname
2276: || ' G_Business_Group_Id = ' || G_Business_Group_Id);
2277:
2278:
2279: pa_utils.GetOrgnId(X_org_name => X_override_to_oname,

Line 2292: pa_cc_utils.reset_curr_function;

2288: --End of changes for bug 3010848
2289:
2290: IF (G_override_to_org_id IS NULL) THEN
2291: X_status := 'PA_OVERRIDE_ORG_INVALID';
2292: pa_cc_utils.reset_curr_function;
2293: RETURN;
2294: ELSIF pa_trx_import.g_skip_tc_flag <> 'Y' and PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date = 'Y' THEN /* Added for Bug # 2170237 */
2295: --Modified above condition for bug6931833
2296: IF pa_utils2.CheckExporg(G_override_to_org_id, X_ei_date) = 'N' THEN

Line 2298: pa_cc_utils.reset_curr_function;

2294: ELSIF pa_trx_import.g_skip_tc_flag <> 'Y' and PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date = 'Y' THEN /* Added for Bug # 2170237 */
2295: --Modified above condition for bug6931833
2296: IF pa_utils2.CheckExporg(G_override_to_org_id, X_ei_date) = 'N' THEN
2297: X_status := 'PA_OVERRIDE_ORG_NOT_ACTIVE';
2298: pa_cc_utils.reset_curr_function;
2299: RETURN;
2300: END IF;
2301: END IF; /* Added for Bug # 2170237 */
2302: ELSE

Line 2311: pa_cc_utils.reset_curr_function;

2307: -- X_override_to_oname IS NULL, check if G_org_id IS NULL.
2308: -- If G_org_id is also NULL, then return error
2309: IF (G_org_id IS NULL) THEN
2310: X_status := 'PA_EXP_ORG_NOT_SPECIFIED';
2311: pa_cc_utils.reset_curr_function;
2312: RETURN;
2313: END IF;
2314: END IF;
2315: END IF;

Line 2334: pa_cc_utils.reset_curr_function;

2330: GetVendorId(P_vendor_number => X_vendor_number);
2331:
2332: IF (G_vendor_id IS NULL) THEN
2333: X_status := 'PA_SUPPLIER_NUM_INVALID';
2334: pa_cc_utils.reset_curr_function;
2335: RETURN;
2336: END IF;
2337:
2338: G_previous_vendor_number := X_vendor_number;

Line 2394: pa_cc_utils.reset_curr_function;

2390: GetEtypeEclassInfo(X_etype, X_system_linkage) ;
2391:
2392: IF ( G_etype_link is NULL ) then
2393: X_status := 'INVALID_ETYPE_SYSLINK' ;
2394: pa_cc_utils.reset_curr_function;
2395: RETURN ;
2396: END IF ;
2397:
2398: IF ( X_ei_date NOT BETWEEN G_etec_start

Line 2401: pa_cc_utils.reset_curr_function;

2397:
2398: IF ( X_ei_date NOT BETWEEN G_etec_start
2399: AND nvl( G_etec_end, X_ei_date ) ) THEN
2400: X_status := 'ETYPE_SLINK_INACTIVE';
2401: pa_cc_utils.reset_curr_function;
2402: RETURN;
2403: END IF;
2404:
2405: -- Check pa_expenditure_types table for for existence and activeness of

Line 2415: pa_cc_utils.reset_curr_function;

2411: GetEtypeInfo( X_etype, X_ei_date );
2412:
2413: IF ( NOT G_etype_active ) THEN
2414: X_status := 'INVALID_EXP_TYPE';
2415: pa_cc_utils.reset_curr_function;
2416: RETURN;
2417: ELSE
2418: last_etype := x_etype;
2419: END IF;

Line 2432: pa_cc_utils.reset_curr_function;

2428:
2429: IF ( X_ei_date NOT BETWEEN G_etype_start
2430: AND nvl( G_etype_end, X_ei_date ) ) THEN
2431: X_status := 'EXP_TYPE_INACTIVE';
2432: pa_cc_utils.reset_curr_function;
2433: RETURN;
2434: END IF;
2435:
2436: ELSE --Calling module = PAAPIMP

Line 2540: pa_cc_utils.reset_curr_function;

2536: END IF;
2537:
2538: If (G_Org_Id is NULL or G_Job_Id is NULL) Then
2539: X_status := 'NO_ASSIGNMENT';
2540: pa_cc_utils.reset_curr_function;
2541: RETURN;
2542: End If;
2543:
2544: End If;

Line 2554: pa_cc_utils.reset_curr_function;

2550: pa_debug.G_err_stage := 'Project Id is null';
2551: log_message('log_message: ' || pa_debug.G_err_stage);
2552: END IF;
2553: X_status := 'INVALID_PROJECT';
2554: pa_cc_utils.reset_curr_function;
2555: RETURN;
2556: ELSE
2557: IF PG_DEBUG = 'Y' THEN
2558: pa_debug.G_err_stage := 'Calling GetProjTypeInfo';

Line 2576: pa_cc_utils.reset_curr_function;

2572: log_message('log_message: ' || pa_debug.G_err_stage);
2573: END IF;
2574:
2575: X_status := 'INVALID_PROJ_TYPE' ;
2576: pa_cc_utils.reset_curr_function;
2577: RETURN ;
2578: END IF ;
2579:
2580: /* PA-K Changes: Moved G_burden_amt_display_method to GetProjTypeInfo */

Line 2619: pa_cc_utils.reset_curr_function;

2615: log_message('log_message: ' || pa_debug.G_err_stage);
2616: END IF;
2617:
2618: X_status := 'PA_NEW_TXNS_NOT_ALLOWED';
2619: pa_cc_utils.reset_curr_function;
2620: RETURN;
2621: END IF;
2622: */
2623:

Line 2638: pa_cc_utils.reset_curr_function;

2634: END IF;
2635:
2636: If not pa_utils.IsCrossChargeable(G_Project_Id) then
2637: X_Status := 'PA_PROJECT_NOT_VALID' ;
2638: pa_cc_utils.reset_curr_function;
2639: return ;
2640: End If ;
2641:
2642: End If ;

Line 2653: pa_cc_utils.reset_curr_function;

2649: log_message('log_message: ' || pa_debug.G_err_stage);
2650: END IF;
2651:
2652: X_status := 'INVALID_TASK';
2653: pa_cc_utils.reset_curr_function;
2654: RETURN;
2655: ELSE
2656: IF PG_DEBUG = 'Y' THEN
2657: pa_debug.G_err_stage := 'Calling pa_utils2.GetLaborCostMultiplier';

Line 2699: pa_cc_utils.reset_curr_function;

2695: AND agreement_num = l_agreement_number;
2696: exception
2697: WHEN NO_DATA_FOUND then
2698: X_status := 'INVALID_AGREEMENT_FR_CLNT_EXTN';
2699: pa_cc_utils.reset_curr_function;
2700: RETURN;
2701: end;
2702: p_agreement_number := l_agreement_number;
2703: p_agreement_id := l_agreement_id;

Line 2722: pa_cc_utils.reset_curr_function;

2718: END if;
2719: exception
2720: WHEN NO_DATA_FOUND then
2721: X_status := 'INVALID_AGREEMENT';
2722: pa_cc_utils.reset_curr_function;
2723: RETURN;
2724: end;
2725: IF p_agreement_id IS NULL or p_agreement_number IS NULL then
2726: X_status := 'INVALID_AGREEMENT';

Line 2727: pa_cc_utils.reset_curr_function;

2723: RETURN;
2724: end;
2725: IF p_agreement_id IS NULL or p_agreement_number IS NULL then
2726: X_status := 'INVALID_AGREEMENT';
2727: pa_cc_utils.reset_curr_function;
2728: RETURN;
2729: END if;
2730: else
2731: --Call default agreement derivation logic

Line 2779: pa_cc_utils.reset_curr_function;

2775: P_ei_date =>X_ei_date)= 'N')
2776: THEN
2777:
2778: X_status :='PA_INVALID_DENOM_CURRENCY';
2779: pa_cc_utils.reset_curr_function;
2780: RETURN;
2781:
2782: END IF; -- end invalid denom currency validation
2783:

Line 2809: pa_cc_utils.reset_curr_function;

2805: --
2806: IF ( X_project_currency_code IS NULL ) THEN
2807:
2808: X_status := 'PA_MISSING_PROJ_CURR';
2809: pa_cc_utils.reset_curr_function;
2810: RETURN;
2811:
2812: END IF;
2813:

Line 2820: pa_cc_utils.reset_curr_function;

2816: --
2817: IF ( X_projfunc_currency_code IS NULL ) THEN
2818:
2819: X_status := 'PA_MISSING_PRJFUNC_CURR';
2820: pa_cc_utils.reset_curr_function;
2821: RETURN;
2822:
2823: END IF;
2824: -- End PA-I Changes

Line 2858: pa_cc_utils.reset_curr_function;

2854:
2855: --Conversion rate type is invalid. Reject the txn
2856:
2857: X_status := 'PA_INVALID_ACCT_RATE_TYPE';
2858: pa_cc_utils.reset_curr_function;
2859: RETURN;
2860: END IF; --G_acct_rate_type is null
2861:
2862: ELSE -- X_acct_rate_type is null

Line 2889: pa_cc_utils.reset_curr_function;

2885: IF ( G_project_rate_type IS NULL ) THEN
2886:
2887: --Conversion rate type is invalid. Reject the txn
2888: X_status := 'PA_INVALID_PROJ_RATE_TYPE';
2889: pa_cc_utils.reset_curr_function;
2890: RETURN;
2891:
2892: END IF; --G_project_rate_type is null
2893:

Line 2922: pa_cc_utils.reset_curr_function;

2918:
2919: --Conversion rate type is invalid. Reject the txn
2920:
2921: X_status := 'PA_INVALID_PRJFUNC_CST_RT_TYP';
2922: pa_cc_utils.reset_curr_function;
2923: RETURN;
2924: END IF; --G_projfunc_cost_rate_type is null
2925:
2926: ELSE -- X_projfunc_cost_rate_type is null

Line 2948: pa_cc_utils.reset_curr_function;

2944: THEN
2945:
2946: -- If rate type 'User' is not allowed, reject the txn.
2947: X_status := 'PA_NO_ACCT_USER_RATE_TYPE';
2948: pa_cc_utils.reset_curr_function;
2949: RETURN;
2950:
2951: ELSE -- Conversion Rate type 'User' is allowed
2952:

Line 2958: pa_cc_utils.reset_curr_function;

2954: -- be provided.
2955:
2956: IF ( X_acct_exchange_rate IS NULL ) THEN
2957: X_status := 'PA_ACCT_USER_RATE_NOT_DEFINED';
2958: pa_cc_utils.reset_curr_function;
2959: RETURN;
2960: END IF;-- end X_acct_exchange_rate IS NULL
2961:
2962: END IF;-- End is_user_rate_type_allowed ='N'

Line 2980: pa_cc_utils.reset_curr_function;

2976: P_to_currency => X_project_currency_code,
2977: P_conversion_date => nvl(X_project_rate_date,sysdate))='N')
2978: THEN
2979: X_status := 'PA_NO_PROJ_USER_RATE_TYPE';
2980: pa_cc_utils.reset_curr_function;
2981: RETURN;
2982:
2983: ELSE --conversion rate type 'User' is allowed
2984:

Line 2987: pa_cc_utils.reset_curr_function;

2983: ELSE --conversion rate type 'User' is allowed
2984:
2985: IF ( X_project_exchange_rate IS NULL ) THEN
2986: X_status := 'PA_PROJ_USER_RATE_NOT_DEFINED';
2987: pa_cc_utils.reset_curr_function;
2988: RETURN;
2989: END IF;-- End X_project_exchange_rate IS NULL
2990:
2991: END IF;--End is_user_rate_type_allowed ='N'

Line 3010: pa_cc_utils.reset_curr_function;

3006: P_to_currency => X_projfunc_currency_code,
3007: P_conversion_date => nvl(X_projfunc_cost_rate_date,sysdate))='N')
3008: THEN
3009: X_status := 'PA_NO_PRJFUNC_CST_USER_RT_TYP';
3010: pa_cc_utils.reset_curr_function;
3011: RETURN;
3012:
3013: ELSE --conversion rate type 'User' is allowed
3014:

Line 3017: pa_cc_utils.reset_curr_function;

3013: ELSE --conversion rate type 'User' is allowed
3014:
3015: IF ( X_projfunc_cost_exchange_rate IS NULL ) THEN
3016: X_status := 'PA_PRJFUNC_CST_USER_RATE_NULL';
3017: pa_cc_utils.reset_curr_function;
3018: RETURN;
3019: END IF;-- End X_project_exchange_rate IS NULL
3020:
3021: END IF;--End is_user_rate_type_allowed ='N'

Line 3061: pa_cc_utils.reset_curr_function;

3057:
3058: IF ( X_denom_currency_code <> G_accounting_currency_code ) THEN
3059:
3060: X_status := 'PA_DENOM_ACCT_CURR_DIFF';
3061: pa_cc_utils.reset_curr_function;
3062: RETURN;
3063:
3064: END IF;
3065:

Line 3088: pa_cc_utils.reset_curr_function;

3084: P_ei_date => X_ei_date)= 'N')
3085: THEN
3086:
3087: X_status :='PA_INVALID_RECEIPT_CURRENCY';
3088: pa_cc_utils.reset_curr_function;
3089: RETURN;
3090:
3091: END IF; -- end invalid receipt currency validation
3092:

Line 3105: pa_cc_utils.reset_curr_function;

3101:
3102: IF ( nvl(X_receipt_currency_amount,0) = 0 ) THEN
3103:
3104: X_status := 'PA_MISSING_RECEIPT_AMOUNT';
3105: pa_cc_utils.reset_curr_function;
3106: RETURN;
3107:
3108: ELSE -- receipt amount is not zero
3109:

Line 3174: pa_cc_utils.reset_curr_function;

3170:
3171: IF ( X_acct_raw_cost IS NULL AND X_system_linkage <>'BTC' ) THEN
3172:
3173: X_status := 'PA_NO_ACCT_COST';
3174: pa_cc_utils.reset_curr_function;
3175: RETURN;
3176:
3177: END IF; -- acct_raw_cost is null
3178:

Line 3189: pa_cc_utils.reset_curr_function;

3185: ---------------------------------------------------------------------*/
3186: IF ( X_acct_rate_date IS NULL ) THEN
3187:
3188: X_status := 'PA_NO_ACCT_CURR_RATE_DATE';
3189: pa_cc_utils.reset_curr_function;
3190: RETURN;
3191:
3192: END IF; -- End X_acct_rate_date is NULL
3193:

Line 3197: pa_cc_utils.reset_curr_function;

3193:
3194: IF (G_acct_rate_type IS NULL) THEN
3195:
3196: X_status := 'PA_NO_ACCT_CURR_RATE_TYPE';
3197: pa_cc_utils.reset_curr_function;
3198: RETURN;
3199:
3200: END IF; -- End G_acct_rate_type IS NULL
3201:

Line 3206: pa_cc_utils.reset_curr_function;

3202: /* Starts - Commented for bug# 5890661
3203: IF ( X_acct_exchange_rate IS NULL) THEN
3204:
3205: X_status := 'PA_NO_ACCT_CURR_RATE';
3206: pa_cc_utils.reset_curr_function;
3207: RETURN;
3208:
3209: END IF; -- End X_acct_exchange_rate IS NULL
3210: Ends - commented for bug# 5890661 */

Line 3249: pa_cc_utils.reset_curr_function;

3245:
3246: IF ( l_status IS NOT NULL ) THEN
3247:
3248: X_status := l_status;
3249: pa_cc_utils.reset_curr_function;
3250: RETURN;
3251:
3252: END IF; -- End l_status IS NOT NULL
3253:

Line 3278: pa_cc_utils.reset_curr_function;

3274: IF abs(l_converted_amount - X_acct_raw_cost) >
3275: abs(nvl(X_acct_exchange_rounding_limit,0)) THEN
3276:
3277: X_status := 'PA_EXCEED_ROUND_LIMIT';
3278: pa_cc_utils.reset_curr_function;
3279: RETURN;
3280:
3281: END IF; -- end functional amount tolerance check
3282: ELSE

Line 3307: pa_cc_utils.reset_curr_function;

3303: pa_currency.round_trans_currency_amt1(X_denom_raw_cost,
3304: X_denom_currency_code )) THEN
3305:
3306: X_status := 'PA_INVALID_ACCT_DENOM_COST';
3307: pa_cc_utils.reset_curr_function;
3308: RETURN;
3309:
3310: END IF; -- end acct raw cost <> denom raw cost
3311:

Line 3376: pa_cc_utils.reset_curr_function;

3372:
3373:
3374: IF ( l_status IS NOT NULL ) THEN
3375: X_status := l_status;
3376: pa_cc_utils.reset_curr_function;
3377: RETURN;
3378:
3379: END IF; -- end l_status IS NOT NULL
3380:

Line 3400: pa_cc_utils.reset_curr_function;

3396: END IF;
3397:
3398: IF ( NOT pa_utils.DateInExpWeek( X_ei_date , X_end_date ) ) THEN
3399: X_status := 'ITEM_NOT_IN_WEEK';
3400: pa_cc_utils.reset_curr_function;
3401: RETURN;
3402: ELSIF ( X_enum IS NULL ) THEN
3403: X_status := 'EMP_MAND_FOR_TIME';
3404: pa_cc_utils.reset_curr_function;

Line 3404: pa_cc_utils.reset_curr_function;

3400: pa_cc_utils.reset_curr_function;
3401: RETURN;
3402: ELSIF ( X_enum IS NULL ) THEN
3403: X_status := 'EMP_MAND_FOR_TIME';
3404: pa_cc_utils.reset_curr_function;
3405: RETURN;
3406: END IF;
3407:
3408: -- ===========================================================================

Line 3417: pa_cc_utils.reset_curr_function;

3413: ELSIF ( X_system_linkage = 'ER' ) THEN
3414: IF ( X_enum IS NULL and X_trx_src NOT IN ('AP EXPENSE', 'AP NRTAX') ) THEN
3415: /* Bug2780387. Added 'AP NRTAX' to the NOT IN list */
3416: X_status := 'EMP_MAND_FOR_ER';
3417: pa_cc_utils.reset_curr_function;
3418: RETURN;
3419: END IF;
3420:
3421: -- ===========================================================================

Line 3438: pa_cc_utils.reset_curr_function;

3434:
3435: ELSIF ( X_system_linkage = 'USG' ) THEN
3436: IF ( X_enum IS NULL AND X_oname IS NULL ) THEN
3437: X_status := 'EMP_OR_ORG_MAND_FOR_USAGES';
3438: pa_cc_utils.reset_curr_function;
3439: RETURN;
3440: ELSIF ( X_nlr IS NULL ) THEN
3441: X_status := 'NL_RSRC_MAND_FOR_USAGES';
3442: pa_cc_utils.reset_curr_function;

Line 3442: pa_cc_utils.reset_curr_function;

3438: pa_cc_utils.reset_curr_function;
3439: RETURN;
3440: ELSIF ( X_nlr IS NULL ) THEN
3441: X_status := 'NL_RSRC_MAND_FOR_USAGES';
3442: pa_cc_utils.reset_curr_function;
3443: RETURN;
3444: ELSIF ( X_nlro_name IS NULL ) THEN
3445: X_status := 'NL_RSRC_ORG_MAND_FOR_USAGES';
3446: pa_cc_utils.reset_curr_function;

Line 3446: pa_cc_utils.reset_curr_function;

3442: pa_cc_utils.reset_curr_function;
3443: RETURN;
3444: ELSIF ( X_nlro_name IS NULL ) THEN
3445: X_status := 'NL_RSRC_ORG_MAND_FOR_USAGES';
3446: pa_cc_utils.reset_curr_function;
3447: RETURN;
3448: END IF;
3449:
3450: --PA-K Changes: Use the ID if provided for predefined transaction sources.

Line 3477: pa_cc_utils.reset_curr_function;

3473: END IF;
3474:
3475: IF ( G_nlro_id IS NULL ) THEN
3476: X_status := 'INVALID_NL_RSRC_ORG';
3477: pa_cc_utils.reset_curr_function;
3478: RETURN;
3479: END IF;
3480:
3481: IF PG_DEBUG = 'Y' THEN

Line 3489: pa_cc_utils.reset_curr_function;

3485: GetNlrInfo( X_nlr, G_nlro_id );
3486:
3487: IF ( G_nlr_etype IS NULL ) THEN
3488: X_status := 'INVALID_NL_RSRC';
3489: pa_cc_utils.reset_curr_function;
3490: RETURN;
3491: ELSIF ( X_ei_date NOT BETWEEN G_nlr_start
3492: AND nvl( G_nlr_end, X_ei_date ) ) THEN
3493: X_status := 'NL_RSRC_INACTIVE';

Line 3494: pa_cc_utils.reset_curr_function;

3490: RETURN;
3491: ELSIF ( X_ei_date NOT BETWEEN G_nlr_start
3492: AND nvl( G_nlr_end, X_ei_date ) ) THEN
3493: X_status := 'NL_RSRC_INACTIVE';
3494: pa_cc_utils.reset_curr_function;
3495: RETURN;
3496: ELSIF ( G_nlro_start IS NULL ) THEN
3497: X_status := 'ORG_NOT_OWNER_OF_NL_RSRC';
3498: pa_cc_utils.reset_curr_function;

Line 3498: pa_cc_utils.reset_curr_function;

3494: pa_cc_utils.reset_curr_function;
3495: RETURN;
3496: ELSIF ( G_nlro_start IS NULL ) THEN
3497: X_status := 'ORG_NOT_OWNER_OF_NL_RSRC';
3498: pa_cc_utils.reset_curr_function;
3499: RETURN;
3500: ELSIF ( X_ei_date NOT BETWEEN G_nlro_start
3501: AND nvl( G_nlro_end, X_ei_date ) ) THEN
3502: X_status := 'ORG_NOT_OWNER_OF_NL_RSRC';

Line 3503: pa_cc_utils.reset_curr_function;

3499: RETURN;
3500: ELSIF ( X_ei_date NOT BETWEEN G_nlro_start
3501: AND nvl( G_nlro_end, X_ei_date ) ) THEN
3502: X_status := 'ORG_NOT_OWNER_OF_NL_RSRC';
3503: pa_cc_utils.reset_curr_function;
3504: RETURN;
3505: ELSIF ( G_nlr_etype <> X_etype ) THEN
3506: X_status := 'NL_EXP_TYPE_DIFF';
3507: pa_cc_utils.reset_curr_function;

Line 3507: pa_cc_utils.reset_curr_function;

3503: pa_cc_utils.reset_curr_function;
3504: RETURN;
3505: ELSIF ( G_nlr_etype <> X_etype ) THEN
3506: X_status := 'NL_EXP_TYPE_DIFF';
3507: pa_cc_utils.reset_curr_function;
3508: RETURN;
3509: END IF;
3510: END IF;
3511:

Line 3527: pa_cc_utils.reset_curr_function;

3523: /* Bug 2844973 Added g_trx_source <> 'ALLOCATIONS' condition */
3524:
3525: IF nvl(G_burdened_flag,'N') = 'N' and g_trx_source <> 'ALLOCATIONS' THEN
3526: X_status := 'TRXSRC_NOTALLOW_BURDEN' ;
3527: pa_cc_utils.reset_curr_function;
3528: RETURN ;
3529: END IF ;
3530:
3531: -- IF G_proj_bcost_flag = 'N' THEN

Line 3539: pa_cc_utils.reset_curr_function;

3535: -- Multi-Currency changes. Changed raw_cost to denom_raw_cost
3536: --
3537: IF nvl(X_qty,0) <> 0 OR nvl(X_denom_raw_cost,0) <> 0 THEN
3538: X_status := 'INVALID_BURDEN_TRANS' ;
3539: pa_cc_utils.reset_curr_function;
3540: RETURN ;
3541: END IF ;
3542:
3543: --

Line 3548: pa_cc_utils.reset_curr_function;

3544: -- Multi-Currency Changes. Changes burdened_cost to denom_burdened-cost
3545: --
3546: IF X_denom_burdened_cost IS NULL THEN
3547: X_status := 'INVALID_BURDEN_AMOUNT' ;
3548: pa_cc_utils.reset_curr_function;
3549: RETURN ;
3550: END IF ;
3551:
3552: ELSE -- X_system_linkage <> 'BTC'

Line 3556: pa_cc_utils.reset_curr_function;

3552: ELSE -- X_system_linkage <> 'BTC'
3553:
3554: IF ( G_trx_costed = 'Y' AND X_denom_raw_cost is NULL ) THEN
3555: X_status := 'NO_RAW_COST';
3556: pa_cc_utils.reset_curr_function;
3557: RETURN;
3558: END IF ;
3559:
3560: -- Get compiled multiplier and compile set id for transaction sources

Line 3607: pa_cc_utils.reset_curr_function;

3603: G_compiled_multiplier := 0;
3604: G_burden_compile_set_id := to_number(NULL);
3605: ELSE
3606: X_status := 'PA_ERR_IN_COST_PLUS';
3607: pa_cc_utils.reset_curr_function;
3608: RETURN;
3609: END IF;
3610: END IF;
3611:

Line 3636: pa_cc_utils.reset_curr_function;

3632: IF nvl(G_burdened_flag,'N') = 'Y' AND
3633: /* nvl( X_denom_burdened_cost ,0 ) = 0 THEN Commented for bug3144614 */
3634: X_denom_burdened_cost is NULL THEN /* Added for bug3144614 */
3635: X_status := 'INVALID_BURDEN_AMOUNT' ;
3636: pa_cc_utils.reset_curr_function;
3637: RETURN ;
3638: END IF; -- End
3639:
3640: /* Bug# 2063667 - If the transaction source is not Burdened and

Line 3648: pa_cc_utils.reset_curr_function;

3644: IF (nvl(G_burdened_flag,'N') = 'N' AND
3645: nvl(G_gl_accted_flag,'N') = 'N' AND
3646: X_denom_burdened_cost is NOT NULL) THEN
3647: X_status := 'TRXSRC_NOTALLOW_BURDEN';
3648: pa_cc_utils.reset_curr_function;
3649: RETURN ;
3650: END IF ;
3651:
3652: /* Bug# 2063667 - If the project type is not Burdened but burden

Line 3675: pa_cc_utils.reset_curr_function;

3671: IF nvl(G_proj_bcost_flag,'N') = 'N' THEN
3672: IF ((nvl(G_gl_accted_flag,'N') = 'Y' AND X_denom_burdened_cost <> X_denom_raw_cost)
3673: OR (nvl(G_gl_accted_flag,'N') = 'N' AND X_denom_burdened_cost is NOT NULL)) THEN
3674: X_status := 'PROJ_NOTALLOW_BURDEN' ;
3675: pa_cc_utils.reset_curr_function;
3676: RETURN ;
3677: END IF; * Accted Flag IF *
3678: END IF ;
3679: commented for Bug 3593432 End */

Line 3684: pa_cc_utils.reset_curr_function;

3680:
3681: /* Added for Bug 3593432 */
3682: IF nvl(G_proj_bcost_flag,'N') = 'N' AND X_denom_burdened_cost <> X_denom_raw_cost THEN
3683: X_status := 'PROJ_NOTALLOW_BURDEN' ;
3684: pa_cc_utils.reset_curr_function;
3685: RETURN ;
3686: END IF ;
3687: /* Added for Bug 3593432 End */
3688:

Line 3799: pa_cc_utils.reset_curr_function;

3795: G_burden_compile_set_id := to_number(NULL);
3796: elsif (l_status_num = 100) then
3797: if( l_stage = 100)then
3798: X_status := 'NO_IND_RATE_SCH_REVISION';
3799: pa_cc_utils.reset_curr_function;
3800: RETURN;
3801: elsif (l_stage = 200) then
3802: X_status := 'NO_COST_PLUS_STRUCTURE';
3803: pa_cc_utils.reset_curr_function;

Line 3803: pa_cc_utils.reset_curr_function;

3799: pa_cc_utils.reset_curr_function;
3800: RETURN;
3801: elsif (l_stage = 200) then
3802: X_status := 'NO_COST_PLUS_STRUCTURE';
3803: pa_cc_utils.reset_curr_function;
3804: RETURN;
3805: elsif (l_stage = 400) then
3806: X_status := 'NO_ACTIVE_COMPILED_SET';
3807: pa_cc_utils.reset_curr_function;

Line 3807: pa_cc_utils.reset_curr_function;

3803: pa_cc_utils.reset_curr_function;
3804: RETURN;
3805: elsif (l_stage = 400) then
3806: X_status := 'NO_ACTIVE_COMPILED_SET';
3807: pa_cc_utils.reset_curr_function;
3808: RETURN;
3809: end if;
3810: ELSE
3811: X_status := 'PA_ERR_IN_COST_PLUS';

Line 3812: pa_cc_utils.reset_curr_function;

3808: RETURN;
3809: end if;
3810: ELSE
3811: X_status := 'PA_ERR_IN_COST_PLUS';
3812: pa_cc_utils.reset_curr_function;
3813: RETURN;
3814: END IF;
3815: END IF;
3816: /* bug2837165 ends */

Line 3875: pa_cc_utils.reset_curr_function;

3871: X_status => l_status);
3872:
3873: IF ( l_status IS NOT NULL ) THEN
3874: X_status := l_status;
3875: pa_cc_utils.reset_curr_function;
3876: RETURN;
3877: END IF; -- End l_status IS NOT NULL
3878:
3879: END IF;-- End X_acct_burdened_cost = 0

Line 3908: pa_cc_utils.reset_curr_function;

3904: X_status => l_status);
3905:
3906: IF ( l_status IS NOT NULL ) THEN
3907: X_status := l_status;
3908: pa_cc_utils.reset_curr_function;
3909: RETURN;
3910: END IF; -- End l_status IS NOT NULL
3911:
3912: -- PA-I Changes : Added below for Project Functional Burdened cost calculation

Line 3938: pa_cc_utils.reset_curr_function;

3934: X_status => l_status);
3935:
3936: IF ( l_status IS NOT NULL ) THEN
3937: X_status := l_status;
3938: pa_cc_utils.reset_curr_function;
3939: RETURN;
3940: END IF; -- End l_status IS NOT NULL
3941:
3942: ELSE -- i.e denom_raw_cost <> 0

Line 3985: pa_cc_utils.reset_curr_function;

3981:
3982: IF Checkccid(X_drccid) IS NULL THEN
3983: pa_debug.G_err_stage := 'Calling Checkccid'; log_message(pa_debug.G_err_Stage);
3984: X_status := 'INVALID_DR_CCID' ;
3985: pa_cc_utils.reset_curr_function;
3986: RETURN ;
3987: END IF ;
3988: IF Checkccid(X_crccid) IS NULL THEN
3989: X_status := 'INVALID_CR_CCID' ;

Line 3990: pa_cc_utils.reset_curr_function;

3986: RETURN ;
3987: END IF ;
3988: IF Checkccid(X_crccid) IS NULL THEN
3989: X_status := 'INVALID_CR_CCID' ;
3990: pa_cc_utils.reset_curr_function;
3991: RETURN ;
3992: END IF ;
3993:
3994: --

Line 4004: pa_cc_utils.reset_curr_function;

4000: getvendorId(g_person_id) ;
4001:
4002: IF g_vendor_id is NULL then
4003: x_status := 'PA_INVALID_SUPPLIER_INFO';
4004: pa_cc_utils.reset_curr_function;
4005: RETURN;
4006: END IF ;
4007:
4008: END IF ;

Line 4026: pa_cc_utils.reset_curr_function;

4022: */
4023:
4024: IF X_gl_date IS NULL THEN
4025: X_status := 'INVALID_GL_DATE' ;
4026: pa_cc_utils.reset_curr_function;
4027: RETURN ;
4028: END IF ;
4029:
4030: /*********EPP Changes. This code is commented, is moved after IC check*********

Line 4055: pa_cc_utils.reset_curr_function;

4051: END IF;
4052: CheckDupItem ( X_trx_src, X_trx_ref, temp_status );
4053: IF ( temp_status IS NOT NULL ) THEN
4054: X_status := temp_status;
4055: pa_cc_utils.reset_curr_function;
4056: RETURN;
4057: END IF;
4058:
4059: END IF ;

Line 4105: pa_cc_utils.reset_curr_function;

4101:
4102: IF ( G_adj_item_id IS NULL ) THEN
4103:
4104: X_status := 'NO_MATCHING_ITEM';
4105: pa_cc_utils.reset_curr_function;
4106: RETURN;
4107:
4108: ELSIF ( G_adj_item_id IS NOT NULL) AND
4109: ( X_module = 'PAXTRTRX' OR X_module = 'PAAPIMP') THEN

Line 4149: pa_cc_utils.reset_curr_function;

4145: END IF;
4146:
4147: IF ( temp_status IS NOT NULL ) THEN
4148: X_status := temp_status;
4149: pa_cc_utils.reset_curr_function;
4150: RETURN;
4151: END IF;
4152:
4153: END IF;

Line 4239: pa_cc_utils.reset_curr_function;

4235: log_message('log_message: ' || SQLERRM,1);
4236: log_message('log_message: ' || pa_debug.G_err_stage,1);
4237: END IF;
4238: X_Status := 'PA_ERR_IN_CC_IDENT_API';
4239: pa_cc_utils.reset_curr_function;
4240: RETURN;
4241: END Cc_Identification_Api;
4242:
4243: -- if an error has occured in CC identification API, the

Line 4246: pa_cc_utils.reset_curr_function;

4242:
4243: -- if an error has occured in CC identification API, the
4244: -- X_Status variable will be populated with the error code.
4245: IF ( X_Status IS NOT NULL ) THEN
4246: pa_cc_utils.reset_curr_function;
4247: RETURN;
4248: ELSE -- i.e. successful completion
4249:
4250: IF ( G_CrossChargeCode = 'B' ) THEN

Line 4474: pa_cc_utils.reset_curr_function;

4470: log_message('log_message: ' || pa_debug.G_err_Stage);
4471: END IF;
4472:
4473: X_status := 'INVALID_PA_DATE' ;
4474: pa_cc_utils.reset_curr_function;
4475: RETURN ;
4476:
4477: END IF ;
4478:

Line 4494: pa_cc_utils.reset_curr_function;

4490: log_message('log_message: ' || pa_debug.G_err_Stage);
4491: END IF;
4492:
4493: X_status := 'INVALID_RECVR_PA_DATE' ;
4494: pa_cc_utils.reset_curr_function;
4495: RETURN ;
4496:
4497: END IF ;
4498:

Line 4507: pa_cc_utils.reset_curr_function;

4503: log_message('log_message: ' || pa_debug.G_err_Stage);
4504: END IF;
4505:
4506: X_status := 'INVALID_RECVR_GL_DATE' ;
4507: pa_cc_utils.reset_curr_function;
4508: RETURN ;
4509:
4510: END IF ;
4511:

Line 4582: pa_cc_utils.reset_curr_function;

4578: IF PG_DEBUG = 'Y' THEN
4579: pa_debug.G_err_stage := 'Error returned for accrual date derivation = '||x_status;
4580: log_message('log_message: ' || pa_debug.G_err_Stage);
4581: END IF;
4582: pa_cc_utils.reset_curr_function;
4583: RETURN;
4584: end if;
4585:
4586: --We copy the original item's accrual date for provider and

Line 4643: pa_cc_utils.reset_curr_function;

4639: IF PG_DEBUG = 'Y' THEN
4640: pa_debug.G_err_stage := 'Error returned for reversal line accrual date derivation = '||x_status;
4641: log_message('log_message: ' || pa_debug.G_err_Stage);
4642: END IF;
4643: pa_cc_utils.reset_curr_function;
4644: RETURN;
4645: END IF;
4646:
4647: END IF; -- Period_End = Y accrual txn period derivation

Line 4760: pa_cc_utils.reset_curr_function;

4756:
4757: If (G_Work_Type_Id is NULL and nvl(pa_utils4.is_exp_work_type_enabled,'N') = 'Y') Then
4758: /*** added and condition bug 3104004 */
4759: X_Status := 'INVALID_WORK_TYPE';
4760: pa_cc_utils.reset_curr_function;
4761: Return;
4762: End If;
4763:
4764: End If;

Line 4822: pa_cc_utils.reset_curr_function;

4818: log_message('log_message: ' || 'Ret Sts = ' || l_asgn_work_ret_sts || ' Error = ' || l_asgn_work_err_msg);
4819: END IF;
4820:
4821: X_Status := l_asgn_work_err_msg;
4822: pa_cc_utils.reset_curr_function;
4823: RETURN;
4824:
4825: END IF;
4826:

Line 4861: pa_cc_utils.reset_curr_function;

4857: IF nvl(P_Person_Type,'EMP') IN ('EMP','CWK') THEN
4858: null;
4859: ELSE
4860: X_status := 'INVALID_PERSON_TYPE';
4861: pa_cc_utils.reset_curr_function;
4862: RETURN;
4863: END IF;
4864:
4865: IF ((P_po_number is not null OR P_Po_Line_Num is not null OR

Line 4878: pa_cc_utils.reset_curr_function;

4874: END IF;
4875:
4876: IF Pa_Pjc_CWk_Utils.Is_CWK_TC_Xface_Allowed(G_Project_Id) <> 'Y' THEN
4877: X_Status := 'PA_CWK_TC_NOT_ALLOWED';
4878: pa_cc_utils.reset_curr_function;
4879: RETURN;
4880: ELSIF (( nvl(G_gl_accted_flag,'N') = 'Y') OR (nvl(G_trx_costed,'N') = 'Y')) THEN
4881: X_status := 'PA_CWK_PO_COSTED_NOTSUP';
4882: pa_cc_utils.reset_curr_function;

Line 4882: pa_cc_utils.reset_curr_function;

4878: pa_cc_utils.reset_curr_function;
4879: RETURN;
4880: ELSIF (( nvl(G_gl_accted_flag,'N') = 'Y') OR (nvl(G_trx_costed,'N') = 'Y')) THEN
4881: X_status := 'PA_CWK_PO_COSTED_NOTSUP';
4882: pa_cc_utils.reset_curr_function;
4883: RETURN;
4884: ELSIF nvl(p_person_type,'EMP') = 'EMP' THEN
4885: X_status := 'PA_EMP_PO_NOTSUP';
4886: pa_cc_utils.reset_curr_function;

Line 4886: pa_cc_utils.reset_curr_function;

4882: pa_cc_utils.reset_curr_function;
4883: RETURN;
4884: ELSIF nvl(p_person_type,'EMP') = 'EMP' THEN
4885: X_status := 'PA_EMP_PO_NOTSUP';
4886: pa_cc_utils.reset_curr_function;
4887: RETURN;
4888: END IF;
4889:
4890: IF PG_DEBUG = 'Y' THEN

Line 4932: pa_cc_utils.reset_curr_function;

4928: log_message('log_message: ' || pa_debug.G_err_Stage);
4929: END IF;
4930:
4931: X_status := temp_status;
4932: pa_cc_utils.reset_curr_function;
4933: RETURN;
4934: END IF;
4935:
4936: /* po amount check */

Line 4940: pa_cc_utils.reset_curr_function;

4936: /* po amount check */
4937:
4938: IF nvl(l_po_rate,0) = 0 THEN
4939: X_status := 'INVALID_PO_RATE';
4940: pa_cc_utils.reset_curr_function;
4941: RETURN;
4942: END IF;
4943:
4944: l_Calc_Amt := X_qty * l_po_rate;

Line 5046: pa_cc_utils.reset_curr_function;

5042: pa_debug.G_err_stage := 'po_processed_amt_chk unable to get a lock';
5043: log_message('log_message: ' || pa_debug.G_err_Stage);
5044: END IF;
5045: X_status := temp_status;
5046: pa_cc_utils.reset_curr_function;
5047: RETURN;
5048: END IF;
5049:
5050: IF 0 <= (nvl(G_Po_Line_Amt,0) - nvl(l_processed_cost,0)) then /* Bug 4098920 */

Line 5059: pa_cc_utils.reset_curr_function;

5055: /* Undo changes that are done by po_processed_amt_chk ***/
5056: undo_processed_amt_chk(P_Po_Line_Id
5057: ,G_Task_Id /* Bug # 3609926 : Changed to G_TASK_ID from P_TASK_ID */
5058: ,l_Calc_Amt ) ;
5059: pa_cc_utils.reset_curr_function;
5060: RETURN;
5061: END IF;
5062:
5063: /* po amount check */

Line 5081: pa_cc_utils.reset_curr_function;

5077: );
5078:
5079: If (G_Vendor_id Is Null or G_Vendor_Site_id Is Null ) Then
5080: x_status := 'PA_INVALID_SUPPLIER_INFO';
5081: pa_cc_utils.reset_curr_function;
5082: Return;
5083: End If;
5084:
5085: End If;

Line 5135: pa_cc_utils.reset_curr_function;

5131: ,P_Task_Id
5132: ,l_Calc_Amt
5133: );
5134: END IF;
5135: pa_cc_utils.reset_curr_function;
5136: RETURN;
5137: END IF;
5138:
5139: IF PG_DEBUG = 'Y' THEN

Line 5236: pa_cc_utils.reset_curr_function;

5232: ,P_Task_Id
5233: ,l_Calc_Amt );
5234: END IF;
5235:
5236: pa_cc_utils.reset_curr_function;
5237: RETURN;
5238:
5239: END IF;
5240:

Line 5286: pa_cc_utils.reset_curr_function;

5282: log_message('log_message: ' || pa_debug.G_err_Stage);
5283: END IF;
5284:
5285: x_status := l_fc_error_msg ;
5286: pa_cc_utils.reset_curr_function;
5287: return;
5288: END IF;
5289:
5290: IF PG_DEBUG = 'Y' THEN

Line 5314: pa_cc_utils.reset_curr_function;

5310: END IF;
5311:
5312: --x_status := l_fc_return_status ;
5313: x_status := 'PA_FC_ERROR' ;
5314: pa_cc_utils.reset_curr_function;
5315: return;
5316: END IF;
5317:
5318: IF PG_DEBUG = 'Y' THEN

Line 5342: pa_cc_utils.reset_curr_function;

5338: END IF;
5339:
5340: x_status := 'PA_FC_ERROR' ;
5341:
5342: pa_cc_utils.reset_curr_function;
5343: return;
5344: ELSE
5345: IF PG_DEBUG = 'Y' THEN
5346: pa_debug.G_err_stage := 'This transaction passed funds check';

Line 5361: pa_cc_utils.reset_curr_function;

5357: log_message('log_message: ' || pa_debug.G_err_Stage);
5358: END IF;
5359:
5360: x_status := 'PA_FC_UNEXP_ERROR' ;
5361: pa_cc_utils.reset_curr_function;
5362: return;
5363: END IF;
5364: IF PG_DEBUG = 'Y' THEN
5365: pa_debug.G_err_stage := 'Done with funds check';

Line 5397: pa_cc_utils.reset_curr_function; /* bug 2181553 */

5393: IF PG_DEBUG = 'Y' THEN
5394: pa_debug.G_err_stage := 'Done with Validate Item';
5395: log_message('log_message: ' || pa_debug.G_err_Stage);
5396: END IF;
5397: pa_cc_utils.reset_curr_function; /* bug 2181553 */
5398:
5399: -- S.N. CWK changes -> hkulkarn ---> If called from form, release the locks.
5400:
5401: IF (X_module = 'EXTERNAL') THEN

Line 5419: pa_cc_utils.reset_curr_function; /* bug 2181553 */

5415: END IF;
5416:
5417: release_po_line_task_lock; -- bug 3512984
5418:
5419: pa_cc_utils.reset_curr_function; /* bug 2181553 */
5420:
5421: RAISE ;
5422: END ValidateItem;
5423:

Line 5429: pa_cc_utils.set_curr_function('ValidateOrgId');

5425: X_org_id IN NUMBER
5426: , X_status OUT NOCOPY VARCHAR2 )
5427: IS
5428: BEGIN
5429: pa_cc_utils.set_curr_function('ValidateOrgId');
5430:
5431: --PA.K Changes: For Performance moved the Multi-Org check to init procedure.
5432: --IF pa_utils.pa_morg_implemented = 'Y' THEN
5433:

Line 5451: pa_cc_utils.reset_curr_function;

5447:
5448: IF G_Morg = 'Y' THEN
5449: IF X_org_id IS NULL THEN
5450: X_status := 'MISSING_ORG_ID';
5451: pa_cc_utils.reset_curr_function;
5452: RETURN;
5453: END IF;
5454: END IF;
5455:

Line 5456: pa_cc_utils.reset_curr_function;

5452: RETURN;
5453: END IF;
5454: END IF;
5455:
5456: pa_cc_utils.reset_curr_function;
5457: EXCEPTION
5458: WHEN OTHERS THEN
5459: IF PG_DEBUG = 'Y' THEN
5460: log_message('log_message: ' || pa_debug.G_err_Stack,1);

Line 5558: pa_cc_utils.set_curr_function('Set_supplier_cost_eidate');

5554: v_week_ending_dtTab PA_PLSQL_DATATYPES.DateTabTyp;
5555:
5556:
5557: BEGIN
5558: pa_cc_utils.set_curr_function('Set_supplier_cost_eidate');
5559:
5560: IF PG_DEBUG = 'Y' THEN
5561: log_message('log_message: Set_supplier_cost_eidate begins ' );
5562: log_message('log_message: Populate bulk variables ' );

Line 5678: pa_cc_utils.reset_curr_function;

5674: IF PG_DEBUG = 'Y' THEN
5675: log_message('log_message: End of set_supplier_cost_eidate. ' );
5676: END IF ;
5677:
5678: pa_cc_utils.reset_curr_function;
5679: END set_supplier_cost_eidate ;
5680:
5681: PROCEDURE import1( X_transaction_source IN VARCHAR2
5682: , X_batch IN VARCHAR2

Line 6270: pa_cc_utils.set_curr_function('lockCntrlRec');

6266: , etypeclasscode VARCHAR2 ) RETURN NUMBER
6267: IS
6268: BEGIN
6269:
6270: pa_cc_utils.set_curr_function('lockCntrlRec');
6271:
6272: IF PG_DEBUG = 'Y' THEN
6273: log_message('log_message: ' || 'Trying to get lock for record in xface ctrl:'||
6274: ' transaction source ='||trx_source||

Line 6327: pa_cc_utils.reset_curr_function;

6323: IF PG_DEBUG = 'Y' THEN
6324: log_message('log_message: ' || 'Updated interface id/status on pa_transaction_xface_control');
6325: END IF;
6326:
6327: pa_cc_utils.reset_curr_function;
6328: RETURN 0;
6329:
6330: EXCEPTION
6331: WHEN RESOURCE_BUSY THEN

Line 6335: pa_cc_utils.reset_curr_function;

6331: WHEN RESOURCE_BUSY THEN
6332: IF PG_DEBUG = 'Y' THEN
6333: log_message('log_message: ' || 'Cannot get lock',1);
6334: END IF;
6335: pa_cc_utils.reset_curr_function;
6336: RETURN -1;
6337: END lockCntrlRec;
6338:
6339: PROCEDURE UpdControlProcessed (P_TrxSource in VARCHAR2,

Line 6350: pa_cc_utils.set_curr_function('UpdControlProcessed');

6346: /* Added the parameter system_linkage_function for bug # 3291066 */
6347: IS
6348: BEGIN
6349:
6350: pa_cc_utils.set_curr_function('UpdControlProcessed');
6351: IF PG_DEBUG = 'Y' THEN
6352: log_message('log_message: ' || 'Inside UpdControlProcessed,
6353: P_TrxSource = ' || P_TrxSource ||
6354: ' P_BatchName = ' || P_BatchName ||

Line 6406: pa_cc_utils.reset_curr_function;

6402: END IF;
6403:
6404: End If;
6405:
6406: pa_cc_utils.reset_curr_function;
6407:
6408: END UpdControlProcessed;
6409:
6410: PROCEDURE loadExpCompareVars ( expend IN VARCHAR2

Line 6420: pa_cc_utils.set_curr_function('loadExpCompareVars');

6416: , orig_exp_txn_reference3 IN VARCHAR2)
6417: IS
6418: BEGIN
6419:
6420: pa_cc_utils.set_curr_function('loadExpCompareVars');
6421: current_expend := expend;
6422: current_expend2 := expend2;
6423: current_period := end_date;
6424: i := 0;

Line 6459: pa_cc_utils.reset_curr_function;

6455: INTO G_expenditure_id
6456: FROM sys.dual;
6457: END IF;
6458:
6459: pa_cc_utils.reset_curr_function;
6460: END loadExpCompareVars;
6461:
6462: -- Bug 2048868 : Added 5 parameters to pass currency attributes to
6463: -- pa_transactions.insertexp

Line 6489: pa_cc_utils.set_curr_function('newExpend');

6485: l_acct_exchange_rate NUMBER;
6486: l_gl_accted_flag VARCHAR2(2);
6487:
6488: BEGIN
6489: pa_cc_utils.set_curr_function('newExpend');
6490:
6491: IF PG_DEBUG = 'Y' THEN
6492: log_message('log_message: ' || 'record count = ' || record_count);
6493: END IF;

Line 6767: pa_cc_utils.reset_curr_function;

6763: /***** Bug 4106188 CWK Changes *****/
6764:
6765:
6766: REJECT_EXP := FALSE;
6767: pa_cc_utils.reset_curr_function;
6768: END newExpend;
6769:
6770: PROCEDURE InitPLSQLTab IS
6771: BEGIN

Line 6956: pa_cc_utils.set_curr_function('get_parent_txn_status');

6952: v_calling_module <> 'PAAPIMP' THEN
6953:
6954: RETURN l_status ;
6955: end if ;
6956: pa_cc_utils.set_curr_function('get_parent_txn_status');
6957:
6958: IF PG_DEBUG = 'Y' THEN
6959: log_message('log_message: X_transaction_source :' || X_transaction_source);
6960: log_message('log_message: G_cash_based_accounting :' || G_cash_based_accounting);

Line 7056: pa_cc_utils.reset_curr_function;

7052: log_message('log_message: Status Override for child (Date Failure) l_status :' || l_status);
7053: END IF;
7054: END IF ;
7055:
7056: pa_cc_utils.reset_curr_function;
7057:
7058: return l_status ;
7059: END get_parent_txn_status ;
7060: -- =========================================

Line 7078: pa_cc_utils.log_message('Debug Mode = '||G_debug_mode,1);

7074: pa_debug.set_process(x_process => 'PLSQL',
7075: x_debug_mode => G_debug_mode);
7076: End If;
7077:
7078: pa_cc_utils.log_message('Debug Mode = '||G_debug_mode,1);
7079:
7080: g_request_id := fnd_global.conc_request_id;
7081: pa_cc_utils.set_curr_function('Import1');
7082: IF PG_DEBUG = 'Y' THEN

Line 7081: pa_cc_utils.set_curr_function('Import1');

7077:
7078: pa_cc_utils.log_message('Debug Mode = '||G_debug_mode,1);
7079:
7080: g_request_id := fnd_global.conc_request_id;
7081: pa_cc_utils.set_curr_function('Import1');
7082: IF PG_DEBUG = 'Y' THEN
7083: log_message('log_message: ' || 'Start Transaction Import');
7084: END IF;
7085:

Line 8180: pa_cc_utils.reset_curr_function; /* Uncommented for Bug 4309932 */

8176: -- we are resetting the stack after executing
8177: -- validateitem.
8178:
8179: --Bug 2749049
8180: pa_cc_utils.reset_curr_function; /* Uncommented for Bug 4309932 */
8181:
8182: END IF; -- end X_org_status is not null
8183:
8184: IF ( X_status IS NOT NULL ) THEN

Line 9071: pa_cc_utils.reset_curr_function;

9067: end if;
9068:
9069: /*PA-K Changes: UpdControlProcessed will be done for each loop of TrxBatches*/
9070:
9071: pa_cc_utils.reset_curr_function;
9072:
9073: EXCEPTION
9074:
9075: WHEN OTHERS THEN

Line 9370: pa_cc_utils.log_message('Debug Mode = '||G_debug_mode,1);

9366:
9367: pa_debug.set_process(x_process => 'PLSQL',
9368: x_debug_mode => G_debug_mode);
9369:
9370: pa_cc_utils.log_message('Debug Mode = '||G_debug_mode,1);
9371: pa_cc_utils.set_curr_function('pa_trx_import.init');
9372:
9373: IF PG_DEBUG = 'Y' THEN
9374: pa_debug.G_err_Stage := 'retriving transaction source';

Line 9371: pa_cc_utils.set_curr_function('pa_trx_import.init');

9367: pa_debug.set_process(x_process => 'PLSQL',
9368: x_debug_mode => G_debug_mode);
9369:
9370: pa_cc_utils.log_message('Debug Mode = '||G_debug_mode,1);
9371: pa_cc_utils.set_curr_function('pa_trx_import.init');
9372:
9373: IF PG_DEBUG = 'Y' THEN
9374: pa_debug.G_err_Stage := 'retriving transaction source';
9375: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 9393: pa_cc_utils.reset_curr_function;

9389: IF (G_accounting_currency_code IS NULL) THEN
9390: GetImpCurrInfo;
9391: END IF;
9392:
9393: pa_cc_utils.reset_curr_function;
9394:
9395: END init;
9396:
9397: PROCEDURE execute_import_extensions(P_program_name IN VARCHAR2,

Line 9757: pa_cc_utils.set_curr_function('tieback_fc_records');

9753: END Upd_Sts_Enc_Bal;
9754:
9755: BEGIN
9756:
9757: pa_cc_utils.set_curr_function('tieback_fc_records');
9758:
9759: IF PG_DEBUG = 'Y' THEN
9760: pa_debug.G_err_stage := 'Start of tieback_fc_records';
9761: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 10081: pa_cc_utils.log_message(pa_debug.G_err_Stage);

10077: end if;
10078:
10079: /* Start of bug 3239837 */
10080: pa_debug.G_err_stage := 'Update rejected interface records in pa_bc_packets to T';
10081: pa_cc_utils.log_message(pa_debug.G_err_Stage);
10082:
10083: update pa_bc_packets
10084: set status_code = 'T',
10085: result_code = 'F140'

Line 10097: pa_cc_utils.log_message(pa_debug.G_err_Stage);

10093: and orig_transaction_reference = to_char(g_request_id)
10094: );
10095:
10096: pa_debug.G_err_stage := 'In stage 1 Updated count to T = '|| SQL%ROWCOUNT;
10097: pa_cc_utils.log_message(pa_debug.G_err_Stage);
10098:
10099: update pa_bc_packets
10100: set status_code = 'T',
10101: result_code = 'F140'

Line 10118: pa_cc_utils.log_message(pa_debug.G_err_Stage);

10114: and pti.orig_transaction_reference = to_char(g_request_id))
10115: );
10116:
10117: pa_debug.G_err_stage := 'In stage 2 Updated count to T = '|| SQL%ROWCOUNT;
10118: pa_cc_utils.log_message(pa_debug.G_err_Stage);
10119:
10120: /* End of bug 3239837 */
10121:
10122: --Bug 3592289

Line 10149: pa_cc_utils.reset_curr_function;

10145: pa_debug.G_err_stage := 'Done with Tieback';
10146: log_message('log_message: ' || pa_debug.G_err_Stage);
10147: END IF;
10148:
10149: pa_cc_utils.reset_curr_function;
10150:
10151: EXCEPTION
10152: WHEN OTHERS THEN
10153: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 10256: pa_cc_utils.set_curr_function('tr_import_funds_check');

10252: END Get_FC_Period_Name;
10253:
10254: BEGIN
10255:
10256: pa_cc_utils.set_curr_function('tr_import_funds_check');
10257: IF PG_DEBUG = 'Y' THEN
10258: pa_debug.G_err_stage := 'Inside Tr_Import_Funds_Check';
10259: log_message('log_message: ' || pa_debug.G_err_Stage);
10260: END IF;

Line 10587: pa_cc_utils.reset_curr_function;

10583: x_packet_id := l_packet_id ;
10584: IF PG_DEBUG = 'Y' THEN
10585: log_message('log_message: ' || 'Returning from funds check');
10586: END IF;
10587: pa_cc_utils.reset_curr_function;
10588:
10589: -- set the return status to success
10590: x_return_status := FND_API.G_RET_STS_SUCCESS;
10591:

Line 10603: pa_cc_utils.reset_curr_function;

10599: log_message('log_message: x_return_status = ' || x_return_status); -- Bug 3592289
10600: log_message('log_message: x_error = ' || x_error_message_code); -- Bug 3592289
10601: END IF;
10602: x_return_status := fnd_api.g_ret_sts_unexp_error;
10603: pa_cc_utils.reset_curr_function;
10604: END tr_import_funds_check ;
10605:
10606: --2339216: Added procedure
10607: PROCEDURE ap_disc_funds_check (

Line 10624: pa_cc_utils.set_curr_function('ap_disc_funds_check');

10620: x_return_status OUT NOCOPY VARCHAR2) IS
10621:
10622: BEGIN
10623:
10624: pa_cc_utils.set_curr_function('ap_disc_funds_check');
10625:
10626: IF PG_DEBUG = 'Y' THEN
10627: pa_debug.G_err_stage := 'Inside AP_Disc_Funds_Check';
10628: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 10649: pa_cc_utils.reset_curr_function;

10645:
10646: -- set the return status to success
10647: x_return_status := FND_API.G_RET_STS_SUCCESS;
10648:
10649: pa_cc_utils.reset_curr_function;
10650:
10651: EXCEPTION
10652: --Bug 2672772: Handle the NDF exception,
10653: --raise the error here but not in tr_import_funds_check

Line 10665: pa_cc_utils.reset_curr_function;

10661:
10662: x_return_status := fnd_api.g_ret_sts_error;
10663: x_error_message_code := 'PA_FC_NDF';
10664:
10665: pa_cc_utils.reset_curr_function;
10666: RAISE;
10667:
10668: WHEN OTHERS THEN
10669: IF PG_DEBUG = 'Y' THEN

Line 10673: pa_cc_utils.reset_curr_function;

10669: IF PG_DEBUG = 'Y' THEN
10670: log_message('log_message: ' || sqlerrm||' Returning from ap disc funds check');
10671: END IF;
10672: x_return_status := fnd_api.g_ret_sts_unexp_error;
10673: pa_cc_utils.reset_curr_function;
10674: RAISE;
10675: END ap_disc_funds_check;
10676:
10677: PROCEDURE ap_funds_check (

Line 10693: pa_cc_utils.set_curr_function('ap_funds_check');

10689: x_return_status OUT NOCOPY VARCHAR2) IS
10690:
10691: BEGIN
10692:
10693: pa_cc_utils.set_curr_function('ap_funds_check');
10694:
10695: IF PG_DEBUG = 'Y' THEN
10696: pa_debug.G_err_stage := 'Inside AP_Funds_Check';
10697: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 10718: pa_cc_utils.reset_curr_function;

10714:
10715: -- set the return status to success
10716: x_return_status := FND_API.G_RET_STS_SUCCESS;
10717:
10718: pa_cc_utils.reset_curr_function;
10719:
10720: EXCEPTION
10721: --Bug 2672772: Handle the NDF exception,
10722: --raise the error here but not in tr_import_funds_check

Line 10734: pa_cc_utils.reset_curr_function;

10730:
10731: x_return_status := fnd_api.g_ret_sts_error;
10732: x_error_message_code := 'PA_FC_NDF';
10733:
10734: pa_cc_utils.reset_curr_function;
10735: RAISE;
10736:
10737:
10738: WHEN OTHERS THEN

Line 10743: pa_cc_utils.reset_curr_function;

10739: IF PG_DEBUG = 'Y' THEN
10740: log_message('log_message: ' || sqlerrm||' Returning from ap funds check');
10741: END IF;
10742: x_return_status := fnd_api.g_ret_sts_unexp_error;
10743: pa_cc_utils.reset_curr_function;
10744: RAISE;
10745: END ap_funds_check;
10746:
10747: PROCEDURE po_funds_check (

Line 10848: pa_cc_utils.set_curr_function('po_funds_check');

10844: End GetCommSummAmt;
10845:
10846: BEGIN
10847:
10848: pa_cc_utils.set_curr_function('po_funds_check');
10849:
10850: IF PG_DEBUG = 'Y' THEN
10851: pa_debug.G_err_stage := 'Inside PO_Funds_Check';
10852: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 10940: pa_cc_utils.reset_curr_function;

10936:
10937: -- set the return status to success
10938: x_return_status := FND_API.G_RET_STS_SUCCESS;
10939:
10940: pa_cc_utils.reset_curr_function;
10941:
10942: EXCEPTION
10943: --Bug 2672772: Handle the NDF exception,
10944: --raise the error here but not in tr_import_funds_check

Line 10956: pa_cc_utils.reset_curr_function;

10952:
10953: x_return_status := fnd_api.g_ret_sts_error;
10954: x_error_message_code := 'PA_FC_NDF';
10955:
10956: pa_cc_utils.reset_curr_function;
10957: RAISE;
10958:
10959: WHEN OTHERS THEN
10960: IF PG_DEBUG = 'Y' THEN

Line 10964: pa_cc_utils.reset_curr_function;

10960: IF PG_DEBUG = 'Y' THEN
10961: log_message('log_message: ' || sqlerrm||' Returning from po funds check');
10962: END IF;
10963: x_return_status := fnd_api.g_ret_sts_unexp_error;
10964: pa_cc_utils.reset_curr_function;
10965: RAISE;
10966: END po_funds_check;
10967:
10968: PROCEDURE ap_po_funds_check (

Line 10988: pa_cc_utils.set_curr_function('ap_po_funds_check');

10984: x_return_status OUT NOCOPY VARCHAR2) IS
10985:
10986: BEGIN
10987:
10988: pa_cc_utils.set_curr_function('ap_po_funds_check');
10989:
10990: IF PG_DEBUG = 'Y' THEN
10991: pa_debug.G_err_stage := 'Inside ap_po_Funds_Check';
10992: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 11080: pa_cc_utils.reset_curr_function;

11076:
11077: -- set the return status to success
11078: x_return_status := FND_API.G_RET_STS_SUCCESS;
11079:
11080: pa_cc_utils.reset_curr_function;
11081:
11082: EXCEPTION
11083: WHEN OTHERS THEN
11084: IF PG_DEBUG = 'Y' THEN

Line 11088: pa_cc_utils.reset_curr_function;

11084: IF PG_DEBUG = 'Y' THEN
11085: log_message('log_message: ' || sqlerrm||' Returning from ap po funds check');
11086: END IF;
11087: x_return_status := fnd_api.g_ret_sts_unexp_error;
11088: pa_cc_utils.reset_curr_function;
11089: RAISE;
11090: END ap_po_funds_check;
11091:
11092: PROCEDURE Upd_PktSts_Fatal(p_request_id in number) IS

Line 11235: pa_cc_utils.set_curr_function('ValidateItemOTL');

11231: l_asgn_work_err_msg VARCHAR2(1000);
11232: l_temp_g_assignment_id number := null; -- bug 5297060
11233:
11234: BEGIN
11235: pa_cc_utils.set_curr_function('ValidateItemOTL');
11236:
11237:
11238: G_adj_item_id := NULL;
11239: G_job_id := NULL;

Line 11276: pa_cc_utils.reset_curr_function;

11272: pa_debug.G_err_Stage := 'P_Emp_Org_Id is null';
11273: log_message('log_message: ' || pa_debug.G_err_Stage);
11274: END IF;
11275: X_status := 'NO_ASSIGNMENT';
11276: pa_cc_utils.reset_curr_function;
11277: RETURN;
11278: END IF;
11279:
11280: IF (G_accounting_currency_code IS NULL) THEN

Line 11288: pa_cc_utils.reset_curr_function;

11284: G_job_id := P_Emp_Job_Id;
11285:
11286: IF ( G_job_id IS NULL ) THEN
11287: X_status := 'NO_ASSIGNMENT';
11288: pa_cc_utils.reset_curr_function;
11289: RETURN;
11290: END IF;
11291:
11292: IF ( X_denom_currency_code IS NULL ) THEN

Line 11312: pa_cc_utils.reset_curr_function;

11308:
11309: IF ( X_project_currency_code IS NULL ) THEN
11310:
11311: X_status := 'PA_MISSING_PROJ_CURR';
11312: pa_cc_utils.reset_curr_function;
11313: RETURN;
11314:
11315: END IF;
11316:

Line 11320: pa_cc_utils.reset_curr_function;

11316:
11317: IF ( X_projfunc_currency_code IS NULL ) THEN
11318:
11319: X_status := 'PA_MISSING_PRJFUNC_CURR';
11320: pa_cc_utils.reset_curr_function;
11321: RETURN;
11322:
11323: END IF;
11324:

Line 11354: pa_cc_utils.reset_curr_function;

11350: END IF;
11351: CheckDupItem ( X_trx_src, X_trx_ref, temp_status );
11352: IF ( temp_status IS NOT NULL ) THEN
11353: X_status := temp_status;
11354: pa_cc_utils.reset_curr_function;
11355: RETURN;
11356: END IF;
11357:
11358: END IF ;

Line 11389: pa_cc_utils.reset_curr_function;

11385:
11386: IF ( G_adj_item_id IS NULL ) THEN
11387:
11388: X_status := 'NO_MATCHING_ITEM';
11389: pa_cc_utils.reset_curr_function;
11390: RETURN;
11391:
11392: ELSIF ( G_adj_item_id IS NOT NULL AND X_module = 'PAXTRTRX' ) THEN
11393:

Line 11425: pa_cc_utils.reset_curr_function;

11421: END IF;
11422:
11423: IF ( temp_status IS NOT NULL ) THEN
11424: X_status := temp_status;
11425: pa_cc_utils.reset_curr_function;
11426: RETURN;
11427: END IF;
11428:
11429: END IF;

Line 11476: pa_cc_utils.reset_curr_function;

11472: log_message('log_message: ' || 'Ret Sts = ' || l_asgn_work_ret_sts || ' Error = ' || l_asgn_work_err_msg);
11473: END IF;
11474:
11475: X_Status := l_asgn_work_err_msg;
11476: pa_cc_utils.reset_curr_function;
11477: RETURN;
11478:
11479: END IF;
11480:

Line 11561: pa_cc_utils.reset_curr_function;

11557: G_assignment_id := l_temp_g_assignment_id;
11558: End If;
11559: /*E.N. 5297060*/
11560:
11561: pa_cc_utils.reset_curr_function;
11562:
11563: EXCEPTION
11564: WHEN OTHERS THEN
11565: IF PG_DEBUG = 'Y' THEN

Line 11570: pa_cc_utils.reset_curr_function;

11566: log_message('log_message: ' || pa_debug.G_err_Stack,1);
11567: log_message('log_message: ' || pa_debug.G_err_stage,1);
11568: log_message('log_message: ' || SQLERRM,1);
11569: END IF;
11570: pa_cc_utils.reset_curr_function;
11571: RAISE ;
11572: END ValidateItemOTL;
11573:
11574: PROCEDURE Log_Message(p_message in VARCHAR2,

Line 11579: pa_cc_utils.log_message(p_message,p_mode);

11575: p_mode in NUMBER DEFAULT 0) IS
11576: BEGIN
11577: If (G_Debug_Mode = 'Y') Then
11578:
11579: pa_cc_utils.log_message(p_message,p_mode);
11580:
11581: End If;
11582: END Log_Message;
11583:

Line 11868: pa_cc_utils.set_curr_function('ap_funds_check');

11864: End GetCommSummAmt;
11865:
11866: BEGIN
11867:
11868: pa_cc_utils.set_curr_function('ap_funds_check');
11869:
11870: IF PG_DEBUG = 'Y' THEN
11871: pa_debug.G_err_stage := 'Inside AP_Funds_Check';
11872: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 11896: pa_cc_utils.reset_curr_function;

11892:
11893: -- set the return status to success
11894: x_return_status := FND_API.G_RET_STS_SUCCESS;
11895:
11896: pa_cc_utils.reset_curr_function;
11897:
11898: EXCEPTION
11899: --Bug 2672772: Handle the NDF exception,
11900: --raise the error here but not in tr_import_funds_check

Line 11911: pa_cc_utils.reset_curr_function;

11907: IF PG_DEBUG = 'Y' THEN
11908: log_message('log_message: ' || sqlerrm||' Returning from ap funds check');
11909: END IF;
11910: x_return_status := fnd_api.g_ret_sts_unexp_error;
11911: pa_cc_utils.reset_curr_function;
11912: RAISE;
11913: END ap_cash_based_funds_check;
11914:
11915: -- R12 funds management Uptake : New procedure fired in non-autonomous mode to read