46: l_bom_item_type := null;
47: End;
48:
49: -- Bug 3362369 : ATO models are not purchasable
50: IF X_type_lookup_code = 'STANDARD' and
51: l_bom_item_type in (1,2) THEN
52: po_interface_errors_sv1.handle_interface_errors(
53: 'PO_DOCS_OPEN_INTERFACE',
54: 'FATAL',
705: x_header_processable_flag);
706: END IF;
707:
708: x_progress := '012';
709: IF (x_hd_type_lookup_code = 'STANDARD') THEN
710:
711: IF (x_over_tolerance_error_flag is not null) THEN
712: x_valid :=po_headers_sv6.val_lookup_code(
713: x_over_tolerance_error_flag,
1753: X_header_processable_flag => x_header_processable_flag);
1754: END IF;
1755: -- Bug 3320741 END
1756:
1757: IF (x_hd_type_lookup_code = 'STANDARD') THEN
1758:
1759: --Effective date is required for Standard PO with purchase basis
1760: --'TEMP LABOR'
1761:
1755: -- Bug 3320741 END
1756:
1757: IF (x_hd_type_lookup_code = 'STANDARD') THEN
1758:
1759: --Effective date is required for Standard PO with purchase basis
1760: --'TEMP LABOR'
1761:
1762: IF (p_effective_date IS NULL) THEN
1763: PO_INTERFACE_ERRORS_SV1.handle_interface_errors(
1810: X_TokenValue6 => NULL,
1811: X_header_processable_flag => x_header_processable_flag);
1812: END IF;
1813:
1814: END IF; --IF (x_hd_type_lookup_code = 'STANDARD')
1815:
1816: ELSE --p_purchase_basis is not 'TEMP LABOR'
1817:
1818: -- For non TEMP LABOR Purchase basis, job should not be provided.
1840: X_TokenValue6 => NULL,
1841: X_header_processable_flag => x_header_processable_flag);
1842: END IF;
1843:
1844: IF (x_hd_type_lookup_code = 'STANDARD') THEN
1845: IF (p_effective_date IS NOT NULL
1846: OR p_expiration_date IS NOT NULL) THEN
1847: PO_INTERFACE_ERRORS_SV1.handle_interface_errors(
1848: X_interface_type => 'PO_DOCS_OPEN_INTERFACE',
1866: X_TokenValue5 => NULL,
1867: X_TokenValue6 => NULL,
1868: X_header_processable_flag => x_header_processable_flag);
1869: END IF;
1870: END IF; --IF (x_hd_type_lookup_code = 'STANDARD')
1871:
1872: --
1873: -- For non TEMP LABOR Purchase basis, contractor first name or
1874: -- contractor last name should not be provided.
1980: X_header_processable_flag => x_header_processable_flag);
1981: END IF;
1982:
1983: IF ((p_amount IS NULL)
1984: AND (x_hd_type_lookup_code = 'STANDARD')) THEN
1985: PO_INTERFACE_ERRORS_SV1.handle_interface_errors(
1986: X_interface_type => 'PO_DOCS_OPEN_INTERFACE',
1987: X_Error_type => 'FATAL',
1988: X_Batch_id => NULL,
2528: x_header_processable_flag);
2529: END IF;
2530:
2531: x_progress := '270';
2532: --frkhan not for standards
2533: IF (x_hd_type_lookup_code in ('QUOTATION', 'BLANKET')) THEN
2534:
2535: IF (x_receipt_days_exception_code is not null) AND
2536: (x_create_or_update_item_flag <> 'Y')
2985: x_header_processable_flag);
2986: END IF;
2987: END IF;
2988:
2989: --frkhan add standard
2990: IF (x_hd_type_lookup_code in ('BLANKET','STANDARD')) THEN
2991: x_progress := '550';
2992: IF (x_committed_amount < 0) AND (x_committed_amount is not null) THEN
2993: po_interface_errors_sv1.handle_interface_errors(
2986: END IF;
2987: END IF;
2988:
2989: --frkhan add standard
2990: IF (x_hd_type_lookup_code in ('BLANKET','STANDARD')) THEN
2991: x_progress := '550';
2992: IF (x_committed_amount < 0) AND (x_committed_amount is not null) THEN
2993: po_interface_errors_sv1.handle_interface_errors(
2994: 'PO_DOCS_OPEN_INTERFACE',
3115: null,null,null,null,
3116: x_header_processable_flag);
3117: END IF;
3118: END IF;
3119: END IF; --blanket,standard
3120: --FRKHAN
3121: IF (x_hd_type_lookup_code = 'STANDARD') THEN
3122: x_progress := '620';
3123: IF (x_quantity = 0) AND (x_quantity is not null) THEN
3117: END IF;
3118: END IF;
3119: END IF; --blanket,standard
3120: --FRKHAN
3121: IF (x_hd_type_lookup_code = 'STANDARD') THEN
3122: x_progress := '620';
3123: IF (x_quantity = 0) AND (x_quantity is not null) THEN
3124: po_interface_errors_sv1.handle_interface_errors(
3125: 'PO_DOCS_OPEN_INTERFACE',
3176: x_header_processable_flag);
3177: END IF;
3178: */
3179:
3180: END IF; --standard
3181:
3182: /*** The following are validation rules for both blanket and quote ***/
3183: X_progress := '615';
3184: