[Home] [Help]
7397: IF (l_debug = 1) THEN
7398: mdebug('using cartonization api', G_MESSAGE);
7399: END IF;
7400:
7401: SELECT mtl_material_transactions_s.NEXTVAL
7402: INTO l_trx_header_id
7403: FROM DUAL;
7404:
7405: IF (l_debug = 1) THEN
7673:
7674: --If an invenotory prepack, insert trx in mtl_material_transactions_temp table
7675: IF (p_source = 1) THEN
7676: -- if inventory prepack, trx header id required
7677: SELECT mtl_material_transactions_s.NEXTVAL
7678: INTO l_trx_header_id
7679: FROM DUAL;
7680:
7681: IF (l_debug = 1) THEN
8786:
8787: -- get the account period ID
8788: invttmtx.tdatechk(p_organization_id, SYSDATE, v_acct_period_id, v_open_past_period);
8789:
8790: SELECT mtl_material_transactions_s.nextval
8791: INTO l_trx_hdr_id
8792: FROM DUAL;
8793:
8794: FOR Nested_LPN_rec IN Nested_LPN_cur LOOP
8827: FETCH LPN_item_cur INTO l_next_item_rec;
8828:
8829: IF ( LPN_item_cur%FOUND ) THEN
8830: -- Create new trx temp id
8831: SELECT mtl_material_transactions_s.nextval
8832: INTO l_trx_tmp_id
8833: FROM DUAL;
8834:
8835: -- Find the primary uom
9065: , l_crnt_item_rec.secondary_uom_code --INCONV kkillams
9066: );
9067:
9068: -- Done with this item/revision/costgroup combo need new trx temp id
9069: SELECT mtl_material_transactions_s.nextval
9070: INTO l_trx_tmp_id
9071: FROM DUAL;
9072:
9073: -- If next record is for a new item need to find the primary uom
9190: mdebug(l_api_name || ' Entered ' || g_pkg_version, 1);
9191: mdebug('orgid=' ||p_organization_id||' lpnid='||p_outermost_lpn_id, G_MESSAGE);
9192: END IF;
9193:
9194: SELECT mtl_material_transactions_s.nextval
9195: INTO l_trx_hdr_id
9196: FROM DUAL;
9197:
9198: --Every nested lpn will need to be deconsolidated from the outermost lpn,