[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
2683: records IN MSNT');
2684: END IF;
2685: fnd_message.set_name('INV', 'Cannot find the serial number
2686: for the transaction being processed');
2687: fnd_msg_pub.add;
2688: RAISE FND_API.G_EXC_ERROR;
2689: END IF;
2690:
2691: WHILE cur_msnt%found LOOP
2718: END IF;
2719: fnd_message.set_name('INV', 'INV_FROM_TO_SER_DIFF_LENGTH');
2720: fnd_message.set_token('FM_SER_NUM',rec_msnt.fm_serial_number);
2721: fnd_message.set_token('TO_SER_NUM', rec_msnt.to_serial_number);
2722: fnd_msg_pub.add;
2723: RAISE fnd_api.g_exc_error;
2724: END IF;
2725:
2726: -- get the number part of the to serial
2738: END IF;
2739: fnd_message.set_name('INV', 'INV_FROM_TO_SER_DIFF_PFX');
2740: fnd_message.set_token('FM_SER_NUM',rec_msnt.fm_serial_number);
2741: fnd_message.set_token('TO_SER_NUM', rec_msnt.to_serial_number);
2742: fnd_msg_pub.add;
2743: RAISE fnd_api.g_exc_error;
2744: END IF;
2745:
2746: END IF;
3270: END IF;
3271: fnd_message.set_name('INV', 'INV_FROM_TO_SER_DIFF_LENGTH');
3272: fnd_message.set_token('FM_SER_NUM',rec_msnt.fm_serial_number);
3273: fnd_message.set_token('TO_SER_NUM', rec_msnt.to_serial_number);
3274: fnd_msg_pub.add;
3275: RAISE fnd_api.g_exc_error;
3276: END IF;
3277:
3278: -- get the number part of the to serial
3290: END IF;
3291: fnd_message.set_name('INV', 'INV_FROM_TO_SER_DIFF_PFX');
3292: fnd_message.set_token('FM_SER_NUM',rec_msnt.fm_serial_number);
3293: fnd_message.set_token('TO_SER_NUM', rec_msnt.to_serial_number);
3294: fnd_msg_pub.add;
3295: RAISE fnd_api.g_exc_error;
3296: END IF;
3297:
3298: END IF;
4335: print_debug('inv_cost_group_update .. EXCEP G_EXC_ERROR : ' );
4336: END IF;
4337: ROLLBACK TO API_updatecostgroups;
4338: x_return_status := FND_API.G_RET_STS_ERROR ;
4339: FND_MSG_PUB.Count_And_Get
4340: (p_encoded => FND_API.G_FALSE,
4341: p_count => x_msg_count,
4342: p_data => x_msg_data);
4343: IF (l_debug = 1) THEN
4348: print_debug('inv_cost_group_update .. EXCEP G_EXC_UNEXPECTED_ERROR : ' );
4349: END IF;
4350: ROLLBACK TO API_updatecostgroups;
4351: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4352: FND_MSG_PUB.Count_And_Get
4353: (p_encoded => FND_API.G_FALSE,
4354: p_count => x_msg_count,
4355: p_data => x_msg_data);
4356: IF (l_debug = 1) THEN
4361: print_debug('inv_cost_group_update .. EXCEP G_EXC_UNEXPECTED_ERROR : ' );
4362: END IF;
4363: ROLLBACK TO API_updatecostgroups;
4364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4365: IF fnd_msg_pub.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4366: THEN
4367: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name,
4368: l_api_name );
4369: END IF;
4363: ROLLBACK TO API_updatecostgroups;
4364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4365: IF fnd_msg_pub.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4366: THEN
4367: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name,
4368: l_api_name );
4369: END IF;
4370: FND_MSG_PUB.Count_And_Get
4371: (p_encoded => FND_API.G_FALSE,
4366: THEN
4367: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name,
4368: l_api_name );
4369: END IF;
4370: FND_MSG_PUB.Count_And_Get
4371: (p_encoded => FND_API.G_FALSE,
4372: p_count => x_msg_count,
4373: p_data => x_msg_data);
4374: IF (l_debug = 1) THEN