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;
207: WHERE organization_id = x_movement_transaction.from_organization_id
208: AND inventory_item_id = x_movement_transaction.inventory_item_id;
209:
210: BEGIN
211: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
212: THEN
213: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
214: , G_MODULE_NAME || l_procedure_name || '.begin'
215: ,'enter procedure'
209:
210: BEGIN
211: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
212: THEN
213: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
214: , G_MODULE_NAME || l_procedure_name || '.begin'
215: ,'enter procedure'
216: );
217: END IF;
290: x_movement_transaction.primary_quantity :=
291: NVL(abs(x_movement_transaction.primary_quantity),null);
292: END IF;
293:
294: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
295: THEN
296: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
297: , G_MODULE_NAME || l_procedure_name || '.end'
298: ,'exit procedure'
292: END IF;
293:
294: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
295: THEN
296: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
297: , G_MODULE_NAME || l_procedure_name || '.end'
298: ,'exit procedure'
299: );
300: END IF;
301:
302: EXCEPTION
303: WHEN NO_DATA_FOUND THEN
304: x_return_status := 'N';
305: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
306: THEN
307: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
308: , G_MODULE_NAME || l_procedure_name||'. No data found exception'
309: , 'Exception'
303: WHEN NO_DATA_FOUND THEN
304: x_return_status := 'N';
305: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
306: THEN
307: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
308: , G_MODULE_NAME || l_procedure_name||'. No data found exception'
309: , 'Exception'
310: );
311: END IF;
310: );
311: END IF;
312: WHEN OTHERS THEN
313: x_return_status := 'N';
314: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
315: THEN
316: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
317: , G_MODULE_NAME || l_procedure_name||'. Others exception'
318: , 'Exception'
312: WHEN OTHERS THEN
313: x_return_status := 'N';
314: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
315: THEN
316: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
317: , G_MODULE_NAME || l_procedure_name||'. Others exception'
318: , 'Exception'
319: );
320: END IF;
334: )
335: IS
336: l_procedure_name CONSTANT VARCHAR2(30) := 'Update_INV_Transactions';
337: BEGIN
338: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
339: THEN
340: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
341: , G_MODULE_NAME || l_procedure_name || '.begin'
342: ,'enter procedure'
336: l_procedure_name CONSTANT VARCHAR2(30) := 'Update_INV_Transactions';
337: BEGIN
338: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
339: THEN
340: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
341: , G_MODULE_NAME || l_procedure_name || '.begin'
342: ,'enter procedure'
343: );
344: END IF;
351: WHERE transaction_id = p_movement_transaction.mtl_transaction_id;
352:
353: COMMIT;
354:
355: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
356: THEN
357: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
358: , G_MODULE_NAME || l_procedure_name || '.end'
359: ,'exit procedure'
353: COMMIT;
354:
355: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
356: THEN
357: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE
358: , G_MODULE_NAME || l_procedure_name || '.end'
359: ,'exit procedure'
360: );
361: END IF;
362:
363: EXCEPTION
364: WHEN NO_DATA_FOUND THEN
365: x_return_status := 'N';
366: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
367: THEN
368: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
369: , G_MODULE_NAME || l_procedure_name||'. No data found exception'
370: , 'Exception'
364: WHEN NO_DATA_FOUND THEN
365: x_return_status := 'N';
366: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
367: THEN
368: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
369: , G_MODULE_NAME || l_procedure_name||'. No data found exception'
370: , 'Exception'
371: );
372: END IF;
371: );
372: END IF;
373: WHEN OTHERS THEN
374: x_return_status := 'N';
375: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
376: THEN
377: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
378: , G_MODULE_NAME || l_procedure_name||'. Others exception'
379: , 'Exception'
373: WHEN OTHERS THEN
374: x_return_status := 'N';
375: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
376: THEN
377: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
378: , G_MODULE_NAME || l_procedure_name||'. Others exception'
379: , 'Exception'
380: );
381: END IF;