[Home] [Help]
469:
470: if( p_current_index = l_count AND l_remaining_qty > 0 ) then
471: select mtl_material_transactions_s.nextval
472: into l_transaction_interface_id --J-dev
473: FROM dual;
474: for l_mti_csr in mti_csr(p_parent_id ) LOOP
475: IF (l_debug = 1) THEN
476: inv_log_util.trace('insert into mmti is ' || l_mti_csr.transaction_interface_id, 'INV_TXN_MANAGER_GRP', 9);
477: END IF;
2595: |exp_to_ast_allowed = 1 means that the exp to ast trx are not alowed
2596: +----------------------------------------------------------------------*/
2597: SELECT FND_PROFILE.VALUE('INV:EXPENSE_TO_ASSET_TRANSFER')
2598: INTO l_profile
2599: FROM dual;
2600:
2601: IF SQL%FOUND THEN
2602: IF l_profile = '2' THEN
2603: exp_to_ast_allowed := 1;
3237: FETCH get_item_info INTO l_lot_control_code, l_tracking_quantity_ind, l_item_secondary_uom_code;
3238: --item is already validated at this point no need to check for no_data_found
3239: CLOSE get_item_info;
3240:
3241: /* bug 4178299, bypass dual qty validations for none-lot ctl items
3242: * since qty will be validated at lot level per line, at header level
3243: * we only need to check that transaction qty equals the sum of the lines total */
3244: --{
3245: IF (l_tracking_quantity_ind = 'PS') THEN
3677: */
3678:
3679: SELECT FND_PROFILE.VALUE('INV_PROJ_MISC_TXN_EXP_TYPE')
3680: INTO l_profile
3681: FROM dual;
3682:
3683: IF SQL%FOUND THEN
3684: if l_profile = '2' THEN
3685: exp_type_required := 2 ;
4819: WHEN NO_DATA_FOUND THEN
4820: IF ((p_shlfcode = 2) AND (l_lotexpdate IS NULL)) THEN
4821: SELECT fnd_date.date_to_canonical(SYSDATE + p_shlfdays)
4822: INTO l_lotexpdate
4823: FROM DUAL;
4824: END IF;
4825:
4826: IF ((p_shlfcode = 4) AND (l_lotexpdate IS NULL)) THEN
4827:
6113: -- If 'NO' then call the create_inv_lot API
6114: l_lot_exists := 0;
6115: BEGIN
6116: SELECT 1 INTO l_lot_exists
6117: FROM DUAL
6118: WHERE EXISTS(SELECT lot_number
6119: FROM mtl_lot_numbers
6120: WHERE lot_number = rec_MTLI.LOT_NUMBER
6121: AND inventory_item_id = p_item_id
7097: in autonomous mode or not*/
7098: IF (g_create_loc_at is null) THEN
7099: SELECT Nvl(FND_PROFILE.Value('INV_CREATE_LOC_AT'), 2)
7100: INTO g_create_loc_at
7101: FROM DUAL;
7102: END IF;
7103:
7104: IF (l_debug = 1) THEN
7105: inv_log_util.trace('g_create_loc_at : '||g_create_loc_at, 'INV_TXN_MANAGER_GRP', 9);
9096: *********************************************************************/
9097: BEGIN
9098: SELECT 1
9099: INTO l_count
9100: FROM DUAL
9101: WHERE EXISTS (SELECT transaction_interface_id
9102: FROM mtl_transactions_interface
9103: WHERE transaction_header_id = p_header_id
9104: AND process_flag = 1
12862: END IF;
12863:
12864: /***********************************************************************
12865: * Each MSNI can have a range of serials. Need to expand them and *
12866: * process each one individually. *
12867: ***********************************************************************/
12868:
12869:
12870: l_next_serial := l_ser_csr.fm_serial_number;
13462: *Lot Translate txns. We need to generate the MSNTs based on MTLIs and MSN. *
13463: ******************************************************************************/
13464: SELECT mtl_material_transactions_s.NEXTVAL
13465: INTO l_sequence
13466: FROM DUAL;
13467: /******************************************************************************
13468: *If this is the resulting MTIs then we need to query the against the source *
13469: *item, lot and subinventory because after lot translate these may get changed*
13470: *and there wil be no record in the MSN for the new lot etc. *
13966: IS
13967: BEGIN
13968: SELECT FND_PROFILE.value(p_prof)
13969: INTO x_ret
13970: FROM dual;
13971: END poget;
13972:
13973:
13974: