DBA Data[Home] [Help]

APPS.PA_TRX_IMPORT dependencies on PA_CC_UTILS

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

539: PROCEDURE GetTrxSrcInfo ( X_trx_src IN VARCHAR2 )
540: IS
541: BEGIN
542:
543: pa_cc_utils.set_curr_function('GetTrxSrcInfo');
544:
545: -- Modifying this query to check for transaction_source rather than
546: -- user transaction source
547: -- 697638 Bug fix

Line 597: pa_cc_utils.reset_curr_function;

593: pa_transaction_sources ts
594: WHERE
595: ts.transaction_source = X_trx_src;
596:
597: pa_cc_utils.reset_curr_function;
598: EXCEPTION
599: WHEN NO_DATA_FOUND THEN
600: G_trx_link := NULL;
601: pa_cc_utils.reset_curr_function;

Line 601: pa_cc_utils.reset_curr_function;

597: pa_cc_utils.reset_curr_function;
598: EXCEPTION
599: WHEN NO_DATA_FOUND THEN
600: G_trx_link := NULL;
601: pa_cc_utils.reset_curr_function;
602: END GetTrxSrcInfo;
603:
604: -- Get implementation currency information
605: --

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

605: --
606: PROCEDURE GetImpCurrInfo
607: IS
608: BEGIN
609: pa_cc_utils.set_curr_function('GetImpCurrInfo');
610: IF PG_DEBUG = 'Y' THEN
611: pa_debug.G_err_Stage := 'call to pa_multi_currency.init';
612: log_message('log_message: ' || pa_debug.G_err_Stage);
613: END IF;

Line 625: pa_debug.G_err_Stage := 'Before calling pa_cc_utils.reset_curr_function';

621: G_accounting_currency_code := pa_multi_currency.G_accounting_currency_code;
622: G_default_rate_type := pa_multi_currency.G_rate_type;
623:
624: IF PG_DEBUG = 'Y' THEN
625: pa_debug.G_err_Stage := 'Before calling pa_cc_utils.reset_curr_function';
626: log_message('log_message: ' || pa_debug.G_err_Stage);
627: END IF;
628:
629: pa_cc_utils.reset_curr_function;

Line 629: pa_cc_utils.reset_curr_function;

625: pa_debug.G_err_Stage := 'Before calling pa_cc_utils.reset_curr_function';
626: log_message('log_message: ' || pa_debug.G_err_Stage);
627: END IF;
628:
629: pa_cc_utils.reset_curr_function;
630:
631: IF PG_DEBUG = 'Y' THEN
632: pa_debug.G_err_Stage := 'After calling pa_cc_utils.reset_curr_function';
633: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 632: pa_debug.G_err_Stage := 'After calling pa_cc_utils.reset_curr_function';

628:
629: pa_cc_utils.reset_curr_function;
630:
631: IF PG_DEBUG = 'Y' THEN
632: pa_debug.G_err_Stage := 'After calling pa_cc_utils.reset_curr_function';
633: log_message('log_message: ' || pa_debug.G_err_Stage);
634: END IF;
635:
636: EXCEPTION

Line 644: pa_cc_utils.reset_curr_function;

640: log_message('log_message: ' || pa_debug.G_err_Stage);
641: END IF;
642: G_default_rate_type := NULL;
643: G_accounting_currency_code := NULL;
644: pa_cc_utils.reset_curr_function;
645: END GetImpCurrInfo;
646:
647: --
648: -- Get project/task currency information

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

655: X_projfunc_cost_rate_type IN OUT NOCOPY VARCHAR2)
656: IS
657: BEGIN
658:
659: pa_cc_utils.set_curr_function('GetProjCurrInfo');
660: IF PG_DEBUG = 'Y' THEN
661: log_message('log_message: In GetProjCurrInfo api');
662: pa_debug.G_err_stage := 'Calling get_project_rate_type';
663: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 724: pa_cc_utils.reset_curr_function;

720: END IF;
721:
722: End If;
723:
724: pa_cc_utils.reset_curr_function;
725:
726: END GetProjCurrInfo;
727:
728: --

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

739: IS
740:
741: BEGIN
742:
743: pa_cc_utils.set_curr_function('DefaultCurrAttributes');
744:
745: IF ( X_acct_currency_code = X_project_currency_code) THEN
746:
747: X_acct_rate_type := nvl(X_project_rate_type,X_acct_rate_type);

Line 757: pa_cc_utils.reset_curr_function;

753: X_project_exchange_rate := nvl(X_project_exchange_rate, X_acct_exchange_rate) ;
754:
755:
756: END IF;
757: pa_cc_utils.reset_curr_function;
758:
759: END DefaultCurrAttributes;
760:
761: /* PA-I Changes

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

769: PROCEDURE GetVendorId(P_vendor_number IN VARCHAR2)
770: IS
771: BEGIN
772:
773: pa_cc_utils.set_curr_function('GetVendorId');
774:
775: IF PG_DEBUG = 'Y' THEN
776: pa_debug.G_err_stage := 'In GetVendorId api with Vendor Number as an input';
777: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 790: pa_cc_utils.reset_curr_function;

786: pa_debug.G_err_stage := 'G_vendor_id='||G_vendor_id;
787: log_message('log_message: ' || pa_debug.G_err_Stage);
788: END IF;
789:
790: pa_cc_utils.reset_curr_function;
791:
792: EXCEPTION WHEN others THEN
793: G_vendor_id := NULL;
794: pa_cc_utils.reset_curr_function;

Line 794: pa_cc_utils.reset_curr_function;

790: pa_cc_utils.reset_curr_function;
791:
792: EXCEPTION WHEN others THEN
793: G_vendor_id := NULL;
794: pa_cc_utils.reset_curr_function;
795: END GetVendorId;
796:
797: --
798: --BUG : 4696351 PJ.R12:DI4:APLINES: VENDOR INFORMATION NOT IMPORTED DURING TRANSACTION IMPORT

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

800: PROCEDURE GetVendorID ( p_person_id IN NUMBER )
801: IS
802: BEGIN
803:
804: pa_cc_utils.set_curr_function('GetVendorId for an employee (person_id):'||p_person_id);
805:
806: IF PG_DEBUG = 'Y' THEN
807: pa_debug.G_err_stage := 'In GetVendorId api with person id as an input';
808: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 822: pa_cc_utils.reset_curr_function;

818: pa_debug.G_err_stage := 'G_vendor_id='||g_vendor_id;
819: log_message('log_message: ' || pa_debug.G_err_Stage);
820: END IF;
821:
822: pa_cc_utils.reset_curr_function;
823:
824: EXCEPTION WHEN others THEN
825: G_vendor_id := NULL;
826: pa_cc_utils.reset_curr_function;

Line 826: pa_cc_utils.reset_curr_function;

822: pa_cc_utils.reset_curr_function;
823:
824: EXCEPTION WHEN others THEN
825: G_vendor_id := NULL;
826: pa_cc_utils.reset_curr_function;
827: END GetVendorId ;
828:
829: PROCEDURE GetEtypeInfo( X_etype IN VARCHAR2
830: , X_date IN DATE )

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

830: , X_date IN DATE )
831: IS
832: BEGIN
833:
834: pa_cc_utils.set_curr_function('GetEtypeInfo');
835:
836: IF PG_DEBUG = 'Y' THEN
837: pa_debug.G_err_stage := 'In GetEtypeInfo api';
838: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 885: pa_cc_utils.reset_curr_function;

881: G_ETypeInfoDate := X_date;
882:
883: End If;
884:
885: pa_cc_utils.reset_curr_function;
886:
887: EXCEPTION
888: WHEN NO_DATA_FOUND THEN
889: /* G_etype_link := NULL; */ /* Commented for Bug#2726242 */

Line 898: pa_cc_utils.reset_curr_function;

894:
895: G_ETypeInfoEtype := X_etype;
896: G_ETypeInfoDate := X_date;
897:
898: pa_cc_utils.reset_curr_function;
899:
900: END GetEtypeInfo;
901:
902: PROCEDURE GetEtypeEclassInfo( X_etype IN VARCHAR2

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

903: , X_system_linkage IN VARCHAR2 )
904: IS
905: BEGIN
906:
907: pa_cc_utils.set_curr_function('GetEtypeEclassInfo');
908:
909: If (G_EClassInfoEtype = X_etype AND G_EClassInfoSysLink = X_system_linkage) then
910:
911: IF PG_DEBUG = 'Y' THEN

Line 949: pa_cc_utils.reset_curr_function;

945: G_EClassInfoSysLink := X_system_linkage;
946:
947: End If;
948:
949: pa_cc_utils.reset_curr_function;
950:
951: EXCEPTION
952: WHEN NO_DATA_FOUND THEN
953: G_etype_link := NULL;

Line 960: pa_cc_utils.reset_curr_function;

956: G_etype_active := FALSE ;
957: G_EClassInfoEtype := X_etype;
958: G_EClassInfoSysLink := X_system_linkage;
959:
960: pa_cc_utils.reset_curr_function;
961:
962: END GetEtypeEclassInfo;
963:
964: PROCEDURE GetNlrInfo( X_nlr IN VARCHAR2

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

965: , X_nlro_id IN NUMBER )
966: IS
967: BEGIN
968:
969: pa_cc_utils.set_curr_function('GetNlrInfo');
970: IF PG_DEBUG = 'Y' THEN
971: pa_debug.G_err_Stage := 'select from pa_non_labor_resources';
972: log_message('log_message: ' || pa_debug.G_err_Stage);
973: END IF;

Line 1044: pa_cc_utils.reset_curr_function;

1040: G_NlrInfoNlroId := X_nlro_id;
1041: G_NlrInfoNlr := X_nlr;
1042: END;
1043:
1044: pa_cc_utils.reset_curr_function;
1045: EXCEPTION
1046: WHEN NO_DATA_FOUND THEN
1047: G_nlr_start := NULL;
1048: G_nlr_end := NULL;

Line 1052: pa_cc_utils.reset_curr_function;

1048: G_nlr_end := NULL;
1049: G_nlr_etype := NULL;
1050: G_nlro_start := NULL;
1051: G_nlro_end := NULL;
1052: pa_cc_utils.reset_curr_function;
1053:
1054: END GetNlrInfo;
1055:
1056: PROCEDURE CheckDupItem( X_trx_source IN VARCHAR2

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

1059: IS
1060: dummy NUMBER;
1061: BEGIN
1062:
1063: pa_cc_utils.set_curr_function('CheckDupItem');
1064:
1065: IF PG_DEBUG = 'Y' THEN
1066: pa_debug.G_err_stage := 'In CheckDupItem api';
1067: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 1090: pa_cc_utils.reset_curr_function;

1086: END;
1087:
1088: IF ( dummy = 1 ) THEN
1089: X_status := 'DUPLICATE_ITEM';
1090: pa_cc_utils.reset_curr_function;
1091: RETURN;
1092:
1093: ELSIF ( i > 0 ) THEN
1094:

Line 1098: pa_cc_utils.reset_curr_function;

1094:
1095: FOR j IN 1..i LOOP
1096: IF ( pa_transactions.TrxRefTab(j) = X_trx_ref ) THEN
1097: X_status := 'DUPLICATE_ITEM';
1098: pa_cc_utils.reset_curr_function;
1099: RETURN;
1100: END IF;
1101: END LOOP;
1102:

Line 1107: pa_cc_utils.reset_curr_function;

1103: ELSE
1104: X_status := NULL;
1105:
1106: END IF;
1107: pa_cc_utils.reset_curr_function;
1108:
1109: END CheckDupItem;
1110:
1111: PROCEDURE CheckDupAdjItem( X_adj_item_id IN NUMBER

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

1112: , X_status OUT NOCOPY VARCHAR2 )
1113: IS
1114: BEGIN
1115:
1116: pa_cc_utils.set_curr_function('CheckDupAdjItem');
1117:
1118: IF PG_DEBUG = 'Y' THEN
1119: pa_debug.G_err_stage := 'In CheckDupAdjItem api';
1120: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 1128: pa_cc_utils.reset_curr_function;

1124:
1125: FOR j IN 1..i LOOP
1126: IF ( pa_transactions.AdjEiTab(j) = X_adj_item_id) THEN
1127: X_status := 'DUPLICATE_ADJUST_ITEM';
1128: pa_cc_utils.reset_curr_function;
1129: RETURN;
1130: END IF;
1131: END LOOP;
1132:

Line 1137: pa_cc_utils.reset_curr_function;

1133: ELSE
1134: X_status := NULL;
1135:
1136: END IF;
1137: pa_cc_utils.reset_curr_function;
1138: END CheckDupAdjItem;
1139:
1140: -- SST Change: changed procedure from getprojbcostflag
1141: -- to getprojtypeinfo because we're not only retrieving

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

1150: X_Total_Burden_Flag OUT NOCOPY VARCHAR2)
1151:
1152: IS
1153: BEGIN
1154: pa_cc_utils.set_curr_function('GetProjTypeInfo');
1155:
1156: If (X_Project_id = G_PrjInfoPrjId) Then
1157:
1158: IF PG_DEBUG = 'Y' THEN

Line 1195: pa_cc_utils.reset_curr_function;

1191: G_PrjInfoTotBdFlag := X_Total_Burden_Flag;
1192:
1193: End If;
1194:
1195: pa_cc_utils.reset_curr_function;
1196:
1197: EXCEPTION
1198: WHEN NO_DATA_FOUND THEN
1199: X_Proj_bcost_flag := NULL ;

Line 1209: pa_cc_utils.reset_curr_function;

1205: G_PrjInfoTypeClass := X_proj_type_class;
1206: G_PrjInfoBdDisplay := X_burden_amt_display_method;
1207: G_PrjInfoTotBdFlag := X_Total_Burden_Flag;
1208:
1209: pa_cc_utils.reset_curr_function;
1210: END GetProjTypeInfo ;
1211:
1212: FUNCTION CheckCCID ( ccid number ) RETURN NUMBER
1213: IS

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

1212: FUNCTION CheckCCID ( ccid number ) RETURN NUMBER
1213: IS
1214: X_ccid number(15) ;
1215: BEGIN
1216: -- pa_cc_utils.set_curr_function('CheckCCID');
1217: -- not setting error stack because this procedure
1218: -- will be violating its associated pragma.
1219: IF PG_DEBUG = 'Y' THEN
1220: pa_debug.G_err_stage := 'Inside CheckCCID api';

Line 1251: --pa_cc_utils.reset_curr_function;

1247: G_PrevRetVal := 1;
1248:
1249: End If;
1250:
1251: --pa_cc_utils.reset_curr_function;
1252: return(X_ccid) ;
1253: EXCEPTION
1254: WHEN NO_DATA_FOUND THEN
1255: G_PrevRetVal := NULL;

Line 1257: --pa_cc_utils.reset_curr_function;

1253: EXCEPTION
1254: WHEN NO_DATA_FOUND THEN
1255: G_PrevRetVal := NULL;
1256: G_PrevCCID := ccid;
1257: --pa_cc_utils.reset_curr_function;
1258: RETURN (NULL) ;
1259: END CheckCCID ;
1260:
1261: -- =============================================================

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

1366: END check_active_employee;
1367:
1368: BEGIN
1369:
1370: pa_cc_utils.set_curr_function('validate_exp_date');
1371:
1372: IF x_err_msg_cd is not NULL THEN
1373: x_status := FND_API.G_RET_STS_ERROR ;
1374: RETURN ;

Line 1481: pa_cc_utils.reset_curr_function;

1477: x_status := FND_API.G_RET_STS_ERROR ;
1478: RETURN ;
1479: End if;*/
1480:
1481: pa_cc_utils.reset_curr_function;
1482:
1483:
1484: END VALIDATE_EXP_DATE ;
1485:

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

1829: /** *
1830: *** Validate Items Main processing begins here
1831: **/
1832: BEGIN
1833: pa_cc_utils.set_curr_function('ValidateItem');
1834:
1835: IF PG_DEBUG = 'Y' THEN
1836: pa_debug.G_err_stage := 'Inside ValidateItem';
1837: log_message('log_message: ' || pa_debug.G_err_stage);

Line 1868: pa_cc_utils.reset_curr_function;

1864: IF (SIGN(x_denom_raw_cost)=-1 and X_accrual_flag='Y' AND l_all_neg_acc = 'N' ) THEN -- Bug 16451280
1865: pa_debug.G_err_Stage := 'Negative Accrual Transaction';
1866: log_message('log_message: ' || pa_debug.G_err_Stage);
1867: X_status := 'NEG_ACCRUAL_TRANS';
1868: pa_cc_utils.reset_curr_function;
1869: RETURN;
1870: END IF;
1871: /*Bug 8208577 End*/
1872:

Line 1951: pa_cc_utils.reset_curr_function;

1947: pa_debug.G_err_Stage := 'Invalid Trx Source';
1948: log_message('log_message: ' || pa_debug.G_err_Stage);
1949: END IF;
1950: X_status := 'INVALID_TRX_SOURCE';
1951: pa_cc_utils.reset_curr_function;
1952: RETURN;
1953: END IF;
1954:
1955: END IF;

Line 1969: pa_cc_utils.reset_curr_function;

1965: X_employee_number => X_enum,
1966: X_result => v_result,
1967: X_status => X_status);
1968: IF (v_result <> 0) THEN
1969: pa_cc_utils.reset_curr_function;
1970: RETURN;
1971: END IF;
1972: END IF;
1973:

Line 1980: pa_cc_utils.reset_curr_function;

1976: --
1977: IF ( trunc(X_ei_date) NOT BETWEEN trunc(G_trx_start)
1978: AND nvl(trunc(G_trx_end), trunc(X_ei_date))) THEN
1979: X_status := 'TRX_SOURCE_INACTIVE';
1980: pa_cc_utils.reset_curr_function;
1981: RETURN;
1982:
1983: END IF;
1984:

Line 1992: pa_cc_utils.reset_curr_function;

1988: -- employee number and organization name
1989: IF ( X_system_linkage NOT IN ('ST', 'OT','ER', 'VI') ) THEN
1990: if ( X_enum IS NULL AND X_ONAME is NULL ) THEN
1991: X_status := 'EMP_OR_ORG_MAND' ;
1992: pa_cc_utils.reset_curr_function;
1993: RETURN ;
1994: end if ;
1995: END IF ;
1996:

Line 2001: pa_cc_utils.reset_curr_function;

1997: -- REL12 AP Lines uptake.
1998: -- Unaccounted Expense report transactions are not allowed.
1999: IF ( X_system_linkage = 'ER' and NVL(g_gl_accted_flag,'N') = 'N' ) then
2000: X_status := 'PA_ER_NOT_ACCOUNTED' ;
2001: pa_cc_utils.reset_curr_function;
2002: RETURN ;
2003: END IF ;
2004:
2005: -- ===========================================================================

Line 2015: pa_cc_utils.reset_curr_function;

2011: log_message('log_message: ' || pa_debug.G_err_Stage);
2012: END IF;
2013: IF (trunc( X_end_date) <> trunc(pa_utils.NewGetWeekEnding( X_end_date )) ) THEN
2014: X_status := 'INVALID_END_DATE';
2015: pa_cc_utils.reset_curr_function;
2016: RETURN;
2017:
2018: -- ===========================================================================
2019: -- Verify that the transaction item date is on or before the week ending

Line 2024: pa_cc_utils.reset_curr_function;

2020: -- date
2021: --
2022: ELSIF ( trunc(X_ei_date) > trunc(X_end_date) ) THEN /* Bug 4284192 */
2023: X_status := 'EI_DATE_AFTER_END_DATE';
2024: pa_cc_utils.reset_curr_function;
2025: RETURN;
2026: END IF; --PA-K Changes: Added 'EndIf' separating the date checks
2027: --from the person and org checks
2028:

Line 2075: pa_cc_utils.reset_curr_function;

2071: /* Start changes for bug#12646514 */
2072: -- X_status := 'NO_ASSIGNMENT';
2073: X_status := pa_utils.G_return_status;
2074: /* End changes for bug#12646514 */
2075: pa_cc_utils.reset_curr_function;
2076: RETURN;
2077: END IF;
2078:
2079: -- 10253400: Payroll integration enhancement for 12.2..end

Line 2123: pa_cc_utils.reset_curr_function;

2119:
2120:
2121: IF (G_org_id IS NULL) THEN
2122: X_status := 'PA_EXP_ORG_INVALID';
2123: pa_cc_utils.reset_curr_function;
2124: RETURN;
2125: END IF;
2126:
2127: /* PA-K Changes: Commenting the CheckExporg, moved the check to one place below*/

Line 2152: pa_cc_utils.reset_curr_function;

2148: X_Ei_Date );
2149:
2150: IF ( pa_utils2.G_return_status IS NOT NULL ) THEN
2151: X_status := pa_utils2.G_return_status ;
2152: pa_cc_utils.reset_curr_function;
2153: RETURN;
2154: ELSE
2155: last_empno := X_enum;
2156:

Line 2167: pa_cc_utils.reset_curr_function;

2163:
2164: /*Bug 2655157, Commented this code see below for actual code
2165: IF ( X_oname IS NULL ) THEN
2166: X_status := 'PA_EXP_ORG_MANDATORY';
2167: pa_cc_utils.reset_curr_function;
2168: RETURN;
2169: END IF;
2170:
2171: IF PG_DEBUG = 'Y' THEN

Line 2180: pa_cc_utils.reset_curr_function;

2176: G_org_id := pa_utils.GetOrgId(X_oname);
2177:
2178: IF (G_org_id IS NULL) THEN
2179: X_status := 'PA_EXP_ORG_INVALID';
2180: pa_cc_utils.reset_curr_function;
2181: RETURN;
2182: END IF;
2183: */
2184: -- Bug 2655157 : Below code added for the error being raised in

Line 2196: pa_cc_utils.reset_curr_function;

2192: G_org_id := pa_utils.GetEmpOrgId(G_person_id, X_Ei_Date);
2193:
2194: IF ( G_org_id IS NULL ) THEN
2195: X_status := 'PA_EXP_ORG_MANDATORY';
2196: pa_cc_utils.reset_curr_function;
2197: RETURN;
2198: END IF;
2199:
2200: ELSE

Line 2224: pa_cc_utils.reset_curr_function;

2220:
2221:
2222: IF (G_org_id IS NULL) THEN
2223: X_status := 'PA_EXP_ORG_INVALID';
2224: pa_cc_utils.reset_curr_function;
2225: RETURN;
2226: END IF;
2227:
2228: END IF;

Line 2279: -- pa_cc_utils.reset_curr_function;

2275: -- X_status := 'NO_ASSIGNMENT';
2276: -- ELSE
2277: -- X_status := 'NO_PO_ASSIGNMENT';
2278: -- END IF;
2279: -- pa_cc_utils.reset_curr_function;
2280: -- RETURN;
2281:
2282: /*Begin for bug 4531168*/
2283: IF X_trx_src in ('OLD', 'GOLD', 'GOLDE') and p_po_number is null THEN

Line 2295: pa_cc_utils.reset_curr_function;

2291: and psl.SUMMARY_LINE_ID = X_trx_ref;
2292: exception
2293: when OTHERS then
2294: X_status := 'NO_ASSIGNMENT';
2295: pa_cc_utils.reset_curr_function;
2296: RETURN;
2297: end;
2298: ELSIF p_po_number is null then
2299:

Line 2305: pa_cc_utils.reset_curr_function;

2301: X_status := pa_utils.G_return_status;
2302: -- X_status := 'NO_ASSIGNMENT';
2303: /* End changes for bug#12646514 */
2304:
2305: pa_cc_utils.reset_curr_function;
2306: RETURN;
2307: ELSE
2308: X_status := 'NO_PO_ASSIGNMENT';
2309: pa_cc_utils.reset_curr_function;

Line 2309: pa_cc_utils.reset_curr_function;

2305: pa_cc_utils.reset_curr_function;
2306: RETURN;
2307: ELSE
2308: X_status := 'NO_PO_ASSIGNMENT';
2309: pa_cc_utils.reset_curr_function;
2310: RETURN;
2311: END IF;
2312: /* End for bug 4531168 */
2313:

Line 2353: pa_cc_utils.reset_curr_function;

