[Home] [Help]
2462: ) IS
2463: rsh rcv_shipment_headers%ROWTYPE;
2464: BEGIN
2465: IF (rhi.receipt_header_id IS NOT NULL) THEN
2466: rsh := rcv_table_functions.get_rsh_row_from_id(rhi.receipt_header_id);
2467: ELSIF(rhi.shipment_num IS NOT NULL) THEN
2468: rsh := rcv_table_functions.get_rsh_row_from_num(rhi.shipment_num,
2469: rhi.vendor_id,
2470: rhi.vendor_site_id,
2464: BEGIN
2465: IF (rhi.receipt_header_id IS NOT NULL) THEN
2466: rsh := rcv_table_functions.get_rsh_row_from_id(rhi.receipt_header_id);
2467: ELSIF(rhi.shipment_num IS NOT NULL) THEN
2468: rsh := rcv_table_functions.get_rsh_row_from_num(rhi.shipment_num,
2469: rhi.vendor_id,
2470: rhi.vendor_site_id,
2471: rhi.ship_to_organization_id,
2472: rhi.shipped_date,
2795: /* If this row does not have a header_interface_id it is possible that the
2796: parent_interface_txn does. This extra query is free because of caching */
2797: IF ( rti.header_interface_id IS NULL
2798: AND rti.parent_interface_txn_id IS NOT NULL) THEN
2799: rti.header_interface_id := rcv_table_functions.get_rti_row_from_id(rti.parent_interface_txn_id).header_interface_id;
2800: END IF;
2801:
2802: IF (rti.header_interface_id IS NOT NULL) THEN
2803: rhi := rcv_table_functions.get_rhi_row_from_id(rti.header_interface_id);
2799: rti.header_interface_id := rcv_table_functions.get_rti_row_from_id(rti.parent_interface_txn_id).header_interface_id;
2800: END IF;
2801:
2802: IF (rti.header_interface_id IS NOT NULL) THEN
2803: rhi := rcv_table_functions.get_rhi_row_from_id(rti.header_interface_id);
2804: END IF;
2805:
2806: IF (rhi.header_interface_id IS NULL) THEN
2807: RETURN;
2816:
2817: IF ( rhi.GROUP_ID IS NULL
2818: AND rti.GROUP_ID IS NOT NULL) THEN
2819: rhi.GROUP_ID := rti.GROUP_ID;
2820: rcv_table_functions.update_rhi_row(rhi);
2821: END IF;
2822:
2823: IF (rti.GROUP_ID IS NULL) THEN
2824: rti.GROUP_ID := rhi.GROUP_ID;
3142: ) IS
3143: prti rcv_transactions_interface%ROWTYPE;
3144: BEGIN
3145: IF (rti.parent_interface_txn_id IS NOT NULL) THEN
3146: prti := rcv_table_functions.get_rti_row_from_id(rti.parent_interface_txn_id);
3147: END IF;
3148:
3149: IF (prti.interface_transaction_id IS NULL) THEN
3150: RETURN;
4345: ) IS
4346: rt rcv_transactions%ROWTYPE;
4347: BEGIN
4348: IF (rti.parent_transaction_id IS NOT NULL) THEN
4349: rt := rcv_table_functions.get_rt_row_from_id(rti.parent_transaction_id);
4350: END IF;
4351:
4352: IF (rt.transaction_id IS NULL) THEN
4353: RETURN;
4921: WHERE source_code = 'ORDER ENTRY'
4922: AND transaction_id = p_mmt_transaction_id;*/
4923: BEGIN
4924: IF (rti.shipment_line_id IS NOT NULL) THEN
4925: rsl := rcv_table_functions.get_rsl_row_from_id(rti.shipment_line_id);
4926: END IF;
4927:
4928: IF (rsl.shipment_line_id IS NULL) THEN
4929: RETURN;
5359: ) IS
5360: rsh rcv_shipment_headers%ROWTYPE;
5361: BEGIN
5362: IF (rti.shipment_header_id IS NOT NULL) THEN
5363: rsh := rcv_table_functions.get_rsh_row_from_id(rti.shipment_header_id);
5364: END IF;
5365:
5366: IF (rsh.shipment_header_id IS NULL) THEN
5367: RETURN;
5581: pod po_distributions_all%ROWTYPE;
5582: x_quantity NUMBER;
5583: BEGIN
5584: IF (rti.po_distribution_id IS NOT NULL) THEN
5585: pod := rcv_table_functions.get_pod_row_from_id(rti.po_distribution_id);
5586: END IF;
5587:
5588: IF (pod.po_distribution_id IS NULL) THEN
5589: RETURN;
5875: pll po_line_locations_all%ROWTYPE;
5876: x_quantity NUMBER;
5877: BEGIN
5878: IF (rti.po_line_location_id IS NOT NULL) THEN
5879: pll := rcv_table_functions.get_pll_row_from_id(rti.po_line_location_id);
5880: END IF;
5881:
5882: IF (pll.line_location_id IS NULL) THEN
5883: RETURN;
6166: pol po_lines_all%ROWTYPE;
6167: BEGIN
6168: asn_debug.put_line('Enter default_rti_from_pol');
6169: IF (rti.po_line_id IS NOT NULL) THEN
6170: pol := rcv_table_functions.get_pol_row_from_id(rti.po_line_id);
6171: END IF;
6172: asn_debug.put_line('Afte get_pol_row_from_id');
6173:
6174: IF (pol.po_line_id IS NULL) THEN
6419: ) IS
6420: poh po_headers_all%ROWTYPE;
6421: BEGIN
6422: IF (rti.po_header_id IS NOT NULL) THEN
6423: poh := rcv_table_functions.get_poh_row_from_id(rti.po_header_id);
6424: END IF;
6425:
6426: IF (poh.po_header_id IS NULL) THEN
6427: RETURN;
6572: ) IS
6573: oel oe_order_lines_all%ROWTYPE;
6574: BEGIN
6575: IF (rti.oe_order_line_id IS NOT NULL) THEN
6576: oel := rcv_table_functions.get_oel_row_from_id(rti.oe_order_line_id);
6577: END IF;
6578:
6579: IF (oel.line_id IS NULL) THEN
6580: RETURN;
6832: ) IS
6833: oeh oe_order_headers_all%ROWTYPE;
6834: BEGIN
6835: IF (rti.oe_order_header_id IS NOT NULL) THEN
6836: oeh := rcv_table_functions.get_oeh_row_from_id(rti.oe_order_header_id);
6837: END IF;
6838:
6839: IF (oeh.header_id IS NULL) THEN
6840: RETURN;
6942: IF (rti.expected_receipt_date IS NULL) THEN
6943: rti.expected_receipt_date := SYSDATE;
6944: END IF;
6945:
6946: x_receipt_num := rcv_table_functions.get_rsh_row_from_id(rti.shipment_header_id).receipt_num;
6947:
6948: INSERT INTO rcv_headers_interface
6949: (created_by,
6950: creation_date,
7136: IF (rhi.expected_receipt_date IS NULL) THEN
7137: rhi.expected_receipt_date := SYSDATE;
7138: END IF;
7139: EXCEPTION
7140: WHEN rcv_table_functions.e_fatal_error THEN
7141: rcv_error_pkg.log_interface_error(g_curr_table,
7142: rcv_table_functions.g_error_column,
7143: g_curr_group_id,
7144: g_curr_header_id,
7138: END IF;
7139: EXCEPTION
7140: WHEN rcv_table_functions.e_fatal_error THEN
7141: rcv_error_pkg.log_interface_error(g_curr_table,
7142: rcv_table_functions.g_error_column,
7143: g_curr_group_id,
7144: g_curr_header_id,
7145: g_curr_transaction_id
7146: );
7340: elapsed_time('general defaulting');
7341:
7342: IF ( rti.shipment_header_id IS NULL
7343: AND rti.shipment_num IS NOT NULL) THEN
7344: rti.shipment_header_id := rcv_table_functions.get_rsh_row_from_num(rti.shipment_num,
7345: rti.vendor_id,
7346: rti.vendor_site_id,
7347: rti.to_organization_id,
7348: rti.shipped_date,
7353:
7354: IF ( rti.shipment_line_id IS NULL
7355: AND rti.shipment_header_id IS NOT NULL
7356: AND rti.document_shipment_line_num IS NOT NULL) THEN
7357: rti.shipment_line_id := rcv_table_functions.get_rsl_row_from_num(rti.document_line_num, rti.shipment_header_id).shipment_line_id;
7358: elapsed_time('get_rsl_row_from_num');
7359: END IF;
7360:
7361: IF ( rti.shipment_header_id IS NULL
7359: END IF;
7360:
7361: IF ( rti.shipment_header_id IS NULL
7362: AND rti.shipment_line_id IS NOT NULL) THEN
7363: rti.shipment_header_id := rcv_table_functions.get_rsl_row_from_id(rti.shipment_line_id).shipment_header_id;
7364: END IF;
7365:
7366: IF (rti.source_document_code = 'INVENTORY') THEN
7367: IF (rti.shipment_header_id IS NULL) THEN
7380:
7381: --The following defaults up the chain if a lower level id is provided
7382: IF ( rti.po_line_location_id IS NULL
7383: AND rti.po_distribution_id IS NOT NULL) THEN
7384: rti.po_line_location_id := rcv_table_functions.get_pod_row_from_id(rti.po_distribution_id).line_location_id;
7385: END IF;
7386:
7387: IF ( rti.po_line_id IS NULL
7388: AND rti.po_line_location_id IS NOT NULL) THEN
7385: END IF;
7386:
7387: IF ( rti.po_line_id IS NULL
7388: AND rti.po_line_location_id IS NOT NULL) THEN
7389: rti.po_line_id := rcv_table_functions.get_pll_row_from_id(rti.po_line_location_id).po_line_id;
7390: END IF;
7391:
7392: /* Bug 5299177
7393: * We were populating the value of po_header_id to rti.po_line_location_id instead
7394: * of rti.po_header_id. Changed it.
7395: */
7396: IF ( rti.po_header_id IS NULL
7397: AND rti.po_line_id IS NOT NULL) THEN
7398: rti.po_header_id := rcv_table_functions.get_pol_row_from_id(rti.po_line_id).po_header_id;
7399: END IF;
7400:
7401: IF ( rti.oe_order_header_id IS NULL
7402: AND rti.oe_order_line_id IS NOT NULL) THEN
7399: END IF;
7400:
7401: IF ( rti.oe_order_header_id IS NULL
7402: AND rti.oe_order_line_id IS NOT NULL) THEN
7403: rti.oe_order_header_id := rcv_table_functions.get_oel_row_from_id(rti.oe_order_line_id).header_id;
7404: END IF;
7405:
7406: IF (rti.transaction_type IN('UNORDERED', 'MATCH')) THEN
7407: rti.validation_flag := 'N';
7410:
7411: IF (rti.source_document_code = 'PO') THEN
7412: IF ( rti.po_header_id IS NULL
7413: AND rti.document_num IS NOT NULL) THEN
7414: rti.po_header_id := rcv_table_functions.get_poh_row_from_num(rti.document_num, rti.org_id).po_header_id;
7415: END IF;
7416:
7417: IF (rti.po_header_id IS NULL) THEN
7418: invalid_null_value('PO_HEADER_ID');
7418: invalid_null_value('PO_HEADER_ID');
7419: END IF;
7420:
7421: IF (rti.po_line_id IS NULL) THEN
7422: rti.po_line_id := rcv_table_functions.get_pol_row_from_num(rti.document_line_num,
7423: rti.po_header_id,
7424: rti.item_description,
7425: rti.vendor_item_num,
7426: rti.item_id
7432: invalid_null_value('PO_LINE_ID');
7433: END IF;
7434:
7435: IF (rti.po_line_location_id IS NULL) THEN
7436: rti.po_line_location_id := rcv_table_functions.get_pll_row_from_num(rti.document_shipment_line_num, rti.po_line_id).line_location_id;
7437: END IF;
7438:
7439: /* It is OK not to have a shipment yet, this will get decided in the preprocessor
7440: IF (rti.po_line_location_id IS NULL) THEN
7442: END IF;
7443: */
7444:
7445: IF (rti.po_distribution_id IS NULL) THEN
7446: rti.po_distribution_id := rcv_table_functions.get_pod_row_from_num(rti.document_distribution_num, rti.po_line_location_id).po_distribution_id;
7447: END IF;
7448:
7449: /* It is OK not to have a distribution yet, this will get decided in the preprocessor
7450: IF (rti.po_distribution_id IS NULL) THEN
7481:
7482: IF ( rti.oe_order_header_id IS NULL
7483: AND rti.document_num IS NOT NULL) THEN
7484: /* WDK: NOTICE THE REVISION HACK FOR OE IS OVERLOADING PO_REVISION_NUM COLUMN */
7485: rti.oe_order_header_id := rcv_table_functions.get_oeh_row_from_num(rti.document_num,
7486: NULL, --WDK, not sure what should be here
7487: rti.po_revision_num,
7488: rti.org_id
7489: ).header_id;
7493: invalid_null_value('OE_ORDER_HEADER_ID');
7494: END IF;
7495:
7496: IF (rti.oe_order_line_id IS NULL) THEN
7497: rti.oe_order_line_id := rcv_table_functions.get_oel_row_from_num(rti.document_line_num, rti.oe_order_header_id).line_id;
7498: END IF;
7499:
7500: /* Bug 5158457. It is ok not to have line number. It will be
7501: * decided in the preprocessor code.
7506:
7507: elapsed_time('rma/req source doc defaulting');
7508: END IF;
7509:
7510: g_asn_type := nvl(rcv_table_functions.get_rsh_row_from_id(rti.shipment_header_id).asn_type,'@@@'); --Bug: 5598511
7511:
7512: default_rti_from_pod(rti);
7513: elapsed_time('default_rti_from_pod');
7514: default_rti_from_pll(rti);
7656:
7657: asn_debug.put_line('org_id = ' || rti.org_id);
7658: elapsed_time('END default_transaction');
7659: EXCEPTION
7660: WHEN rcv_table_functions.e_fatal_error THEN
7661: /* Bug 5584736.
7662: * We have a detailed defaulting routine for defaulting
7663: * subinventory and locator later. Commenting out this code
7664: * here since this is creating problems later.
7672: END IF;
7673: */
7674:
7675: rcv_error_pkg.log_interface_error(g_curr_table,
7676: rcv_table_functions.g_error_column,
7677: g_curr_group_id,
7678: g_curr_header_id,
7679: g_curr_transaction_id
7680: );