eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.INV_LOT_TRX_VALIDATION_PUB dependencies on INV_GLOBALS

Line 242: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)

238: print_debug ('l_start_count is ' || l_start_count, 'Validate_Lots');
239: print_debug ('l_result_count is ' || l_result_count, 'Validate_Lots');
240: END IF;
241:
242: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)
243: THEN
244: IF (l_debug = 1)
245: THEN
246: print_debug ('validate for lot split', 'Validate_Lots');

Line 357: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)

353: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error)
354: THEN
355: RAISE fnd_api.g_exc_unexpected_error;
356: END IF;
357: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
358: THEN
359: IF (l_start_count > 1)
360: THEN
361: fnd_message.set_name ('INV', 'INV_MIN_START_LOT_TRANSLATE');

Line 481: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)

477: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error)
478: THEN
479: RAISE fnd_api.g_exc_unexpected_error;
480: END IF;
481: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
482: THEN
483: IF (l_start_count < 2)
484: THEN
485: fnd_message.set_name ('INV', 'INV_MIN_START_LOT_MERGE');

Line 695: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)

691: fnd_msg_pub.ADD;
692: RAISE fnd_api.g_exc_error;
693: END IF;
694:
695: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)
696: THEN
697: IF (l_debug = 1)
698: THEN
699: print_debug ('validate Start Lot for lot split'

Line 744: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)

740: fnd_msg_pub.ADD;
741: RAISE fnd_api.g_exc_unexpected_error;
742: END;
743: END;
744: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
745: THEN
746: IF (l_debug = 1)
747: THEN
748: print_debug ('validate Start Lot for lot merge'

Line 793: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)

789: fnd_msg_pub.ADD;
790: RAISE fnd_api.g_exc_unexpected_error;
791: END;
792: END;
793: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
794: THEN
795: IF (l_debug = 1)
796: THEN
797: print_debug ('validate Start Lot for lot translate'

Line 852: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)

848: /*Added new messages specific to lot split,merge and translate transactions
849: W.R.T to issue 15 of the bug*/
850: IF (x_validation_status <> 'Y')
851: THEN
852: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)
853: THEN
854:
855: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_SPLIT');
856:

Line 857: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)

853: THEN
854:
855: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_SPLIT');
856:
857: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
858: THEN
859:
860: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_MERGE');
861:

Line 862: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)

858: THEN
859:
860: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_MERGE');
861:
862: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
863: THEN
864:
865: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_XLATE');
866:

Line 985: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)