2349: -- X_status := 'NO_ASSIGNMENT';
2350: X_status := pa_utils.G_return_status;
2351: /* End changes for bug#12646514 */
2352:
2353: pa_cc_utils.reset_curr_function;
2354: RETURN;
2355: END IF;
2356: END IF;
2357:

Line 2381: -- pa_cc_utils.reset_curr_function;

2377: -- X_status := 'NO_ASSIGNMENT';
2378: -- ELSE
2379: -- X_status := 'NO_PO_ASSIGNMENT';
2380: -- END IF;
2381: -- pa_cc_utils.reset_curr_function;
2382: -- RETURN;
2383:
2384: /*Begin for bug 4531168*/
2385: IF X_trx_src in ('OLD', 'GOLD', 'GOLDE') and p_po_number is null THEN

Line 2397: pa_cc_utils.reset_curr_function;

2393: and psl.SUMMARY_LINE_ID = X_trx_ref;
2394: exception
2395: when OTHERS then
2396: X_status := 'NO_ASSIGNMENT';
2397: pa_cc_utils.reset_curr_function;
2398: RETURN;
2399: end;
2400: ELSIF p_po_number is null then
2401: X_status := 'NO_ASSIGNMENT';

Line 2402: pa_cc_utils.reset_curr_function;

2398: RETURN;
2399: end;
2400: ELSIF p_po_number is null then
2401: X_status := 'NO_ASSIGNMENT';
2402: pa_cc_utils.reset_curr_function;
2403: RETURN;
2404: ELSE
2405: X_status := 'NO_PO_ASSIGNMENT';
2406: pa_cc_utils.reset_curr_function;

Line 2406: pa_cc_utils.reset_curr_function;

2402: pa_cc_utils.reset_curr_function;
2403: RETURN;
2404: ELSE
2405: X_status := 'NO_PO_ASSIGNMENT';
2406: pa_cc_utils.reset_curr_function;
2407: RETURN;
2408: END IF;
2409: /* End for bug 4531168 */
2410:

Line 2447: pa_cc_utils.reset_curr_function;

2443:
2444:
2445: IF ( G_org_id IS NULL ) THEN
2446: X_status := 'INVALID_ORGANIZATION';
2447: pa_cc_utils.reset_curr_function;
2448: RETURN;
2449: END IF;
2450:
2451: /* PA-K Changes: Commenting the CheckExporg, moved the check to one place below */

Line 2475: pa_cc_utils.reset_curr_function;

2471: log_message('log_message: ' || 'G_org_id = ' || G_org_id);
2472: END IF;
2473: IF pa_utils2.CheckExporg(G_org_id,X_ei_date) = 'N' then
2474: X_status := 'PA_EXP_ORG_NOT_ACTIVE';
2475: pa_cc_utils.reset_curr_function;
2476: RETURN;
2477: END IF;
2478: END IF;
2479: END IF; /* Added for Bug # 2170237 */

Line 2511: pa_cc_utils.reset_curr_function;

2507:
2508: if G_location_id is null then
2509: -- put a message here and raise;
2510: X_status := 'PA_INVALID_LOCATION';
2511: pa_cc_utils.reset_curr_function;
2512: RETURN;
2513: end if;
2514: END IF;
2515:

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

2531:
2532: --Start of changes for bug 3010848
2533: --G_override_to_org_id := pa_utils.GetOrgId(X_override_to_oname);
2534:
2535: pa_cc_utils.log_message('X_override_to_oname = ' || X_override_to_oname
2536: || ' G_Business_Group_Id = ' || G_Business_Group_Id);
2537:
2538:
2539: pa_utils.GetOrgnId(X_org_name => X_override_to_oname,

Line 2552: pa_cc_utils.reset_curr_function;

2548: --End of changes for bug 3010848
2549:
2550: IF (G_override_to_org_id IS NULL) THEN
2551: X_status := 'PA_OVERRIDE_ORG_INVALID';
2552: pa_cc_utils.reset_curr_function;
2553: RETURN;
2554: ELSIF pa_trx_import.g_skip_tc_flag <> 'Y' and PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date = 'Y' THEN /* Added for Bug # 2170237 */
2555: --Modified above condition for bug6931833
2556: IF pa_utils2.CheckExporg(G_override_to_org_id, X_ei_date) = 'N' THEN

Line 2558: pa_cc_utils.reset_curr_function;

2554: ELSIF pa_trx_import.g_skip_tc_flag <> 'Y' and PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date = 'Y' THEN /* Added for Bug # 2170237 */
2555: --Modified above condition for bug6931833
2556: IF pa_utils2.CheckExporg(G_override_to_org_id, X_ei_date) = 'N' THEN
2557: X_status := 'PA_OVERRIDE_ORG_NOT_ACTIVE';
2558: pa_cc_utils.reset_curr_function;
2559: RETURN;
2560: END IF;
2561: END IF; /* Added for Bug # 2170237 */
2562: ELSE

Line 2571: pa_cc_utils.reset_curr_function;

2567: -- X_override_to_oname IS NULL, check if G_org_id IS NULL.
2568: -- If G_org_id is also NULL, then return error
2569: IF (G_org_id IS NULL) THEN
2570: X_status := 'PA_EXP_ORG_NOT_SPECIFIED';
2571: pa_cc_utils.reset_curr_function;
2572: RETURN;
2573: END IF;
2574: END IF;
2575: END IF;

Line 2594: pa_cc_utils.reset_curr_function;

2590: GetVendorId(P_vendor_number => X_vendor_number);
2591:
2592: IF (G_vendor_id IS NULL) THEN
2593: X_status := 'PA_SUPPLIER_NUM_INVALID';
2594: pa_cc_utils.reset_curr_function;
2595: RETURN;
2596: END IF;
2597:
2598: G_previous_vendor_number := X_vendor_number;

Line 2657: pa_cc_utils.reset_curr_function;

2653: GetEtypeEclassInfo(X_etype, X_system_linkage) ;
2654:
2655: IF ( G_etype_link is NULL ) then
2656: X_status := 'INVALID_ETYPE_SYSLINK' ;
2657: pa_cc_utils.reset_curr_function;
2658: RETURN ;
2659: END IF ;
2660:
2661: IF ( X_ei_date NOT BETWEEN G_etec_start

Line 2664: pa_cc_utils.reset_curr_function;

2660:
2661: IF ( X_ei_date NOT BETWEEN G_etec_start
2662: AND nvl( G_etec_end, X_ei_date ) ) THEN
2663: X_status := 'ETYPE_SLINK_INACTIVE';
2664: pa_cc_utils.reset_curr_function;
2665: RETURN;
2666: END IF;
2667:
2668: -- Check pa_expenditure_types table for for existence and activeness of

Line 2678: pa_cc_utils.reset_curr_function;

2674: GetEtypeInfo( X_etype, X_ei_date );
2675:
2676: IF ( NOT G_etype_active ) THEN
2677: X_status := 'INVALID_EXP_TYPE';
2678: pa_cc_utils.reset_curr_function;
2679: RETURN;
2680: ELSE
2681: last_etype := x_etype;
2682: END IF;

Line 2695: pa_cc_utils.reset_curr_function;

2691:
2692: IF ( X_ei_date NOT BETWEEN G_etype_start
2693: AND nvl( G_etype_end, X_ei_date ) ) THEN
2694: X_status := 'EXP_TYPE_INACTIVE';
2695: pa_cc_utils.reset_curr_function;
2696: RETURN;
2697: END IF;
2698:
2699: ELSE --Calling module = PAAPIMP

Line 2803: pa_cc_utils.reset_curr_function;

2799: END IF;
2800:
2801: If (G_Org_Id is NULL or G_Job_Id is NULL) Then
2802: X_status := 'NO_ASSIGNMENT';
2803: pa_cc_utils.reset_curr_function;
2804: RETURN;
2805: End If;
2806:
2807: End If;

Line 2817: pa_cc_utils.reset_curr_function;

2813: pa_debug.G_err_stage := 'Project Id is null';
2814: log_message('log_message: ' || pa_debug.G_err_stage);
2815: END IF;
2816: X_status := 'INVALID_PROJECT';
2817: pa_cc_utils.reset_curr_function;
2818: RETURN;
2819: ELSE
2820: IF PG_DEBUG = 'Y' THEN
2821: pa_debug.G_err_stage := 'Calling GetProjTypeInfo';

Line 2839: pa_cc_utils.reset_curr_function;

2835: log_message('log_message: ' || pa_debug.G_err_stage);
2836: END IF;
2837:
2838: X_status := 'INVALID_PROJ_TYPE' ;
2839: pa_cc_utils.reset_curr_function;
2840: RETURN ;
2841: END IF ;
2842:
2843: /* PA-K Changes: Moved G_burden_amt_display_method to GetProjTypeInfo */

Line 2882: pa_cc_utils.reset_curr_function;

2878: log_message('log_message: ' || pa_debug.G_err_stage);
2879: END IF;
2880:
2881: X_status := 'PA_NEW_TXNS_NOT_ALLOWED';
2882: pa_cc_utils.reset_curr_function;
2883: RETURN;
2884: END IF;
2885: */
2886:

Line 2901: pa_cc_utils.reset_curr_function;

2897: END IF;
2898:
2899: If not pa_utils.IsCrossChargeable(G_Project_Id) then
2900: X_Status := 'PA_PROJECT_NOT_VALID' ;
2901: pa_cc_utils.reset_curr_function;
2902: return ;
2903: End If ;
2904:
2905: End If ;

Line 2916: pa_cc_utils.reset_curr_function;

2912: log_message('log_message: ' || pa_debug.G_err_stage);
2913: END IF;
2914:
2915: X_status := 'INVALID_TASK';
2916: pa_cc_utils.reset_curr_function;
2917: RETURN;
2918: ELSE
2919: IF PG_DEBUG = 'Y' THEN
2920: pa_debug.G_err_stage := 'Calling pa_utils2.GetLaborCostMultiplier';

Line 2962: pa_cc_utils.reset_curr_function;

2958: AND agreement_num = l_agreement_number;
2959: exception
2960: WHEN NO_DATA_FOUND then
2961: X_status := 'INVALID_AGREEMENT_FR_CLNT_EXTN';
2962: pa_cc_utils.reset_curr_function;
2963: RETURN;
2964: end;
2965: p_agreement_number := l_agreement_number;
2966: p_agreement_id := l_agreement_id;

Line 2985: pa_cc_utils.reset_curr_function;

2981: END if;
2982: exception
2983: WHEN NO_DATA_FOUND then
2984: X_status := 'INVALID_AGREEMENT';
2985: pa_cc_utils.reset_curr_function;
2986: RETURN;
2987: end;
2988: IF p_agreement_id IS NULL or p_agreement_number IS NULL then
2989: X_status := 'INVALID_AGREEMENT';

Line 2990: pa_cc_utils.reset_curr_function;

2986: RETURN;
2987: end;
2988: IF p_agreement_id IS NULL or p_agreement_number IS NULL then
2989: X_status := 'INVALID_AGREEMENT';
2990: pa_cc_utils.reset_curr_function;
2991: RETURN;
2992: END if;
2993: else
2994: --Call default agreement derivation logic

Line 3040: pa_cc_utils.reset_curr_function;

3036:
3037: G_cbs_element_id := NULL;
3038:
3039: X_status := 'PA_CBS_INVALID_COST_CODE';
3040: pa_cc_utils.reset_curr_function;
3041: RETURN;
3042: ELSE
3043: IF PG_DEBUG = 'Y' THEN
3044: pa_debug.G_err_stage := 'The cost code id is valid for the project/task combination';

Line 3074: pa_cc_utils.reset_curr_function;

3070:
3071: G_cbs_element_id := NULL;
3072:
3073: X_status := 'PA_CBS_INVALID_COST_CODE';
3074: pa_cc_utils.reset_curr_function;
3075: RETURN;
3076: ELSE
3077: IF PG_DEBUG = 'Y' THEN
3078: pa_debug.G_err_stage := 'Getting the cost code element id for the corresponding cost code name';

Line 3107: pa_cc_utils.reset_curr_function;

3103:
3104: G_cbs_element_id := NULL;
3105:
3106: X_status := 'PA_CBS_NO_COST_CODE';
3107: pa_cc_utils.reset_curr_function;
3108: RETURN;
3109:
3110: END IF;
3111: ELSE

Line 3127: pa_cc_utils.reset_curr_function;

3123: log_message('log_message: ' || pa_debug.G_err_Stage);
3124: END IF;
3125:
3126: X_status := 'PA_CBS_PROJ_NON_CBS';
3127: pa_cc_utils.reset_curr_function;
3128: RETURN;
3129: END IF;
3130:
3131: END IF;

Line 3170: pa_cc_utils.reset_curr_function;

3166: P_ei_date =>X_ei_date)= 'N')
3167: THEN
3168:
3169: X_status :='PA_INVALID_DENOM_CURRENCY';
3170: pa_cc_utils.reset_curr_function;
3171: RETURN;
3172:
3173: END IF; -- end invalid denom currency validation
3174:

