[Home] [Help]
750: -- rcv_clear_global in INVRCVCB.pls and not g_header_intf_id
751: -- we look at g_shipment_header_id to figure out if we need
752: -- to generate a new value for header_intf_id to insert in RTI.
753: IF g_shipment_header_id IS NULL THEN
754: SELECT rcv_headers_interface_s.NEXTVAL
755: INTO g_header_intf_id
756: FROM dual;
757: END IF;
758:
6355: INTO v_processing_status_code
6356: FROM RCV_TRANSACTIONS_INTERFACE
6357: WHERE HEADER_INTERFACE_ID in
6358: (SELECT HEADER_INTERFACE_ID
6359: FROM RCV_HEADERS_INTERFACE
6360: WHERE receipt_num = p_lcmReceiptNum
6361: AND SHIP_TO_ORGANIZATION_ID = p_lcmOrgID)
6362: AND ROWNUM < 2;
6363:
7038: , p_attribute13 IN VARCHAR2 DEFAULT NULL
7039: , p_attribute14 IN VARCHAR2 DEFAULT NULL
7040: , p_attribute15 IN VARCHAR2 DEFAULT NULL
7041: ) IS
7042: l_header rcv_headers_interface%ROWTYPE;
7043: l_rowid VARCHAR2(40);
7044: l_sysdate DATE := SYSDATE;
7045: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
7046: l_msg_count NUMBER;
7123:
7124: l_progress := '20';
7125:
7126: IF g_header_intf_id IS NULL THEN
7127: SELECT rcv_headers_interface_s.NEXTVAL
7128: INTO g_header_intf_id
7129: FROM SYS.DUAL;
7130: END IF;
7131:
7130: END IF;
7131:
7132: l_progress := '25';
7133:
7134: INSERT INTO rcv_headers_interface
7135: (
7136: header_interface_id
7137: , group_id
7138: , processing_status_code
7337: print_debug('rcv_update_header_interface 20: before update_row ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS')
7338: , 4);
7339: END IF;
7340: l_progress := '40';
7341: UPDATE rcv_headers_interface
7342: SET customer_id = Nvl(p_customer_id, customer_id)
7343: , last_update_date = l_sysdate
7344: , last_update_login = NVL(inv_rcv_common_apis.g_po_startup_value.user_id, last_update_login)
7345: , last_updated_by = NVL(inv_rcv_common_apis.g_po_startup_value.user_id, last_updated_by)