981: fnd_msg_pub.ADD;
982: RAISE fnd_api.g_exc_error;
983: END IF;
984: /* Bug#4363274. This check is not required.
985: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
986: THEN
987: IF (l_debug = 1)
988: THEN
989: print_debug ('result lot_num is ' || p_rs_lot_num_tbl (1)

Line 1038: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)

1034:
1035: IF (l_lot_uniqueness = 1)
1036: THEN
1037: -- lot number is unique accross items
1038: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)
1039: THEN
1040: FOR i IN 1 .. p_rs_lot_num_tbl.COUNT
1041: LOOP
1042: SELECT COUNT (1)

Line 1097: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)

1093: END IF;
1094: END IF;
1095: END LOOP;
1096: END LOOP;
1097: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
1098: THEN
1099: IF (p_st_lot_num_tbl (1) <> p_rs_lot_num_tbl (1))
1100: THEN
1101: SELECT COUNT (1)

Line 1137: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)

1133: ELSE
1134: l_validation_status := 'Y';
1135: END IF;
1136: END IF;
1137: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
1138: THEN
1139: SELECT COUNT (1)
1140: INTO l_lot_count
1141: FROM mtl_lot_numbers

Line 1181: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)

1177: END IF;
1178: END IF;
1179:
1180: -- here is lot number uniqueness is none.
1181: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)
1182: THEN
1183: FOR i IN 1 .. p_rs_lot_num_tbl.COUNT
1184: LOOP
1185: SELECT COUNT (1)

Line 1257: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)

1253: END IF;
1254: END IF;
1255: END LOOP;
1256: END LOOP;
1257: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
1258: THEN
1259: IF (l_debug = 1)
1260: THEN
1261: print_debug ('start lot = ' || p_st_lot_num_tbl (1)

Line 1323: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)

1319: ELSE
1320: l_validation_status := 'Y';
1321: END IF;
1322: END IF;
1323: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
1324: THEN
1325: IF (l_debug = 1)
1326: THEN
1327: print_debug

Line 2504: IF ( (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)

2500: 'LOT_ATTRIBUTE_CATEGORY'
2501: );
2502: END LOOP;
2503:
2504: IF ( (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
2505: OR (p_transaction_type_id = inv_globals.g_type_inv_lot_split)
2506: )
2507: AND (l_st_lot_attr_category <> l_rs_lot_attr_category)
2508: THEN

Line 2505: OR (p_transaction_type_id = inv_globals.g_type_inv_lot_split)

2501: );
2502: END LOOP;
2503:
2504: IF ( (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
2505: OR (p_transaction_type_id = inv_globals.g_type_inv_lot_split)
2506: )
2507: AND (l_st_lot_attr_category <> l_rs_lot_attr_category)
2508: THEN
2509: print_debug ( 'Lot categories mismatch: '

Line 3827: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)

3823:
3824: l_validation_status := 'Y';
3825: END IF;
3826:
3827: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
3828: THEN
3829: FOR i IN 2 .. l_start_count
3830: LOOP
3831: l_organization_id := p_st_org_id_tbl (i);

Line 3902: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)

3898: x_validation_status := 'N';
3899: RAISE fnd_api.g_exc_error;
3900: END IF;
3901: END LOOP;
3902: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
3903: THEN
3904: -- do not assign cost group if the lot changed item.
3905: IF (l_inventory_item_id <> p_rs_item_id_tbl (1))
3906: THEN

Line 4180: IF ( p_transaction_type_id = inv_globals.g_type_inv_lot_split

4176: ELSE
4177: l_is_serial_control := 'FALSE';
4178: END IF;
4179:
4180: IF ( p_transaction_type_id = inv_globals.g_type_inv_lot_split
4181: OR p_transaction_type_id = inv_globals.g_type_inv_lot_translate
4182: )
4183: THEN
4184: -- check if the total result qty do not exceed the parent lot quantity

Line 4181: OR p_transaction_type_id = inv_globals.g_type_inv_lot_translate

4177: l_is_serial_control := 'FALSE';
4178: END IF;
4179:
4180: IF ( p_transaction_type_id = inv_globals.g_type_inv_lot_split
4181: OR p_transaction_type_id = inv_globals.g_type_inv_lot_translate
4182: )
4183: THEN
4184: -- check if the total result qty do not exceed the parent lot quantity
4185: IF (l_start_primary_uom <> p_st_uom_tbl (1))

Line 4259: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate) THEN

4255: fnd_msg_pub.ADD;
4256: RAISE fnd_api.g_exc_error;
4257: END IF;
4258:
4259: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate) THEN
4260: IF (l_att_qty <> l_start_primary_qty) THEN
4261: fnd_message.set_name ('INV', 'INV_LOT_TRANSLATE_QTY_ERR');
4262: fnd_msg_pub.ADD;
4263: RAISE fnd_api.g_exc_error;

Line 4300: AND p_transaction_type_id = inv_globals.g_type_inv_lot_split

4296: END IF;
4297:
4298: IF ( i = 1
4299: AND l_result_qty = l_att_qty
4300: AND p_transaction_type_id = inv_globals.g_type_inv_lot_split
4301: ) THEN
4302: fnd_message.set_name ('INV', 'INV_MIN_LOT_SPLIT');
4303: fnd_msg_pub.ADD;
4304: RAISE fnd_api.g_exc_error;

Line 4316: AND p_transaction_type_id = inv_globals.g_type_inv_lot_split) THEN

4312:
4313: /*Check to see wether individual lot quantities also match*/
4314:
4315: IF(l_is_serial_control = 'TRUE'
4316: AND p_transaction_type_id = inv_globals.g_type_inv_lot_split) THEN
4317: l_rs_var_index := p_rs_ser_parent_lot_tbl.FIRST;
4318: l_lot_serial_count := 0;
4319: FOR j IN 1 .. p_rs_ser_number_tbl.COUNT
4320: LOOP