Line 3200: pa_cc_utils.reset_curr_function;

3196: --
3197: IF ( X_project_currency_code IS NULL ) THEN
3198:
3199: X_status := 'PA_MISSING_PROJ_CURR';
3200: pa_cc_utils.reset_curr_function;
3201: RETURN;
3202:
3203: END IF;
3204:

Line 3211: pa_cc_utils.reset_curr_function;

3207: --
3208: IF ( X_projfunc_currency_code IS NULL ) THEN
3209:
3210: X_status := 'PA_MISSING_PRJFUNC_CURR';
3211: pa_cc_utils.reset_curr_function;
3212: RETURN;
3213:
3214: END IF;
3215: -- End PA-I Changes

Line 3249: pa_cc_utils.reset_curr_function;

3245:
3246: --Conversion rate type is invalid. Reject the txn
3247:
3248: X_status := 'PA_INVALID_ACCT_RATE_TYPE';
3249: pa_cc_utils.reset_curr_function;
3250: RETURN;
3251: END IF; --G_acct_rate_type is null
3252:
3253: ELSE -- X_acct_rate_type is null

Line 3280: pa_cc_utils.reset_curr_function;

3276: IF ( G_project_rate_type IS NULL ) THEN
3277:
3278: --Conversion rate type is invalid. Reject the txn
3279: X_status := 'PA_INVALID_PROJ_RATE_TYPE';
3280: pa_cc_utils.reset_curr_function;
3281: RETURN;
3282:
3283: END IF; --G_project_rate_type is null
3284:

Line 3313: pa_cc_utils.reset_curr_function;

3309:
3310: --Conversion rate type is invalid. Reject the txn
3311:
3312: X_status := 'PA_INVALID_PRJFUNC_CST_RT_TYP';
3313: pa_cc_utils.reset_curr_function;
3314: RETURN;
3315: END IF; --G_projfunc_cost_rate_type is null
3316:
3317: ELSE -- X_projfunc_cost_rate_type is null

Line 3340: pa_cc_utils.reset_curr_function;

3336: THEN
3337:
3338: -- If rate type 'User' is not allowed, reject the txn.
3339: X_status := 'PA_NO_ACCT_USER_RATE_TYPE';
3340: pa_cc_utils.reset_curr_function;
3341: RETURN;
3342:
3343: ELSE -- Conversion Rate type 'User' is allowed
3344:

Line 3350: pa_cc_utils.reset_curr_function;

3346: -- be provided.
3347:
3348: IF ( X_acct_exchange_rate IS NULL ) THEN
3349: X_status := 'PA_ACCT_USER_RATE_NOT_DEFINED';
3350: pa_cc_utils.reset_curr_function;
3351: RETURN;
3352: END IF;-- end X_acct_exchange_rate IS NULL
3353:
3354: END IF;-- End is_user_rate_type_allowed ='N'

Line 3373: pa_cc_utils.reset_curr_function;

3369: P_to_currency => X_project_currency_code,
3370: P_conversion_date => nvl(X_project_rate_date,sysdate))='N')
3371: THEN
3372: X_status := 'PA_NO_PROJ_USER_RATE_TYPE';
3373: pa_cc_utils.reset_curr_function;
3374: RETURN;
3375:
3376: ELSE --conversion rate type 'User' is allowed
3377:

Line 3380: pa_cc_utils.reset_curr_function;

3376: ELSE --conversion rate type 'User' is allowed
3377:
3378: IF ( X_project_exchange_rate IS NULL ) THEN
3379: X_status := 'PA_PROJ_USER_RATE_NOT_DEFINED';
3380: pa_cc_utils.reset_curr_function;
3381: RETURN;
3382: END IF;-- End X_project_exchange_rate IS NULL
3383:
3384: END IF;--End is_user_rate_type_allowed ='N'

Line 3405: pa_cc_utils.reset_curr_function;

3401: P_to_currency => X_projfunc_currency_code,
3402: P_conversion_date => nvl(X_projfunc_cost_rate_date,sysdate))='N')
3403: THEN
3404: X_status := 'PA_NO_PRJFUNC_CST_USER_RT_TYP';
3405: pa_cc_utils.reset_curr_function;
3406: RETURN;
3407:
3408: ELSE --conversion rate type 'User' is allowed
3409:

Line 3412: pa_cc_utils.reset_curr_function;

3408: ELSE --conversion rate type 'User' is allowed
3409:
3410: IF ( X_projfunc_cost_exchange_rate IS NULL ) THEN
3411: X_status := 'PA_PRJFUNC_CST_USER_RATE_NULL';
3412: pa_cc_utils.reset_curr_function;
3413: RETURN;
3414: END IF;-- End X_project_exchange_rate IS NULL
3415:
3416: END IF;--End is_user_rate_type_allowed ='N'

Line 3456: pa_cc_utils.reset_curr_function;

3452:
3453: IF ( X_denom_currency_code <> G_accounting_currency_code ) THEN
3454:
3455: X_status := 'PA_DENOM_ACCT_CURR_DIFF';
3456: pa_cc_utils.reset_curr_function;
3457: RETURN;
3458:
3459: END IF;
3460:

Line 3483: pa_cc_utils.reset_curr_function;

3479: P_ei_date => X_ei_date)= 'N')
3480: THEN
3481:
3482: X_status :='PA_INVALID_RECEIPT_CURRENCY';
3483: pa_cc_utils.reset_curr_function;
3484: RETURN;
3485:
3486: END IF; -- end invalid receipt currency validation
3487:

Line 3500: pa_cc_utils.reset_curr_function;

3496:
3497: IF ( nvl(X_receipt_currency_amount,0) = 0 ) THEN
3498:
3499: X_status := 'PA_MISSING_RECEIPT_AMOUNT';
3500: pa_cc_utils.reset_curr_function;
3501: RETURN;
3502:
3503: ELSE -- receipt amount is not zero
3504:

Line 3584: pa_cc_utils.reset_curr_function;

3580:
3581: IF ( X_acct_raw_cost IS NULL AND X_system_linkage <>'BTC' ) THEN
3582:
3583: X_status := 'PA_NO_ACCT_COST';
3584: pa_cc_utils.reset_curr_function;
3585: RETURN;
3586:
3587: END IF; -- acct_raw_cost is null
3588:

Line 3599: pa_cc_utils.reset_curr_function;

3595: ---------------------------------------------------------------------*/
3596: IF ( X_acct_rate_date IS NULL ) THEN
3597:
3598: X_status := 'PA_NO_ACCT_CURR_RATE_DATE';
3599: pa_cc_utils.reset_curr_function;
3600: RETURN;
3601:
3602: END IF; -- End X_acct_rate_date is NULL
3603:

Line 3607: pa_cc_utils.reset_curr_function;

3603:
3604: IF (G_acct_rate_type IS NULL) THEN
3605:
3606: X_status := 'PA_NO_ACCT_CURR_RATE_TYPE';
3607: pa_cc_utils.reset_curr_function;
3608: RETURN;
3609:
3610: END IF; -- End G_acct_rate_type IS NULL
3611:

Line 3616: pa_cc_utils.reset_curr_function;

3612: /* Starts - Commented for bug# 5890661
3613: IF ( X_acct_exchange_rate IS NULL) THEN
3614:
3615: X_status := 'PA_NO_ACCT_CURR_RATE';
3616: pa_cc_utils.reset_curr_function;
3617: RETURN;
3618:
3619: END IF; -- End X_acct_exchange_rate IS NULL
3620: Ends - commented for bug# 5890661 */

Line 3659: pa_cc_utils.reset_curr_function;

3655:
3656: IF ( l_status IS NOT NULL ) THEN
3657:
3658: X_status := l_status;
3659: pa_cc_utils.reset_curr_function;
3660: RETURN;
3661:
3662: END IF; -- End l_status IS NOT NULL
3663:

Line 3688: pa_cc_utils.reset_curr_function;

3684: IF abs(l_converted_amount - X_acct_raw_cost) >
3685: abs(nvl(X_acct_exchange_rounding_limit,0)) THEN
3686:
3687: X_status := 'PA_EXCEED_ROUND_LIMIT';
3688: pa_cc_utils.reset_curr_function;
3689: RETURN;
3690:
3691: END IF; -- end functional amount tolerance check
3692: ELSE

Line 3733: pa_cc_utils.reset_curr_function;

3729: pa_currency.round_trans_currency_amt1(X_denom_raw_cost,
3730: X_denom_currency_code )) THEN
3731:
3732: X_status := 'PA_INVALID_ACCT_DENOM_COST';
3733: pa_cc_utils.reset_curr_function;
3734: RETURN;
3735:
3736: END IF; -- end acct raw cost <> denom raw cost
3737:

Line 3804: pa_cc_utils.reset_curr_function;

3800:
3801:
3802: IF ( l_status IS NOT NULL ) THEN
3803: X_status := l_status;
3804: pa_cc_utils.reset_curr_function;
3805: RETURN;
3806:
3807: END IF; -- end l_status IS NOT NULL
3808:

Line 3829: pa_cc_utils.reset_curr_function;

3825: END IF;
3826:
3827: IF ( NOT pa_utils.DateInExpWeek( X_ei_date , X_end_date ) ) THEN
3828: X_status := 'ITEM_NOT_IN_WEEK';
3829: pa_cc_utils.reset_curr_function;
3830: RETURN;
3831: ELSIF ( X_enum IS NULL ) THEN
3832: X_status := 'EMP_MAND_FOR_TIME';
3833: pa_cc_utils.reset_curr_function;

Line 3833: pa_cc_utils.reset_curr_function;

3829: pa_cc_utils.reset_curr_function;
3830: RETURN;
3831: ELSIF ( X_enum IS NULL ) THEN
3832: X_status := 'EMP_MAND_FOR_TIME';
3833: pa_cc_utils.reset_curr_function;
3834: RETURN;
3835: END IF;
3836:
3837: -- ===========================================================================

Line 3847: pa_cc_utils.reset_curr_function;

3843: IF ( X_enum IS NULL and X_trx_src NOT IN ('AP EXPENSE', 'AP NRTAX','AP VARIANCE','AP ERV') ) THEN
3844: /* Bug2780387. Added 'AP NRTAX' to the NOT IN list */
3845: /* Bug 10405702 . Added 'AP VARIANCE','AP ERV' to the NOT IN list */
3846: X_status := 'EMP_MAND_FOR_ER';
3847: pa_cc_utils.reset_curr_function;
3848: RETURN;
3849: END IF;
3850:
3851: -- ===========================================================================

Line 3868: pa_cc_utils.reset_curr_function;

3864:
3865: ELSIF ( X_system_linkage = 'USG' ) THEN
3866: IF ( X_enum IS NULL AND X_oname IS NULL ) THEN
3867: X_status := 'EMP_OR_ORG_MAND_FOR_USAGES';
3868: pa_cc_utils.reset_curr_function;
3869: RETURN;
3870: ELSIF ( X_nlr IS NULL ) THEN
3871: X_status := 'NL_RSRC_MAND_FOR_USAGES';
3872: pa_cc_utils.reset_curr_function;

Line 3872: pa_cc_utils.reset_curr_function;

