1 PACKAGE BODY INV_CUST_CALC_EXP_DATE AS
2 /* $Header: INVCCEDB.pls 120.0.12000000.1 2007/04/02 09:17:03 nsinghi noship $ */
3
4 l_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
5
6 PROCEDURE get_custom_lot_expiration_date
7 ( p_mtli_lot_rec IN MTL_TRANSACTION_LOTS_INTERFACE%ROWTYPE
8 ,p_mti_trx_rec IN MTL_TRANSACTIONS_INTERFACE%ROWTYPE
9 ,p_mtlt_lot_rec IN MTL_TRANSACTION_LOTS_TEMP%ROWTYPE
10 ,p_mmtt_trx_rec IN MTL_MATERIAL_TRANSACTIONS_TEMP%ROWTYPE
11 ,p_table IN NUMBER
12 ,x_lot_expiration_date OUT NOCOPY DATE
13 ,x_return_status OUT NOCOPY VARCHAR2
14 ) IS
15 BEGIN
16 x_return_status := FND_API.G_RET_STS_SUCCESS;
17
18 /***** Uncomment Following code to log the data present in mtl_transactions_interface,
19 mtl_transactions_lots_interface, mtl_material_transactions_temp and mtl_transactions_lots_temp
20 at runtime. *****/
21
22 /*
23 IF (l_debug = 1 )THEN
24 inv_calculate_exp_date.log_transaction_rec( p_mtli_lot_rec => p_mtli_lot_rec
25 ,p_mti_trx_rec => p_mti_trx_rec
26 ,p_mtlt_lot_rec => p_mtlt_lot_rec
27 ,p_mmtt_trx_rec => p_mmtt_trx_rec
28 ,p_table => p_table);
29 END IF;
30 */
31
32 /***** Put Custom code here to calculate the lot expiration date .
33 If custom logic is not required for the calculating lot expiration date for
34 then return lot expiration date as NULL *****/
35
36 END get_custom_lot_expiration_date;
37
38 END INV_CUST_CALC_EXP_DATE;