Line 4347: IF ( p_transaction_type_id = inv_globals.g_type_inv_lot_split

4343: RAISE fnd_api.g_exc_error;
4344: END IF;
4345:
4346: IF (l_total_qty <> l_start_primary_qty) THEN
4347: IF ( p_transaction_type_id = inv_globals.g_type_inv_lot_split
4348: AND l_total_qty > l_start_primary_qty) THEN
4349: x_validation_status := 'N';
4350: fnd_message.set_name ('INV', 'INV_TOTAL_EXCEED_SPLIT');
4351: fnd_msg_pub.ADD;

Line 4353: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate) THEN

4349: x_validation_status := 'N';
4350: fnd_message.set_name ('INV', 'INV_TOTAL_EXCEED_SPLIT');
4351: fnd_msg_pub.ADD;
4352: RAISE fnd_api.g_exc_error;
4353: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate) THEN
4354: x_validation_status := 'N';
4355: fnd_message.set_name ('INV', 'INV_TOTAL_EXCEED_TRANSLATE');
4356: fnd_msg_pub.ADD;
4357: RAISE fnd_api.g_exc_error;

Line 4398: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge) THEN

4394: END IF;
4395: /* for lot merge, the check if the starting lot have enough qty to transact in
4396: * the transaction manager we don't check it here.
4397: */
4398: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge) THEN
4399: FOR i IN 1 .. l_start_count
4400: LOOP
4401: IF (l_start_primary_uom <> p_st_uom_tbl (i)) THEN
4402: l_start_primary_qty :=

