[Home] [Help]
122: x_return_status := FND_API.G_RET_STS_ERROR ;
123: fnd_message.set_name('INV', 'INV_UPDATE_ERROR');
124: fnd_message.set_token('ENTITY1', 'mtl_material_transactions_temp');
125: -- MESSAGE_TEXT = "Error Updating ENTITY1 "
126: fnd_msg_pub.add;
127: IF (l_debug = 1) THEN
128: print_debug('proc_update_mmtt .. nodatafound OTHERS : ' );
129: END IF;
130: END IF;
176: x_return_status := FND_API.G_RET_STS_ERROR ;
177: fnd_message.set_name('INV', 'INV_UPDATE_ERROR');
178: fnd_message.set_token('ENTITY1', 'MTL_SERIAL_NUMBERS_TEMP');
179: -- MESSAGE_TEXT = "Error Updating ENTITY1 "
180: fnd_msg_pub.add;
181: IF (l_debug = 1) THEN
182: print_debug('proc_update_msnt .. nodatafound OTHERS : ');
183: END IF;
184: END IF;
226: x_return_status := FND_API.G_RET_STS_ERROR ;
227: fnd_message.set_name('INV', 'INV_UPDATE_ERROR');
228: fnd_message.set_token('ENTITY1', 'MTL_LOT_NUMBERS_TEMP');
229: -- MESSAGE_TEXT = "Error Updating ENTITY1 "
230: fnd_msg_pub.add;
231: IF (l_debug = 1) THEN
232: print_debug('proc_update_mtlt .. nodatafound OTHERS : ');
233: END IF;
234: END IF;
506: END IF;
507: ELSIF l_negative_balances_allowed = 2 THEN -- Negative balances are not allowed
508: x_return_status := FND_API.G_RET_STS_ERROR ;
509: fnd_message.set_name('INV', 'INV_ZERO_ONHAND');
510: fnd_msg_pub.add;
511: END IF;
512: EXCEPTION
513: WHEN no_data_found THEN
514: x_return_status := FND_API.G_RET_STS_ERROR ;
512: EXCEPTION
513: WHEN no_data_found THEN
514: x_return_status := FND_API.G_RET_STS_ERROR ;
515: fnd_message.set_name('INV', 'INV_ZERO_ONHAND');
516: fnd_msg_pub.add;
517: IF (l_debug = 1) THEN
518: print_debug('proc_get_default_costgroup .. no_data_found' );
519: END IF;
520:
752: END IF;
753: fnd_message.set_name('INV','INV_PENDING_CG_NULL');
754: fnd_message.set_token('ORG',p_organization_id);
755: fnd_message.set_token('ITEM',p_inventory_item_id);
756: fnd_msg_pub.add;
757: x_return_status := g_corrupt_cg_error;
758: --Bug 2844271 fix
759: ELSE */
760: /*BUG 3777187 Pending transactions may not have cost_group_id always so x_cost_group_id might be null. In this case we need to
776: EXCEPTION
777: WHEN no_data_found THEN
778: x_return_status := FND_API.G_RET_STS_ERROR ;
779: fnd_message.set_name('INV', 'INV_ZERO_ONHAND');
780: fnd_msg_pub.add;
781: IF (l_debug = 1) THEN
782: print_debug('proc_get_pending_costgroup .. no_data_found' );
783: END IF;
784: WHEN OTHERS THEN
926: END IF;
927: fnd_message.set_name('INV','INV_ONHAND_CG_NULL');
928: fnd_message.set_token('ORG',p_organization_id);
929: fnd_message.set_token('ITEM',p_inventory_item_id);
930: fnd_msg_pub.add;
931: x_return_status := g_corrupt_cg_error;
932: --Bug 2844271 fix
933: ELSE
934: IF (l_debug = 1) THEN
1996: END IF;
1997: --Commenting these because this message is getting added
1998: --in INVCOMUB.pls
1999: --fnd_message.set_name('INV', 'INV_COMINGLE_ERROR');
2000: --fnd_msg_pub.add;
2001: x_return_status := inv_cost_group_pvt.g_comingle_error;
2002: END IF;
2003:
2004: EXCEPTION
2695: records IN MSNT');
2696: END IF;
2697: fnd_message.set_name('INV', 'Cannot find the serial number
2698: for the transaction being processed');
2699: fnd_msg_pub.add;
2700: RAISE FND_API.G_EXC_ERROR;
2701: END IF;
2702:
2703: WHILE cur_msnt%found LOOP
2730: END IF;
2731: fnd_message.set_name('INV', 'INV_FROM_TO_SER_DIFF_LENGTH');
2732: fnd_message.set_token('FM_SER_NUM',rec_msnt.fm_serial_number);
2733: fnd_message.set_token('TO_SER_NUM', rec_msnt.to_serial_number);
2734: fnd_msg_pub.add;
2735: RAISE fnd_api.g_exc_error;
2736: END IF;
2737:
2738: -- get the number part of the to serial
2750: END IF;
2751: fnd_message.set_name('INV', 'INV_FROM_TO_SER_DIFF_PFX');
2752: fnd_message.set_token('FM_SER_NUM',rec_msnt.fm_serial_number);
2753: fnd_message.set_token('TO_SER_NUM', rec_msnt.to_serial_number);
2754: fnd_msg_pub.add;
2755: RAISE fnd_api.g_exc_error;
2756: END IF;
2757:
2758: END IF;
3282: END IF;
3283: fnd_message.set_name('INV', 'INV_FROM_TO_SER_DIFF_LENGTH');
3284: fnd_message.set_token('FM_SER_NUM',rec_msnt.fm_serial_number);
3285: fnd_message.set_token('TO_SER_NUM', rec_msnt.to_serial_number);
3286: fnd_msg_pub.add;
3287: RAISE fnd_api.g_exc_error;
3288: END IF;
3289:
3290: -- get the number part of the to serial
3302: END IF;
3303: fnd_message.set_name('INV', 'INV_FROM_TO_SER_DIFF_PFX');
3304: fnd_message.set_token('FM_SER_NUM',rec_msnt.fm_serial_number);
3305: fnd_message.set_token('TO_SER_NUM', rec_msnt.to_serial_number);
3306: fnd_msg_pub.add;
3307: RAISE fnd_api.g_exc_error;
3308: END IF;
3309:
3310: END IF;
4347: print_debug('inv_cost_group_update .. EXCEP G_EXC_ERROR : ' );
4348: END IF;
4349: ROLLBACK TO API_updatecostgroups;
4350: x_return_status := FND_API.G_RET_STS_ERROR ;
4351: FND_MSG_PUB.Count_And_Get
4352: (p_encoded => FND_API.G_FALSE,
4353: p_count => x_msg_count,
4354: p_data => x_msg_data);
4355: IF (l_debug = 1) THEN
4360: print_debug('inv_cost_group_update .. EXCEP G_EXC_UNEXPECTED_ERROR : ' );
4361: END IF;
4362: ROLLBACK TO API_updatecostgroups;
4363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4364: FND_MSG_PUB.Count_And_Get
4365: (p_encoded => FND_API.G_FALSE,
4366: p_count => x_msg_count,
4367: p_data => x_msg_data);
4368: IF (l_debug = 1) THEN
4373: print_debug('inv_cost_group_update .. EXCEP G_EXC_UNEXPECTED_ERROR : ' );
4374: END IF;
4375: ROLLBACK TO API_updatecostgroups;
4376: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4377: IF fnd_msg_pub.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4378: THEN
4379: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name,
4380: l_api_name );
4381: END IF;
4375: ROLLBACK TO API_updatecostgroups;
4376: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4377: IF fnd_msg_pub.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4378: THEN
4379: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name,
4380: l_api_name );
4381: END IF;
4382: FND_MSG_PUB.Count_And_Get
4383: (p_encoded => FND_API.G_FALSE,
4378: THEN
4379: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name,
4380: l_api_name );
4381: END IF;
4382: FND_MSG_PUB.Count_And_Get
4383: (p_encoded => FND_API.G_FALSE,
4384: p_count => x_msg_count,
4385: p_data => x_msg_data);
4386: IF (l_debug = 1) THEN