[Home] [Help]
88: ,'enter procedure'
89: );
90: END IF;
91:
92: x_return_status := FND_API.G_RET_STS_SUCCESS;
93: l_movement_transaction := p_movement_transaction;
94: l_stat_typ_transaction := p_stat_typ_transaction;
95:
96: INV_MGD_MVT_UTILS_PKG.Mvt_Stats_Util_Info
98: , x_movement_transaction => l_movement_transaction
99: , x_return_status => l_return_status
100: );
101:
102: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
103: THEN
104: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
105: THEN
106: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
108: || '.Failed when call mvt_stats_util_info'
109: ,'Failed'
110: );
111: END IF;
112: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
113: ELSE
114: l_movement_transaction.customer_vat_number :=
115: INV_MGD_MVT_UTILS_PKG.Get_Cust_VAT_Number
116: (l_movement_transaction.bill_to_site_use_id);
145: END IF;
146:
147: INV_MGD_MVT_STATS_PVT.Create_Movement_Statistics
148: (p_api_version_number => 1.0
149: ,p_init_msg_list => FND_API.G_FALSE
150: ,x_movement_transaction => l_movement_transaction
151: ,x_msg_count => x_msg_count
152: ,x_msg_data => x_msg_data
153: ,x_return_status => l_insert_status
155: END IF;
156:
157:
158:
159: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) = FND_API.G_RET_STS_SUCCESS
160: THEN
161: COMMIT;
162: ---Debug
163: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
180: );
181: END IF;
182:
183: EXCEPTION
184: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
186: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
187:
188: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
181: END IF;
182:
183: EXCEPTION
184: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
186: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
187:
188: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
189: THEN
182:
183: EXCEPTION
184: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
186: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
187:
188: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
189: THEN
190: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
223: END Process_RMA_Triangulation;
224: --========================================================================
225: -- PROCEDURE : Process_Transaction PRIVATE
226: -- PARAMETERS: p_api_version_number known api version
227: -- p_init_msg_list FND_API.G_TRUE to reset list
228: -- x_return_status return status
229: -- x_msg_count number of messages in the list
230: -- x_msg_data message text
231: -- p_legal_entity_id Legal Entity ID
266: ,'enter procedure'
267: );
268: END IF;
269:
270: x_return_status := FND_API.G_RET_STS_SUCCESS;
271:
272: -- Get the setup info to determine if the transactions are to be
273: -- processed further.
274:
284: , p_transaction_type => p_source_type
285: , x_return_status => l_return_status
286: );
287:
288: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
289: THEN
290: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
291: THEN
292: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
295: ,'Failed'
296: );
297: END IF;
298:
299: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
300: END IF;
301:
302: END IF;
303:
311: , p_transaction_type => p_source_type
312: , x_return_status => l_return_status
313: );
314:
315: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
316: THEN
317: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
318: THEN
319: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
322: ,'Failed'
323: );
324: END IF;
325:
326: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
327: END IF;
328:
329: /*bug 8294483 Process Pending Transaction Shifted to End*/
330: /*
336: , p_transaction_type => p_source_type
337: , x_return_status => l_return_status
338: );
339:
340: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
341: THEN
342: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
343: THEN
344: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
347: ,'Failed'
348: );
349: END IF;
350:
351: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
352: END IF;*/
353: /*End bug 8294483*/
354: END IF;
355:
363: , p_transaction_type => p_source_type
364: , x_return_status => l_return_status
365: );
366:
367: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
368: THEN
369: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
370: THEN
371: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
374: ,'Failed'
375: );
376: END IF;
377:
378: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
379: END IF;
380:
381: Process_Triangulation_Txn
382: ( p_movement_transaction => l_movement_transaction
385: , p_transaction_type => p_source_type
386: , x_return_status => l_return_status
387: );
388:
389: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
390: THEN
391: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
392: THEN
393: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
396: ,'Failed'
397: );
398: END IF;
399:
400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
401: END IF;
402: END IF;
403:
404: IF p_source_type IN ('ALL','IO') THEN
411: , p_transaction_type => p_source_type
412: , x_return_status => l_return_status
413: );
414:
415: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
416: THEN
417: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
418: THEN
419: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
421: || '.Failed in Process_SO_Trangsaction - IO'
422: ,'Failed'
423: );
424: END IF;
425: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
426: END IF;
427:
428: Process_IO_Arrival_Txn
429: ( p_movement_transaction => l_movement_transaction
432: , p_transaction_type => p_source_type
433: , x_return_status => l_return_status
434: );
435:
436: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
437: THEN
438: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
439: THEN
440: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
442: || '.Failed in Process_IO_Arrival_Txn'
443: ,'Failed'
444: );
445: END IF;
446: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
447: END IF;
448:
449: END IF;
450:
458: , p_transaction_type => p_source_type
459: , x_return_status => l_return_status
460: );
461:
462: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
463: THEN
464: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
465: THEN
466: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
468: || '.Failed in Update_PO_With_Correction'
469: ,'Failed'
470: );
471: END IF;
472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
473: END IF;
474:
475: Process_PO_Transaction
476: ( p_movement_transaction => l_movement_transaction
479: , p_transaction_type => p_source_type
480: , x_return_status => l_return_status
481: );
482:
483: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
484: THEN
485: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
486: THEN
487: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
489: || '.Failed in Process_PO_Transaction'
490: ,'Failed'
491: );
492: END IF;
493: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
494: END IF;
495:
496: END IF;
497:
505: , p_transaction_type => p_source_type
506: , x_return_status => l_return_status
507: );
508:
509: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
510: THEN
511: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
512: THEN
513: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
515: || '.Failed in Process_RMA_Transaction'
516: ,'Failed'
517: );
518: END IF;
519: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
520: END IF;
521: END IF;
522: /*bug 8294483 Process Pending Transaction added after all new record processed*/
523: IF p_source_type IN ('ALL','SO','PO','RMA','RTV')
530: , p_transaction_type => p_source_type
531: , x_return_status => l_return_status
532: );
533:
534: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
535: THEN
536: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
537: THEN
538: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
541: ,'Failed'
542: );
543: END IF;
544:
545: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
546: END IF;
547: END IF;
548: /*End bug 8294483*/
549: /*INV_MGD_RPT_GENERATOR_PROC.Print_Transaction_Proxy_Stats;*/
569: );
570: END IF;
571: EXCEPTION
572:
573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
575: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
576:
577: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
570: END IF;
571: EXCEPTION
572:
573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
575: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
576:
577: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
578: THEN
571: EXCEPTION
572:
573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
575: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
576:
577: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
578: THEN
579: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
691: );
692: END IF;
693: EXCEPTION
694:
695: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
696: RAISE;
697:
698: WHEN NO_DATA_FOUND THEN
699: RAISE;
760: ,'enter procedure'
761: );
762: END IF;
763:
764: x_return_status := FND_API.G_RET_STS_SUCCESS;
765:
766: l_movement_transaction := p_movement_transaction;
767:
768: -- Get all the Inventory Transactions between the specified date ranges
963: , x_movement_transaction => l_movement_transaction
964: , x_return_status => l_return_status
965: );
966:
967: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
968: THEN
969: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
970: THEN
971: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
973: || '.Failed when call mvt_stats_util_info'
974: ,'Failed'
975: );
976: END IF;
977: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
978: ELSE
979:
980: --Get legal entity vat number stored in customer_vat_number
981: l_movement_transaction.customer_vat_number :=
984: , p_date => l_movement_transaction.transaction_date);
985:
986: INV_MGD_MVT_STATS_PVT.Create_Movement_Statistics
987: ( p_api_version_number => 1.0
988: , p_init_msg_list => FND_API.G_FALSE
989: , x_movement_transaction => l_movement_transaction
990: , x_msg_count => x_msg_count
991: , x_msg_data => x_msg_data
992: , x_return_status => l_insert_status
992: , x_return_status => l_insert_status
993: );
994:
995: --yawang fix bug 2268875 only insert record when successfully
996: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) = FND_API.G_RET_STS_SUCCESS
997: THEN
998: l_movement_id := l_movement_transaction.movement_id;
999: g_records_inserted := g_records_inserted +1;
1000:
1016: CLOSE setup_crsr;
1017:
1018: -- If the insert procedure did not error out, update the transactions and
1019: -- set the flag to PROCESSED.
1020: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) = FND_API.G_RET_STS_SUCCESS
1021: THEN
1022: l_movement_transaction.movement_id := l_movement_id;
1023:
1024: INV_MGD_MVT_INV_MDTR.Update_INV_Transactions
1044: );
1045: END IF;
1046:
1047: EXCEPTION
1048: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1049: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1050: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
1051:
1052: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1045: END IF;
1046:
1047: EXCEPTION
1048: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1049: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1050: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
1051:
1052: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1053: THEN
1046:
1047: EXCEPTION
1048: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1049: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1050: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
1051:
1052: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1053: THEN
1054: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
1158: ,'enter procedure'
1159: );
1160: END IF;
1161:
1162: x_return_status := FND_API.G_RET_STS_SUCCESS;
1163:
1164: l_movement_transaction := p_movement_transaction;
1165:
1166: -- Call the transaction proxy which processes all the transactions.
1466: || '.Failed when call get_so_details'
1467: ,'Failed'
1468: );
1469: END IF;
1470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1471: ELSE
1472: INV_MGD_MVT_UTILS_PKG.Mvt_Stats_Util_Info
1473: (p_stat_typ_transaction => l_stat_typ_transaction
1474: ,x_movement_transaction => l_movement_transaction
1474: ,x_movement_transaction => l_movement_transaction
1475: ,x_return_status => l_return_status
1476: );
1477:
1478: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
1479: THEN
1480: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1481: THEN
1482: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
1484: || '.Failed when call mvt_stats_util_info'
1485: ,'Failed'
1486: );
1487: END IF;
1488: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1489: ELSE
1490: l_movement_transaction.customer_vat_number :=
1491: INV_MGD_MVT_UTILS_PKG.Get_Cust_VAT_Number
1492: (l_movement_transaction.bill_to_site_use_id);
1543: END IF;
1544:
1545: INV_MGD_MVT_STATS_PVT.Create_Movement_Statistics
1546: (p_api_version_number => 1.0
1547: ,p_init_msg_list => FND_API.G_FALSE
1548: ,x_movement_transaction => l_movement_transaction
1549: ,x_msg_count => x_msg_count
1550: ,x_msg_data => x_msg_data
1551: ,x_return_status => l_insert_status
1551: ,x_return_status => l_insert_status
1552: );
1553:
1554: --yawang fix bug 2268875
1555: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) = FND_API.G_RET_STS_SUCCESS
1556: THEN
1557: l_movement_id := l_movement_transaction.movement_id;
1558: g_records_inserted := g_records_inserted +1;
1559:
1572: END IF; -- ref_crsr
1573: END LOOP l_inner;
1574: CLOSE setup_crsr;
1575:
1576: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) = FND_API.G_RET_STS_SUCCESS
1577: THEN
1578: l_movement_transaction.movement_id := l_movement_id;
1579:
1580: --If the dispatch is cross legal entity, then set the status to "DISPPROCESSED"
1626: );
1627: END IF;
1628:
1629: EXCEPTION
1630: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1631: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1632: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
1633:
1634: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1627: END IF;
1628:
1629: EXCEPTION
1630: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1631: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1632: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
1633:
1634: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1635: THEN
1628:
1629: EXCEPTION
1630: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1631: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1632: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
1633:
1634: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1635: THEN
1636: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
1764: ,'enter procedure'
1765: );
1766: END IF;
1767:
1768: x_return_status := FND_API.G_RET_STS_SUCCESS;
1769: l_movement_transaction := p_movement_transaction;
1770:
1771: -- Call the transaction proxy which processes all the transactions.
1772: INV_MGD_MVT_SO_MDTR.Get_Triangulation_Txns
2096: ,x_movement_transaction => l_movement_transaction
2097: ,x_return_status => l_return_status
2098: );
2099:
2100: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
2101: THEN
2102: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
2103: THEN
2104: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
2106: || '.Failed when call mvt_stats_util_info'
2107: ,'Failed'
2108: );
2109: END IF;
2110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2111: ELSE
2112:
2113: --Get bill to site id,performance reason to get bill to site id here
2114: --instead of in initial get_triangulation_transaction
2130: END IF;
2131:
2132: INV_MGD_MVT_STATS_PVT.Create_Movement_Statistics
2133: (p_api_version_number => 1.0
2134: ,p_init_msg_list => FND_API.G_FALSE
2135: ,x_movement_transaction => l_movement_transaction
2136: ,x_msg_count => x_msg_count
2137: ,x_msg_data => x_msg_data
2138: ,x_return_status => l_insert_status
2138: ,x_return_status => l_insert_status
2139: );
2140:
2141: --yawang fix bug 2268875
2142: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) = FND_API.G_RET_STS_SUCCESS
2143: THEN
2144: l_movement_id := l_movement_transaction.movement_id;
2145: g_records_inserted := g_records_inserted +1;
2146:
2289: ,x_movement_transaction => l_movement_transaction2
2290: ,x_return_status => l_return_status
2291: );
2292:
2293: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
2294: THEN
2295: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
2296: THEN
2297: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
2299: || '.Failed when call mvt_stats_util_info -second SO'
2300: ,'Failed'
2301: );
2302: END IF;
2303: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2304: ELSE
2305:
2306: /*l_movement_transaction2.customer_vat_number :=
2307: INV_MGD_MVT_UTILS_PKG.Get_Cust_VAT_Number
2316: END IF;
2317:
2318: INV_MGD_MVT_STATS_PVT.Create_Movement_Statistics
2319: (p_api_version_number => 1.0
2320: ,p_init_msg_list => FND_API.G_FALSE
2321: ,x_movement_transaction => l_movement_transaction2
2322: ,x_msg_count => x_msg_count
2323: ,x_msg_data => x_msg_data
2324: ,x_return_status => l_insert_status
2323: ,x_msg_data => x_msg_data
2324: ,x_return_status => l_insert_status
2325: );
2326:
2327: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) = FND_API.G_RET_STS_SUCCESS
2328: THEN
2329: l_movement_id2 := l_movement_transaction2.movement_id;
2330: g_records_inserted := g_records_inserted +1;
2331:
2346: END IF;
2347: END LOOP l_inner;
2348: CLOSE setup_crsr;
2349:
2350: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) = FND_API.G_RET_STS_SUCCESS
2351: THEN
2352: l_movement_transaction.movement_id := l_movement_id;
2353:
2354: IF l_need_create_kit = 'Y'
2391: );
2392: END IF;
2393:
2394: EXCEPTION
2395: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2396: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2397: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
2398:
2399: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
2392: END IF;
2393:
2394: EXCEPTION
2395: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2396: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2397: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
2398:
2399: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
2400: THEN
2393:
2394: EXCEPTION
2395: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2396: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2397: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
2398:
2399: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
2400: THEN
2401: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
2561: ,'enter procedure'
2562: );
2563: END IF;
2564:
2565: x_return_status := FND_API.G_RET_STS_SUCCESS;
2566: l_movement_transaction := p_movement_transaction;
2567:
2568: -- Call the transaction proxy which processes all the transactions.
2569: INV_MGD_MVT_PO_MDTR.Get_IO_Arrival_Txn
2770: ,x_movement_transaction => l_movement_transaction
2771: ,x_return_status => l_return_status
2772: );
2773:
2774: IF l_return_status = FND_API.G_RET_STS_SUCCESS
2775: THEN
2776:
2777: l_movement_transaction.customer_vat_number :=
2778: INV_MGD_MVT_UTILS_PKG.Get_Cust_VAT_Number
2799: --End Bugfix 13400081
2800:
2801: INV_MGD_MVT_STATS_PVT.Create_Movement_Statistics
2802: (p_api_version_number => 1.0
2803: ,p_init_msg_list => FND_API.G_FALSE
2804: ,x_movement_transaction => l_movement_transaction
2805: ,x_msg_count => x_msg_count
2806: ,x_msg_data => x_msg_data
2807: ,x_return_status => l_insert_status
2807: ,x_return_status => l_insert_status
2808: );
2809:
2810: --yawang fix bug 2268875
2811: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) = FND_API.G_RET_STS_SUCCESS
2812: THEN
2813: l_movement_id := l_movement_transaction.movement_id;
2814: g_records_inserted := g_records_inserted +1;
2815:
2821: ,'debug msg');
2822: END IF;
2823: END IF;
2824: ELSE
2825: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2826: END IF;
2827: END IF; --< end of if from Get_IO_Arrival_Details>
2828: END IF; --< end of if from l_insert_flag>
2829: CLOSE ref_crsr;
2831: END LOOP l_inner;
2832: CLOSE setup_crsr;
2833: --END IF;
2834:
2835: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) = FND_API.G_RET_STS_SUCCESS
2836: THEN
2837: l_movement_transaction.movement_id := l_movement_id;
2838: /* 7165989 - Pass mvt_stat_status as NULL for non-RMA triangulation txns */
2839: INV_MGD_MVT_PO_MDTR.Update_PO_Transactions
2860: ,'exit procedure'
2861: );
2862: END IF;
2863: EXCEPTION
2864: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2866: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
2867:
2868: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
2861: );
2862: END IF;
2863: EXCEPTION
2864: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2866: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
2867:
2868: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
2869: THEN
2862: END IF;
2863: EXCEPTION
2864: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2866: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
2867:
2868: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
2869: THEN
2870: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
3101: ,'enter procedure'
3102: );
3103: END IF;
3104:
3105: x_return_status := FND_API.G_RET_STS_SUCCESS;
3106:
3107: --Get parent PO record status
3108: OPEN parent_status;
3109: FETCH parent_status INTO
3152:
3153: --Insert rtv arrival adjustment record
3154: INV_MGD_MVT_STATS_PVT.Create_Movement_Statistics
3155: ( p_api_version_number => 1.0
3156: , p_init_msg_list => FND_API.G_FALSE
3157: , x_movement_transaction => x_mvt_rtv_transaction
3158: , x_msg_count => x_msg_count
3159: , x_msg_data => x_msg_data
3160: , x_return_status => l_return_status
3397: END IF;
3398:
3399: EXCEPTION
3400: WHEN OTHERS THEN
3401: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3402: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
3403:
3404: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
3405: THEN
3398:
3399: EXCEPTION
3400: WHEN OTHERS THEN
3401: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3402: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
3403:
3404: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
3405: THEN
3406: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
3505: ,'enter procedure'
3506: );
3507: END IF;
3508:
3509: x_return_status := FND_API.G_RET_STS_SUCCESS;
3510: l_movement_transaction := p_movement_transaction;
3511:
3512: -- Call the transaction proxy which processes all the transactions.
3513: INV_MGD_MVT_PO_MDTR.Get_PO_Transactions
3730: THEN
3731: l_vendor_site_id := l_movement_transaction.vendor_site_id;
3732: l_parent_id := l_receipt_transaction.parent_transaction_id;
3733:
3734: WHILE NVL(l_vendor_site_id,FND_API.G_MISS_NUM) = FND_API.G_MISS_NUM
3735: LOOP
3736: IF (l_parent_id IS NULL)
3737: THEN
3738: EXIT;
3902: ,x_movement_transaction => l_movement_transaction
3903: ,x_return_status => l_return_status
3904: );
3905:
3906: IF l_return_status = FND_API.G_RET_STS_SUCCESS
3907: THEN
3908: IF l_movement_transaction.invoice_id IS NULL
3909: THEN
3910: l_movement_transaction.invoice_quantity := NULL;
3930: l_quantity := l_movement_transaction.transaction_quantity;
3931: l_movement_transaction.total_weight := 0;
3932: l_movement_transaction.transaction_quantity := 0;
3933: ELSE -- don't report the movement if triangulation mode is shipment
3934: l_return_status := FND_API.G_RET_STS_ERROR;
3935: END IF;
3936: END IF;
3937:
3938: IF l_return_status = FND_API.G_RET_STS_SUCCESS
3934: l_return_status := FND_API.G_RET_STS_ERROR;
3935: END IF;
3936: END IF;
3937:
3938: IF l_return_status = FND_API.G_RET_STS_SUCCESS
3939: THEN
3940: -- A RTV transaction may need to be netted into its parent
3941: -- PO if the returns processing parameter is set to "Aggregate Return"
3942: -- and the parent PO is not Frozen or Exported
3949: );
3950: ELSE
3951: INV_MGD_MVT_STATS_PVT.Create_Movement_Statistics
3952: (p_api_version_number => 1.0
3953: ,p_init_msg_list => FND_API.G_FALSE
3954: ,x_movement_transaction => l_movement_transaction
3955: ,x_msg_count => x_msg_count
3956: ,x_msg_data => x_msg_data
3957: ,x_return_status => l_insert_status
3958: );
3959: END IF;
3960:
3961: --yawang fix bug 2268875
3962: IF l_insert_status = FND_API.G_RET_STS_SUCCESS
3963: THEN
3964: l_movement_id := l_movement_transaction.movement_id;
3965:
3966: --If rtv is netted into po, movement id is null and no new
4049: ,x_movement_transaction => l_movement_transaction
4050: ,x_return_status => l_return_status
4051: );
4052:
4053: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
4054: THEN
4055: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4056: ELSE
4057:
4051: );
4052:
4053: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
4054: THEN
4055: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4056: ELSE
4057:
4058: l_movement_transaction.total_weight := 0;
4059: l_movement_transaction.transaction_quantity := 0;
4068: END IF;
4069:
4070: INV_MGD_MVT_STATS_PVT.Create_Movement_Statistics
4071: (p_api_version_number => 1.0
4072: ,p_init_msg_list => FND_API.G_FALSE
4073: ,x_movement_transaction => l_movement_transaction
4074: ,x_msg_count => x_msg_count
4075: ,x_msg_data => x_msg_data
4076: ,x_return_status => l_return_status
4076: ,x_return_status => l_return_status
4077: );
4078:
4079: --yawang fix bug 2268875
4080: IF NVL(l_return_status,FND_API.G_RET_STS_SUCCESS) =
4081: FND_API.G_RET_STS_SUCCESS
4082: THEN
4083: g_records_inserted := g_records_inserted +1;
4084: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
4077: );
4078:
4079: --yawang fix bug 2268875
4080: IF NVL(l_return_status,FND_API.G_RET_STS_SUCCESS) =
4081: FND_API.G_RET_STS_SUCCESS
4082: THEN
4083: g_records_inserted := g_records_inserted +1;
4084: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
4085: THEN
4101: END IF;
4102: END IF; -- end dropship SO creation
4103: END IF;
4104: ELSE
4105: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4106: END IF; -- end success from Mvt_Stats_Util_Info
4107: END IF; -- < end insert>
4108: --Fix bug 2586495 case 8,PO insert flag is N, but dropship SO insert
4109: --flag maybe Y, then a dropship SO needs to be created
4194: ,x_movement_transaction => l_movement_transaction
4195: ,x_return_status => l_return_status
4196: );
4197:
4198: IF l_return_status = FND_API.G_RET_STS_SUCCESS
4199: THEN
4200:
4201: l_movement_transaction.total_weight := 0;
4202: l_movement_transaction.transaction_quantity := 0;
4211: END IF;
4212:
4213: INV_MGD_MVT_STATS_PVT.Create_Movement_Statistics
4214: (p_api_version_number => 1.0
4215: ,p_init_msg_list => FND_API.G_FALSE
4216: ,x_movement_transaction => l_movement_transaction
4217: ,x_msg_count => x_msg_count
4218: ,x_msg_data => x_msg_data
4219: ,x_return_status => l_insert_status
4219: ,x_return_status => l_insert_status
4220: );
4221:
4222: --yawang fix bug 2268875
4223: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) =
4224: FND_API.G_RET_STS_SUCCESS
4225: THEN
4226: l_movement_id := l_movement_transaction.movement_id;
4227: g_records_inserted := g_records_inserted +1;
4220: );
4221:
4222: --yawang fix bug 2268875
4223: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) =
4224: FND_API.G_RET_STS_SUCCESS
4225: THEN
4226: l_movement_id := l_movement_transaction.movement_id;
4227: g_records_inserted := g_records_inserted +1;
4228:
4234: ,'debug msg');
4235: END IF;
4236: END IF;
4237: ELSE
4238: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4239: END IF; --end sucess from Mvt_Stats_Util_Info
4240: END IF; --end insert flag Y
4241:
4242: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
4258: AND (l_receipt_transaction.transaction_type = 'RECEIVE')
4259: THEN
4260: NULL;
4261: ELSE
4262: IF (NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) = FND_API.G_RET_STS_SUCCESS
4263: OR l_update_status = 'Y')
4264: THEN
4265: l_movement_transaction.movement_id := l_movement_id;
4266: /* 7165989 - Pass null for mvt_stat_status for non-RMA triangulation txns*/
4291: );
4292: END IF;
4293:
4294: EXCEPTION
4295: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4296: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4297: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
4298:
4299: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
4292: END IF;
4293:
4294: EXCEPTION
4295: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4296: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4297: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
4298:
4299: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
4300: THEN
4293:
4294: EXCEPTION
4295: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4296: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4297: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
4298:
4299: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
4300: THEN
4301: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
4532: ,'enter procedure'
4533: );
4534: END IF;
4535:
4536: x_return_status := FND_API.G_RET_STS_SUCCESS;
4537:
4538: --Get parent PO record status
4539: OPEN parent_status;
4540: FETCH parent_status INTO
4583:
4584: --Insert rma arrival adjustment record
4585: INV_MGD_MVT_STATS_PVT.Create_Movement_Statistics
4586: ( p_api_version_number => 1.0
4587: , p_init_msg_list => FND_API.G_FALSE
4588: , x_movement_transaction => x_mvt_rma_transaction
4589: , x_msg_count => x_msg_count
4590: , x_msg_data => x_msg_data
4591: , x_return_status => l_return_status
4828: END IF;
4829:
4830: EXCEPTION
4831: WHEN OTHERS THEN
4832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4833: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
4834:
4835: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
4836: THEN
4829:
4830: EXCEPTION
4831: WHEN OTHERS THEN
4832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4833: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
4834:
4835: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
4836: THEN
4837: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
4921: ,'enter procedure'
4922: );
4923: END IF;
4924: l_mvt_stat_status := NULL ; -- 7165989 : initialize the mvt_stat_status in rcv_transactions
4925: x_return_status := FND_API.G_RET_STS_SUCCESS;
4926: l_movement_transaction := p_movement_transaction;
4927:
4928: -- Call the transaction proxy which processes all the transactions.
4929: INV_MGD_MVT_PO_MDTR.Get_RMA_Transactions
5274:
5275: /* 7165989 - Change mvt_stat_status in RCV_TRANSACTIONS based on the triangulation records created */
5276: /* If status is NEW , change status to 'FORARVL' so that the arrival record can be created in the*/
5277: /* receiving LE. If status is 'FORDISP', set status to 'PROCESSED' */
5278: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
5279: IF (l_mvt_stat_status is NOT NULL AND l_mvt_stat_status = 'NEW') THEN
5280: l_mvt_stat_status := 'FORARVL';
5281: ELSIF (l_mvt_stat_status is NOT NULL AND l_mvt_stat_status = 'FORDISP') THEN
5282: l_mvt_stat_status := 'PROCESSED';
5385: /* If status is NEW , change status to 'FORARVL' so that the arrival record can be created in the*/
5386: /* receiving LE. If status is 'FORDISP', set status to 'PROCESSED' */
5387:
5388:
5389: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
5390: IF (l_mvt_stat_status is NOT NULL AND l_mvt_stat_status = 'NEW') THEN
5391: l_mvt_stat_status := 'FORARVL';
5392: ELSIF (l_mvt_stat_status is NOT NULL AND l_mvt_stat_status = 'FORDISP') THEN
5393: l_mvt_stat_status := 'PROCESSED';
5599: , x_movement_transaction => l_movement_transaction
5600: , x_return_status => l_return_status
5601: );
5602:
5603: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
5604: THEN
5605: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
5606: THEN
5607: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
5609: || '.Failed when call mvt_stats_util_info'
5610: ,'Failed'
5611: );
5612: END IF;
5613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5614: ELSE
5615: l_movement_transaction.customer_vat_number :=
5616: INV_MGD_MVT_UTILS_PKG.Get_Cust_VAT_Number
5617: (l_movement_transaction.bill_to_site_use_id);
5636: );
5637: ELSE
5638: INV_MGD_MVT_STATS_PVT.Create_Movement_Statistics
5639: (p_api_version_number => 1.0
5640: ,p_init_msg_list => FND_API.G_FALSE
5641: ,x_movement_transaction => l_movement_transaction
5642: ,x_msg_count => x_msg_count
5643: ,x_msg_data => x_msg_data
5644: ,x_return_status => l_insert_status
5645: );
5646: END IF;
5647:
5648: --yawang fix bug 2268875
5649: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) = FND_API.G_RET_STS_SUCCESS
5650: AND l_movement_transaction.movement_id IS NOT NULL
5651: THEN
5652: l_movement_id := l_movement_transaction.movement_id;
5653: g_records_inserted := g_records_inserted +1;
5672: END IF;
5673: END LOOP l_inner;
5674: CLOSE setup_crsr;
5675:
5676: IF NVL(l_insert_status,FND_API.G_RET_STS_SUCCESS) = FND_API.G_RET_STS_SUCCESS
5677: THEN
5678: l_movement_transaction.movement_id := l_movement_id;
5679:
5680: IF NVL(l_process_flag,'N') = 'Y'
5714: );
5715: END IF;
5716:
5717: EXCEPTION
5718: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5719: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5720: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
5721:
5722: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
5715: END IF;
5716:
5717: EXCEPTION
5718: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5719: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5720: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
5721:
5722: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
5723: THEN
5716:
5717: EXCEPTION
5718: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5719: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5720: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
5721:
5722: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
5723: THEN
5724: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
5800: ,'enter procedure'
5801: );
5802: END IF;
5803:
5804: x_return_status := FND_API.G_RET_STS_SUCCESS;
5805: l_movement_transaction := p_movement_transaction;
5806:
5807: -- Call the transaction proxy which processes all the transactions.
5808:
6068: );
6069: END IF;
6070:
6071: EXCEPTION
6072: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6074: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
6075:
6076: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
6069: END IF;
6070:
6071: EXCEPTION
6072: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6074: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
6075:
6076: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
6077: THEN
6070:
6071: EXCEPTION
6072: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6074: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
6075:
6076: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
6077: THEN
6078: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
6165: ,'enter procedure'
6166: );
6167: END IF;
6168:
6169: x_return_status := FND_API.G_RET_STS_SUCCESS;
6170:
6171: -- Call the transaction proxy which processes all the PO and RTV transactions
6172: -- with corrections in the specified date range.
6173: INV_MGD_MVT_STATS_PVT.Get_PO_Trans_With_Correction
6414: , x_msg_count => x_msg_count
6415: , x_msg_data => x_msg_data
6416: );
6417:
6418: IF l_return_status = FND_API.G_RET_STS_SUCCESS
6419: THEN
6420: UPDATE rcv_transactions
6421: SET
6422: mvt_stat_status = 'PROCESSED'
6440: );
6441: END IF;
6442:
6443: EXCEPTION
6444: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6445: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6446: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
6447:
6448: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
6441: END IF;
6442:
6443: EXCEPTION
6444: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6445: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6446: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
6447:
6448: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
6449: THEN
6442:
6443: EXCEPTION
6444: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6445: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6446: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
6447:
6448: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
6449: THEN
6450: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED
6528: ,'enter procedure'
6529: );
6530: END IF;
6531:
6532: x_return_status := FND_API.G_RET_STS_SUCCESS;
6533: l_movement_transaction := p_movement_transaction;
6534:
6535: -- Call the transaction proxy which processes all the transactions.
6536:
6839: );
6840: END IF;
6841:
6842: EXCEPTION
6843: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6844: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6845: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
6846:
6847: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
6840: END IF;
6841:
6842: EXCEPTION
6843: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6844: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6845: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
6846:
6847: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
6848: THEN
6841:
6842: EXCEPTION
6843: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6844: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6845: l_error := SUBSTRB(FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE),1,250);
6846:
6847: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
6848: THEN
6849: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED