53: )
54: IS
55: l_procedure_name CONSTANT VARCHAR2(30) := 'Get_INV_Transactions';
56: BEGIN
57: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
58: THEN
59: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
60: , G_MODULE_NAME || l_procedure_name || '.begin'
61: ,'enter procedure'
55: l_procedure_name CONSTANT VARCHAR2(30) := 'Get_INV_Transactions';
56: BEGIN
57: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
58: THEN
59: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
60: , G_MODULE_NAME || l_procedure_name || '.begin'
61: ,'enter procedure'
62: );
63: END IF;
123: AND NVL(inv.mvt_stat_status,'NEW') = 'NEW';
124:
125: END IF;
126:
127: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
128: THEN
129: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
130: , G_MODULE_NAME || l_procedure_name || '.end'
131: ,'exit procedure'
125: END IF;
126:
127: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
128: THEN
129: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
130: , G_MODULE_NAME || l_procedure_name || '.end'
131: ,'exit procedure'
132: );
133: END IF;
134:
135: EXCEPTION
136: WHEN NO_DATA_FOUND THEN
137: x_return_status := 'N';
138: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
139: THEN
140: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
141: , G_MODULE_NAME || l_procedure_name||'. No data found exception'
142: , 'Exception'
136: WHEN NO_DATA_FOUND THEN
137: x_return_status := 'N';
138: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
139: THEN
140: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
141: , G_MODULE_NAME || l_procedure_name||'. No data found exception'
142: , 'Exception'
143: );
144: END IF;
143: );
144: END IF;
145: WHEN OTHERS THEN
146: x_return_status := 'N';
147: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
148: THEN
149: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
150: , G_MODULE_NAME || l_procedure_name||'. Others exception'
151: , 'Exception'
145: WHEN OTHERS THEN
146: x_return_status := 'N';
147: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
148: THEN
149: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
150: , G_MODULE_NAME || l_procedure_name||'. Others exception'
151: , 'Exception'
152: );
153: END IF;
194: AND inv.inventory_item_id = cst.inventory_item_id(+)
195: AND inv.transaction_id = x_movement_transaction.mtl_transaction_id;
196:
197: BEGIN
198: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
199: THEN
200: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
201: , G_MODULE_NAME || l_procedure_name || '.begin'
202: ,'enter procedure'
196:
197: BEGIN
198: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
199: THEN
200: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
201: , G_MODULE_NAME || l_procedure_name || '.begin'
202: ,'enter procedure'
203: );
204: END IF;
261: x_movement_transaction.primary_quantity :=
262: NVL(abs(x_movement_transaction.primary_quantity),null);
263: END IF;
264:
265: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
266: THEN
267: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
268: , G_MODULE_NAME || l_procedure_name || '.end'
269: ,'exit procedure'
263: END IF;
264:
265: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
266: THEN
267: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
268: , G_MODULE_NAME || l_procedure_name || '.end'
269: ,'exit procedure'
270: );
271: END IF;
272:
273: EXCEPTION
274: WHEN NO_DATA_FOUND THEN
275: x_return_status := 'N';
276: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
277: THEN
278: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
279: , G_MODULE_NAME || l_procedure_name||'. No data found exception'
280: , 'Exception'
274: WHEN NO_DATA_FOUND THEN
275: x_return_status := 'N';
276: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
277: THEN
278: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
279: , G_MODULE_NAME || l_procedure_name||'. No data found exception'
280: , 'Exception'
281: );
282: END IF;
281: );
282: END IF;
283: WHEN OTHERS THEN
284: x_return_status := 'N';
285: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
286: THEN
287: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
288: , G_MODULE_NAME || l_procedure_name||'. Others exception'
289: , 'Exception'
283: WHEN OTHERS THEN
284: x_return_status := 'N';
285: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
286: THEN
287: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
288: , G_MODULE_NAME || l_procedure_name||'. Others exception'
289: , 'Exception'
290: );
291: END IF;
305: )
306: IS
307: l_procedure_name CONSTANT VARCHAR2(30) := 'Update_INV_Transactions';
308: BEGIN
309: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
310: THEN
311: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
312: , G_MODULE_NAME || l_procedure_name || '.begin'
313: ,'enter procedure'
307: l_procedure_name CONSTANT VARCHAR2(30) := 'Update_INV_Transactions';
308: BEGIN
309: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
310: THEN
311: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
312: , G_MODULE_NAME || l_procedure_name || '.begin'
313: ,'enter procedure'
314: );
315: END IF;
322: WHERE transaction_id = p_movement_transaction.mtl_transaction_id;
323:
324: COMMIT;
325:
326: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
327: THEN
328: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
329: , G_MODULE_NAME || l_procedure_name || '.end'
330: ,'exit procedure'
324: COMMIT;
325:
326: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
327: THEN
328: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
329: , G_MODULE_NAME || l_procedure_name || '.end'
330: ,'exit procedure'
331: );
332: END IF;
333:
334: EXCEPTION
335: WHEN NO_DATA_FOUND THEN
336: x_return_status := 'N';
337: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
338: THEN
339: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
340: , G_MODULE_NAME || l_procedure_name||'. No data found exception'
341: , 'Exception'
335: WHEN NO_DATA_FOUND THEN
336: x_return_status := 'N';
337: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
338: THEN
339: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
340: , G_MODULE_NAME || l_procedure_name||'. No data found exception'
341: , 'Exception'
342: );
343: END IF;
342: );
343: END IF;
344: WHEN OTHERS THEN
345: x_return_status := 'N';
346: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
347: THEN
348: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
349: , G_MODULE_NAME || l_procedure_name||'. Others exception'
350: , 'Exception'
344: WHEN OTHERS THEN
345: x_return_status := 'N';
346: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
347: THEN
348: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
349: , G_MODULE_NAME || l_procedure_name||'. Others exception'
350: , 'Exception'
351: );
352: END IF;