3868: pa_cc_utils.reset_curr_function;
3869: RETURN;
3870: ELSIF ( X_nlr IS NULL ) THEN
3871: X_status := 'NL_RSRC_MAND_FOR_USAGES';
3872: pa_cc_utils.reset_curr_function;
3873: RETURN;
3874: ELSIF ( X_nlro_name IS NULL ) THEN
3875: X_status := 'NL_RSRC_ORG_MAND_FOR_USAGES';
3876: pa_cc_utils.reset_curr_function;

Line 3876: pa_cc_utils.reset_curr_function;

3872: pa_cc_utils.reset_curr_function;
3873: RETURN;
3874: ELSIF ( X_nlro_name IS NULL ) THEN
3875: X_status := 'NL_RSRC_ORG_MAND_FOR_USAGES';
3876: pa_cc_utils.reset_curr_function;
3877: RETURN;
3878: END IF;
3879:
3880: --PA-K Changes: Use the ID if provided for predefined transaction sources.

Line 3907: pa_cc_utils.reset_curr_function;

3903: END IF;
3904:
3905: IF ( G_nlro_id IS NULL ) THEN
3906: X_status := 'INVALID_NL_RSRC_ORG';
3907: pa_cc_utils.reset_curr_function;
3908: RETURN;
3909: END IF;
3910:
3911: IF PG_DEBUG = 'Y' THEN

Line 3919: pa_cc_utils.reset_curr_function;

3915: GetNlrInfo( X_nlr, G_nlro_id );
3916:
3917: IF ( G_nlr_etype IS NULL ) THEN
3918: X_status := 'INVALID_NL_RSRC';
3919: pa_cc_utils.reset_curr_function;
3920: RETURN;
3921: ELSIF ( X_ei_date NOT BETWEEN G_nlr_start
3922: AND nvl( G_nlr_end, X_ei_date ) ) THEN
3923: X_status := 'NL_RSRC_INACTIVE';

Line 3924: pa_cc_utils.reset_curr_function;

3920: RETURN;
3921: ELSIF ( X_ei_date NOT BETWEEN G_nlr_start
3922: AND nvl( G_nlr_end, X_ei_date ) ) THEN
3923: X_status := 'NL_RSRC_INACTIVE';
3924: pa_cc_utils.reset_curr_function;
3925: RETURN;
3926: ELSIF ( G_nlro_start IS NULL ) THEN
3927: X_status := 'ORG_NOT_OWNER_OF_NL_RSRC';
3928: pa_cc_utils.reset_curr_function;

Line 3928: pa_cc_utils.reset_curr_function;

3924: pa_cc_utils.reset_curr_function;
3925: RETURN;
3926: ELSIF ( G_nlro_start IS NULL ) THEN
3927: X_status := 'ORG_NOT_OWNER_OF_NL_RSRC';
3928: pa_cc_utils.reset_curr_function;
3929: RETURN;
3930: ELSIF ( X_ei_date NOT BETWEEN G_nlro_start
3931: AND nvl( G_nlro_end, X_ei_date ) ) THEN
3932: X_status := 'ORG_NOT_OWNER_OF_NL_RSRC';

Line 3933: pa_cc_utils.reset_curr_function;

3929: RETURN;
3930: ELSIF ( X_ei_date NOT BETWEEN G_nlro_start
3931: AND nvl( G_nlro_end, X_ei_date ) ) THEN
3932: X_status := 'ORG_NOT_OWNER_OF_NL_RSRC';
3933: pa_cc_utils.reset_curr_function;
3934: RETURN;
3935: ELSIF ( G_nlr_etype <> X_etype ) THEN
3936: X_status := 'NL_EXP_TYPE_DIFF';
3937: pa_cc_utils.reset_curr_function;

Line 3937: pa_cc_utils.reset_curr_function;

3933: pa_cc_utils.reset_curr_function;
3934: RETURN;
3935: ELSIF ( G_nlr_etype <> X_etype ) THEN
3936: X_status := 'NL_EXP_TYPE_DIFF';
3937: pa_cc_utils.reset_curr_function;
3938: RETURN;
3939: END IF;
3940: END IF;
3941:

Line 3957: pa_cc_utils.reset_curr_function;

3953: /* Bug 2844973 Added g_trx_source <> 'ALLOCATIONS' condition */
3954:
3955: IF nvl(G_burdened_flag,'N') = 'N' and g_trx_source <> 'ALLOCATIONS' THEN
3956: X_status := 'TRXSRC_NOTALLOW_BURDEN' ;
3957: pa_cc_utils.reset_curr_function;
3958: RETURN ;
3959: END IF ;
3960:
3961: -- IF G_proj_bcost_flag = 'N' THEN

Line 3969: pa_cc_utils.reset_curr_function;

3965: -- Multi-Currency changes. Changed raw_cost to denom_raw_cost
3966: --
3967: IF nvl(X_qty,0) <> 0 OR nvl(X_denom_raw_cost,0) <> 0 THEN
3968: X_status := 'INVALID_BURDEN_TRANS' ;
3969: pa_cc_utils.reset_curr_function;
3970: RETURN ;
3971: END IF ;
3972:
3973: --

Line 3978: pa_cc_utils.reset_curr_function;

3974: -- Multi-Currency Changes. Changes burdened_cost to denom_burdened-cost
3975: --
3976: IF X_denom_burdened_cost IS NULL THEN
3977: X_status := 'INVALID_BURDEN_AMOUNT' ;
3978: pa_cc_utils.reset_curr_function;
3979: RETURN ;
3980: END IF ;
3981:
3982: ELSE -- X_system_linkage <> 'BTC'

Line 3986: pa_cc_utils.reset_curr_function;

3982: ELSE -- X_system_linkage <> 'BTC'
3983:
3984: IF ( G_trx_costed = 'Y' AND X_denom_raw_cost is NULL ) THEN
3985: X_status := 'NO_RAW_COST';
3986: pa_cc_utils.reset_curr_function;
3987: RETURN;
3988: END IF ;
3989:
3990: -- Get compiled multiplier and compile set id for transaction sources

Line 4037: pa_cc_utils.reset_curr_function;

4033: G_compiled_multiplier := 0;
4034: G_burden_compile_set_id := to_number(NULL);
4035: ELSE
4036: X_status := 'PA_ERR_IN_COST_PLUS';
4037: pa_cc_utils.reset_curr_function;
4038: RETURN;
4039: END IF;
4040: END IF;
4041:

Line 4066: pa_cc_utils.reset_curr_function;

4062: IF nvl(G_burdened_flag,'N') = 'Y' AND
4063: /* nvl( X_denom_burdened_cost ,0 ) = 0 THEN Commented for bug3144614 */
4064: X_denom_burdened_cost is NULL THEN /* Added for bug3144614 */
4065: X_status := 'INVALID_BURDEN_AMOUNT' ;
4066: pa_cc_utils.reset_curr_function;
4067: RETURN ;
4068: END IF; -- End
4069:
4070: /* Bug# 2063667 - If the transaction source is not Burdened and

Line 4078: pa_cc_utils.reset_curr_function;

4074: IF (nvl(G_burdened_flag,'N') = 'N' AND
4075: nvl(G_gl_accted_flag,'N') = 'N' AND
4076: X_denom_burdened_cost is NOT NULL) THEN
4077: X_status := 'TRXSRC_NOTALLOW_BURDEN';
4078: pa_cc_utils.reset_curr_function;
4079: RETURN ;
4080: END IF ;
4081:
4082: /* Bug# 2063667 - If the project type is not Burdened but burden

Line 4105: pa_cc_utils.reset_curr_function;

4101: IF nvl(G_proj_bcost_flag,'N') = 'N' THEN
4102: IF ((nvl(G_gl_accted_flag,'N') = 'Y' AND X_denom_burdened_cost <> X_denom_raw_cost)
4103: OR (nvl(G_gl_accted_flag,'N') = 'N' AND X_denom_burdened_cost is NOT NULL)) THEN
4104: X_status := 'PROJ_NOTALLOW_BURDEN' ;
4105: pa_cc_utils.reset_curr_function;
4106: RETURN ;
4107: END IF; * Accted Flag IF *
4108: END IF ;
4109: commented for Bug 3593432 End */

Line 4114: pa_cc_utils.reset_curr_function;

4110:
4111: /* Added for Bug 3593432 */
4112: IF nvl(G_proj_bcost_flag,'N') = 'N' AND X_denom_burdened_cost <> X_denom_raw_cost THEN
4113: X_status := 'PROJ_NOTALLOW_BURDEN' ;
4114: pa_cc_utils.reset_curr_function;
4115: RETURN ;
4116: END IF ;
4117: /* Added for Bug 3593432 End */
4118:

Line 4229: pa_cc_utils.reset_curr_function;

4225: G_burden_compile_set_id := to_number(NULL);
4226: elsif (l_status_num = 100) then
4227: if( l_stage = 100)then
4228: X_status := 'NO_IND_RATE_SCH_REVISION';
4229: pa_cc_utils.reset_curr_function;
4230: RETURN;
4231: elsif (l_stage = 200) then
4232: X_status := 'NO_COST_PLUS_STRUCTURE';
4233: pa_cc_utils.reset_curr_function;

Line 4233: pa_cc_utils.reset_curr_function;

4229: pa_cc_utils.reset_curr_function;
4230: RETURN;
4231: elsif (l_stage = 200) then
4232: X_status := 'NO_COST_PLUS_STRUCTURE';
4233: pa_cc_utils.reset_curr_function;
4234: RETURN;
4235: elsif (l_stage = 400) then
4236: X_status := 'NO_ACTIVE_COMPILED_SET';
4237: pa_cc_utils.reset_curr_function;

Line 4237: pa_cc_utils.reset_curr_function;

4233: pa_cc_utils.reset_curr_function;
4234: RETURN;
4235: elsif (l_stage = 400) then
4236: X_status := 'NO_ACTIVE_COMPILED_SET';
4237: pa_cc_utils.reset_curr_function;
4238: RETURN;
4239: end if;
4240: ELSE
4241: X_status := 'PA_ERR_IN_COST_PLUS';

Line 4242: pa_cc_utils.reset_curr_function;

4238: RETURN;
4239: end if;
4240: ELSE
4241: X_status := 'PA_ERR_IN_COST_PLUS';
4242: pa_cc_utils.reset_curr_function;
4243: RETURN;
4244: END IF;
4245: END IF;
4246: /* bug2837165 ends */

Line 4305: pa_cc_utils.reset_curr_function;

4301: X_status => l_status);
4302:
4303: IF ( l_status IS NOT NULL ) THEN
4304: X_status := l_status;
4305: pa_cc_utils.reset_curr_function;
4306: RETURN;
4307: END IF; -- End l_status IS NOT NULL
4308:
4309: END IF;-- End X_acct_burdened_cost = 0

Line 4338: pa_cc_utils.reset_curr_function;

4334: X_status => l_status);
4335:
4336: IF ( l_status IS NOT NULL ) THEN
4337: X_status := l_status;
4338: pa_cc_utils.reset_curr_function;
4339: RETURN;
4340: END IF; -- End l_status IS NOT NULL
4341:
4342: -- PA-I Changes : Added below for Project Functional Burdened cost calculation

Line 4368: pa_cc_utils.reset_curr_function;

4364: X_status => l_status);
4365:
4366: IF ( l_status IS NOT NULL ) THEN
4367: X_status := l_status;
4368: pa_cc_utils.reset_curr_function;
4369: RETURN;
4370: END IF; -- End l_status IS NOT NULL
4371:
4372: ELSE -- i.e denom_raw_cost <> 0

Line 4415: pa_cc_utils.reset_curr_function;

4411:
4412: IF Checkccid(X_drccid) IS NULL THEN
4413: pa_debug.G_err_stage := 'Calling Checkccid'; log_message(pa_debug.G_err_Stage);
4414: X_status := 'INVALID_DR_CCID' ;
4415: pa_cc_utils.reset_curr_function;
4416: RETURN ;
4417: END IF ;
4418: IF Checkccid(X_crccid) IS NULL THEN
4419: X_status := 'INVALID_CR_CCID' ;

Line 4420: pa_cc_utils.reset_curr_function;

4416: RETURN ;
4417: END IF ;
4418: IF Checkccid(X_crccid) IS NULL THEN
4419: X_status := 'INVALID_CR_CCID' ;
4420: pa_cc_utils.reset_curr_function;
4421: RETURN ;
4422: END IF ;
4423:
4424: --

