372: END update_trx_error_flag;
373:
374:
375:
376: PROCEDURE record_fnd_log(
377: pv_fnd_log IN JAI_INTERFACE_ERR_LINES.ERROR_MESSAGE%TYPE
378: )
379: IS
380: BEGIN
373:
374:
375:
376: PROCEDURE record_fnd_log(
377: pv_fnd_log IN JAI_INTERFACE_ERR_LINES.ERROR_MESSAGE%TYPE
378: )
379: IS
380: BEGIN
381:
378: )
379: IS
380: BEGIN
381:
382: fnd_file.put_line(FND_FILE.LOG,pv_fnd_log);
383:
384: END record_fnd_log;
385:
386:
380: BEGIN
381:
382: fnd_file.put_line(FND_FILE.LOG,pv_fnd_log);
383:
384: END record_fnd_log;
385:
386:
387: /*
388: ||When occurred error, populate table jai_interface_err_lines and fnd log error info ,
384: END record_fnd_log;
385:
386:
387: /*
388: ||When occurred error, populate table jai_interface_err_lines and fnd log error info ,
389: */
390: PROCEDURE log_error(
391: pv_err_level IN JAI_INTERFACE_ERR_LINES.ERROR_TYPE%TYPE, --'LINE' or 'TAX'
392: pn_line_id IN JAI_INTERFACE_ERR_LINES.INTERFACE_ERROR_ID%TYPE,
539: pn_source_line_id => pn_tax_line_id,
540: pv_err_mess => lv_error_mess,
541: pv_invalid_value => pn_code_combination_id
542: );
543: record_fnd_log(
544: pv_fnd_log => lv_return_mess
545: );
546: END IF;
547:
540: pv_err_mess => lv_error_mess,
541: pv_invalid_value => pn_code_combination_id
542: );
543: record_fnd_log(
544: pv_fnd_log => lv_return_mess
545: );
546: END IF;
547:
548: --Added by zhiwei for bug#12560646 begin
561: pn_source_line_id => pn_tax_line_id,
562: pv_err_mess => lv_error_mess,
563: pv_invalid_value => pn_code_combination_id
564: );
565: record_fnd_log(
566: pv_fnd_log => lv_return_mess
567: );
568: END IF;
569: ----------------------------------------------------------------
562: pv_err_mess => lv_error_mess,
563: pv_invalid_value => pn_code_combination_id
564: );
565: record_fnd_log(
566: pv_fnd_log => lv_return_mess
567: );
568: END IF;
569: ----------------------------------------------------------------
570: --Added by zhiwei for bug#12560646 end
583: pn_source_line_id => pn_tax_line_id,
584: pv_err_mess => lv_error_mess,
585: pv_invalid_value => pn_code_combination_id
586: );
587: record_fnd_log(
588: pv_fnd_log => lv_return_mess
589: );
590:
591: END validate_ccid_id_suitable;
584: pv_err_mess => lv_error_mess,
585: pv_invalid_value => pn_code_combination_id
586: );
587: record_fnd_log(
588: pv_fnd_log => lv_return_mess
589: );
590:
591: END validate_ccid_id_suitable;
592:
625: pn_source_line_id => pr_interface_lines.interface_line_id,
626: pv_err_mess => lv_error_mess,
627: pv_invalid_value => pr_interface_lines.org_id
628: );
629: record_fnd_log(
630: pv_fnd_log => lv_return_mess
631: );
632: END IF;
633:
626: pv_err_mess => lv_error_mess,
627: pv_invalid_value => pr_interface_lines.org_id
628: );
629: record_fnd_log(
630: pv_fnd_log => lv_return_mess
631: );
632: END IF;
633:
634: --Check organization_id
642: IF(lv_return_code <> 'S')THEN
643: xn_err_flag := 1;
644: lv_return_mess := lv_return_mess || ' with interface_line_id:'||pr_interface_lines.interface_line_id;
645: lv_error_mess := 'JAI_OU_IL_COMBINATION_ERR';--'Invalid Operation Unit/ Inventory Organization/ Location combination';
646: record_fnd_log(
647: pv_fnd_log => lv_return_mess
648: );
649: log_error(
650: pv_err_level => GV_ERROR_TYPE_LINE,
643: xn_err_flag := 1;
644: lv_return_mess := lv_return_mess || ' with interface_line_id:'||pr_interface_lines.interface_line_id;
645: lv_error_mess := 'JAI_OU_IL_COMBINATION_ERR';--'Invalid Operation Unit/ Inventory Organization/ Location combination';
646: record_fnd_log(
647: pv_fnd_log => lv_return_mess
648: );
649: log_error(
650: pv_err_level => GV_ERROR_TYPE_LINE,
651: pn_line_id => pr_interface_lines.interface_line_id,
667: IF(lv_return_code <> 'S')THEN
668: xn_err_flag := 1;
669: lv_return_mess := lv_return_mess || ' with interface_line_id:'||pr_interface_lines.interface_line_id;
670: lv_error_mess := 'JAI_OU_IL_COMBINATION_ERR';--'Invalid Operation Unit/ Inventory Organization/ Location combination';
671: record_fnd_log(
672: pv_fnd_log => lv_return_mess
673: );
674: log_error(
675: pv_err_level => GV_ERROR_TYPE_LINE,
668: xn_err_flag := 1;
669: lv_return_mess := lv_return_mess || ' with interface_line_id:'||pr_interface_lines.interface_line_id;
670: lv_error_mess := 'JAI_OU_IL_COMBINATION_ERR';--'Invalid Operation Unit/ Inventory Organization/ Location combination';
671: record_fnd_log(
672: pv_fnd_log => lv_return_mess
673: );
674: log_error(
675: pv_err_level => GV_ERROR_TYPE_LINE,
676: pn_line_id => pr_interface_lines.interface_line_id,
693: xn_err_flag := 1;
694: lv_return_mess := lv_return_mess || ' with interface_line_id:'||pr_interface_lines.interface_line_id;
695: --'Invalid Operation Unit/ Inventory Organization/ Location combination';
696: lv_error_mess := 'JAI_OU_IL_COMBINATION_ERR';
697: record_fnd_log(
698: pv_fnd_log => lv_return_mess
699: );
700: log_error(
701: pv_err_level => GV_ERROR_TYPE_LINE,
694: lv_return_mess := lv_return_mess || ' with interface_line_id:'||pr_interface_lines.interface_line_id;
695: --'Invalid Operation Unit/ Inventory Organization/ Location combination';
696: lv_error_mess := 'JAI_OU_IL_COMBINATION_ERR';
697: record_fnd_log(
698: pv_fnd_log => lv_return_mess
699: );
700: log_error(
701: pv_err_level => GV_ERROR_TYPE_LINE,
702: pn_line_id => pr_interface_lines.interface_line_id,
711: xn_err_flag := 1;
712: lv_return_mess := 'VALIDATION Exception with SQLERR' || SUBSTR(SQLERRM,1,230);
713: lv_return_mess := lv_return_mess ||' in validate_ou_io_loc with interface_line_id:'||pr_interface_lines.interface_line_id;
714: lv_error_mess := 'JAI_OU_IL_COMBINATION_ERR';--'Invalid Operation Unit/ Inventory Organization/ Location combination';
715: record_fnd_log(
716: pv_fnd_log => lv_return_mess
717: );
718: log_error(
719: pv_err_level => GV_ERROR_TYPE_LINE,
712: lv_return_mess := 'VALIDATION Exception with SQLERR' || SUBSTR(SQLERRM,1,230);
713: lv_return_mess := lv_return_mess ||' in validate_ou_io_loc with interface_line_id:'||pr_interface_lines.interface_line_id;
714: lv_error_mess := 'JAI_OU_IL_COMBINATION_ERR';--'Invalid Operation Unit/ Inventory Organization/ Location combination';
715: record_fnd_log(
716: pv_fnd_log => lv_return_mess
717: );
718: log_error(
719: pv_err_level => GV_ERROR_TYPE_LINE,
720: pn_line_id => pr_interface_lines.interface_line_id,
782: pn_source_line_id => pr_interface_lines.interface_line_id,
783: pv_err_mess => lv_error_mess,
784: pv_invalid_value => pr_interface_lines.INCLUSIVE_TAX_AMOUNT
785: );
786: record_fnd_log(
787: pv_fnd_log => lv_return_mess
788: );
789: END IF;
790:
783: pv_err_mess => lv_error_mess,
784: pv_invalid_value => pr_interface_lines.INCLUSIVE_TAX_AMOUNT
785: );
786: record_fnd_log(
787: pv_fnd_log => lv_return_mess
788: );
789: END IF;
790:
791: --Check the exclusive tax amount of line should equals the sum exclusive tax amount of tax line
805: pn_source_line_id => pr_interface_lines.interface_line_id,
806: pv_err_mess => lv_error_mess,
807: pv_invalid_value => pr_interface_lines.EXCLUSIVE_TAX_AMOUNT
808: );
809: record_fnd_log(
810: pv_fnd_log => lv_return_mess
811: );
812: END IF;
813:
806: pv_err_mess => lv_error_mess,
807: pv_invalid_value => pr_interface_lines.EXCLUSIVE_TAX_AMOUNT
808: );
809: record_fnd_log(
810: pv_fnd_log => lv_return_mess
811: );
812: END IF;
813:
814: END IF;--EXTERNAL
825: pn_source_line_id => pr_interface_lines.interface_line_id,
826: pv_err_mess => lv_error_mess,
827: pv_invalid_value => pr_interface_lines.taxable_event
828: );
829: record_fnd_log(
830: pv_fnd_log => lv_return_mess
831: );
832: END IF;
833: EXCEPTION
826: pv_err_mess => lv_error_mess,
827: pv_invalid_value => pr_interface_lines.taxable_event
828: );
829: record_fnd_log(
830: pv_fnd_log => lv_return_mess
831: );
832: END IF;
833: EXCEPTION
834: WHEN OTHERS THEN
843: pn_source_line_id => pr_interface_lines.interface_line_id,
844: pv_err_mess => lv_error_mess,
845: pv_invalid_value => pr_interface_lines.taxable_event
846: );
847: record_fnd_log(
848: pv_fnd_log => lv_return_mess
849: );
850: END validate_taxable_event;
851:
844: pv_err_mess => lv_error_mess,
845: pv_invalid_value => pr_interface_lines.taxable_event
846: );
847: record_fnd_log(
848: pv_fnd_log => lv_return_mess
849: );
850: END validate_taxable_event;
851:
852: /*
878: pn_source_line_id => pr_interface_lines.interface_line_id,
879: pv_err_mess => lv_error_mess,
880: pv_invalid_value => pr_interface_lines.taxable_basis
881: );
882: record_fnd_log(
883: pv_fnd_log => lv_return_mess
884: );
885: END IF;
886: END IF;
879: pv_err_mess => lv_error_mess,
880: pv_invalid_value => pr_interface_lines.taxable_basis
881: );
882: record_fnd_log(
883: pv_fnd_log => lv_return_mess
884: );
885: END IF;
886: END IF;
887: END IF;--AR --Added by zhiwei for bug#12585126 on 20110523
898: pn_source_line_id => pr_interface_lines.interface_line_id,
899: pv_err_mess => lv_error_mess,
900: pv_invalid_value => pr_interface_lines.taxable_basis
901: );
902: record_fnd_log(
903: pv_fnd_log => lv_return_mess
904: );
905: END validate_taxable_basis;
906:
899: pv_err_mess => lv_error_mess,
900: pv_invalid_value => pr_interface_lines.taxable_basis
901: );
902: record_fnd_log(
903: pv_fnd_log => lv_return_mess
904: );
905: END validate_taxable_basis;
906:
907:
944: pn_source_line_id => pn_interface_line_id,
945: pv_err_mess => lv_error_mess,
946: pv_invalid_value => pn_interface_line_id
947: );
948: record_fnd_log(
949: pv_fnd_log => lv_return_mess
950: );
951: END IF;
952: EXCEPTION
945: pv_err_mess => lv_error_mess,
946: pv_invalid_value => pn_interface_line_id
947: );
948: record_fnd_log(
949: pv_fnd_log => lv_return_mess
950: );
951: END IF;
952: EXCEPTION
953: WHEN OTHERS THEN
960: pn_source_line_id => pn_interface_line_id,
961: pv_err_mess => lv_error_mess,
962: pv_invalid_value => pn_interface_line_id
963: );
964: record_fnd_log(
965: pv_fnd_log => lv_return_mess
966: );
967: END validate_tax_line_exist;
968:
961: pv_err_mess => lv_error_mess,
962: pv_invalid_value => pn_interface_line_id
963: );
964: record_fnd_log(
965: pv_fnd_log => lv_return_mess
966: );
967: END validate_tax_line_exist;
968:
969:
1029: pn_source_line_id => pn_interface_line_id,
1030: pv_err_mess => lv_error_mess,
1031: pv_invalid_value => GV_IMPORT_MODULE || ' ' ||pn_trx_line_id
1032: );
1033: record_fnd_log(
1034: pv_fnd_log => lv_return_mess
1035: );
1036: END IF;
1037:
1030: pv_err_mess => lv_error_mess,
1031: pv_invalid_value => GV_IMPORT_MODULE || ' ' ||pn_trx_line_id
1032: );
1033: record_fnd_log(
1034: pv_fnd_log => lv_return_mess
1035: );
1036: END IF;
1037:
1038: END IF;--AR
1054: pn_source_line_id => pn_interface_line_id,
1055: pv_err_mess => lv_error_mess,
1056: pv_invalid_value => GV_IMPORT_MODULE || ' ' ||pn_trx_line_id
1057: );
1058: record_fnd_log(
1059: pv_fnd_log => lv_return_mess
1060: );
1061:
1062: END IF;
1055: pv_err_mess => lv_error_mess,
1056: pv_invalid_value => GV_IMPORT_MODULE || ' ' ||pn_trx_line_id
1057: );
1058: record_fnd_log(
1059: pv_fnd_log => lv_return_mess
1060: );
1061:
1062: END IF;
1063:
1075: pn_source_line_id => pn_interface_line_id,
1076: pv_err_mess => lv_error_mess,
1077: pv_invalid_value => pn_interface_line_id
1078: );
1079: record_fnd_log(
1080: pv_fnd_log => lv_return_mess
1081: );
1082: END validate_trx_tax_line_exist;
1083:
1076: pv_err_mess => lv_error_mess,
1077: pv_invalid_value => pn_interface_line_id
1078: );
1079: record_fnd_log(
1080: pv_fnd_log => lv_return_mess
1081: );
1082: END validate_trx_tax_line_exist;
1083:
1084: --Added by zhiwei for Bug#12639945 on 20110624 begin
1138: pn_source_line_id => pn_interface_line_id,
1139: pv_err_mess => lv_error_mess,
1140: pv_invalid_value => pn_trx_id
1141: );
1142: record_fnd_log(
1143: pv_fnd_log => lv_return_mess
1144: );
1145: END IF;
1146: END IF;
1139: pv_err_mess => lv_error_mess,
1140: pv_invalid_value => pn_trx_id
1141: );
1142: record_fnd_log(
1143: pv_fnd_log => lv_return_mess
1144: );
1145: END IF;
1146: END IF;
1147: IF pv_import_module = JAI_CONSTANTS.SOURCE_AR THEN
1159: pn_source_line_id => pn_interface_line_id,
1160: pv_err_mess => lv_error_mess,
1161: pv_invalid_value => pn_trx_id
1162: );
1163: record_fnd_log(
1164: pv_fnd_log => lv_return_mess
1165: );
1166: END IF;
1167: END IF;
1160: pv_err_mess => lv_error_mess,
1161: pv_invalid_value => pn_trx_id
1162: );
1163: record_fnd_log(
1164: pv_fnd_log => lv_return_mess
1165: );
1166: END IF;
1167: END IF;
1168: EXCEPTION
1176: pn_source_line_id => pn_interface_line_id,
1177: pv_err_mess => lv_error_mess,
1178: pv_invalid_value => pn_trx_id
1179: );
1180: record_fnd_log(
1181: pv_fnd_log => lv_return_mess
1182: );
1183: END validate_trx_accted;
1184: -------------------------------------------------------------------------------------
1177: pv_err_mess => lv_error_mess,
1178: pv_invalid_value => pn_trx_id
1179: );
1180: record_fnd_log(
1181: pv_fnd_log => lv_return_mess
1182: );
1183: END validate_trx_accted;
1184: -------------------------------------------------------------------------------------
1185: --Added by zhiwei for Bug#12639945 on 20110624 end
1278: pn_source_line_id => pn_interface_line_id,
1279: pv_err_mess => lv_error_mess,
1280: pv_invalid_value => pn_trx_id
1281: );
1282: record_fnd_log(
1283: pv_fnd_log => lv_return_mess
1284: );
1285: END IF; --AR
1286:
1279: pv_err_mess => lv_error_mess,
1280: pv_invalid_value => pn_trx_id
1281: );
1282: record_fnd_log(
1283: pv_fnd_log => lv_return_mess
1284: );
1285: END IF; --AR
1286:
1287: OPEN chk_ar_apply;
1298: pn_source_line_id => pn_interface_line_id,
1299: pv_err_mess => lv_error_mess,
1300: pv_invalid_value => pn_trx_id
1301: );
1302: record_fnd_log(
1303: pv_fnd_log => lv_return_mess
1304: );
1305: END IF;
1306:
1299: pv_err_mess => lv_error_mess,
1300: pv_invalid_value => pn_trx_id
1301: );
1302: record_fnd_log(
1303: pv_fnd_log => lv_return_mess
1304: );
1305: END IF;
1306:
1307: ELSE
1331: pn_source_line_id => pn_interface_line_id,
1332: pv_err_mess => lv_error_mess,
1333: pv_invalid_value => pn_trx_id
1334: );
1335: record_fnd_log(
1336: pv_fnd_log => lv_return_mess
1337: );
1338: END IF;
1339:
1332: pv_err_mess => lv_error_mess,
1333: pv_invalid_value => pn_trx_id
1334: );
1335: record_fnd_log(
1336: pv_fnd_log => lv_return_mess
1337: );
1338: END IF;
1339:
1340: --Added by zhiwei for Bug#Bug#12639971 on 20110617 begin
1357: pn_source_line_id => pn_interface_line_id,
1358: pv_err_mess => lv_error_mess,
1359: pv_invalid_value => pn_trx_id
1360: );
1361: record_fnd_log(
1362: pv_fnd_log => lv_return_mess
1363: );
1364: END IF;
1365: -------------------------------------------------------------
1358: pv_err_mess => lv_error_mess,
1359: pv_invalid_value => pn_trx_id
1360: );
1361: record_fnd_log(
1362: pv_fnd_log => lv_return_mess
1363: );
1364: END IF;
1365: -------------------------------------------------------------
1366: --Added by zhiwei for Bug#Bug#12639971 on 20110617 end
1379: pn_source_line_id => pn_interface_line_id,
1380: pv_err_mess => lv_error_mess,
1381: pv_invalid_value => null
1382: );
1383: record_fnd_log(
1384: pv_fnd_log => lv_return_mess
1385: );
1386:
1387: END IF; */ --Commented by zhiwei for Bug#Bug#12639971 on 20110617 end
1380: pv_err_mess => lv_error_mess,
1381: pv_invalid_value => null
1382: );
1383: record_fnd_log(
1384: pv_fnd_log => lv_return_mess
1385: );
1386:
1387: END IF; */ --Commented by zhiwei for Bug#Bug#12639971 on 20110617 end
1388:
1400: pn_source_line_id => pn_interface_line_id,
1401: pv_err_mess => lv_error_mess,
1402: pv_invalid_value => pn_interface_line_id
1403: );
1404: record_fnd_log(
1405: pv_fnd_log => lv_return_mess
1406: );
1407:
1408: END validate_trx_status;
1401: pv_err_mess => lv_error_mess,
1402: pv_invalid_value => pn_interface_line_id
1403: );
1404: record_fnd_log(
1405: pv_fnd_log => lv_return_mess
1406: );
1407:
1408: END validate_trx_status;
1409:
1482: pn_source_line_id => pn_interface_line_id,
1483: pv_err_mess => lv_error_mess,
1484: pv_invalid_value => pn_trx_id
1485: );
1486: record_fnd_log(
1487: pv_fnd_log => lv_return_mess
1488: );
1489:
1490: END IF;
1483: pv_err_mess => lv_error_mess,
1484: pv_invalid_value => pn_trx_id
1485: );
1486: record_fnd_log(
1487: pv_fnd_log => lv_return_mess
1488: );
1489:
1490: END IF;
1491:
1500: pn_source_line_id => pn_interface_line_id,
1501: pv_err_mess => lv_error_mess,
1502: pv_invalid_value => pn_trx_id
1503: );
1504: record_fnd_log(
1505: pv_fnd_log => lv_return_mess
1506: );
1507:
1508: END IF;
1501: pv_err_mess => lv_error_mess,
1502: pv_invalid_value => pn_trx_id
1503: );
1504: record_fnd_log(
1505: pv_fnd_log => lv_return_mess
1506: );
1507:
1508: END IF;
1509:
1527: pn_source_line_id => pn_interface_line_id,
1528: pv_err_mess => lv_error_mess,
1529: pv_invalid_value => pn_trx_id
1530: );
1531: record_fnd_log(
1532: pv_fnd_log => lv_return_mess
1533: );
1534:
1535: END IF;
1528: pv_err_mess => lv_error_mess,
1529: pv_invalid_value => pn_trx_id
1530: );
1531: record_fnd_log(
1532: pv_fnd_log => lv_return_mess
1533: );
1534:
1535: END IF;
1536:
1553: pn_source_line_id => pn_interface_line_id,
1554: pv_err_mess => lv_error_mess,
1555: pv_invalid_value => pn_trx_id
1556: );
1557: record_fnd_log(
1558: pv_fnd_log => lv_return_mess
1559: );
1560: END IF;
1561:
1554: pv_err_mess => lv_error_mess,
1555: pv_invalid_value => pn_trx_id
1556: );
1557: record_fnd_log(
1558: pv_fnd_log => lv_return_mess
1559: );
1560: END IF;
1561:
1562: IF(rec_get_info.gl_date is null)THEN
1570: pn_source_line_id => pn_interface_line_id,
1571: pv_err_mess => lv_error_mess,
1572: pv_invalid_value => pn_trx_id
1573: );
1574: record_fnd_log(
1575: pv_fnd_log => lv_return_mess
1576: );
1577:
1578: END IF;
1571: pv_err_mess => lv_error_mess,
1572: pv_invalid_value => pn_trx_id
1573: );
1574: record_fnd_log(
1575: pv_fnd_log => lv_return_mess
1576: );
1577:
1578: END IF;
1579:
1597: pn_source_line_id => pn_interface_line_id,
1598: pv_err_mess => lv_error_mess,
1599: pv_invalid_value => pn_trx_id
1600: );
1601: record_fnd_log(
1602: pv_fnd_log => lv_return_mess
1603: );
1604: END IF;
1605:
1598: pv_err_mess => lv_error_mess,
1599: pv_invalid_value => pn_trx_id
1600: );
1601: record_fnd_log(
1602: pv_fnd_log => lv_return_mess
1603: );
1604: END IF;
1605:
1606: END IF; --AP
1627: pn_source_line_id => pn_interface_line_id,
1628: pv_err_mess => lv_error_mess,
1629: pv_invalid_value => pn_trx_id
1630: );
1631: record_fnd_log(
1632: pv_fnd_log => lv_return_mess
1633: );
1634:
1635: END IF;
1628: pv_err_mess => lv_error_mess,
1629: pv_invalid_value => pn_trx_id
1630: );
1631: record_fnd_log(
1632: pv_fnd_log => lv_return_mess
1633: );
1634:
1635: END IF;
1636:
1648: pn_source_line_id => pn_interface_line_id,
1649: pv_err_mess => lv_error_mess,
1650: pv_invalid_value => pn_interface_line_id
1651: );
1652: record_fnd_log(
1653: pv_fnd_log => lv_return_mess
1654: );
1655:
1656: END validate_trx_period;
1649: pv_err_mess => lv_error_mess,
1650: pv_invalid_value => pn_interface_line_id
1651: );
1652: record_fnd_log(
1653: pv_fnd_log => lv_return_mess
1654: );
1655:
1656: END validate_trx_period;
1657:
1682: pn_source_line_id => pn_tax_line_id,
1683: pv_err_mess => lv_error_mess,
1684: pv_invalid_value => pn_tax_line_id
1685: );
1686: record_fnd_log(
1687: pv_fnd_log => lv_return_mess
1688: );
1689: END IF;
1690: EXCEPTION
1683: pv_err_mess => lv_error_mess,
1684: pv_invalid_value => pn_tax_line_id
1685: );
1686: record_fnd_log(
1687: pv_fnd_log => lv_return_mess
1688: );
1689: END IF;
1690: EXCEPTION
1691: WHEN OTHERS THEN
1699: pn_source_line_id => pn_tax_line_id,
1700: pv_err_mess => lv_error_mess,
1701: pv_invalid_value => pn_tax_line_id
1702: );
1703: record_fnd_log(
1704: pv_fnd_log => lv_return_mess
1705: );
1706: END validate_tax_line_no;
1707:
1700: pv_err_mess => lv_error_mess,
1701: pv_invalid_value => pn_tax_line_id
1702: );
1703: record_fnd_log(
1704: pv_fnd_log => lv_return_mess
1705: );
1706: END validate_tax_line_no;
1707:
1708: /*
1790: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
1791: pv_err_mess => lv_error_mess,
1792: pv_invalid_value => pr_tax_lines.external_tax_code
1793: );*/
1794: record_fnd_log(
1795: pv_fnd_log => lv_return_mess
1796: );
1797: ELSE
1798: IF(NVL(lv_use_flag,'#') = 'Y')THEN
1791: pv_err_mess => lv_error_mess,
1792: pv_invalid_value => pr_tax_lines.external_tax_code
1793: );*/
1794: record_fnd_log(
1795: pv_fnd_log => lv_return_mess
1796: );
1797: ELSE
1798: IF(NVL(lv_use_flag,'#') = 'Y')THEN
1799: --Use EBS tax name
1849: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
1850: pv_err_mess => lv_error_mess,
1851: pv_invalid_value => nvl(pr_tax_lines.external_tax_code, lv_tax_name)
1852: );
1853: record_fnd_log(
1854: pv_fnd_log => lv_return_mess
1855: );
1856:
1857: ELSE
1850: pv_err_mess => lv_error_mess,
1851: pv_invalid_value => nvl(pr_tax_lines.external_tax_code, lv_tax_name)
1852: );
1853: record_fnd_log(
1854: pv_fnd_log => lv_return_mess
1855: );
1856:
1857: ELSE
1858: IF ln_count > 1 THEN
1865: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
1866: pv_err_mess => lv_error_mess,
1867: pv_invalid_value => nvl(pr_tax_lines.external_tax_code, lv_tax_name)
1868: );
1869: record_fnd_log(
1870: pv_fnd_log => lv_return_mess
1871: );
1872: END IF;
1873:
1866: pv_err_mess => lv_error_mess,
1867: pv_invalid_value => nvl(pr_tax_lines.external_tax_code, lv_tax_name)
1868: );
1869: record_fnd_log(
1870: pv_fnd_log => lv_return_mess
1871: );
1872: END IF;
1873:
1874: ln_exist_flag := 0;
1892: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
1893: pv_err_mess => lv_error_mess,
1894: pv_invalid_value => pr_tax_lines.external_tax_code
1895: );
1896: record_fnd_log(
1897: pv_fnd_log => lv_return_mess
1898: );
1899: END IF;*/
1900:
1893: pv_err_mess => lv_error_mess,
1894: pv_invalid_value => pr_tax_lines.external_tax_code
1895: );
1896: record_fnd_log(
1897: pv_fnd_log => lv_return_mess
1898: );
1899: END IF;*/
1900:
1901: --Check the tax in the range of startdate
1910: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
1911: pv_err_mess => lv_error_mess,
1912: pv_invalid_value => nvl(pr_tax_lines.external_tax_code, lv_tax_name)
1913: );
1914: record_fnd_log(
1915: pv_fnd_log => lv_return_mess
1916: );
1917: END IF;
1918:
1911: pv_err_mess => lv_error_mess,
1912: pv_invalid_value => nvl(pr_tax_lines.external_tax_code, lv_tax_name)
1913: );
1914: record_fnd_log(
1915: pv_fnd_log => lv_return_mess
1916: );
1917: END IF;
1918:
1919: END IF;
1930: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
1931: pv_err_mess => lv_error_mess,
1932: pv_invalid_value => nvl(pr_tax_lines.external_tax_code, lv_tax_name)
1933: );
1934: record_fnd_log(
1935: pv_fnd_log => lv_return_mess
1936: );
1937: END IF;
1938:
1931: pv_err_mess => lv_error_mess,
1932: pv_invalid_value => nvl(pr_tax_lines.external_tax_code, lv_tax_name)
1933: );
1934: record_fnd_log(
1935: pv_fnd_log => lv_return_mess
1936: );
1937: END IF;
1938:
1939: END IF;
1952: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
1953: pv_err_mess => lv_error_mess,
1954: pv_invalid_value => nvl(pr_tax_lines.external_tax_code, lv_tax_name)
1955: );
1956: record_fnd_log(
1957: pv_fnd_log => lv_return_mess
1958: );
1959: END IF;
1960:
1953: pv_err_mess => lv_error_mess,
1954: pv_invalid_value => nvl(pr_tax_lines.external_tax_code, lv_tax_name)
1955: );
1956: record_fnd_log(
1957: pv_fnd_log => lv_return_mess
1958: );
1959: END IF;
1960:
1961: END IF;--Find Mapping tax id
1971: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
1972: pv_err_mess => lv_error_mess,
1973: pv_invalid_value => nvl(pr_tax_lines.external_tax_code, lv_tax_name)
1974: );
1975: record_fnd_log(
1976: pv_fnd_log => lv_return_mess
1977: );
1978: END validate_tax_code;
1979:
1972: pv_err_mess => lv_error_mess,
1973: pv_invalid_value => nvl(pr_tax_lines.external_tax_code, lv_tax_name)
1974: );
1975: record_fnd_log(
1976: pv_fnd_log => lv_return_mess
1977: );
1978: END validate_tax_code;
1979:
1980:
2006: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
2007: pv_err_mess => lv_error_mess,
2008: pv_invalid_value => pr_tax_lines.interface_tax_line_id
2009: );
2010: record_fnd_log(
2011: pv_fnd_log => lv_return_mess
2012: );
2013: ELSE
2014: --Check the ccid is available.
2007: pv_err_mess => lv_error_mess,
2008: pv_invalid_value => pr_tax_lines.interface_tax_line_id
2009: );
2010: record_fnd_log(
2011: pv_fnd_log => lv_return_mess
2012: );
2013: ELSE
2014: --Check the ccid is available.
2015: validate_ccid_id_suitable(
2041: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
2042: pv_err_mess => lv_error_mess,
2043: pv_invalid_value => pr_tax_lines.tax_amount
2044: );
2045: record_fnd_log(
2046: pv_fnd_log => lv_return_mess
2047: );
2048: END IF;
2049: END IF;
2042: pv_err_mess => lv_error_mess,
2043: pv_invalid_value => pr_tax_lines.tax_amount
2044: );
2045: record_fnd_log(
2046: pv_fnd_log => lv_return_mess
2047: );
2048: END IF;
2049: END IF;
2050: EXCEPTION
2058: pn_source_line_id => pr_tax_lines.INTERFACE_TAX_LINE_ID,
2059: pv_err_mess => lv_error_mess,
2060: pv_invalid_value => pr_tax_lines.CODE_COMBINATION_ID
2061: );
2062: record_fnd_log(
2063: pv_fnd_log => lv_return_mess
2064: );
2065: END validate_dist_info;
2066:
2059: pv_err_mess => lv_error_mess,
2060: pv_invalid_value => pr_tax_lines.CODE_COMBINATION_ID
2061: );
2062: record_fnd_log(
2063: pv_fnd_log => lv_return_mess
2064: );
2065: END validate_dist_info;
2066:
2067: /*
2175: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
2176: pv_err_mess => lv_error_mess,
2177: pv_invalid_value => pr_tax_lines.external_tax_code
2178: );
2179: record_fnd_log(
2180: pv_fnd_log => lv_return_mess
2181: );
2182: END IF;
2183: ELSIF (pr_interface_lines.import_module = JAI_CONSTANTS.SOURCE_AR) THEN
2176: pv_err_mess => lv_error_mess,
2177: pv_invalid_value => pr_tax_lines.external_tax_code
2178: );
2179: record_fnd_log(
2180: pv_fnd_log => lv_return_mess
2181: );
2182: END IF;
2183: ELSIF (pr_interface_lines.import_module = JAI_CONSTANTS.SOURCE_AR) THEN
2184:
2196: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
2197: pv_err_mess => lv_error_mess,
2198: pv_invalid_value => pr_tax_lines.external_tax_code
2199: );
2200: record_fnd_log(
2201: pv_fnd_log => lv_return_mess
2202: );
2203: END IF;
2204: END IF;
2197: pv_err_mess => lv_error_mess,
2198: pv_invalid_value => pr_tax_lines.external_tax_code
2199: );
2200: record_fnd_log(
2201: pv_fnd_log => lv_return_mess
2202: );
2203: END IF;
2204: END IF;
2205:
2216: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
2217: pv_err_mess => lv_error_mess,
2218: pv_invalid_value => pr_tax_lines.external_tax_code
2219: );
2220: record_fnd_log(
2221: pv_fnd_log => lv_return_mess
2222: );
2223: END validate_tax_constrain;
2224:
2217: pv_err_mess => lv_error_mess,
2218: pv_invalid_value => pr_tax_lines.external_tax_code
2219: );
2220: record_fnd_log(
2221: pv_fnd_log => lv_return_mess
2222: );
2223: END validate_tax_constrain;
2224:
2225: /*
2273: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
2274: pv_err_mess => lv_error_mess,
2275: pv_invalid_value => pr_tax_lines.external_tax_code
2276: );
2277: record_fnd_log(
2278: pv_fnd_log => lv_return_mess
2279: );
2280:
2281: end if;
2274: pv_err_mess => lv_error_mess,
2275: pv_invalid_value => pr_tax_lines.external_tax_code
2276: );
2277: record_fnd_log(
2278: pv_fnd_log => lv_return_mess
2279: );
2280:
2281: end if;
2282: --------------------------------------------------------------------
2307: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
2308: pv_err_mess => lv_error_mess,
2309: pv_invalid_value => pr_tax_lines.external_tax_code
2310: );
2311: record_fnd_log(
2312: pv_fnd_log => lv_return_mess
2313: );
2314: END IF;--Precedence should not larger than count of tax lines
2315:
2308: pv_err_mess => lv_error_mess,
2309: pv_invalid_value => pr_tax_lines.external_tax_code
2310: );
2311: record_fnd_log(
2312: pv_fnd_log => lv_return_mess
2313: );
2314: END IF;--Precedence should not larger than count of tax lines
2315:
2316: IF(
2370: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
2371: pv_err_mess => lv_error_mess,
2372: pv_invalid_value => pr_tax_lines.external_tax_code
2373: );
2374: record_fnd_log(
2375: pv_fnd_log => lv_return_mess
2376: );
2377: END IF;--Precedence should not have duplicate point in one tax line
2378:
2371: pv_err_mess => lv_error_mess,
2372: pv_invalid_value => pr_tax_lines.external_tax_code
2373: );
2374: record_fnd_log(
2375: pv_fnd_log => lv_return_mess
2376: );
2377: END IF;--Precedence should not have duplicate point in one tax line
2378:
2379: IF( NVL(pr_tax_lines.precedence_1,-1) = pr_tax_lines.tax_line_no
2397: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
2398: pv_err_mess => lv_error_mess,
2399: pv_invalid_value => pr_tax_lines.external_tax_code
2400: );
2401: record_fnd_log(
2402: pv_fnd_log => lv_return_mess
2403: );
2404: END IF;--Precedence 1..10 can not equqals tax line no
2405: EXCEPTION
2398: pv_err_mess => lv_error_mess,
2399: pv_invalid_value => pr_tax_lines.external_tax_code
2400: );
2401: record_fnd_log(
2402: pv_fnd_log => lv_return_mess
2403: );
2404: END IF;--Precedence 1..10 can not equqals tax line no
2405: EXCEPTION
2406: WHEN OTHERS THEN
2414: pn_source_line_id => pr_tax_lines.interface_tax_line_id,
2415: pv_err_mess => lv_error_mess,
2416: pv_invalid_value => pr_tax_lines.external_tax_code
2417: );
2418: record_fnd_log(
2419: pv_fnd_log => lv_return_mess
2420: );
2421: END validate_tax_precedence;
2422:
2415: pv_err_mess => lv_error_mess,
2416: pv_invalid_value => pr_tax_lines.external_tax_code
2417: );
2418: record_fnd_log(
2419: pv_fnd_log => lv_return_mess
2420: );
2421: END validate_tax_precedence;
2422:
2423:
2484: pn_source_line_id => pn_tax_line_id,
2485: pv_err_mess => lv_error_mess,
2486: pv_invalid_value => ln_qty_rate
2487: );
2488: record_fnd_log(
2489: pv_fnd_log => lv_return_mess
2490: );
2491: END IF;
2492:
2485: pv_err_mess => lv_error_mess,
2486: pv_invalid_value => ln_qty_rate
2487: );
2488: record_fnd_log(
2489: pv_fnd_log => lv_return_mess
2490: );
2491: END IF;
2492:
2493: END IF;
2504: pn_source_line_id => pn_tax_line_id,
2505: pv_err_mess => lv_return_mess,
2506: pv_invalid_value => ln_qty_rate
2507: );
2508: record_fnd_log(
2509: pv_fnd_log => lv_return_mess
2510: );
2511: END validate_qty_rate;
2512: ---------------------------------------------------------
2505: pv_err_mess => lv_return_mess,
2506: pv_invalid_value => ln_qty_rate
2507: );
2508: record_fnd_log(
2509: pv_fnd_log => lv_return_mess
2510: );
2511: END validate_qty_rate;
2512: ---------------------------------------------------------
2513: --Added by zhiwei for Bug#12604133 on 20110623 end
2556: BEGIN
2557:
2558: FOR rec_duplicate_info IN get_duplicate_info_cur
2559: LOOP
2560: --Get the duplicate lines, update status and fnd log.
2561: FOR rec_interface_line_id IN get_dupl_lines_cur(
2562: rec_duplicate_info.INTERNAL_TRX_ID,
2563: rec_duplicate_info.INTERNAL_TRX_LINE_ID
2564: )
2571: pn_source_line_id => rec_interface_line_id.interface_line_id,
2572: pv_err_mess => lv_error_mess,
2573: pv_invalid_value => rec_interface_line_id.transaction_num || ' and ' || rec_interface_line_id.transaction_line_num
2574: );
2575: record_fnd_log(
2576: pv_fnd_log => lv_return_mess
2577: );
2578: update_line_status(
2579: pn_interface_line_id => rec_interface_line_id.interface_line_id,
2572: pv_err_mess => lv_error_mess,
2573: pv_invalid_value => rec_interface_line_id.transaction_num || ' and ' || rec_interface_line_id.transaction_line_num
2574: );
2575: record_fnd_log(
2576: pv_fnd_log => lv_return_mess
2577: );
2578: update_line_status(
2579: pn_interface_line_id => rec_interface_line_id.interface_line_id,
2580: pv_import_status => GV_IMPORT_FAILURE,
2601: pn_source_line_id => rec_interface_line_id.interface_line_id,
2602: pv_err_mess => lv_error_mess,
2603: pv_invalid_value => rec_interface_line_id.transaction_num || ' and ' || rec_interface_line_id.transaction_line_num
2604: );
2605: record_fnd_log(
2606: pv_fnd_log => lv_return_mess
2607: );
2608: update_line_status(
2609: pn_interface_line_id => rec_interface_line_id.interface_line_id,
2602: pv_err_mess => lv_error_mess,
2603: pv_invalid_value => rec_interface_line_id.transaction_num || ' and ' || rec_interface_line_id.transaction_line_num
2604: );
2605: record_fnd_log(
2606: pv_fnd_log => lv_return_mess
2607: );
2608: update_line_status(
2609: pn_interface_line_id => rec_interface_line_id.interface_line_id,
2610: pv_import_status => GV_IMPORT_FAILURE,
2863: pn_source_line_id => rec_interface_line_id.interface_line_id,
2864: pv_err_mess => lv_error_mess,
2865: pv_invalid_value => rec_trx_line_count.TRX_ID
2866: );
2867: record_fnd_log(
2868: pv_fnd_log => lv_return_mess
2869: );
2870:
2871: update_line_status(
2864: pv_err_mess => lv_error_mess,
2865: pv_invalid_value => rec_trx_line_count.TRX_ID
2866: );
2867: record_fnd_log(
2868: pv_fnd_log => lv_return_mess
2869: );
2870:
2871: update_line_status(
2872: pn_interface_line_id => rec_interface_line_id.interface_line_id,
2976: pn_source_line_id => rec_interface_line_id.interface_line_id,
2977: pv_err_mess => lv_error_mess,
2978: pv_invalid_value => rec_trx_line_count.TRX_ID
2979: );
2980: record_fnd_log(
2981: pv_fnd_log => lv_return_mess
2982: );
2983:
2984: update_line_status(
2977: pv_err_mess => lv_error_mess,
2978: pv_invalid_value => rec_trx_line_count.TRX_ID
2979: );
2980: record_fnd_log(
2981: pv_fnd_log => lv_return_mess
2982: );
2983:
2984: update_line_status(
2985: pn_interface_line_id => rec_interface_line_id.interface_line_id,
3048: pn_source_line_id => rec_interface_line_id.interface_line_id,
3049: pv_err_mess => lv_error_mess,
3050: pv_invalid_value => rec_trx_line_count.TRX_ID
3051: );
3052: record_fnd_log(
3053: pv_fnd_log => lv_return_mess
3054: );
3055:
3056: update_line_status(
3049: pv_err_mess => lv_error_mess,
3050: pv_invalid_value => rec_trx_line_count.TRX_ID
3051: );
3052: record_fnd_log(
3053: pv_fnd_log => lv_return_mess
3054: );
3055:
3056: update_line_status(
3057: pn_interface_line_id => rec_interface_line_id.interface_line_id,
3110: pn_source_line_id => rec_interface_line_id.interface_line_id,
3111: pv_err_mess => lv_error_mess,
3112: pv_invalid_value => rec_trx_line_count.TRX_ID
3113: );
3114: record_fnd_log(
3115: pv_fnd_log => lv_return_mess
3116: );
3117:
3118: update_line_status(
3111: pv_err_mess => lv_error_mess,
3112: pv_invalid_value => rec_trx_line_count.TRX_ID
3113: );
3114: record_fnd_log(
3115: pv_fnd_log => lv_return_mess
3116: );
3117:
3118: update_line_status(
3119: pn_interface_line_id => rec_interface_line_id.interface_line_id,
3221: --Added by zhiwei for Bug#12630077 on 20110608 end
3222: )THEN
3223: lv_determine_flag := 'TRX||INT';
3224: END IF;
3225: --Get lines according to the trx id ,update status and fnd log
3226: FOR rec_interface_line_id IN get_err_lines_cur(
3227: rec_trx_line_count.import_module,
3228: rec_trx_line_count.trx_id
3229: )
3238: pn_source_line_id => rec_interface_line_id.interface_line_id,
3239: pv_err_mess => lv_error_mess,
3240: pv_invalid_value => rec_trx_line_count.TRX_ID
3241: );
3242: record_fnd_log(
3243: pv_fnd_log => lv_return_mess
3244: );
3245:
3246: update_line_status(
3239: pv_err_mess => lv_error_mess,
3240: pv_invalid_value => rec_trx_line_count.TRX_ID
3241: );
3242: record_fnd_log(
3243: pv_fnd_log => lv_return_mess
3244: );
3245:
3246: update_line_status(
3247: pn_interface_line_id => rec_interface_line_id.interface_line_id,
3330: pn_source_line_id => rec_interface_line_id.interface_line_id,
3331: pv_err_mess => lv_error_mess,
3332: pv_invalid_value => rec_trx_line_count.TRX_ID
3333: );
3334: record_fnd_log(
3335: pv_fnd_log => lv_return_mess
3336: );
3337:
3338: update_line_status(
3331: pv_err_mess => lv_error_mess,
3332: pv_invalid_value => rec_trx_line_count.TRX_ID
3333: );
3334: record_fnd_log(
3335: pv_fnd_log => lv_return_mess
3336: );
3337:
3338: update_line_status(
3339: pn_interface_line_id => rec_interface_line_id.interface_line_id,
3366: pn_source_line_id => rec_interface_line_id.interface_line_id,
3367: pv_err_mess => lv_error_mess,
3368: pv_invalid_value => null
3369: );
3370: record_fnd_log(
3371: pv_fnd_log => lv_return_mess
3372: );
3373: update_line_status(
3374: pn_interface_line_id => rec_interface_line_id.interface_line_id,
3367: pv_err_mess => lv_error_mess,
3368: pv_invalid_value => null
3369: );
3370: record_fnd_log(
3371: pv_fnd_log => lv_return_mess
3372: );
3373: update_line_status(
3374: pn_interface_line_id => rec_interface_line_id.interface_line_id,
3375: pv_import_status => GV_IMPORT_FAILURE,
3454: pn_source_line_id => pn_interface_line_id,
3455: pv_err_mess => lv_error_mess,
3456: pv_invalid_value => pn_trx_id
3457: );
3458: record_fnd_log( pv_fnd_log => lv_return_mess );
3459: END IF;
3460: EXCEPTION
3461: WHEN OTHERS THEN
3462: xn_err_flag := 1;
3468: pn_source_line_id => pn_interface_line_id,
3469: pv_err_mess => lv_error_mess,
3470: pv_invalid_value => pn_trx_id
3471: );
3472: record_fnd_log( pv_fnd_log => lv_return_mess );
3473:
3474: END validate_import_trx;
3475:
3476: /*
3500: pn_source_line_id => pr_interface_lines.interface_line_id,
3501: pv_err_mess => lv_error_mess,
3502: pv_invalid_value => pr_interface_lines.transaction_id
3503: );
3504: record_fnd_log(
3505: pv_fnd_log => lv_return_mess
3506: );
3507: END IF;
3508: EXCEPTION
3501: pv_err_mess => lv_error_mess,
3502: pv_invalid_value => pr_interface_lines.transaction_id
3503: );
3504: record_fnd_log(
3505: pv_fnd_log => lv_return_mess
3506: );
3507: END IF;
3508: EXCEPTION
3509: WHEN OTHERS THEN
3517: pv_err_mess => lv_error_mess,
3518: pv_invalid_value => pr_interface_lines.transaction_id
3519: );
3520:
3521: record_fnd_log(
3522: pv_fnd_log => lv_return_mess
3523: );
3524: END validate_trx_id_equals;
3525:
3518: pv_invalid_value => pr_interface_lines.transaction_id
3519: );
3520:
3521: record_fnd_log(
3522: pv_fnd_log => lv_return_mess
3523: );
3524: END validate_trx_id_equals;
3525:
3526: --==========================================================================
3556: , xn_exchange_rate OUT NOCOPY NUMBER
3557: , xn_batch_id OUT NOCOPY NUMBER
3558: )
3559: IS
3560: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
3561: ln_proc_level NUMBER := FND_LOG.level_procedure;
3562: lv_proc_name VARCHAR2 (100) := 'Get_Invoice_Header_Infor';
3563:
3564: CURSOR Get_Invoice_Header_Infor_cur IS
3557: , xn_batch_id OUT NOCOPY NUMBER
3558: )
3559: IS
3560: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
3561: ln_proc_level NUMBER := FND_LOG.level_procedure;
3562: lv_proc_name VARCHAR2 (100) := 'Get_Invoice_Header_Infor';
3563:
3564: CURSOR Get_Invoice_Header_Infor_cur IS
3565: SELECT
3574: BEGIN
3575: --log for debug
3576: IF ( ln_proc_level >= ln_dbg_level)
3577: THEN
3578: FND_LOG.STRING ( ln_proc_level
3579: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.begin'
3580: , 'Enter procedure'
3581: );
3582: FND_LOG.STRING ( ln_proc_level
3578: FND_LOG.STRING ( ln_proc_level
3579: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.begin'
3580: , 'Enter procedure'
3581: );
3582: FND_LOG.STRING ( ln_proc_level
3583: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3584: , 'pn_invoice_id ' || pn_invoice_id
3585: );
3586: END IF; --( ln_proc_level >= ln_dbg_level) ;
3597:
3598: --log for debug
3599: IF ( ln_proc_level >= ln_dbg_level)
3600: THEN
3601: FND_LOG.STRING ( ln_proc_level
3602: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3603: , 'xn_vendor_id ' || xn_vendor_id
3604: );
3605: FND_LOG.STRING ( ln_proc_level
3601: FND_LOG.STRING ( ln_proc_level
3602: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3603: , 'xn_vendor_id ' || xn_vendor_id
3604: );
3605: FND_LOG.STRING ( ln_proc_level
3606: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3607: , 'xn_vendor_site_id ' || xn_vendor_site_id
3608: );
3609: FND_LOG.STRING ( ln_proc_level
3605: FND_LOG.STRING ( ln_proc_level
3606: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3607: , 'xn_vendor_site_id ' || xn_vendor_site_id
3608: );
3609: FND_LOG.STRING ( ln_proc_level
3610: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3611: , 'xv_currency_code ' || xv_currency_code
3612: );
3613: FND_LOG.STRING ( ln_proc_level
3609: FND_LOG.STRING ( ln_proc_level
3610: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3611: , 'xv_currency_code ' || xv_currency_code
3612: );
3613: FND_LOG.STRING ( ln_proc_level
3614: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3615: , 'xn_exchange_rate ' || xn_exchange_rate
3616: );
3617: FND_LOG.STRING ( ln_proc_level
3613: FND_LOG.STRING ( ln_proc_level
3614: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3615: , 'xn_exchange_rate ' || xn_exchange_rate
3616: );
3617: FND_LOG.STRING ( ln_proc_level
3618: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3619: , 'xn_batch_id ' || xn_batch_id
3620: );
3621: FND_LOG.STRING ( ln_proc_level
3617: FND_LOG.STRING ( ln_proc_level
3618: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3619: , 'xn_batch_id ' || xn_batch_id
3620: );
3621: FND_LOG.STRING ( ln_proc_level
3622: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.end'
3623: , 'Exit procedure'
3624: );
3625: END IF; --( ln_proc_level >= ln_dbg_level )
3626: EXCEPTION
3627: WHEN OTHERS THEN
3628: IF ( ln_proc_level >= ln_dbg_level)
3629: THEN
3630: FND_LOG.STRING ( ln_proc_level
3631: , GV_MODULE_PREFIX|| '.'|| lv_proc_name
3632: || '. Other_Exception '
3633: , SQLCODE || ':' || SQLERRM
3634: );
3671: jai_cmn_vendor_sites
3672: WHERE NVL (vendor_site_id, 0) = pn_vendor_site_id
3673: AND vendor_id = pn_vendor_id;
3674:
3675: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
3676: ln_proc_level NUMBER := FND_LOG.level_procedure;
3677: lv_proc_name VARCHAR2 (100) := 'Get_Tax_Cat_Serv_Type';
3678: BEGIN
3679: --log for debug
3672: WHERE NVL (vendor_site_id, 0) = pn_vendor_site_id
3673: AND vendor_id = pn_vendor_id;
3674:
3675: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
3676: ln_proc_level NUMBER := FND_LOG.level_procedure;
3677: lv_proc_name VARCHAR2 (100) := 'Get_Tax_Cat_Serv_Type';
3678: BEGIN
3679: --log for debug
3680: IF ( ln_proc_level >= ln_dbg_level)
3678: BEGIN
3679: --log for debug
3680: IF ( ln_proc_level >= ln_dbg_level)
3681: THEN
3682: FND_LOG.STRING ( ln_proc_level
3683: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.begin'
3684: , 'Enter procedure'
3685: );
3686: FND_LOG.STRING ( ln_proc_level
3682: FND_LOG.STRING ( ln_proc_level
3683: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.begin'
3684: , 'Enter procedure'
3685: );
3686: FND_LOG.STRING ( ln_proc_level
3687: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3688: , 'pn_vendor_id ' || pn_vendor_id
3689: );
3690: FND_LOG.STRING ( ln_proc_level
3686: FND_LOG.STRING ( ln_proc_level
3687: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3688: , 'pn_vendor_id ' || pn_vendor_id
3689: );
3690: FND_LOG.STRING ( ln_proc_level
3691: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3692: , 'pn_vendor_site_id ' || pn_vendor_site_id
3693: );
3694: END IF;
3702: CLOSE get_tax_service_cur;
3703:
3704: IF ( ln_proc_level >= ln_dbg_level)
3705: THEN
3706: FND_LOG.STRING ( ln_proc_level
3707: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3708: , 'xn_tax_category_id ' || xn_tax_category_id
3709: );
3710: FND_LOG.STRING ( ln_proc_level
3706: FND_LOG.STRING ( ln_proc_level
3707: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3708: , 'xn_tax_category_id ' || xn_tax_category_id
3709: );
3710: FND_LOG.STRING ( ln_proc_level
3711: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3712: , 'xv_service_type_code ' || xv_service_type_code
3713: );
3714: FND_LOG.STRING ( ln_proc_level
3710: FND_LOG.STRING ( ln_proc_level
3711: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.parameters'
3712: , 'xv_service_type_code ' || xv_service_type_code
3713: );
3714: FND_LOG.STRING ( ln_proc_level
3715: , GV_MODULE_PREFIX ||'.'|| lv_proc_name || '.end'
3716: , 'Exit procedure'
3717: );
3718: END IF; --( ln_proc_level >= ln_dbg_level )
3719: EXCEPTION
3720: WHEN OTHERS THEN
3721: IF ( ln_proc_level >= ln_dbg_level)
3722: THEN
3723: FND_LOG.STRING ( ln_proc_level
3724: , GV_MODULE_PREFIX|| '.'|| lv_proc_name
3725: || '. Other_Exception '
3726: ,SQLCODE || ':' || SQLERRM
3727: );
4098: pn_source_line_id => pn_interface_line_id,
4099: pv_err_mess => lv_error_mess,
4100: pv_invalid_value => ln_trx_id
4101: );
4102: record_fnd_log(
4103: pv_fnd_log => lv_return_mess
4104: );
4105: END IF;
4106:
4099: pv_err_mess => lv_error_mess,
4100: pv_invalid_value => ln_trx_id
4101: );
4102: record_fnd_log(
4103: pv_fnd_log => lv_return_mess
4104: );
4105: END IF;
4106:
4107: IF(NVL(ln_trx_line_id,-1) = -1)THEN
4114: pn_source_line_id => pn_interface_line_id,
4115: pv_err_mess => lv_error_mess,
4116: pv_invalid_value => ln_trx_line_id
4117: );
4118: record_fnd_log(
4119: pv_fnd_log => lv_return_mess
4120: );
4121: END IF;
4122:
4115: pv_err_mess => lv_error_mess,
4116: pv_invalid_value => ln_trx_line_id
4117: );
4118: record_fnd_log(
4119: pv_fnd_log => lv_return_mess
4120: );
4121: END IF;
4122:
4123: --Assign variable for output
4136: pn_source_line_id => pn_interface_line_id,
4137: pv_err_mess => lv_error_mess,
4138: pv_invalid_value => pv_transaction_num
4139: );
4140: record_fnd_log(
4141: pv_fnd_log => lv_return_mess
4142: );
4143: END get_trx_id_info;
4144:
4137: pv_err_mess => lv_error_mess,
4138: pv_invalid_value => pv_transaction_num
4139: );
4140: record_fnd_log(
4141: pv_fnd_log => lv_return_mess
4142: );
4143: END get_trx_id_info;
4144:
4145: /*
4217: pn_source_line_id => pn_interface_line_id,
4218: pv_err_mess => lv_error_mess,
4219: pv_invalid_value => pn_party_id
4220: );
4221: record_fnd_log(
4222: pv_fnd_log => lv_return_mess
4223: );
4224: ELSE
4225: OPEN get_ar_party_cur;
4218: pv_err_mess => lv_error_mess,
4219: pv_invalid_value => pn_party_id
4220: );
4221: record_fnd_log(
4222: pv_fnd_log => lv_return_mess
4223: );
4224: ELSE
4225: OPEN get_ar_party_cur;
4226: FETCH get_ar_party_cur INTO ln_count_flag;
4236: pn_source_line_id => pn_interface_line_id,
4237: pv_err_mess => lv_error_mess,
4238: pv_invalid_value => pn_party_id
4239: );
4240: record_fnd_log(
4241: pv_fnd_log => lv_return_mess
4242: );
4243: END IF;
4244: END IF;
4237: pv_err_mess => lv_error_mess,
4238: pv_invalid_value => pn_party_id
4239: );
4240: record_fnd_log(
4241: pv_fnd_log => lv_return_mess
4242: );
4243: END IF;
4244: END IF;
4245:
4254: pn_source_line_id => pn_interface_line_id,
4255: pv_err_mess => lv_error_mess,
4256: pv_invalid_value => pn_party_site_id
4257: );
4258: record_fnd_log(
4259: pv_fnd_log => lv_return_mess
4260: );
4261: ELSE
4262: OPEN get_ar_party_site_cur;
4255: pv_err_mess => lv_error_mess,
4256: pv_invalid_value => pn_party_site_id
4257: );
4258: record_fnd_log(
4259: pv_fnd_log => lv_return_mess
4260: );
4261: ELSE
4262: OPEN get_ar_party_site_cur;
4263: FETCH get_ar_party_site_cur INTO ln_count_flag;
4274: pn_source_line_id => pn_interface_line_id,
4275: pv_err_mess => lv_error_mess,
4276: pv_invalid_value => pn_party_site_id
4277: );
4278: record_fnd_log(
4279: pv_fnd_log => lv_return_mess
4280: );
4281:
4282: END IF;
4275: pv_err_mess => lv_error_mess,
4276: pv_invalid_value => pn_party_site_id
4277: );
4278: record_fnd_log(
4279: pv_fnd_log => lv_return_mess
4280: );
4281:
4282: END IF;
4283:
4298: pn_source_line_id => pn_interface_line_id,
4299: pv_err_mess => lv_error_mess,
4300: pv_invalid_value => pn_party_id
4301: );
4302: record_fnd_log(
4303: pv_fnd_log => lv_return_mess
4304: );
4305: ELSE
4306: OPEN get_ap_party_cur;
4299: pv_err_mess => lv_error_mess,
4300: pv_invalid_value => pn_party_id
4301: );
4302: record_fnd_log(
4303: pv_fnd_log => lv_return_mess
4304: );
4305: ELSE
4306: OPEN get_ap_party_cur;
4307: FETCH get_ap_party_cur INTO ln_count_flag;
4317: pn_source_line_id => pn_interface_line_id,
4318: pv_err_mess => lv_error_mess,
4319: pv_invalid_value => pn_party_id
4320: );
4321: record_fnd_log(
4322: pv_fnd_log => lv_return_mess
4323: );
4324: END IF;
4325: END IF;
4318: pv_err_mess => lv_error_mess,
4319: pv_invalid_value => pn_party_id
4320: );
4321: record_fnd_log(
4322: pv_fnd_log => lv_return_mess
4323: );
4324: END IF;
4325: END IF;
4326:
4334: pn_source_line_id => pn_interface_line_id,
4335: pv_err_mess => lv_error_mess,
4336: pv_invalid_value => pn_party_site_id
4337: );
4338: record_fnd_log(
4339: pv_fnd_log => lv_return_mess
4340: );
4341: ELSE
4342: OPEN get_ap_party_site_cur;
4335: pv_err_mess => lv_error_mess,
4336: pv_invalid_value => pn_party_site_id
4337: );
4338: record_fnd_log(
4339: pv_fnd_log => lv_return_mess
4340: );
4341: ELSE
4342: OPEN get_ap_party_site_cur;
4343: FETCH get_ap_party_site_cur INTO ln_count_flag;
4354: pn_source_line_id => pn_interface_line_id,
4355: pv_err_mess => lv_error_mess,
4356: pv_invalid_value => pn_party_site_id
4357: );
4358: record_fnd_log(
4359: pv_fnd_log => lv_return_mess
4360: );
4361:
4362: END IF;
4355: pv_err_mess => lv_error_mess,
4356: pv_invalid_value => pn_party_site_id
4357: );
4358: record_fnd_log(
4359: pv_fnd_log => lv_return_mess
4360: );
4361:
4362: END IF;
4363:
4396: pn_source_line_id => pn_interface_line_id,
4397: pv_err_mess => lv_error_mess,
4398: pv_invalid_value => pn_party_id||' '||pn_party_site_id
4399: );
4400: record_fnd_log(
4401: pv_fnd_log => lv_return_mess
4402: );
4403: END IF;
4404:
4397: pv_err_mess => lv_error_mess,
4398: pv_invalid_value => pn_party_id||' '||pn_party_site_id
4399: );
4400: record_fnd_log(
4401: pv_fnd_log => lv_return_mess
4402: );
4403: END IF;
4404:
4405: EXCEPTION
4413: pn_source_line_id => pn_interface_line_id,
4414: pv_err_mess => lv_error_mess,
4415: pv_invalid_value => pn_interface_line_id
4416: );
4417: record_fnd_log(
4418: pv_fnd_log => lv_return_mess
4419: );
4420: END validate_party_info;
4421:
4414: pv_err_mess => lv_error_mess,
4415: pv_invalid_value => pn_interface_line_id
4416: );
4417: record_fnd_log(
4418: pv_fnd_log => lv_return_mess
4419: );
4420: END validate_party_info;
4421:
4422: /*
4595: pn_source_line_id => pn_interface_line_id,
4596: pv_err_mess => lv_error_mess,
4597: pv_invalid_value => pv_service_type_code
4598: );
4599: record_fnd_log(
4600: pv_fnd_log => lv_return_mess
4601: );
4602: END IF;
4603:
4596: pv_err_mess => lv_error_mess,
4597: pv_invalid_value => pv_service_type_code
4598: );
4599: record_fnd_log(
4600: pv_fnd_log => lv_return_mess
4601: );
4602: END IF;
4603:
4604: ELSE
4621: pn_source_line_id => pn_interface_line_id,
4622: pv_err_mess => lv_error_mess,
4623: pv_invalid_value => pn_interface_line_id
4624: );
4625: record_fnd_log(
4626: pv_fnd_log => lv_return_mess
4627: );
4628: ELSE
4629: --Update to interface line.
4622: pv_err_mess => lv_error_mess,
4623: pv_invalid_value => pn_interface_line_id
4624: );
4625: record_fnd_log(
4626: pv_fnd_log => lv_return_mess
4627: );
4628: ELSE
4629: --Update to interface line.
4630: update jai_interface_lines_all
4651: pn_source_line_id => pn_interface_line_id,
4652: pv_err_mess => lv_error_mess,
4653: pv_invalid_value => pn_interface_line_id
4654: );
4655: record_fnd_log(
4656: pv_fnd_log => lv_return_mess
4657: );
4658:
4659: END validate_service_type;
4652: pv_err_mess => lv_error_mess,
4653: pv_invalid_value => pn_interface_line_id
4654: );
4655: record_fnd_log(
4656: pv_fnd_log => lv_return_mess
4657: );
4658:
4659: END validate_service_type;
4660:
4807: pn_source_line_id => pr_interface_lines.interface_line_id,
4808: pv_err_mess => lv_error_mess,
4809: pv_invalid_value => pr_interface_lines.tax_category_id
4810: );
4811: record_fnd_log(
4812: pv_fnd_log => lv_return_mess
4813: );
4814:
4815: END IF;
4808: pv_err_mess => lv_error_mess,
4809: pv_invalid_value => pr_interface_lines.tax_category_id
4810: );
4811: record_fnd_log(
4812: pv_fnd_log => lv_return_mess
4813: );
4814:
4815: END IF;
4816: ELSE
4835: pn_source_line_id => pr_interface_lines.interface_line_id,
4836: pv_err_mess => lv_error_mess,
4837: pv_invalid_value => null
4838: );
4839: record_fnd_log(
4840: pv_fnd_log => lv_return_mess
4841: );
4842: ELSE
4843: --Update the tax category id to interface line .
4836: pv_err_mess => lv_error_mess,
4837: pv_invalid_value => null
4838: );
4839: record_fnd_log(
4840: pv_fnd_log => lv_return_mess
4841: );
4842: ELSE
4843: --Update the tax category id to interface line .
4844: UPDATE JAI_INTERFACE_LINES_ALL
4861: pn_source_line_id => pr_interface_lines.interface_line_id,
4862: pv_err_mess => lv_return_mess,
4863: pv_invalid_value => pr_interface_lines.transaction_id
4864: );*/
4865: record_fnd_log(
4866: pv_fnd_log => lv_return_mess
4867: );
4868:
4869: END validate_tax_line;
4862: pv_err_mess => lv_return_mess,
4863: pv_invalid_value => pr_interface_lines.transaction_id
4864: );*/
4865: record_fnd_log(
4866: pv_fnd_log => lv_return_mess
4867: );
4868:
4869: END validate_tax_line;
4870:
4896: pn_source_line_id => pr_interface_lines.interface_line_id,
4897: pv_err_mess => lv_error_mess,
4898: pv_invalid_value => pr_interface_lines.import_module
4899: );
4900: record_fnd_log(
4901: pv_fnd_log => lv_return_mess
4902: );
4903: END IF;
4904: EXCEPTION
4897: pv_err_mess => lv_error_mess,
4898: pv_invalid_value => pr_interface_lines.import_module
4899: );
4900: record_fnd_log(
4901: pv_fnd_log => lv_return_mess
4902: );
4903: END IF;
4904: EXCEPTION
4905: WHEN OTHERS THEN
4912: pn_source_line_id => pr_interface_lines.interface_line_id,
4913: pv_err_mess => lv_error_mess,
4914: pv_invalid_value => pr_interface_lines.import_module
4915: );
4916: record_fnd_log(
4917: pv_fnd_log => lv_return_mess
4918: );
4919: END validate_import_module;
4920:
4913: pv_err_mess => lv_error_mess,
4914: pv_invalid_value => pr_interface_lines.import_module
4915: );
4916: record_fnd_log(
4917: pv_fnd_log => lv_return_mess
4918: );
4919: END validate_import_module;
4920:
4921:
5116: INTERNAL_TRX_LINE_ID = ln_internal_trx_line_id
5117: WHERE INTERFACE_LINE_ID = rec_interface_line.INTERFACE_LINE_ID;
5118: */--Update both column move to initial_process
5119:
5120: --If not found error, the fnd log success
5121: IF(ln_err_flag = 0)THEN
5122: NULL;
5123: fnd_file.put_line(FND_FILE.LOG,'VALIDATION in VALIDATE_PROCESS : VALIDATION COMPLETED with SUCCESS With interface_line_id' || rec_interface_line.interface_line_id );
5124: ELSE
5121: IF(ln_err_flag = 0)THEN
5122: NULL;
5123: fnd_file.put_line(FND_FILE.LOG,'VALIDATION in VALIDATE_PROCESS : VALIDATION COMPLETED with SUCCESS With interface_line_id' || rec_interface_line.interface_line_id );
5124: ELSE
5125: --If found error , change status to error and fnd log error
5126: update_line_status(
5127: pn_interface_line_id => rec_interface_line.interface_line_id,
5128: pv_import_status => GV_IMPORT_FAILURE,
5129: pv_import_process => GV_PROCESS_VALIDATION
5146: pn_source_line_id => pn_interface_line_id,
5147: pv_err_mess => lv_return_mess,
5148: pv_invalid_value => NULL
5149: );*/
5150: record_fnd_log(
5151: pv_fnd_log => lv_return_mess
5152: );
5153: update_line_status(
5154: pn_interface_line_id => rec_interface_line.interface_line_id,
5147: pv_err_mess => lv_return_mess,
5148: pv_invalid_value => NULL
5149: );*/
5150: record_fnd_log(
5151: pv_fnd_log => lv_return_mess
5152: );
5153: update_line_status(
5154: pn_interface_line_id => rec_interface_line.interface_line_id,
5155: pv_import_status => GV_IMPORT_FAILURE,
5242: pv_err_mess => lv_error_mess,
5243: pv_invalid_value => lv_transaction_num
5244: );
5245:
5246: record_fnd_log(
5247: pv_fnd_log => lv_return_mess
5248: );
5249: END IF;--Transaction num is null
5250:
5243: pv_invalid_value => lv_transaction_num
5244: );
5245:
5246: record_fnd_log(
5247: pv_fnd_log => lv_return_mess
5248: );
5249: END IF;--Transaction num is null
5250:
5251: ln_phase := 10.4;
5261: pv_err_mess => lv_error_mess,
5262: pv_invalid_value => ln_transaction_line_num
5263: );
5264:
5265: record_fnd_log(
5266: pv_fnd_log => lv_return_mess
5267: );
5268: END IF;--Transaction line num is null
5269:
5262: pv_invalid_value => ln_transaction_line_num
5263: );
5264:
5265: record_fnd_log(
5266: pv_fnd_log => lv_return_mess
5267: );
5268: END IF;--Transaction line num is null
5269:
5270: ln_phase := 10.5;
5282: pv_err_mess => lv_error_mess,
5283: pv_invalid_value => lv_import_module
5284: );
5285:
5286: record_fnd_log(
5287: pv_fnd_log => lv_return_mess
5288: );
5289: END IF;--Import module should be AR or AP
5290:
5283: pv_invalid_value => lv_import_module
5284: );
5285:
5286: record_fnd_log(
5287: pv_fnd_log => lv_return_mess
5288: );
5289: END IF;--Import module should be AR or AP
5290:
5291: ln_phase := 10.51;
5376: pv_err_mess => lv_error_mess,
5377: pv_invalid_value => lv_transaction_num
5378: );
5379:
5380: record_fnd_log(
5381: pv_fnd_log => lv_return_mess
5382: );
5383:
5384: update_line_status(
5377: pv_invalid_value => lv_transaction_num
5378: );
5379:
5380: record_fnd_log(
5381: pv_fnd_log => lv_return_mess
5382: );
5383:
5384: update_line_status(
5385: pn_interface_line_id => pn_interface_line_id,
10294: END ja_in_calc_prec_taxes;
10295:
10296:
10297: /*
10298: ||When occurred error, populate table jai_interface_err_lines and fnd log error info ,
10299: */
10300: /*PROCEDURE log_err(
10301: pv_err_level IN JAI_INTERFACE_ERR_LINES.ERROR_TYPE%TYPE, --'LINE' OR 'TAX' OR 'DIS'
10302: pn_line_id IN JAI_INTERFACE_ERR_LINES.INTERFACE_ERROR_ID%TYPE,
10373: AND lines.internal_trx_line_id = pn_line_number;
10374:
10375: ln_external_dist_acct_ccid NUMBER;
10376:
10377: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
10378: ln_proc_level NUMBER := FND_LOG.level_procedure;
10379: lv_proc_name VARCHAR2 (100) := 'get_external_dist_account_ccid';
10380: BEGIN
10381: OPEN external_dist_ccid_cur;
10374:
10375: ln_external_dist_acct_ccid NUMBER;
10376:
10377: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
10378: ln_proc_level NUMBER := FND_LOG.level_procedure;
10379: lv_proc_name VARCHAR2 (100) := 'get_external_dist_account_ccid';
10380: BEGIN
10381: OPEN external_dist_ccid_cur;
10382: FETCH external_dist_ccid_cur INTO ln_external_dist_acct_ccid;
10428: ln_doc_tax_id NUMBER;
10429: ln_header_id NUMBER;
10430: lv_err_mess VARCHAR2(300);
10431:
10432: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
10433: ln_proc_level NUMBER := FND_LOG.level_procedure;
10434: lv_proc_name VARCHAR2 (100) := 'populate_jai_interface_taxes';
10435:
10436: cursor cur_get_jai_line_rec(
10429: ln_header_id NUMBER;
10430: lv_err_mess VARCHAR2(300);
10431:
10432: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
10433: ln_proc_level NUMBER := FND_LOG.level_procedure;
10434: lv_proc_name VARCHAR2 (100) := 'populate_jai_interface_taxes';
10435:
10436: cursor cur_get_jai_line_rec(
10437: pn_trx_id jai_ar_trx_lines.CUSTOMER_TRX_ID%TYPE,
10930: EXCEPTION
10931: WHEN no_tax_cate_exc THEN
10932: IF ( ln_proc_level >= ln_dbg_level)
10933: THEN
10934: FND_LOG.STRING ( ln_proc_level
10935: , GV_MODULE_PREFIX || '.' || lv_proc_name
10936: || '. no_tax_cate_excexception '
10937: , 'No Tax Category'
10938: );
10940: RAISE;
10941: WHEN error_module THEN
10942: IF ( ln_proc_level >= ln_dbg_level)
10943: THEN
10944: FND_LOG.STRING ( ln_proc_level
10945: , GV_MODULE_PREFIX || '.' || lv_proc_name
10946: || '. error_module_exception '
10947: , 'Not Expected Module' || ':' || GV_IMPORT_MODULE
10948: );
10950: RAISE;
10951: WHEN OTHERS THEN
10952: IF ( ln_proc_level >= ln_dbg_level)
10953: THEN
10954: FND_LOG.STRING ( ln_proc_level
10955: , GV_MODULE_PREFIX || '.' || lv_proc_name
10956: || '. Other_Exception '
10957: , SQLCODE || ':' || SQLERRM
10958: );
11026: ln_unit_selling_price ra_customer_trx_lines_all.unit_selling_price%TYPE;
11027: lv_module VARCHAR2(30);
11028:
11029: lv_err_mess VARCHAR2(300);
11030: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
11031: ln_proc_level NUMBER := FND_LOG.level_procedure;
11032: lv_proc_name VARCHAR2 (100) := 'recal_standalone_trx_taxes';
11033:
11034: BEGIN
11027: lv_module VARCHAR2(30);
11028:
11029: lv_err_mess VARCHAR2(300);
11030: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
11031: ln_proc_level NUMBER := FND_LOG.level_procedure;
11032: lv_proc_name VARCHAR2 (100) := 'recal_standalone_trx_taxes';
11033:
11034: BEGIN
11035: SELECT internal_trx_id
11168: EXCEPTION
11169: WHEN OTHERS THEN
11170: IF ( ln_proc_level >= ln_dbg_level)
11171: THEN
11172: FND_LOG.STRING ( ln_proc_level
11173: , GV_MODULE_PREFIX || '.' || lv_proc_name
11174: || '. Other_Exception '
11175: , SQLCODE || ':' || SQLERRM
11176: );
11203:
11204: ln_tax_category_id NUMBER;
11205: lv_service_type_code VARCHAR2(30);
11206:
11207: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
11208: ln_proc_level NUMBER := FND_LOG.level_procedure;
11209: lv_proc_name VARCHAR2 (100) := 'process_ap_accounting_lines';
11210:
11211: BEGIN
11204: ln_tax_category_id NUMBER;
11205: lv_service_type_code VARCHAR2(30);
11206:
11207: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
11208: ln_proc_level NUMBER := FND_LOG.level_procedure;
11209: lv_proc_name VARCHAR2 (100) := 'process_ap_accounting_lines';
11210:
11211: BEGIN
11212: OPEN interface_lines_cur;
11253: EXCEPTION
11254: WHEN OTHERS THEN
11255: IF ( ln_proc_level >= ln_dbg_level)
11256: THEN
11257: FND_LOG.STRING ( ln_proc_level
11258: , GV_MODULE_PREFIX || '.' || lv_proc_name
11259: || '. Other_Exception '
11260: , SQLCODE || ':' || SQLERRM
11261: );
11502: END LOOP;--Added by zhiwei for Bug#12561396 on 20110607
11503:
11504:
11505: --COMMIT;
11506: record_fnd_log(
11507: pv_fnd_log => 'Mark Sequence id successfully.'
11508: );
11509:
11510:
11503:
11504:
11505: --COMMIT;
11506: record_fnd_log(
11507: pv_fnd_log => 'Mark Sequence id successfully.'
11508: );
11509:
11510:
11511: EXCEPTION
11516: ||'-'||rec_interface_line.PARTY_SITE_ID
11517: ||'-'||rec_interface_line.IMPORT_MODULE
11518: ||'-'||rec_interface_line.TRANSACTION_NUM
11519: ||'-'||rec_interface_line.TRANSACTION_LINE_NUM;
11520: record_fnd_log(
11521: pv_fnd_log => lv_return_mess
11522: );
11523: RAISE;
11524: END mark_sequence_id;
11517: ||'-'||rec_interface_line.IMPORT_MODULE
11518: ||'-'||rec_interface_line.TRANSACTION_NUM
11519: ||'-'||rec_interface_line.TRANSACTION_LINE_NUM;
11520: record_fnd_log(
11521: pv_fnd_log => lv_return_mess
11522: );
11523: RAISE;
11524: END mark_sequence_id;
11525:
11589: rec_interface_id get_interface_id_cur%ROWTYPE;
11590: rec_request_line_id get_request_line_id_cur%ROWTYPE;
11591: rec_trx_id get_trx_id_cur%ROWTYPE;
11592:
11593: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
11594: ln_proc_level NUMBER := FND_LOG.level_procedure;
11595: lv_proc_name VARCHAR2 (100) := 'populate_jai_interface_lines';
11596:
11597: ln_total_amount NUMBER;
11590: rec_request_line_id get_request_line_id_cur%ROWTYPE;
11591: rec_trx_id get_trx_id_cur%ROWTYPE;
11592:
11593: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
11594: ln_proc_level NUMBER := FND_LOG.level_procedure;
11595: lv_proc_name VARCHAR2 (100) := 'populate_jai_interface_lines';
11596:
11597: ln_total_amount NUMBER;
11598: ln_invoice_id NUMBER;
11699: EXCEPTION
11700: WHEN OTHERS THEN
11701: IF ( ln_proc_level >= ln_dbg_level)
11702: THEN
11703: FND_LOG.STRING ( ln_proc_level
11704: , GV_MODULE_PREFIX || '.' || lv_proc_name
11705: || '. Other_Exception '
11706: , SQLCODE || ':' || SQLERRM
11707: );
11773: EXCEPTION
11774: WHEN OTHERS THEN
11775: IF ( ln_proc_level >= ln_dbg_level)
11776: THEN
11777: FND_LOG.STRING ( ln_proc_level
11778: , GV_MODULE_PREFIX || '.' || lv_proc_name
11779: || '. Other_Exception '
11780: , SQLCODE || ':' || SQLERRM
11781: );
11874: EXCEPTION
11875: WHEN OTHERS THEN
11876: IF ( ln_proc_level >= ln_dbg_level)
11877: THEN
11878: FND_LOG.STRING ( ln_proc_level
11879: , GV_MODULE_PREFIX || '.' || lv_proc_name
11880: || '. Other_Exception '
11881: , SQLCODE || ':' || SQLERRM
11882: );
12002:
12003: WHEN OTHERS THEN
12004: IF ( ln_proc_level >= ln_dbg_level)
12005: THEN
12006: FND_LOG.STRING ( ln_proc_level
12007: , GV_MODULE_PREFIX || '.' || lv_proc_name
12008: || '. Other_Exception '
12009: , SQLCODE || ':' || SQLERRM
12010: );
12102: , pv_transaction_num_to => null
12103: );
12104: --
12105: IF ( ln_proc_level >= ln_dbg_level )THEN
12106: FND_LOG.STRING ( ln_proc_level
12107: , GV_MODULE_PREFIX || '.' || lv_proc_name
12108: || '. Other_Exception '
12109: , SQLCODE || ':' || SQLERRM
12110: );
12136:
12137: --Variable define here
12138:
12139:
12140: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
12141: ln_proc_level NUMBER := FND_LOG.level_procedure;
12142: lv_proc_name VARCHAR2 (100) := 'populate_jai_interface_lines';
12143:
12144: lv_import_status VARCHAR2(30);
12137: --Variable define here
12138:
12139:
12140: ln_dbg_level NUMBER := FND_LOG.g_current_runtime_level;
12141: ln_proc_level NUMBER := FND_LOG.level_procedure;
12142: lv_proc_name VARCHAR2 (100) := 'populate_jai_interface_lines';
12143:
12144: lv_import_status VARCHAR2(30);
12145: lv_import_process VARCHAR2(30);
12331: pv_invalid_value => NULL
12332: ); */
12333:
12334: IF ( ln_proc_level >= ln_dbg_level )THEN
12335: FND_LOG.STRING ( ln_proc_level
12336: , GV_MODULE_PREFIX || '.' || lv_proc_name
12337: || '. Other_Exception '
12338: , SQLCODE || ':' || SQLERRM
12339: );