Line 4750: IF ((p_transaction_type_id <> inv_globals.g_type_inv_lot_split

4746: THEN
4747: print_debug ('breadcrumb 20', 'Validate_serials');
4748: END IF;
4749:
4750: IF ((p_transaction_type_id <> inv_globals.g_type_inv_lot_split
4751: OR (p_transaction_type_id = inv_globals.g_type_inv_lot_split
4752: AND i <= p_rs_ser_number_tbl.COUNT))
4753: AND
4754: p_st_ser_number_tbl (l_st_var_index) <>

Line 4751: OR (p_transaction_type_id = inv_globals.g_type_inv_lot_split

4747: print_debug ('breadcrumb 20', 'Validate_serials');
4748: END IF;
4749:
4750: IF ((p_transaction_type_id <> inv_globals.g_type_inv_lot_split
4751: OR (p_transaction_type_id = inv_globals.g_type_inv_lot_split
4752: AND i <= p_rs_ser_number_tbl.COUNT))
4753: AND
4754: p_st_ser_number_tbl (l_st_var_index) <>
4755: p_rs_ser_number_tbl (l_rs_var_index)

Line 4797: (inv_globals.g_type_inv_lot_translate

4793: *source serials
4794: */
4795: BEGIN
4796: IF (p_transaction_type_id IN
4797: (inv_globals.g_type_inv_lot_translate
4798: , inv_globals.g_type_inv_lot_split
4799: )
4800: )
4801: THEN

Line 4798: , inv_globals.g_type_inv_lot_split

4794: */
4795: BEGIN
4796: IF (p_transaction_type_id IN
4797: (inv_globals.g_type_inv_lot_translate
4798: , inv_globals.g_type_inv_lot_split
4799: )
4800: )
4801: THEN
4802: IF (l_debug = 1)

Line 4830: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)

4826: IF (l_debug = 1)
4827: THEN
4828: print_debug ('breadcrumb 60', 'Validate_serials');
4829: END IF;
4830: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
4831: THEN
4832: IF (l_debug = 1)
4833: THEN
4834: print_debug ('breadcrumb 70', 'Validate_serials');

Line 4935: IF ( p_transaction_type_id = inv_globals.g_type_inv_lot_translate

4931:
4932: /*Not calling validate_serials for lot split and merge transactions as most
4933: *of the validations have already been done.
4934: */
4935: IF ( p_transaction_type_id = inv_globals.g_type_inv_lot_translate
4936: AND p_st_item_id_tbl (1) <> p_rs_item_id_tbl (1)
4937: )
4938: THEN
4939: IF (l_debug = 1)

Line 4965: , p_trx_src_id => inv_globals.g_sourcetype_inventory

4961: , p_item_id => p_rs_item_id_tbl (1)
4962: , p_qty => l_qty
4963: , p_lot => p_rs_lot_num_tbl (1)
4964: , p_start_ser => p_rs_ser_number_tbl(l_rs_var_index)
4965: , p_trx_src_id => inv_globals.g_sourcetype_inventory
4966: , p_trx_action_id => inv_globals.g_action_inv_lot_translate
4967: , p_issue_receipt => 'R'
4968: , p_check_for_grp_mark_id => 'Y'
4969: , x_end_ser => l_end_ser

Line 4966: , p_trx_action_id => inv_globals.g_action_inv_lot_translate

4962: , p_qty => l_qty
4963: , p_lot => p_rs_lot_num_tbl (1)
4964: , p_start_ser => p_rs_ser_number_tbl(l_rs_var_index)
4965: , p_trx_src_id => inv_globals.g_sourcetype_inventory
4966: , p_trx_action_id => inv_globals.g_action_inv_lot_translate
4967: , p_issue_receipt => 'R'
4968: , p_check_for_grp_mark_id => 'Y'
4969: , x_end_ser => l_end_ser
4970: , x_proc_msg => l_proc_msg

Line 5076: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)

5072:
5073: IF (l_shelf_life_code = 2)
5074: THEN -- It is shelf life controlled. Get the
5075: --lot exp. date from the parent lot MTLN - pass the starting lot number.
5076: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)
5077: THEN
5078: BEGIN
5079: SELECT fnd_date.date_to_canonical (expiration_date)
5080: INTO l_lotexpdate

Line 5140: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)

5136: , 'Compute Lot Exp'
5137: );
5138: END IF;
5139:
5140: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
5141: THEN
5142: -- pass the resulting lot. if the resulting lot doesnt exist, then
5143: -- get the starting lot with the highest/rep lot and get the
5144: -- expiration DATE of that lot from the table. pass both in this case.

Line 5206: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)

5202: , 'Compute Lot Exp'
5203: );
5204: END IF;
5205:
5206: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
5207: THEN
5208: BEGIN
5209: SELECT fnd_date.date_to_canonical (expiration_date)
5210: INTO l_lotexpdate

Line 5261: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)

5257: );
5258: END IF;
5259: ELSIF (l_shelf_life_code = 4)
5260: THEN
5261: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)
5262: THEN
5263: -- get all the child records and check to see if the lot is
5264: -- specified. If it is, then use it. - else get the exp. date
5265: -- from the starting lot.

Line 5333: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)

5329: , 'Compute Lot Exp'
5330: );
5331: END IF;
5332:
5333: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
5334: THEN
5335: l_update := TRUE;
5336:
5337: BEGIN

Line 5423: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)

5419: );
5420: END IF;
5421: END IF;
5422:
5423: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
5424: THEN
5425: IF (p_rs_lot_exp_tbl (1) IS NULL)
5426: THEN
5427: BEGIN