Line 4434: pa_cc_utils.reset_curr_function;

4430: getvendorId(g_person_id) ;
4431:
4432: IF g_vendor_id is NULL then
4433: x_status := 'PA_INVALID_SUPPLIER_INFO';
4434: pa_cc_utils.reset_curr_function;
4435: RETURN;
4436: END IF ;
4437:
4438: END IF ;

Line 4456: pa_cc_utils.reset_curr_function;

4452: */
4453:
4454: IF X_gl_date IS NULL THEN
4455: X_status := 'INVALID_GL_DATE' ;
4456: pa_cc_utils.reset_curr_function;
4457: RETURN ;
4458: END IF ;
4459:
4460: /*********EPP Changes. This code is commented, is moved after IC check*********

Line 4485: pa_cc_utils.reset_curr_function;

4481: END IF;
4482: CheckDupItem ( X_trx_src, X_trx_ref, temp_status );
4483: IF ( temp_status IS NOT NULL ) THEN
4484: X_status := temp_status;
4485: pa_cc_utils.reset_curr_function;
4486: RETURN;
4487: END IF;
4488:
4489: END IF ;

Line 4537: pa_cc_utils.reset_curr_function;

4533:
4534: IF ( G_adj_item_id IS NULL ) THEN
4535:
4536: X_status := 'NO_MATCHING_ITEM';
4537: pa_cc_utils.reset_curr_function;
4538: RETURN;
4539:
4540: ELSIF ( G_adj_item_id IS NOT NULL) AND
4541: ( X_module = 'PAXTRTRX' OR X_module = 'PAAPIMP') THEN

Line 4581: pa_cc_utils.reset_curr_function;

4577: END IF;
4578:
4579: IF ( temp_status IS NOT NULL ) THEN
4580: X_status := temp_status;
4581: pa_cc_utils.reset_curr_function;
4582: RETURN;
4583: END IF;
4584:
4585: END IF;

Line 4673: pa_cc_utils.reset_curr_function;

4669: log_message('log_message: ' || SQLERRM,1);
4670: log_message('log_message: ' || pa_debug.G_err_stage,1);
4671: END IF;
4672: X_Status := 'PA_ERR_IN_CC_IDENT_API';
4673: pa_cc_utils.reset_curr_function;
4674: RETURN;
4675: END Cc_Identification_Api;
4676:
4677: -- if an error has occured in CC identification API, the

Line 4680: pa_cc_utils.reset_curr_function;

4676:
4677: -- if an error has occured in CC identification API, the
4678: -- X_Status variable will be populated with the error code.
4679: IF ( X_Status IS NOT NULL ) THEN
4680: pa_cc_utils.reset_curr_function;
4681: RETURN;
4682: ELSE -- i.e. successful completion
4683:
4684: IF ( G_CrossChargeCode = 'B' ) THEN

Line 4908: pa_cc_utils.reset_curr_function;

4904: log_message('log_message: ' || pa_debug.G_err_Stage);
4905: END IF;
4906:
4907: X_status := 'INVALID_PA_DATE' ;
4908: pa_cc_utils.reset_curr_function;
4909: RETURN ;
4910:
4911: END IF ;
4912:

Line 4928: pa_cc_utils.reset_curr_function;

4924: log_message('log_message: ' || pa_debug.G_err_Stage);
4925: END IF;
4926:
4927: X_status := 'INVALID_RECVR_PA_DATE' ;
4928: pa_cc_utils.reset_curr_function;
4929: RETURN ;
4930:
4931: END IF ;
4932:

Line 4941: pa_cc_utils.reset_curr_function;

4937: log_message('log_message: ' || pa_debug.G_err_Stage);
4938: END IF;
4939:
4940: X_status := 'INVALID_RECVR_GL_DATE' ;
4941: pa_cc_utils.reset_curr_function;
4942: RETURN ;
4943:
4944: END IF ;
4945:

Line 5016: pa_cc_utils.reset_curr_function;

5012: IF PG_DEBUG = 'Y' THEN
5013: pa_debug.G_err_stage := 'Error returned for accrual date derivation = '||x_status;
5014: log_message('log_message: ' || pa_debug.G_err_Stage);
5015: END IF;
5016: pa_cc_utils.reset_curr_function;
5017: RETURN;
5018: end if;
5019:
5020: --We copy the original item's accrual date for provider and

Line 5077: pa_cc_utils.reset_curr_function;

5073: IF PG_DEBUG = 'Y' THEN
5074: pa_debug.G_err_stage := 'Error returned for reversal line accrual date derivation = '||x_status;
5075: log_message('log_message: ' || pa_debug.G_err_Stage);
5076: END IF;
5077: pa_cc_utils.reset_curr_function;
5078: RETURN;
5079: END IF;
5080:
5081: END IF; -- Period_End = Y accrual txn period derivation

Line 5196: pa_cc_utils.reset_curr_function;

5192:
5193: If (G_Work_Type_Id is NULL and nvl(pa_utils4.is_exp_work_type_enabled,'N') = 'Y') Then
5194: /*** added and condition bug 3104004 */
5195: X_Status := 'INVALID_WORK_TYPE';
5196: pa_cc_utils.reset_curr_function;
5197: Return;
5198: End If;
5199:
5200: End If;

Line 5258: pa_cc_utils.reset_curr_function;

5254: log_message('log_message: ' || 'Ret Sts = ' || l_asgn_work_ret_sts || ' Error = ' || l_asgn_work_err_msg);
5255: END IF;
5256:
5257: X_Status := l_asgn_work_err_msg;
5258: pa_cc_utils.reset_curr_function;
5259: RETURN;
5260:
5261: END IF;
5262:

Line 5297: pa_cc_utils.reset_curr_function;

5293: IF nvl(P_Person_Type,'EMP') IN ('EMP','CWK' ,'EX_EMP' ) THEN /*Bug 16451280 : Added EX_EMP*/
5294: null;
5295: ELSE
5296: X_status := 'INVALID_PERSON_TYPE';
5297: pa_cc_utils.reset_curr_function;
5298: RETURN;
5299: END IF;
5300:
5301: IF ((P_po_number is not null OR P_Po_Line_Num is not null OR

Line 5314: pa_cc_utils.reset_curr_function;

5310: END IF;
5311:
5312: IF Pa_Pjc_CWk_Utils.Is_CWK_TC_Xface_Allowed(G_Project_Id) <> 'Y' THEN
5313: X_Status := 'PA_CWK_TC_NOT_ALLOWED';
5314: pa_cc_utils.reset_curr_function;
5315: RETURN;
5316: ELSIF (( nvl(G_gl_accted_flag,'N') = 'Y') OR (nvl(G_trx_costed,'N') = 'Y')) THEN
5317: X_status := 'PA_CWK_PO_COSTED_NOTSUP';
5318: pa_cc_utils.reset_curr_function;

Line 5318: pa_cc_utils.reset_curr_function;

5314: pa_cc_utils.reset_curr_function;
5315: RETURN;
5316: ELSIF (( nvl(G_gl_accted_flag,'N') = 'Y') OR (nvl(G_trx_costed,'N') = 'Y')) THEN
5317: X_status := 'PA_CWK_PO_COSTED_NOTSUP';
5318: pa_cc_utils.reset_curr_function;
5319: RETURN;
5320: ELSIF nvl(p_person_type,'EMP') = 'EMP' THEN
5321: X_status := 'PA_EMP_PO_NOTSUP';
5322: pa_cc_utils.reset_curr_function;

Line 5322: pa_cc_utils.reset_curr_function;

5318: pa_cc_utils.reset_curr_function;
5319: RETURN;
5320: ELSIF nvl(p_person_type,'EMP') = 'EMP' THEN
5321: X_status := 'PA_EMP_PO_NOTSUP';
5322: pa_cc_utils.reset_curr_function;
5323: RETURN;
5324: END IF;
5325:
5326: IF PG_DEBUG = 'Y' THEN

Line 5368: pa_cc_utils.reset_curr_function;

5364: log_message('log_message: ' || pa_debug.G_err_Stage);
5365: END IF;
5366:
5367: X_status := temp_status;
5368: pa_cc_utils.reset_curr_function;
5369: RETURN;
5370: END IF;
5371:
5372: /* po amount check */

Line 5376: pa_cc_utils.reset_curr_function;

5372: /* po amount check */
5373:
5374: IF nvl(l_po_rate,0) = 0 THEN
5375: X_status := 'INVALID_PO_RATE';
5376: pa_cc_utils.reset_curr_function;
5377: RETURN;
5378: END IF;
5379:
5380: l_Calc_Amt := X_qty * l_po_rate;

Line 5482: pa_cc_utils.reset_curr_function;

5478: pa_debug.G_err_stage := 'po_processed_amt_chk unable to get a lock';
5479: log_message('log_message: ' || pa_debug.G_err_Stage);
5480: END IF;
5481: X_status := temp_status;
5482: pa_cc_utils.reset_curr_function;
5483: RETURN;
5484: END IF;
5485:
5486: IF 0 <= (nvl(G_Po_Line_Amt,0) - nvl(l_processed_cost,0)) then /* Bug 4098920 */

Line 5495: pa_cc_utils.reset_curr_function;

5491: /* Undo changes that are done by po_processed_amt_chk ***/
5492: undo_processed_amt_chk(P_Po_Line_Id
5493: ,G_Task_Id /* Bug # 3609926 : Changed to G_TASK_ID from P_TASK_ID */
5494: ,l_Calc_Amt ) ;
5495: pa_cc_utils.reset_curr_function;
5496: RETURN;
5497: END IF;
5498:
5499: /* po amount check */

Line 5517: pa_cc_utils.reset_curr_function;

5513: );
5514:
5515: If (G_Vendor_id Is Null or G_Vendor_Site_id Is Null ) Then
5516: x_status := 'PA_INVALID_SUPPLIER_INFO';
5517: pa_cc_utils.reset_curr_function;
5518: Return;
5519: End If;
5520:
5521: End If;

Line 5571: pa_cc_utils.reset_curr_function;

5567: ,P_Task_Id
5568: ,l_Calc_Amt
5569: );
5570: END IF;
5571: pa_cc_utils.reset_curr_function;
5572: RETURN;
5573: END IF;
5574:
5575: IF PG_DEBUG = 'Y' THEN

Line 5678: pa_cc_utils.reset_curr_function;

5674: ,P_Task_Id
5675: ,l_Calc_Amt );
5676: END IF;
5677:
5678: pa_cc_utils.reset_curr_function;
5679: RETURN;
5680:
5681: END IF;
5682:

Line 5742: pa_cc_utils.reset_curr_function;

5738: log_message('log_message: ' || pa_debug.G_err_Stage);
5739: END IF;
5740:
5741: x_status := l_fc_error_msg ;
5742: pa_cc_utils.reset_curr_function;
5743: return;
5744: END IF;
5745:
5746: IF PG_DEBUG = 'Y' THEN

Line 5778: pa_cc_utils.reset_curr_function;

5774: END IF;
5775:
5776: --x_status := l_fc_return_status ;
5777: x_status := 'PA_FC_ERROR' ;
5778: pa_cc_utils.reset_curr_function;
5779: return;
5780: END IF;
5781:
5782: IF PG_DEBUG = 'Y' THEN

Line 5806: pa_cc_utils.reset_curr_function;

5802: END IF;
5803:
5804: x_status := 'PA_FC_ERROR' ;
5805:
5806: pa_cc_utils.reset_curr_function;
5807: return;
5808: ELSE
5809: IF PG_DEBUG = 'Y' THEN
5810: pa_debug.G_err_stage := 'This transaction passed funds check';

Line 5825: pa_cc_utils.reset_curr_function;

5821: log_message('log_message: ' || pa_debug.G_err_Stage);
5822: END IF;
5823:
5824: x_status := 'PA_FC_UNEXP_ERROR' ;
5825: pa_cc_utils.reset_curr_function;
5826: return;
5827: END IF;
5828: IF PG_DEBUG = 'Y' THEN
5829: pa_debug.G_err_stage := 'Done with funds check';

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

