[Home] [Help]
6837: IF (l_debug = 1) THEN
6838: mdebug('using cartonization api', G_MESSAGE);
6839: END IF;
6840:
6841: SELECT mtl_material_transactions_s.NEXTVAL
6842: INTO l_trx_header_id
6843: FROM DUAL;
6844:
6845: IF (l_debug = 1) THEN
7113:
7114: --If an invenotory prepack, insert trx in mtl_material_transactions_temp table
7115: IF (p_source = 1) THEN
7116: -- if inventory prepack, trx header id required
7117: SELECT mtl_material_transactions_s.NEXTVAL
7118: INTO l_trx_header_id
7119: FROM DUAL;
7120:
7121: IF (l_debug = 1) THEN
8215:
8216: -- get the account period ID
8217: invttmtx.tdatechk(p_organization_id, SYSDATE, v_acct_period_id, v_open_past_period);
8218:
8219: SELECT mtl_material_transactions_s.nextval
8220: INTO l_trx_hdr_id
8221: FROM DUAL;
8222:
8223: FOR Nested_LPN_rec IN Nested_LPN_cur LOOP
8256: FETCH LPN_item_cur INTO l_next_item_rec;
8257:
8258: IF ( LPN_item_cur%FOUND ) THEN
8259: -- Create new trx temp id
8260: SELECT mtl_material_transactions_s.nextval
8261: INTO l_trx_tmp_id
8262: FROM DUAL;
8263:
8264: -- Find the primary uom
8492: , l_crnt_item_rec.secondary_uom_code --INCONV kkillams
8493: );
8494:
8495: -- Done with this item/revision/costgroup combo need new trx temp id
8496: SELECT mtl_material_transactions_s.nextval
8497: INTO l_trx_tmp_id
8498: FROM DUAL;
8499:
8500: -- If next record is for a new item need to find the primary uom
8617: mdebug(l_api_name || ' Entered ' || g_pkg_version, 1);
8618: mdebug('orgid=' ||p_organization_id||' lpnid='||p_outermost_lpn_id, G_MESSAGE);
8619: END IF;
8620:
8621: SELECT mtl_material_transactions_s.nextval
8622: INTO l_trx_hdr_id
8623: FROM DUAL;
8624:
8625: --Every nested lpn will need to be deconsolidated from the outermost lpn,