[Home] [Help]
403: x_fob_lookup_code := NULL;
404: x_freight_terms_lu_code := NULL;
405: x_terms_id := NULL;
406: fnd_message.set_name('PO', 'PO_MISSING_FSP_VALUES');
407: po_copydoc_s1.online_report(x_online_report_id,
408: x_sequence,
409: substr(fnd_message.get, 1, 240),
410: 0, 0, 0);
411: WHEN OTHERS THEN
414: x_ship_via_lookup_code := NULL;
415: x_fob_lookup_code := NULL;
416: x_freight_terms_lu_code := NULL;
417: x_terms_id := NULL;
418: po_copydoc_s1.copydoc_sql_error('get_fsp_values', x_progress, sqlcode,
419: x_online_report_id,
420: x_sequence,
421: 0, 0, 0);
422: END get_fsp_values;
467: x_terms_id,
468: x_online_report_id,
469: x_sequence);
470: WHEN OTHERS THEN
471: po_copydoc_s1.copydoc_sql_error('get_vendor_values', x_progress, sqlcode,
472: x_online_report_id,
473: x_sequence,
474: 0, 0, 0);
475: get_fsp_values(x_ship_to_location_id,
530: x_terms_id,
531: x_online_report_id,
532: x_sequence);
533: WHEN OTHERS THEN
534: po_copydoc_s1.copydoc_sql_error('get_vendor_site_values', x_progress, sqlcode,
535: x_online_report_id,
536: x_sequence,
537: 0, 0, 0);
538: get_vendor_values(x_vendor_id,
562: -- unless DB is corrupted.
563:
564: IF (x_buyer_id IS NULL) THEN
565: fnd_message.set_name('PO', 'PO_PO_MISSING_BUYER_ID');
566: po_copydoc_s1.online_report(x_online_report_id,
567: x_sequence,
568: substr(fnd_message.get, 1, 240),
569: 0, 0, 0);
570:
584: EXCEPTION
585: WHEN NO_DATA_FOUND THEN
586: x_buyer_id := NULL;
587: fnd_message.set_name('PO', 'PO_RI_INVALID_SUGGESTED_BUYER');
588: po_copydoc_s1.online_report(x_online_report_id,
589: x_sequence,
590: substr(fnd_message.get, 1, 240),
591: 0, 0, 0);
592: WHEN OTHERS THEN
590: substr(fnd_message.get, 1, 240),
591: 0, 0, 0);
592: WHEN OTHERS THEN
593: x_buyer_id := NULL;
594: po_copydoc_s1.copydoc_sql_error('validate_buyer_id', x_progress, sqlcode,
595: x_online_report_id,
596: x_sequence,
597: 0, 0, 0);
598:
632: WHEN NO_DATA_FOUND THEN
633: fnd_message.set_name('PO', 'PO_PDOI_INVALID_VENDOR');
634: fnd_message.set_token('VALUE', to_char(x_vendor_id), FALSE);
635: x_vendor_id := NULL;
636: po_copydoc_s1.online_report(x_online_report_id,
637: x_sequence,
638: substr(fnd_message.get, 1, 240),
639: 0, 0, 0);
640: WHEN OTHERS THEN
638: substr(fnd_message.get, 1, 240),
639: 0, 0, 0);
640: WHEN OTHERS THEN
641: x_vendor_id := NULL;
642: po_copydoc_s1.copydoc_sql_error('validate_vendor', x_progress, sqlcode,
643: x_online_report_id,
644: x_sequence,
645: 0, 0, 0);
646: END;
663: WHEN NO_DATA_FOUND THEN
664: fnd_message.set_name('PO', 'PO_PDOI_INVALID_VENDOR_SITE');
665: fnd_message.set_token('VALUE', to_char(x_vendor_site_id), FALSE);
666: x_vendor_site_id := NULL;
667: po_copydoc_s1.online_report(x_online_report_id,
668: x_sequence,
669: substr(fnd_message.get, 1, 240),
670: 0, 0, 0);
671: WHEN OTHERS THEN
669: substr(fnd_message.get, 1, 240),
670: 0, 0, 0);
671: WHEN OTHERS THEN
672: x_vendor_site_id := NULL;
673: po_copydoc_s1.copydoc_sql_error('validate_vendor', x_progress, sqlcode,
674: x_online_report_id,
675: x_sequence,
676: 0, 0, 0);
677: END;
692: WHEN NO_DATA_FOUND THEN
693: fnd_message.set_name('PO', 'PO_PDOI_INVALID_VDR_CNTCT');
694: fnd_message.set_token('VALUE', to_char(x_vendor_contact_id), FALSE);
695: x_vendor_contact_id := NULL;
696: po_copydoc_s1.online_report(x_online_report_id,
697: x_sequence,
698: substr(fnd_message.get, 1, 240),
699: 0, 0, 0);
700: WHEN OTHERS THEN
698: substr(fnd_message.get, 1, 240),
699: 0, 0, 0);
700: WHEN OTHERS THEN
701: x_vendor_contact_id := NULL;
702: po_copydoc_s1.copydoc_sql_error('validate_vendor', x_progress, sqlcode,
703: x_online_report_id,
704: x_sequence,
705: 0, 0, 0);
706: END;
787: EXCEPTION
788: WHEN NO_DATA_FOUND THEN
789: x_ship_to_location_id := NULL;
790: fnd_message.set_name('PO', 'PO_PO_SHIP_LOCN_INVALID');
791: po_copydoc_s1.online_report(x_online_report_id,
792: x_sequence,
793: substr(fnd_message.get, 1, 240),
794: 0, 0, 0);
795: WHEN OTHERS THEN
793: substr(fnd_message.get, 1, 240),
794: 0, 0, 0);
795: WHEN OTHERS THEN
796: x_ship_to_location_id := NULL;
797: po_copydoc_s1.copydoc_sql_error('validate_location_terms', x_progress, sqlcode,
798: x_online_report_id,
799: x_sequence,
800: 0, 0, 0);
801: END;
812: WHEN NO_DATA_FOUND THEN
813: fnd_message.set_name('PO', 'PO_PDOI_INVALID_BILL_LOC_ID');
814: fnd_message.set_token('VALUE', to_char(x_bill_to_location_id));
815: x_bill_to_location_id := NULL;
816: po_copydoc_s1.online_report(x_online_report_id,
817: x_sequence,
818: substr(fnd_message.get, 1, 240),
819: 0, 0, 0);
820: WHEN OTHERS THEN
818: substr(fnd_message.get, 1, 240),
819: 0, 0, 0);
820: WHEN OTHERS THEN
821: x_bill_to_location_id := NULL;
822: po_copydoc_s1.copydoc_sql_error('validate_location_terms', x_progress, sqlcode,
823: x_online_report_id,
824: x_sequence,
825: 0, 0, 0);
826: END;
840: WHEN NO_DATA_FOUND THEN
841: fnd_message.set_name('PO', 'PO_PDOI_INVALID_FOB');
842: fnd_message.set_token('VALUE', x_fob_lookup_code, FALSE);
843: x_fob_lookup_code := NULL;
844: po_copydoc_s1.online_report(x_online_report_id,
845: x_sequence,
846: substr(fnd_message.get, 1, 240),
847: 0, 0, 0);
848: WHEN OTHERS THEN
846: substr(fnd_message.get, 1, 240),
847: 0, 0, 0);
848: WHEN OTHERS THEN
849: x_fob_lookup_code := NULL;
850: po_copydoc_s1.copydoc_sql_error('validate_location_terms', x_progress, sqlcode,
851: x_online_report_id,
852: x_sequence,
853: 0, 0, 0);
854: END;
867: WHEN NO_DATA_FOUND THEN
868: fnd_message.set_name('PO', 'PO_PDOI_INVALID_FREIGHT_TERMS');
869: fnd_message.set_token('VALUE', x_freight_terms_lu_code, FALSE);
870: x_freight_terms_lu_code := NULL;
871: po_copydoc_s1.online_report(x_online_report_id,
872: x_sequence,
873: substr(fnd_message.get, 1, 240),
874: 0, 0, 0);
875: WHEN OTHERS THEN
873: substr(fnd_message.get, 1, 240),
874: 0, 0, 0);
875: WHEN OTHERS THEN
876: x_freight_terms_lu_code := NULL;
877: po_copydoc_s1.copydoc_sql_error('validate_location_terms', x_progress, sqlcode,
878: x_online_report_id,
879: x_sequence,
880: 0, 0, 0);
881: END;
892: WHEN NO_DATA_FOUND THEN
893: fnd_message.set_name('PO', 'PO_PDOI_INVALID_PAY_TERMS');
894: fnd_message.set_token('VALUE', to_char(x_terms_id), FALSE);
895: x_terms_id := NULL;
896: po_copydoc_s1.online_report(x_online_report_id,
897: x_sequence,
898: substr(fnd_message.get, 1, 240),
899: 0, 0, 0);
900: WHEN OTHERS THEN
898: substr(fnd_message.get, 1, 240),
899: 0, 0, 0);
900: WHEN OTHERS THEN
901: x_terms_id := NULL;
902: po_copydoc_s1.copydoc_sql_error('validate_location_terms', x_progress, sqlcode,
903: x_online_report_id,
904: x_sequence,
905: 0, 0, 0);
906: END;
942: WHEN NO_DATA_FOUND THEN
943: fnd_message.set_name('PO', 'PO_PDOI_ITEM_INVALID');
944: fnd_message.set_token('ITEM', to_char(x_item_id), FALSE);
945: x_item_id := NULL;
946: po_copydoc_s1.online_report(x_online_report_id,
947: x_sequence,
948: substr(fnd_message.get, 1, 240),
949: x_line_num, 0, 0);
950: x_return_code := -1;
950: x_return_code := -1;
951: RETURN;
952: WHEN OTHERS THEN
953: x_item_id := NULL;
954: po_copydoc_s1.copydoc_sql_error('validate_item', x_progress, sqlcode,
955: x_online_report_id,
956: x_sequence,
957: x_line_num, 0, 0);
958: RETURN;
981: WHEN NO_DATA_FOUND THEN
982: x_item_id := NULL;
983: -- Bug 3488117: Truncate at 2000 characters instead of 240.
984: fnd_message.set_name('PO', 'PO_RI_LINE_TYPE_ITEM_MISMATCH');
985: po_copydoc_s1.online_report(x_online_report_id,
986: x_sequence,
987: substr(fnd_message.get, 1, 2000),
988: x_line_num, 0, 0);
989: x_return_code := -1;
989: x_return_code := -1;
990: RETURN;
991: WHEN OTHERS THEN
992: x_item_id := NULL;
993: po_copydoc_s1.copydoc_sql_error('validate_item', x_progress, sqlcode,
994: x_online_report_id,
995: x_sequence,
996: x_line_num, 0, 0);
997: x_return_code := -1;
1009: EXCEPTION
1010: WHEN NO_DATA_FOUND THEN
1011: x_item_id := NULL;
1012: fnd_message.set_name('PO', 'PO_PDOI_MISMATCH_ITEM_ITEMTYPE');
1013: po_copydoc_s1.online_report(x_online_report_id,
1014: x_sequence,
1015: substr(fnd_message.get, 1, 240),
1016: x_line_num, 0, 0);
1017: x_return_code := -1;
1017: x_return_code := -1;
1018: RETURN;
1019: WHEN OTHERS THEN
1020: x_item_id := NULL;
1021: po_copydoc_s1.copydoc_sql_error('validate_item', x_progress, sqlcode,
1022: x_online_report_id,
1023: x_sequence,
1024: x_line_num, 0, 0);
1025: x_return_code := -1;
1038: WHEN NO_DATA_FOUND THEN
1039: fnd_message.set_name('PO', 'PO_RI_INVALID_ITEM_REVISION');
1040: fnd_message.set_token('VALUE', x_item_revision);
1041: x_item_revision := NULL;
1042: po_copydoc_s1.online_report(x_online_report_id,
1043: x_sequence,
1044: substr(fnd_message.get, 1, 240),
1045: x_line_num, 0, 0);
1046: WHEN OTHERS THEN
1044: substr(fnd_message.get, 1, 240),
1045: x_line_num, 0, 0);
1046: WHEN OTHERS THEN
1047: x_item_revision := NULL;
1048: po_copydoc_s1.copydoc_sql_error('validate_item', x_progress, sqlcode,
1049: x_online_report_id,
1050: x_sequence,
1051: x_line_num, 0, 0);
1052: END;
1067: WHEN NO_DATA_FOUND THEN
1068: fnd_message.set_name('PO', 'PO_PO_MISSING_CATEGORY');
1069: fnd_message.set_token('ITEM', to_char(x_item_id), FALSE);
1070: x_category_id := NULL;
1071: po_copydoc_s1.online_report(x_online_report_id,
1072: x_sequence,
1073: substr(fnd_message.get, 1, 240),
1074: x_line_num, 0, 0);
1075: x_return_code := -1;
1075: x_return_code := -1;
1076: RETURN;
1077: WHEN OTHERS THEN
1078: x_category_id := NULL;
1079: po_copydoc_s1.copydoc_sql_error('validate_item', x_progress, sqlcode,
1080: x_online_report_id,
1081: x_sequence,
1082: x_line_num, 0, 0);
1083: x_return_code := -1;
1108: WHEN NO_DATA_FOUND THEN
1109: x_category_id := NULL;
1110: -- Bug 3488117: Truncate at 2000 characters instead of 240.
1111: fnd_message.set_name('PO', 'PO_RI_INVALID_CATEGORY_ID');
1112: po_copydoc_s1.online_report(x_online_report_id,
1113: x_sequence,
1114: substr(fnd_message.get, 1, 2000),
1115: x_line_num, 0, 0);
1116: x_return_code := -1;
1116: x_return_code := -1;
1117: RETURN;
1118: WHEN OTHERS THEN
1119: x_category_id := NULL;
1120: po_copydoc_s1.copydoc_sql_error('validate_item', x_progress, sqlcode,
1121: x_online_report_id,
1122: x_sequence,
1123: x_line_num, 0, 0);
1124: x_return_code := -1;
1132: x_item_revision := NULL;
1133: IF x_clm_info_flag = 'N' THEN --CLM
1134: IF (x_category_id IS NULL) THEN
1135: fnd_message.set_name('PO', 'PO_RI_CAT_ID_ITEM_DESC_MISSING');
1136: po_copydoc_s1.online_report(x_online_report_id,
1137: x_sequence,
1138: substr(fnd_message.get, 1, 240),
1139: x_line_num, 0, 0);
1140: x_return_code := -1;
1196: EXCEPTION
1197: WHEN NO_DATA_FOUND THEN
1198: x_category_id := NULL;
1199: fnd_message.set_name('PO', 'PO_RI_INVALID_CATEGORY_ID');
1200: po_copydoc_s1.online_report(x_online_report_id,
1201: x_sequence,
1202: substr(fnd_message.get, 1, 240),
1203: x_line_num, 0, 0);
1204: x_return_code := -1;
1204: x_return_code := -1;
1205: RETURN;
1206: WHEN OTHERS THEN
1207: x_category_id := NULL;
1208: po_copydoc_s1.copydoc_sql_error('validate_item', x_progress, sqlcode,
1209: x_online_report_id,
1210: x_sequence,
1211: x_line_num, 0, 0);
1212: x_return_code := -1;
1215: END IF;
1216: END IF; -- x_clm_info_flag = 'N' -- CLM
1217: IF (x_item_description IS NULL) THEN
1218: fnd_message.set_name('PO', 'PO_RI_CAT_ID_ITEM_DESC_MISSING');
1219: po_copydoc_s1.online_report(x_online_report_id,
1220: x_sequence,
1221: substr(fnd_message.get, 1, 240),
1222: x_line_num, 0, 0);
1223: x_return_code := -1;
1228: x_return_code := 0;
1229:
1230: EXCEPTION
1231: WHEN OTHERS THEN
1232: po_copydoc_s1.copydoc_sql_error('validate_item', x_progress, sqlcode,
1233: x_online_report_id,
1234: x_sequence,
1235: x_line_num, 0, 0);
1236: x_return_code := -1;
1283: fnd_message.set_name('PO', 'PO_RI_INVALID_CHARGE_ACC_ID');
1284: ELSIF x_account_type = 'VARIANCE' THEN
1285: fnd_message.set_name('PO', 'PO_RI_INVALID_VARIANCE_ACC_ID');
1286: END IF;
1287: po_copydoc_s1.online_report(x_online_report_id,
1288: x_sequence,
1289: substr(fnd_message.get, 1, 240),
1290: x_line_num, x_shipment_num, x_distribution_num);
1291:
1290: x_line_num, x_shipment_num, x_distribution_num);
1291:
1292: WHEN OTHERS THEN
1293: x_account_id :=NULL;
1294: po_copydoc_s1.copydoc_sql_error('validate_account_id', x_progress, sqlcode,
1295: x_online_report_id,
1296: x_sequence,
1297: x_line_num, x_shipment_num, x_distribution_num);
1298: -- RAISE COPYDOC_DIST_FAILURE;
1365: WHEN NO_DATA_FOUND THEN
1366: x_project_id := NULL;
1367: -- Bug 3488117: Truncate at 2000 characters instead of 240.
1368: fnd_message.set_name('PO', 'PO_RI_INVALID_PA_INFO');
1369: po_copydoc_s1.online_report(x_online_report_id,
1370: x_sequence,
1371: substr(fnd_message.get, 1, 2000),
1372: x_line_num, x_shipment_num, x_distribution_num);
1373:
1372: x_line_num, x_shipment_num, x_distribution_num);
1373:
1374: WHEN OTHERS THEN
1375: x_project_id :=NULL;
1376: po_copydoc_s1.copydoc_sql_error('validate_project_id', x_progress, sqlcode,
1377: x_online_report_id,
1378: x_sequence,
1379: x_line_num, x_shipment_num, x_distribution_num);
1380:
1413: WHEN NO_DATA_FOUND THEN
1414: x_task_id := NULL;
1415: -- Bug 3488177: Truncate at 2000 characters instead of 240.
1416: fnd_message.set_name('PO', 'PO_RI_INVALID_PA_INFO');
1417: po_copydoc_s1.online_report(x_online_report_id,
1418: x_sequence,
1419: substr(fnd_message.get, 1, 2000),
1420: x_line_num, x_shipment_num, x_distribution_num);
1421:
1420: x_line_num, x_shipment_num, x_distribution_num);
1421:
1422: WHEN OTHERS THEN
1423: x_task_id :=NULL;
1424: po_copydoc_s1.copydoc_sql_error('validate_task_id', x_progress, sqlcode,
1425: x_online_report_id,
1426: x_sequence,
1427: x_line_num, x_shipment_num, x_distribution_num);
1428: -- RAISE COPYDOC_DIST_FAILURE;
1468: EXCEPTION
1469: WHEN NO_DATA_FOUND THEN
1470: x_exp_item_date := NULL;
1471: fnd_message.set_name('PO', 'PO_RI_INVALID_PA_INFO');
1472: po_copydoc_s1.online_report(x_online_report_id,
1473: x_sequence,
1474: substr(fnd_message.get, 1, 2000),
1475: x_line_num, x_shipment_num, x_distribution_num);
1476:
1475: x_line_num, x_shipment_num, x_distribution_num);
1476:
1477: WHEN OTHERS THEN
1478: x_exp_item_date := NULL;
1479: po_copydoc_s1.copydoc_sql_error('validate_exp_item_date', x_progress, sqlcode,
1480: x_online_report_id,
1481: x_sequence,
1482: x_line_num, x_shipment_num, x_distribution_num);
1483: END validate_exp_item_date;
1513: EXCEPTION
1514: WHEN NO_DATA_FOUND THEN
1515: x_exp_type := NULL;
1516: fnd_message.set_name('PO', 'PO_RI_INVALID_PA_INFO');
1517: po_copydoc_s1.online_report(x_online_report_id,
1518: x_sequence,
1519: substr(fnd_message.get, 1, 2000),
1520: x_line_num, x_shipment_num, x_distribution_num);
1521:
1520: x_line_num, x_shipment_num, x_distribution_num);
1521:
1522: WHEN OTHERS THEN
1523: x_exp_type := NULL;
1524: po_copydoc_s1.copydoc_sql_error('validate_exp_type', x_progress, sqlcode,
1525: x_online_report_id,
1526: x_sequence,
1527: x_line_num, x_shipment_num, x_distribution_num);
1528: END validate_exp_type;
1552: EXCEPTION
1553: WHEN NO_DATA_FOUND THEN
1554: x_org_id := NULL;
1555: fnd_message.set_name('PO', 'PO_RI_INVALID_PA_INFO');
1556: po_copydoc_s1.online_report(x_online_report_id,
1557: x_sequence,
1558: substr(fnd_message.get, 1, 2000),
1559: x_line_num, x_shipment_num, x_distribution_num);
1560:
1559: x_line_num, x_shipment_num, x_distribution_num);
1560:
1561: WHEN OTHERS THEN
1562: x_org_id := NULL;
1563: po_copydoc_s1.copydoc_sql_error('validate_exp_org', x_progress, sqlcode,
1564: x_online_report_id,
1565: x_sequence,
1566: x_line_num, x_shipment_num, x_distribution_num);
1567: END validate_exp_org;
1592:
1593: EXCEPTION
1594: WHEN NO_DATA_FOUND THEN
1595: fnd_message.set_name('PO', 'PO_PA_PROJ_EXPIRED');
1596: po_copydoc_s1.online_report(x_online_report_id,
1597: x_sequence,
1598: substr(fnd_message.get, 1, 2000),
1599: x_line_num, x_shipment_num, x_distribution_num);
1600:
1599: x_line_num, x_shipment_num, x_distribution_num);
1600:
1601:
1602: WHEN OTHERS THEN
1603: po_copydoc_s1.copydoc_sql_error('validate_proj_end_date', x_progress, sqlcode,
1604: x_online_report_id,
1605: x_sequence,
1606: x_line_num, x_shipment_num, x_distribution_num);
1607:
1639:
1640: EXCEPTION
1641: WHEN NO_DATA_FOUND THEN
1642: fnd_message.set_name('PO', 'PO_PA_TASK_EXPIRED');
1643: po_copydoc_s1.online_report(x_online_report_id,
1644: x_sequence,
1645: substr(fnd_message.get, 1, 2000),
1646: x_line_num, x_shipment_num, x_distribution_num);
1647:
1646: x_line_num, x_shipment_num, x_distribution_num);
1647:
1648:
1649: WHEN OTHERS THEN
1650: po_copydoc_s1.copydoc_sql_error('validate_task_end_date', x_progress, sqlcode,
1651: x_online_report_id,
1652: x_sequence,
1653: x_line_num, x_shipment_num, x_distribution_num);
1654:
1806: EXCEPTION
1807: WHEN NO_DATA_FOUND THEN
1808: x_destination_type_code := NULL;
1809: fnd_message.set_name('PO', 'PO_RI_INVALID_DEST_TYPE_CODE');
1810: po_copydoc_s1.online_report(x_online_report_id,
1811: x_sequence,
1812: substr(fnd_message.get, 1, 240),
1813: x_line_num, x_shipment_num, x_distribution_num);
1814:
1813: x_line_num, x_shipment_num, x_distribution_num);
1814:
1815: WHEN OTHERS THEN
1816: x_destination_type_code := NULL;
1817: po_copydoc_s1.copydoc_sql_error('validate_destination_type_code', x_progress, sqlcode,
1818: x_online_report_id,
1819: x_sequence,
1820: x_line_num, x_shipment_num, x_distribution_num);
1821:
1862: EXCEPTION
1863: WHEN NO_DATA_FOUND THEN
1864: x_deliver_to_person_id := NULL;
1865: fnd_message.set_name('PO', 'PO_PO_INVALID_DEL_TO_PERSON');
1866: po_copydoc_s1.online_report(x_online_report_id,
1867: x_sequence,
1868: substr(fnd_message.get, 1, 240),
1869: x_line_num, x_shipment_num, x_distribution_num);
1870:
1869: x_line_num, x_shipment_num, x_distribution_num);
1870:
1871: WHEN OTHERS THEN
1872: x_deliver_to_person_id := NULL;
1873: po_copydoc_s1.copydoc_sql_error('validate_deliver_to_person_id', x_progress, sqlcode,
1874: x_online_report_id,
1875: x_sequence,
1876: x_line_num, x_shipment_num, x_distribution_num);
1877: -- RAISE COPYDOC_DIST_FAILURE;
1931: end if;
1932: if (x_count < 1) then
1933: -- register error
1934: fnd_message.set_name('PO', 'PO_PO_INVALID_JOB');
1935: po_copydoc_s1.online_report(x_online_report_id,
1936: x_sequence,
1937: substr(fnd_message.get, 1, 240),
1938: x_line_num, x_shipment_num,
1939: x_distribution_num);
1950: and organization_id = x_destination_organization_id;
1951: if (x_count < 1) then
1952: -- register error
1953: fnd_message.set_name('PO', 'PO_PO_INVALID_JOB_LINE');
1954: po_copydoc_s1.online_report(x_online_report_id,
1955: x_sequence,
1956: substr(fnd_message.get, 1, 240),
1957: x_line_num, x_shipment_num,
1958: x_distribution_num);
1994: end if; /* x_entity_type =6 */
1995: if (x_count < 1) then
1996: -- register error
1997: fnd_message.set_name('PO', 'PO_PO_INVALID_OPERATION_SEQ');
1998: po_copydoc_s1.online_report(x_online_report_id,
1999: x_sequence,
2000: substr(fnd_message.get, 1, 240),
2001: x_line_num, x_shipment_num,
2002: x_distribution_num);
2018:
2019: if (x_count < 1) then
2020: -- register error
2021: fnd_message.set_name('PO', 'PO_PO_INVALID_RESOURCE_SEQ');
2022: po_copydoc_s1.online_report(x_online_report_id,
2023: x_sequence,
2024: substr(fnd_message.get, 1, 240),
2025: x_line_num, x_shipment_num,
2026: x_distribution_num);
2028: end if;
2029:
2030: EXCEPTION
2031: WHEN OTHERS THEN
2032: po_copydoc_s1.copydoc_sql_error('PO_COPYDOC_SUB.validate_osp_data',
2033: x_progress, sqlcode,
2034: x_online_report_id,
2035: x_sequence,
2036: x_line_num,
2083: WHEN NO_DATA_FOUND THEN
2084: x_deliver_to_location_id := NULL;
2085: fnd_message.set_name('PO', 'PO_RI_INVALID_DEL_LOC_ID_DEST');
2086: -- Bug 3488117: Changed trunc size from 240 to 2000.
2087: po_copydoc_s1.online_report(x_online_report_id,
2088: x_sequence,
2089: substr(fnd_message.get, 1, 2000),
2090: x_line_num, x_shipment_num, x_distribution_num);
2091:
2090: x_line_num, x_shipment_num, x_distribution_num);
2091:
2092: WHEN OTHERS THEN
2093: x_deliver_to_location_id := NULL;
2094: po_copydoc_s1.copydoc_sql_error('validate_deliver_to_loc_id', x_progress, sqlcode,
2095: x_online_report_id,
2096: x_sequence,
2097: x_line_num, x_shipment_num, x_distribution_num);
2098: -- RAISE COPYDOC_DIST_FAILURE;
2146: EXCEPTION
2147: WHEN NO_DATA_FOUND THEN
2148: x_destination_subinventory := NULL;
2149: fnd_message.set_name('PO', 'PO_RI_INVALID_DEST_SUBINV');
2150: po_copydoc_s1.online_report(x_online_report_id,
2151: x_sequence,
2152: substr(fnd_message.get, 1, 240),
2153: x_line_num, x_shipment_num, x_distribution_num);
2154:
2153: x_line_num, x_shipment_num, x_distribution_num);
2154:
2155: WHEN OTHERS THEN
2156: x_destination_subinventory :=NULL;
2157: po_copydoc_s1.copydoc_sql_error('validate_dest_subinventory', x_progress, sqlcode,
2158: x_online_report_id,
2159: x_sequence,
2160: x_line_num, x_shipment_num, x_distribution_num);
2161:
2216:
2217: fnd_message.set_name('PO', 'PO_PO_INVALID_CONTRACT');
2218: fnd_message.set_token('VALUE', l_contract_doc_num, FALSE); --
2219:
2220: po_copydoc_s1.online_report(x_online_report_id,
2221: x_sequence,
2222: substr(fnd_message.get, 1, 240),
2223: x_line_num, 0, 0);
2224: WHEN OTHERS THEN
2222: substr(fnd_message.get, 1, 240),
2223: x_line_num, 0, 0);
2224: WHEN OTHERS THEN
2225:
2226: po_copydoc_s1.copydoc_sql_error('validate_contract_num', x_progress, sqlcode,
2227: x_online_report_id,
2228: x_sequence,
2229: x_line_num, 0, 0);
2230:
2260:
2261: EXCEPTION
2262: WHEN NO_DATA_FOUND THEN
2263: fnd_message.set_name('PO', 'PO_SUB_CP_INVALID_GA_REF');
2264: po_copydoc_s1.online_report(p_online_report_id,
2265: p_sequence,
2266: substr(fnd_message.get, 1, 240),
2267: p_line_num, 0, 0);
2268: WHEN OTHERS THEN
2265: p_sequence,
2266: substr(fnd_message.get, 1, 240),
2267: p_line_num, 0, 0);
2268: WHEN OTHERS THEN
2269: po_copydoc_s1.copydoc_sql_error('validate_global_ref', l_progress, sqlcode,
2270: p_online_report_id,
2271: p_sequence,
2272: p_line_num, 0, 0);
2273:
2362: fnd_message.set_name('PO', 'PO_SVC_JOB_INVALID_IN_HR');
2363: fnd_message.set_token('JOB', l_job_name);
2364: END IF;
2365:
2366: po_copydoc_s1.online_report(p_online_report_id,
2367: p_sequence,
2368: substr(fnd_message.get, 1, 240),
2369: p_line_num, 0, 0);
2370: End;
2394: When no_data_found Then
2395: fnd_message.set_name('PO', 'PO_SVC_JOB_ASSOC_INVALID');
2396: fnd_message.set_token('JOB', l_job_name);
2397: fnd_message.set_token('CATEGORY', l_category);
2398: po_copydoc_s1.online_report(p_online_report_id,
2399: p_sequence,
2400: substr(fnd_message.get, 1, 240),
2401: p_line_num, 0, 0);
2402: End;
2404: l_progress := '050';
2405:
2406: EXCEPTION
2407: WHEN OTHERS THEN
2408: po_copydoc_s1.copydoc_sql_error('validate_job', l_progress, sqlcode,
2409: p_online_report_id,
2410: p_sequence,
2411: p_line_num, 0, 0);
2412: END;
2884: , X_billable_flag => X_billable_flag);
2885:
2886: IF x_msg_type = 'E' and x_msg_data is not NULL THEN
2887: -- Write the message to the PO_ONLINE_REPORT_TEXT table as an error.
2888: po_copydoc_s1.online_report(x_online_report_id,
2889: x_sequence, x_msg_data,
2890: x_line_num, x_shipment_num, x_distribution_num,
2891: PO_COPYDOC_S1.G_ERROR_MESSAGE_TYPE);
2892: ELSIF x_msg_type = 'W' and x_msg_data is not NULL THEN
2887: -- Write the message to the PO_ONLINE_REPORT_TEXT table as an error.
2888: po_copydoc_s1.online_report(x_online_report_id,
2889: x_sequence, x_msg_data,
2890: x_line_num, x_shipment_num, x_distribution_num,
2891: PO_COPYDOC_S1.G_ERROR_MESSAGE_TYPE);
2892: ELSIF x_msg_type = 'W' and x_msg_data is not NULL THEN
2893: -- Write the message to the PO_ONLINE_REPORT_TEXT table as a warning.
2894: po_copydoc_s1.online_report(x_online_report_id,
2895: x_sequence, x_msg_data,
2890: x_line_num, x_shipment_num, x_distribution_num,
2891: PO_COPYDOC_S1.G_ERROR_MESSAGE_TYPE);
2892: ELSIF x_msg_type = 'W' and x_msg_data is not NULL THEN
2893: -- Write the message to the PO_ONLINE_REPORT_TEXT table as a warning.
2894: po_copydoc_s1.online_report(x_online_report_id,
2895: x_sequence, x_msg_data,
2896: x_line_num, x_shipment_num, x_distribution_num,
2897: PO_COPYDOC_S1.G_WARNING_MESSAGE_TYPE);
2898: END IF;
2893: -- Write the message to the PO_ONLINE_REPORT_TEXT table as a warning.
2894: po_copydoc_s1.online_report(x_online_report_id,
2895: x_sequence, x_msg_data,
2896: x_line_num, x_shipment_num, x_distribution_num,
2897: PO_COPYDOC_S1.G_WARNING_MESSAGE_TYPE);
2898: END IF;
2899: --
2900:
2901: --
2914: x_return_code => l_val_proj_result);
2915:
2916: IF ( l_val_proj_result = PO_PROJECT_DETAILS_SV.pjm_validate_failure) THEN
2917: -- Write the message to the PO_ONLINE_REPORT_TEXT table as an error.
2918: po_copydoc_s1.online_report(x_online_report_id,
2919: x_sequence, FND_MESSAGE.get,
2920: x_line_num, x_shipment_num, x_distribution_num,
2921: PO_COPYDOC_S1.G_ERROR_MESSAGE_TYPE);
2922: ELSIF ( l_val_proj_result = PO_PROJECT_DETAILS_SV.pjm_validate_warning) THEN
2917: -- Write the message to the PO_ONLINE_REPORT_TEXT table as an error.
2918: po_copydoc_s1.online_report(x_online_report_id,
2919: x_sequence, FND_MESSAGE.get,
2920: x_line_num, x_shipment_num, x_distribution_num,
2921: PO_COPYDOC_S1.G_ERROR_MESSAGE_TYPE);
2922: ELSIF ( l_val_proj_result = PO_PROJECT_DETAILS_SV.pjm_validate_warning) THEN
2923: -- Write the message to the PO_ONLINE_REPORT_TEXT table as a warning.
2924: po_copydoc_s1.online_report(x_online_report_id,
2925: x_sequence, FND_MESSAGE.get,
2920: x_line_num, x_shipment_num, x_distribution_num,
2921: PO_COPYDOC_S1.G_ERROR_MESSAGE_TYPE);
2922: ELSIF ( l_val_proj_result = PO_PROJECT_DETAILS_SV.pjm_validate_warning) THEN
2923: -- Write the message to the PO_ONLINE_REPORT_TEXT table as a warning.
2924: po_copydoc_s1.online_report(x_online_report_id,
2925: x_sequence, FND_MESSAGE.get,
2926: x_line_num, x_shipment_num, x_distribution_num,
2927: PO_COPYDOC_S1.G_WARNING_MESSAGE_TYPE);
2928: END IF;
2923: -- Write the message to the PO_ONLINE_REPORT_TEXT table as a warning.
2924: po_copydoc_s1.online_report(x_online_report_id,
2925: x_sequence, FND_MESSAGE.get,
2926: x_line_num, x_shipment_num, x_distribution_num,
2927: PO_COPYDOC_S1.G_WARNING_MESSAGE_TYPE);
2928: END IF;
2929: --< Bug 3265539 End >
2930:
2931: END IF; /* destination type is 'EXPENSE' */
2998: END IF; -- doc is encumbered BPA check
2999:
3000: EXCEPTION
3001: WHEN OTHERS THEN
3002: po_copydoc_s1.copydoc_sql_error('submission_check_copydoc', x_progress, sqlcode,
3003: x_online_report_id,
3004: x_sequence,
3005: x_line_num,x_shipment_num,x_distribution_num);
3006:
3095: END IF; --< if txn flow header ID not null >
3096:
3097: EXCEPTION
3098: WHEN FND_API.g_exc_error THEN
3099: PO_COPYDOC_S1.online_report
3100: (x_online_report_id => p_online_report_id,
3101: x_sequence => x_sequence,
3102: x_message => FND_MESSAGE.get,
3103: x_line_num => p_line_num,
3103: x_line_num => p_line_num,
3104: x_shipment_num => p_shipment_num,
3105: x_distribution_num => 0);
3106: WHEN OTHERS THEN
3107: PO_COPYDOC_S1.copydoc_sql_error
3108: (x_routine => 'PO_COPYDOC_SUB.validate_transaction_flow',
3109: x_progress => l_progress,
3110: x_sqlcode => SQLCODE,
3111: x_online_report_id => p_online_report_id,
3185: l_progress := '010';
3186:
3187: l_user_id := FND_GLOBAL.user_id;
3188: l_login_id := FND_GLOBAL.login_id;
3189: l_message_type := PO_COPYDOC_S1.g_error_message_type;
3190: l_err_prefix := FND_MESSAGE.get_string(appin => 'PO',
3191: namein => 'PO_GA_ORG_ASSIGN_PREFIX');
3192:
3193: --------------------------------------------------------------
3365: WHEN l_populate_failed_exc THEN
3366: -- If caught, error already inserted, so do nothing here.
3367: NULL;
3368: WHEN OTHERS THEN
3369: PO_COPYDOC_S1.copydoc_sql_error
3370: (x_routine => 'PO_COPYDOC_SUB.validate_org_assignments',
3371: x_progress => l_progress,
3372: x_sqlcode => SQLCODE,
3373: x_online_report_id => p_online_report_id,
3469:
3470: EXCEPTION
3471: WHEN OTHERS THEN
3472: x_return_status := FND_API.g_ret_sts_unexp_error;
3473: PO_COPYDOC_S1.copydoc_sql_error
3474: (x_routine => 'PO_COPYDOC_SUB.populate_session_gt',
3475: x_progress => l_progress,
3476: x_sqlcode => SQLCODE,
3477: x_online_report_id => p_online_report_id,
3522:
3523:
3524: EXCEPTION
3525: WHEN NO_DATA_FOUND THEN
3526: po_copydoc_s1.online_report(
3527: x_online_report_id,
3528: x_sequence,
3529: fnd_message.get_string('PO', 'PO_SUB_REF_UNAPPROVED_CONTRACT'),
3530: x_line_num, 0, 0);
3528: x_sequence,
3529: fnd_message.get_string('PO', 'PO_SUB_REF_UNAPPROVED_CONTRACT'),
3530: x_line_num, 0, 0);
3531: WHEN OTHERS THEN
3532: po_copydoc_s1.copydoc_sql_error('validate_blanket_ref', l_progress, sqlcode,
3533: x_online_report_id,
3534: x_sequence,
3535: x_line_num, 0, 0);
3536:
3562: END;
3563:
3564: l_progress := '020';
3565: IF NVL(l_frozen_flag, 'N') = 'Y' THEN
3566: po_copydoc_s1.online_report(
3567: x_online_report_id,
3568: x_sequence,
3569: fnd_message.get_string('PO', 'PO_INVALID_IDV_REF'),
3570: 0, 0, 0);
3571: END IF;
3572:
3573: EXCEPTION
3574: WHEN OTHERS THEN
3575: po_copydoc_s1.copydoc_sql_error(
3576: 'clm_named_cols_check', l_progress, sqlcode,
3577: x_online_report_id,
3578: x_sequence,
3579: 0, 0, 0);