5857: IF PG_DEBUG = 'Y' THEN
5858: pa_debug.G_err_stage := 'Done with Validate Item';
5859: log_message('log_message: ' || pa_debug.G_err_Stage);
5860: END IF;
5861: pa_cc_utils.reset_curr_function; /* bug 2181553 */
5862:
5863: -- S.N. CWK changes -> hkulkarn ---> If called from form, release the locks.
5864:
5865: IF (X_module = 'EXTERNAL') THEN

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

5879: END IF;
5880:
5881: release_po_line_task_lock; -- bug 3512984
5882:
5883: pa_cc_utils.reset_curr_function; /* bug 2181553 */
5884:
5885: RAISE ;
5886: END ValidateItem;
5887:

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

5889: X_org_id IN NUMBER
5890: , X_status OUT NOCOPY VARCHAR2 )
5891: IS
5892: BEGIN
5893: pa_cc_utils.set_curr_function('ValidateOrgId');
5894:
5895: --PA.K Changes: For Performance moved the Multi-Org check to init procedure.
5896: --IF pa_utils.pa_morg_implemented = 'Y' THEN
5897:

Line 5915: pa_cc_utils.reset_curr_function;

5911:
5912: IF G_Morg = 'Y' THEN
5913: IF X_org_id IS NULL THEN
5914: X_status := 'MISSING_ORG_ID';
5915: pa_cc_utils.reset_curr_function;
5916: RETURN;
5917: END IF;
5918: END IF;
5919:

Line 5920: pa_cc_utils.reset_curr_function;

5916: RETURN;
5917: END IF;
5918: END IF;
5919:
5920: pa_cc_utils.reset_curr_function;
5921: EXCEPTION
5922: WHEN OTHERS THEN
5923: IF PG_DEBUG = 'Y' THEN
5924: log_message('log_message: ' || pa_debug.G_err_Stack,1);

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

6018: v_week_ending_dtTab PA_PLSQL_DATATYPES.DateTabTyp;
6019:
6020:
6021: BEGIN
6022: pa_cc_utils.set_curr_function('Set_supplier_cost_eidate');
6023:
6024: IF PG_DEBUG = 'Y' THEN
6025: log_message('log_message: Set_supplier_cost_eidate begins ' );
6026: log_message('log_message: Populate bulk variables ' );

Line 6142: pa_cc_utils.reset_curr_function;

6138: IF PG_DEBUG = 'Y' THEN
6139: log_message('log_message: End of set_supplier_cost_eidate. ' );
6140: END IF ;
6141:
6142: pa_cc_utils.reset_curr_function;
6143: END set_supplier_cost_eidate ;
6144:
6145: PROCEDURE import1( X_transaction_source IN VARCHAR2
6146: , X_batch IN VARCHAR2

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

6829: , etypeclasscode VARCHAR2 ) RETURN NUMBER
6830: IS
6831: BEGIN
6832:
6833: pa_cc_utils.set_curr_function('lockCntrlRec');
6834:
6835: IF PG_DEBUG = 'Y' THEN
6836: log_message('log_message: ' || 'Trying to get lock for record in xface ctrl:'||
6837: ' transaction source ='||trx_source||

Line 6890: pa_cc_utils.reset_curr_function;

6886: IF PG_DEBUG = 'Y' THEN
6887: log_message('log_message: ' || 'Updated interface id/status on pa_transaction_xface_control');
6888: END IF;
6889:
6890: pa_cc_utils.reset_curr_function;
6891: RETURN 0;
6892:
6893: EXCEPTION
6894: WHEN RESOURCE_BUSY THEN

Line 6898: pa_cc_utils.reset_curr_function;

6894: WHEN RESOURCE_BUSY THEN
6895: IF PG_DEBUG = 'Y' THEN
6896: log_message('log_message: ' || 'Cannot get lock',1);
6897: END IF;
6898: pa_cc_utils.reset_curr_function;
6899: RETURN -1;
6900: END lockCntrlRec;
6901:
6902: PROCEDURE UpdControlProcessed (P_TrxSource in VARCHAR2,

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

6909: /* Added the parameter system_linkage_function for bug # 3291066 */
6910: IS
6911: BEGIN
6912:
6913: pa_cc_utils.set_curr_function('UpdControlProcessed');
6914: IF PG_DEBUG = 'Y' THEN
6915: log_message('log_message: ' || 'Inside UpdControlProcessed,
6916: P_TrxSource = ' || P_TrxSource ||
6917: ' P_BatchName = ' || P_BatchName ||

Line 6969: pa_cc_utils.reset_curr_function;

6965: END IF;
6966:
6967: End If;
6968:
6969: pa_cc_utils.reset_curr_function;
6970:
6971: END UpdControlProcessed;
6972:
6973: PROCEDURE loadExpCompareVars ( expend IN VARCHAR2

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

6979: , orig_exp_txn_reference3 IN VARCHAR2)
6980: IS
6981: BEGIN
6982:
6983: pa_cc_utils.set_curr_function('loadExpCompareVars');
6984: current_expend := expend;
6985: current_expend2 := expend2;
6986: current_period := end_date;
6987: i := 0;

Line 7022: pa_cc_utils.reset_curr_function;

7018: INTO G_expenditure_id
7019: FROM sys.dual;
7020: END IF;
7021:
7022: pa_cc_utils.reset_curr_function;
7023: END loadExpCompareVars;
7024:
7025: -- Bug 2048868 : Added 5 parameters to pass currency attributes to
7026: -- pa_transactions.insertexp

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

7049: l_gl_accted_flag VARCHAR2(2);
7050: l_person_type VARCHAR2(10); /* Added for bug 13554435 */ /*Bug 16451280 : Changed size from 5 to 10*/
7051:
7052: BEGIN
7053: pa_cc_utils.set_curr_function('newExpend');
7054:
7055: IF PG_DEBUG = 'Y' THEN
7056: log_message('log_message: ' || 'record count = ' || record_count);
7057: END IF;

Line 7360: pa_cc_utils.reset_curr_function;

7356: /***** Bug 4106188 CWK Changes *****/
7357:
7358:
7359: REJECT_EXP := FALSE;
7360: pa_cc_utils.reset_curr_function;
7361: END newExpend;
7362:
7363: PROCEDURE InitPLSQLTab IS
7364: BEGIN

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

7563: v_calling_module <> 'PAAPIMP' THEN
7564:
7565: RETURN l_status ;
7566: end if ;
7567: pa_cc_utils.set_curr_function('get_parent_txn_status');
7568:
7569: IF PG_DEBUG = 'Y' THEN
7570: log_message('log_message: X_transaction_source :' || X_transaction_source);
7571: log_message('log_message: G_cash_based_accounting :' || G_cash_based_accounting);

Line 7675: pa_cc_utils.reset_curr_function;

7671: log_message('log_message: Status Override for child (Date Failure) l_status :' || l_status);
7672: END IF;
7673: END IF ;
7674:
7675: pa_cc_utils.reset_curr_function;
7676:
7677: return l_status ;
7678: END get_parent_txn_status ;
7679: -- =========================================

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

7693: pa_debug.set_process(x_process => 'PLSQL',
7694: x_debug_mode => G_debug_mode);
7695: End If;
7696:
7697: pa_cc_utils.log_message('Debug Mode = '||G_debug_mode,1);
7698:
7699: g_request_id := fnd_global.conc_request_id;
7700: pa_cc_utils.set_curr_function('Import1');
7701: IF PG_DEBUG = 'Y' THEN

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

7696:
7697: pa_cc_utils.log_message('Debug Mode = '||G_debug_mode,1);
7698:
7699: g_request_id := fnd_global.conc_request_id;
7700: pa_cc_utils.set_curr_function('Import1');
7701: IF PG_DEBUG = 'Y' THEN
7702: log_message('log_message: ' || 'Start Transaction Import');
7703: END IF;
7704:

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

8907: -- we are resetting the stack after executing
8908: -- validateitem.
8909:
8910: --Bug 2749049
8911: pa_cc_utils.reset_curr_function; /* Uncommented for Bug 4309932 */
8912:
8913: END IF; -- end X_org_status is not null
8914:
8915: IF ( X_status IS NOT NULL ) THEN

Line 9861: pa_cc_utils.reset_curr_function;

9857: end if;
9858:
9859: /*PA-K Changes: UpdControlProcessed will be done for each loop of TrxBatches*/
9860:
9861: pa_cc_utils.reset_curr_function;
9862:
9863: EXCEPTION
9864:
9865: WHEN OTHERS THEN

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

10157:
10158: pa_debug.set_process(x_process => 'PLSQL',
10159: x_debug_mode => G_debug_mode);
10160:
10161: pa_cc_utils.log_message('Debug Mode = '||G_debug_mode,1);
10162: pa_cc_utils.set_curr_function('pa_trx_import.init');
10163:
10164: IF PG_DEBUG = 'Y' THEN
10165: pa_debug.G_err_Stage := 'retriving transaction source';

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

10158: pa_debug.set_process(x_process => 'PLSQL',
10159: x_debug_mode => G_debug_mode);
10160:
10161: pa_cc_utils.log_message('Debug Mode = '||G_debug_mode,1);
10162: pa_cc_utils.set_curr_function('pa_trx_import.init');
10163:
10164: IF PG_DEBUG = 'Y' THEN
10165: pa_debug.G_err_Stage := 'retriving transaction source';
10166: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 10184: pa_cc_utils.reset_curr_function;

10180: IF (G_accounting_currency_code IS NULL) THEN
10181: GetImpCurrInfo;
10182: END IF;
10183:
10184: pa_cc_utils.reset_curr_function;
10185:
10186: END init;
10187:
10188: PROCEDURE execute_import_extensions(P_program_name IN VARCHAR2,

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

10571: END Upd_Sts_Enc_Bal;
10572:
10573: BEGIN
10574:
10575: pa_cc_utils.set_curr_function('tieback_fc_records');
10576:
10577: IF PG_DEBUG = 'Y' THEN
10578: pa_debug.G_err_stage := 'Start of tieback_fc_records';
10579: log_message('log_message: ' || pa_debug.G_err_Stage);

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

10895: end if;
10896:
10897: /* Start of bug 3239837 */
10898: pa_debug.G_err_stage := 'Update rejected interface records in pa_bc_packets to T';
10899: pa_cc_utils.log_message(pa_debug.G_err_Stage);
10900:
10901: update pa_bc_packets
10902: set status_code = 'T',
10903: result_code = 'F140'

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

10911: and orig_transaction_reference = to_char(g_request_id)
10912: );
10913:
10914: pa_debug.G_err_stage := 'In stage 1 Updated count to T = '|| SQL%ROWCOUNT;
10915: pa_cc_utils.log_message(pa_debug.G_err_Stage);
10916:
10917: update pa_bc_packets
10918: set status_code = 'T',
10919: result_code = 'F140'

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

10932: and pti.orig_transaction_reference = to_char(g_request_id))
10933: );
10934:
10935: pa_debug.G_err_stage := 'In stage 2 Updated count to T = '|| SQL%ROWCOUNT;
10936: pa_cc_utils.log_message(pa_debug.G_err_Stage);
10937:
10938: /* End of bug 3239837 */
10939:
10940: --Bug 3592289

Line 10967: pa_cc_utils.reset_curr_function;

10963: pa_debug.G_err_stage := 'Done with Tieback';
10964: log_message('log_message: ' || pa_debug.G_err_Stage);
10965: END IF;
10966:
10967: pa_cc_utils.reset_curr_function;
10968:
10969: EXCEPTION
10970: WHEN OTHERS THEN
10971: x_return_status := fnd_api.g_ret_sts_unexp_error;

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

11093: END Get_FC_Period_Name;
11094:
11095: BEGIN
11096:
11097: pa_cc_utils.set_curr_function('tr_import_funds_check');
11098: IF PG_DEBUG = 'Y' THEN
11099: pa_debug.G_err_stage := 'Inside Tr_Import_Funds_Check';
11100: log_message('log_message: ' || pa_debug.G_err_Stage);
11101: END IF;

Line 11449: pa_cc_utils.reset_curr_function;

11445: x_packet_id := l_packet_id ;
11446: IF PG_DEBUG = 'Y' THEN
11447: log_message('log_message: ' || 'Returning from funds check');
11448: END IF;
11449: pa_cc_utils.reset_curr_function;
11450:
11451: -- set the return status to success
11452: x_return_status := FND_API.G_RET_STS_SUCCESS;
11453:

Line 11465: pa_cc_utils.reset_curr_function;

11461: log_message('log_message: x_return_status = ' || x_return_status); -- Bug 3592289
11462: log_message('log_message: x_error = ' || x_error_message_code); -- Bug 3592289
11463: END IF;
11464: x_return_status := fnd_api.g_ret_sts_unexp_error;
11465: pa_cc_utils.reset_curr_function;
11466: END tr_import_funds_check ;
11467:
11468: --2339216: Added procedure
11469: PROCEDURE ap_disc_funds_check (

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

11482: x_return_status OUT NOCOPY VARCHAR2) IS
11483:
11484: BEGIN
11485:
11486: pa_cc_utils.set_curr_function('ap_disc_funds_check');
11487:
11488: IF PG_DEBUG = 'Y' THEN
11489: pa_debug.G_err_stage := 'Inside AP_Disc_Funds_Check';
11490: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 11512: pa_cc_utils.reset_curr_function;

11508:
11509: -- set the return status to success
11510: x_return_status := FND_API.G_RET_STS_SUCCESS;
11511:
11512: pa_cc_utils.reset_curr_function;
11513:
11514: EXCEPTION
11515: --Bug 2672772: Handle the NDF exception,
11516: --raise the error here but not in tr_import_funds_check

Line 11528: pa_cc_utils.reset_curr_function;

11524:
11525: x_return_status := fnd_api.g_ret_sts_error;
11526: x_error_message_code := 'PA_FC_NDF';
11527:
11528: pa_cc_utils.reset_curr_function;
11529: RAISE;
11530:
11531: WHEN OTHERS THEN
11532: IF PG_DEBUG = 'Y' THEN

Line 11536: pa_cc_utils.reset_curr_function;

11532: IF PG_DEBUG = 'Y' THEN
11533: log_message('log_message: ' || sqlerrm||' Returning from ap disc funds check');
11534: END IF;
11535: x_return_status := fnd_api.g_ret_sts_unexp_error;
11536: pa_cc_utils.reset_curr_function;
11537: RAISE;
11538: END ap_disc_funds_check;
11539:
11540: PROCEDURE ap_funds_check (

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

11552: x_return_status OUT NOCOPY VARCHAR2) IS
11553:
11554: BEGIN
11555:
11556: pa_cc_utils.set_curr_function('ap_funds_check');
11557:
11558: IF PG_DEBUG = 'Y' THEN
11559: pa_debug.G_err_stage := 'Inside AP_Funds_Check';
11560: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 11582: pa_cc_utils.reset_curr_function;

11578:
11579: -- set the return status to success
11580: x_return_status := FND_API.G_RET_STS_SUCCESS;
11581:
11582: pa_cc_utils.reset_curr_function;
11583:
11584: EXCEPTION
11585: --Bug 2672772: Handle the NDF exception,
11586: --raise the error here but not in tr_import_funds_check

Line 11598: pa_cc_utils.reset_curr_function;

11594:
11595: x_return_status := fnd_api.g_ret_sts_error;
11596: x_error_message_code := 'PA_FC_NDF';
11597:
11598: pa_cc_utils.reset_curr_function;
11599: RAISE;
11600:
11601:
11602: WHEN OTHERS THEN

Line 11607: pa_cc_utils.reset_curr_function;

11603: IF PG_DEBUG = 'Y' THEN
11604: log_message('log_message: ' || sqlerrm||' Returning from ap funds check');
11605: END IF;
11606: x_return_status := fnd_api.g_ret_sts_unexp_error;
11607: pa_cc_utils.reset_curr_function;
11608: RAISE;
11609: END ap_funds_check;
11610:
11611: PROCEDURE po_funds_check (

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

11708: End GetCommSummAmt;
11709:
11710: BEGIN
11711:
11712: pa_cc_utils.set_curr_function('po_funds_check');
11713:
11714: IF PG_DEBUG = 'Y' THEN
11715: pa_debug.G_err_stage := 'Inside PO_Funds_Check';
11716: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 11805: pa_cc_utils.reset_curr_function;

11801:
11802: -- set the return status to success
11803: x_return_status := FND_API.G_RET_STS_SUCCESS;
11804:
11805: pa_cc_utils.reset_curr_function;
11806:
11807: EXCEPTION
11808: --Bug 2672772: Handle the NDF exception,
11809: --raise the error here but not in tr_import_funds_check

Line 11821: pa_cc_utils.reset_curr_function;

11817:
11818: x_return_status := fnd_api.g_ret_sts_error;
11819: x_error_message_code := 'PA_FC_NDF';
11820:
11821: pa_cc_utils.reset_curr_function;
11822: RAISE;
11823:
11824: WHEN OTHERS THEN
11825: IF PG_DEBUG = 'Y' THEN

Line 11829: pa_cc_utils.reset_curr_function;

11825: IF PG_DEBUG = 'Y' THEN
11826: log_message('log_message: ' || sqlerrm||' Returning from po funds check');
11827: END IF;
11828: x_return_status := fnd_api.g_ret_sts_unexp_error;
11829: pa_cc_utils.reset_curr_function;
11830: RAISE;
11831: END po_funds_check;
11832:
11833: PROCEDURE ap_po_funds_check (

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

11849: x_return_status OUT NOCOPY VARCHAR2) IS
11850:
11851: BEGIN
11852:
11853: pa_cc_utils.set_curr_function('ap_po_funds_check');
11854:
11855: IF PG_DEBUG = 'Y' THEN
11856: pa_debug.G_err_stage := 'Inside ap_po_Funds_Check';
11857: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 11961: pa_cc_utils.reset_curr_function;

11957:
11958: -- set the return status to success
11959: x_return_status := FND_API.G_RET_STS_SUCCESS;
11960:
11961: pa_cc_utils.reset_curr_function;
11962:
11963: EXCEPTION
11964: WHEN OTHERS THEN
11965: IF PG_DEBUG = 'Y' THEN

Line 11969: pa_cc_utils.reset_curr_function;

11965: IF PG_DEBUG = 'Y' THEN
11966: log_message('log_message: ' || sqlerrm||' Returning from ap po funds check');
11967: END IF;
11968: x_return_status := fnd_api.g_ret_sts_unexp_error;
11969: pa_cc_utils.reset_curr_function;
11970: RAISE;
11971: END ap_po_funds_check;
11972:
11973: PROCEDURE Upd_PktSts_Fatal(p_request_id in number) IS

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

12114: l_asgn_work_err_msg VARCHAR2(1000);
12115: l_temp_g_assignment_id number := null; -- bug 5297060
12116:
12117: BEGIN
12118: pa_cc_utils.set_curr_function('ValidateItemOTL');
12119:
12120:
12121: G_adj_item_id := NULL;
12122: G_job_id := NULL;

Line 12159: pa_cc_utils.reset_curr_function;

12155: pa_debug.G_err_Stage := 'P_Emp_Org_Id is null';
12156: log_message('log_message: ' || pa_debug.G_err_Stage);
12157: END IF;
12158: X_status := 'NO_ASSIGNMENT';
12159: pa_cc_utils.reset_curr_function;
12160: RETURN;
12161: END IF;
12162:
12163: IF (G_accounting_currency_code IS NULL) THEN

Line 12171: pa_cc_utils.reset_curr_function;

12167: G_job_id := P_Emp_Job_Id;
12168:
12169: IF ( G_job_id IS NULL ) THEN
12170: X_status := 'NO_ASSIGNMENT';
12171: pa_cc_utils.reset_curr_function;
12172: RETURN;
12173: END IF;
12174:
12175: IF ( X_denom_currency_code IS NULL ) THEN

Line 12195: pa_cc_utils.reset_curr_function;

12191:
12192: IF ( X_project_currency_code IS NULL ) THEN
12193:
12194: X_status := 'PA_MISSING_PROJ_CURR';
12195: pa_cc_utils.reset_curr_function;
12196: RETURN;
12197:
12198: END IF;
12199:

Line 12203: pa_cc_utils.reset_curr_function;

12199:
12200: IF ( X_projfunc_currency_code IS NULL ) THEN
12201:
12202: X_status := 'PA_MISSING_PRJFUNC_CURR';
12203: pa_cc_utils.reset_curr_function;
12204: RETURN;
12205:
12206: END IF;
12207:

Line 12237: pa_cc_utils.reset_curr_function;

12233: END IF;
12234: CheckDupItem ( X_trx_src, X_trx_ref, temp_status );
12235: IF ( temp_status IS NOT NULL ) THEN
12236: X_status := temp_status;
12237: pa_cc_utils.reset_curr_function;
12238: RETURN;
12239: END IF;
12240:
12241: END IF ;

Line 12274: pa_cc_utils.reset_curr_function;

12270:
12271: IF ( G_adj_item_id IS NULL ) THEN
12272:
12273: X_status := 'NO_MATCHING_ITEM';
12274: pa_cc_utils.reset_curr_function;
12275: RETURN;
12276:
12277: ELSIF ( G_adj_item_id IS NOT NULL AND X_module = 'PAXTRTRX' ) THEN
12278:

Line 12310: pa_cc_utils.reset_curr_function;

12306: END IF;
12307:
12308: IF ( temp_status IS NOT NULL ) THEN
12309: X_status := temp_status;
12310: pa_cc_utils.reset_curr_function;
12311: RETURN;
12312: END IF;
12313:
12314: END IF;

Line 12361: pa_cc_utils.reset_curr_function;

12357: log_message('log_message: ' || 'Ret Sts = ' || l_asgn_work_ret_sts || ' Error = ' || l_asgn_work_err_msg);
12358: END IF;
12359:
12360: X_Status := l_asgn_work_err_msg;
12361: pa_cc_utils.reset_curr_function;
12362: RETURN;
12363:
12364: END IF;
12365:

Line 12454: pa_cc_utils.reset_curr_function;

12450: else
12451: G_Location_Id := p_location_id;
12452: end if;
12453:
12454: pa_cc_utils.reset_curr_function;
12455:
12456: EXCEPTION
12457: WHEN OTHERS THEN
12458: IF PG_DEBUG = 'Y' THEN

Line 12463: pa_cc_utils.reset_curr_function;

12459: log_message('log_message: ' || pa_debug.G_err_Stack,1);
12460: log_message('log_message: ' || pa_debug.G_err_stage,1);
12461: log_message('log_message: ' || SQLERRM,1);
12462: END IF;
12463: pa_cc_utils.reset_curr_function;
12464: RAISE ;
12465: END ValidateItemOTL;
12466:
12467: PROCEDURE Log_Message(p_message in VARCHAR2,

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

12468: p_mode in NUMBER DEFAULT 0) IS
12469: BEGIN
12470: If (G_Debug_Mode = 'Y') Then
12471:
12472: pa_cc_utils.log_message(p_message,p_mode);
12473:
12474: End If;
12475: END Log_Message;
12476:

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

12757: End GetCommSummAmt;
12758:
12759: BEGIN
12760:
12761: pa_cc_utils.set_curr_function('ap_funds_check');
12762:
12763: IF PG_DEBUG = 'Y' THEN
12764: pa_debug.G_err_stage := 'Inside AP_Funds_Check';
12765: log_message('log_message: ' || pa_debug.G_err_Stage);

Line 12794: pa_cc_utils.reset_curr_function;

12790:
12791: -- set the return status to success
12792: x_return_status := FND_API.G_RET_STS_SUCCESS;
12793:
12794: pa_cc_utils.reset_curr_function;
12795:
12796: EXCEPTION
12797: --Bug 2672772: Handle the NDF exception,
12798: --raise the error here but not in tr_import_funds_check

Line 12809: pa_cc_utils.reset_curr_function;

12805: IF PG_DEBUG = 'Y' THEN
12806: log_message('log_message: ' || sqlerrm||' Returning from ap funds check');
12807: END IF;
12808: x_return_status := fnd_api.g_ret_sts_unexp_error;
12809: pa_cc_utils.reset_curr_function;
12810: RAISE;
12811: END ap_cash_based_funds_check;
12812:
12813: -- R12 funds management Uptake : New procedure fired in non-autonomous mode to read