54:
55: FOR i IN 1..p_msg_count LOOP
56: FND_MSG_PUB.get(
57: p_msg_index => p_msg_count - i +1 ,
58: p_encoded => FND_API.g_false,
59: p_data => l_msg_data,
60: p_msg_index_out => l_msg_index
61: );
62: l_temp_mesg := l_msg_index ||': ' ||
246: l_batch_return_status := l_batch_status;
247: ELSE
248: OZF_RESALE_COMMON_PVT.Update_Duplicates (
249: p_api_version => 1.0,
250: p_init_msg_list => FND_API.G_FALSE,
251: p_commit => FND_API.G_FALSE,
252: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
253: p_resale_batch_id => l_batch_id,
254: p_resale_batch_type => l_batch_type,
247: ELSE
248: OZF_RESALE_COMMON_PVT.Update_Duplicates (
249: p_api_version => 1.0,
250: p_init_msg_list => FND_API.G_FALSE,
251: p_commit => FND_API.G_FALSE,
252: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
253: p_resale_batch_id => l_batch_id,
254: p_resale_batch_type => l_batch_type,
255: p_batch_status => l_batch_status,
248: OZF_RESALE_COMMON_PVT.Update_Duplicates (
249: p_api_version => 1.0,
250: p_init_msg_list => FND_API.G_FALSE,
251: p_commit => FND_API.G_FALSE,
252: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
253: p_resale_batch_id => l_batch_id,
254: p_resale_batch_type => l_batch_type,
255: p_batch_status => l_batch_status,
256: x_batch_status => l_batch_return_status,
261: IF OZF_DEBUG_LOW_ON THEN
262: OZF_UTILITY_PVT.debug_message('Check duplicate line is complete '||l_return_status);
263: OZF_UTILITY_PVT.debug_message('batch status '||l_batch_return_status);
264: END IF;
265: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
266: RAISE FND_API.G_EXC_ERROR;
267: END IF;
268: END IF;
269: ELSE
262: OZF_UTILITY_PVT.debug_message('Check duplicate line is complete '||l_return_status);
263: OZF_UTILITY_PVT.debug_message('batch status '||l_batch_return_status);
264: END IF;
265: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
266: RAISE FND_API.G_EXC_ERROR;
267: END IF;
268: END IF;
269: ELSE
270: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_ID_NULL');
267: END IF;
268: END IF;
269: ELSE
270: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_ID_NULL');
271: RAISE FND_API.G_EXC_ERROR;
272: END IF;
273:
274: WF_ENGINE.SetItemAttrText(
275: itemtype => itemtype,
295:
296: resultout := l_resultout;
297:
298: EXCEPTION
299: WHEN FND_API.G_EXC_ERROR THEN
300: FND_MSG_PUB.Count_And_Get (
301: p_encoded => FND_API.G_FALSE,
302: p_count => l_msg_count,
303: p_data => l_msg_data
297:
298: EXCEPTION
299: WHEN FND_API.G_EXC_ERROR THEN
300: FND_MSG_PUB.Count_And_Get (
301: p_encoded => FND_API.G_FALSE,
302: p_count => l_msg_count,
303: p_data => l_msg_data
304: );
305: Handle_Error(
316: IF OZF_UNEXP_ERROR THEN
317: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
318: END IF;
319: FND_MSG_PUB.Count_And_Get (
320: p_encoded => FND_API.G_FALSE,
321: p_count => l_msg_count,
322: p_data => l_msg_data
323: );
324: Handle_Error(
411: IF l_auto_tp_accrual is NULL THEN
412: -- 11/23/04 yizhang: default flag to FALSE instead of raising an error
413: l_auto_tp_accrual := 'F';
414: --OZF_UTILITY_PVT.error_message('OZF_RESALE_AUTO_TP_NULL');
415: --RAISE FND_API.G_EXC_ERROR;
416: ELSE
417: -- START: Added for bug#9598648 fix
418: FND_REQUEST.set_org_id(l_batch_org_id);
419: -- END: Added for bug#9598648 fix
431:
432: resultout := l_resultout;
433:
434: EXCEPTION
435: WHEN FND_API.G_EXC_ERROR THEN
436: FND_MSG_PUB.Count_And_Get (
437: p_encoded => FND_API.G_FALSE,
438: p_count => l_msg_count,
439: p_data => l_msg_data
433:
434: EXCEPTION
435: WHEN FND_API.G_EXC_ERROR THEN
436: FND_MSG_PUB.Count_And_Get (
437: p_encoded => FND_API.G_FALSE,
438: p_count => l_msg_count,
439: p_data => l_msg_data
440: );
441: Handle_Error(
452: IF OZF_UNEXP_ERROR THEN
453: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
454: END IF;
455: FND_MSG_PUB.Count_And_Get (
456: p_encoded => FND_API.G_FALSE,
457: p_count => l_msg_count,
458: p_data => l_msg_data
459: );
460: Handle_Error(
554:
555: IF l_batch_caller NOT IN (G_WF_LKUP_UI, G_WF_LKUP_XML, G_WF_LKUP_WEBADI)
556: THEN
557: OZF_UTILITY_PVT.error_message('OZF_API_DEBUG_MESSAGE','TEXT','Invalid Batch caller '|| l_batch_caller);
558: RAISE FND_API.G_EXC_ERROR;
559: END IF;
560:
561: -- SET attribute OZF_BATCH_NUM_W_DATE for event key
562: l_batch_number := WF_ENGINE.GetItemAttrText(
587:
588: resultout := l_resultout;
589:
590: EXCEPTION
591: WHEN FND_API.G_EXC_ERROR THEN
592: FND_MSG_PUB.Count_And_Get (
593: p_encoded => FND_API.G_FALSE,
594: p_count => l_msg_count,
595: p_data => l_msg_data
589:
590: EXCEPTION
591: WHEN FND_API.G_EXC_ERROR THEN
592: FND_MSG_PUB.Count_And_Get (
593: p_encoded => FND_API.G_FALSE,
594: p_count => l_msg_count,
595: p_data => l_msg_data
596: );
597: Handle_Error(
608: IF OZF_UNEXP_ERROR THEN
609: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
610: END IF;
611: FND_MSG_PUB.Count_And_Get (
612: p_encoded => FND_API.G_FALSE,
613: p_count => l_msg_count,
614: p_data => l_msg_data
615: );
616: Handle_Error(
726:
727: resultout := l_resultout;
728:
729: EXCEPTION
730: WHEN FND_API.G_EXC_ERROR THEN
731: FND_MSG_PUB.Count_And_Get (
732: p_encoded => FND_API.G_FALSE,
733: p_count => l_msg_count,
734: p_data => l_msg_data
728:
729: EXCEPTION
730: WHEN FND_API.G_EXC_ERROR THEN
731: FND_MSG_PUB.Count_And_Get (
732: p_encoded => FND_API.G_FALSE,
733: p_count => l_msg_count,
734: p_data => l_msg_data
735: );
736: Handle_Error(
747: IF OZF_UNEXP_ERROR THEN
748: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
749: END IF;
750: FND_MSG_PUB.Count_And_Get (
751: p_encoded => FND_API.G_FALSE,
752: p_count => l_msg_count,
753: p_data => l_msg_data
754: );
755: Handle_Error(
838: IF l_batch_type NOT IN (G_WF_LKUP_CHARGEBACK, G_WF_LKUP_SPECIALPRICE, G_WF_LKUP_TRACING) OR
839: l_batch_type IS NULL
840: THEN
841: OZF_UTILITY_PVT.error_message('OZF_API_DEBUG_MESSAGE','TEXT','Invalid Batch Type '|| l_batch_type);
842: RAISE FND_API.G_EXC_ERROR;
843: END IF;
844:
845: IF OZF_DEBUG_LOW_ON THEN
846: OZF_UTILITY_PVT.debug_message('Batch Type '|| l_batch_type );
857:
858: resultout := l_resultout;
859:
860: EXCEPTION
861: WHEN FND_API.G_EXC_ERROR THEN
862: FND_MSG_PUB.Count_And_Get (
863: p_encoded => FND_API.G_FALSE,
864: p_count => l_msg_count,
865: p_data => l_msg_data
859:
860: EXCEPTION
861: WHEN FND_API.G_EXC_ERROR THEN
862: FND_MSG_PUB.Count_And_Get (
863: p_encoded => FND_API.G_FALSE,
864: p_count => l_msg_count,
865: p_data => l_msg_data
866: );
867: Handle_Error(
878: IF OZF_UNEXP_ERROR THEN
879: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
880: END IF;
881: FND_MSG_PUB.Count_And_Get (
882: p_encoded => FND_API.G_FALSE,
883: p_count => l_msg_count,
884: p_data => l_msg_data
885: );
886: Handle_Error(
957: aname => G_WF_ATTR_BATCH_ID
958: );
959: IF l_resale_batch_id is NULL THEN
960: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_ID_NULL');
961: RAISE FND_API.G_EXC_ERROR;
962: END IF;
963:
964: OPEN batch_num_csr (l_resale_batch_id);
965: FETCH batch_num_csr into l_batch_number
1031: RETURN;
1032: END IF;
1033: --
1034: EXCEPTION
1035: WHEN FND_API.G_EXC_ERROR THEN
1036: FND_MSG_PUB.Count_And_Get (
1037: p_encoded => FND_API.G_FALSE,
1038: p_count => l_msg_count,
1039: p_data => l_msg_data
1033: --
1034: EXCEPTION
1035: WHEN FND_API.G_EXC_ERROR THEN
1036: FND_MSG_PUB.Count_And_Get (
1037: p_encoded => FND_API.G_FALSE,
1038: p_count => l_msg_count,
1039: p_data => l_msg_data
1040: );
1041: Handle_Error(
1052: IF OZF_UNEXP_ERROR THEN
1053: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1054: END IF;
1055: FND_MSG_PUB.Count_And_Get (
1056: p_encoded => FND_API.G_FALSE,
1057: p_count => l_msg_count,
1058: p_data => l_msg_data
1059: );
1060: Handle_Error(
1138: itemkey => itemkey,
1139: aname => G_WF_ATTR_BATCH_ID);
1140: OZF_RESALE_PVT.Initiate_Payment (
1141: p_api_version => 1.0
1142: ,p_init_msg_list => FND_API.G_FALSE
1143: ,p_commit => FND_API.G_FALSE
1144: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1145: ,p_resale_batch_id => l_resale_batch_id
1146: ,x_return_status => l_return_status
1139: aname => G_WF_ATTR_BATCH_ID);
1140: OZF_RESALE_PVT.Initiate_Payment (
1141: p_api_version => 1.0
1142: ,p_init_msg_list => FND_API.G_FALSE
1143: ,p_commit => FND_API.G_FALSE
1144: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1145: ,p_resale_batch_id => l_resale_batch_id
1146: ,x_return_status => l_return_status
1147: ,x_msg_data => l_msg_data
1140: OZF_RESALE_PVT.Initiate_Payment (
1141: p_api_version => 1.0
1142: ,p_init_msg_list => FND_API.G_FALSE
1143: ,p_commit => FND_API.G_FALSE
1144: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1145: ,p_resale_batch_id => l_resale_batch_id
1146: ,x_return_status => l_return_status
1147: ,x_msg_data => l_msg_data
1148: ,x_msg_count => l_msg_count
1149: );
1150: IF OZF_DEBUG_LOW_ON THEN
1151: OZF_UTILITY_PVT.debug_message('subscribe process iface is complete ');
1152: END IF;
1153: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1154: RAISE FND_API.G_EXC_ERROR;
1155: END IF;
1156: l_resultout := 'COMPLETE:SUCCESS';
1157: --
1150: IF OZF_DEBUG_LOW_ON THEN
1151: OZF_UTILITY_PVT.debug_message('subscribe process iface is complete ');
1152: END IF;
1153: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1154: RAISE FND_API.G_EXC_ERROR;
1155: END IF;
1156: l_resultout := 'COMPLETE:SUCCESS';
1157: --
1158: ELSIF (funcmode = 'CANCEL') THEN
1165:
1166: resultout := l_resultout;
1167:
1168: EXCEPTION
1169: WHEN FND_API.G_EXC_ERROR THEN
1170: FND_MSG_PUB.Count_And_Get (
1171: p_encoded => FND_API.G_FALSE,
1172: p_count => l_msg_count,
1173: p_data => l_msg_data
1167:
1168: EXCEPTION
1169: WHEN FND_API.G_EXC_ERROR THEN
1170: FND_MSG_PUB.Count_And_Get (
1171: p_encoded => FND_API.G_FALSE,
1172: p_count => l_msg_count,
1173: p_data => l_msg_data
1174: );
1175: Handle_Error(
1187: IF OZF_UNEXP_ERROR THEN
1188: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1189: END IF;
1190: FND_MSG_PUB.Count_And_Get (
1191: p_encoded => FND_API.G_FALSE,
1192: p_count => l_msg_count,
1193: p_data => l_msg_data
1194: );
1195: Handle_Error(
1304:
1305: -- For Bug#8867381 (-)
1306: OZF_CHARGEBACK_PVT.Initiate_Payment (
1307: p_api_version => 1.0
1308: ,p_init_msg_list => FND_API.G_FALSE
1309: ,p_commit => FND_API.G_FALSE
1310: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1311: ,p_resale_batch_id => l_resale_batch_id
1312: ,x_return_status => l_return_status
1305: -- For Bug#8867381 (-)
1306: OZF_CHARGEBACK_PVT.Initiate_Payment (
1307: p_api_version => 1.0
1308: ,p_init_msg_list => FND_API.G_FALSE
1309: ,p_commit => FND_API.G_FALSE
1310: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1311: ,p_resale_batch_id => l_resale_batch_id
1312: ,x_return_status => l_return_status
1313: ,x_msg_data => l_msg_data
1306: OZF_CHARGEBACK_PVT.Initiate_Payment (
1307: p_api_version => 1.0
1308: ,p_init_msg_list => FND_API.G_FALSE
1309: ,p_commit => FND_API.G_FALSE
1310: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1311: ,p_resale_batch_id => l_resale_batch_id
1312: ,x_return_status => l_return_status
1313: ,x_msg_data => l_msg_data
1314: ,x_msg_count => l_msg_count
1312: ,x_return_status => l_return_status
1313: ,x_msg_data => l_msg_data
1314: ,x_msg_count => l_msg_count
1315: );
1316: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1317: RAISE FND_API.G_EXC_ERROR;
1318: END IF;
1319: l_resultout := 'COMPLETE:SUCCESS';
1320: --
1313: ,x_msg_data => l_msg_data
1314: ,x_msg_count => l_msg_count
1315: );
1316: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1317: RAISE FND_API.G_EXC_ERROR;
1318: END IF;
1319: l_resultout := 'COMPLETE:SUCCESS';
1320: --
1321: ELSIF (funcmode = 'CANCEL') THEN
1328:
1329: resultout := l_resultout;
1330:
1331: EXCEPTION
1332: WHEN FND_API.G_EXC_ERROR THEN
1333: FND_MSG_PUB.Count_And_Get (
1334: p_encoded => FND_API.G_FALSE,
1335: p_count => l_msg_count,
1336: p_data => l_msg_data
1330:
1331: EXCEPTION
1332: WHEN FND_API.G_EXC_ERROR THEN
1333: FND_MSG_PUB.Count_And_Get (
1334: p_encoded => FND_API.G_FALSE,
1335: p_count => l_msg_count,
1336: p_data => l_msg_data
1337: );
1338: Handle_Error(
1350: IF OZF_UNEXP_ERROR THEN
1351: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1352: END IF;
1353: FND_MSG_PUB.Count_And_Get (
1354: p_encoded => FND_API.G_FALSE,
1355: p_count => l_msg_count,
1356: p_data => l_msg_data
1357: );
1358: Handle_Error(
1443: -- ,itemkey => itemkey);
1444:
1445: OZF_SPECIAL_PRICING_PVT.Initiate_Payment (
1446: p_api_version => 1.0
1447: ,p_init_msg_list => FND_API.G_FALSE
1448: ,p_commit => FND_API.G_FALSE
1449: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1450: ,p_resale_batch_id => l_resale_batch_id
1451: ,x_return_status => l_return_status
1444:
1445: OZF_SPECIAL_PRICING_PVT.Initiate_Payment (
1446: p_api_version => 1.0
1447: ,p_init_msg_list => FND_API.G_FALSE
1448: ,p_commit => FND_API.G_FALSE
1449: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1450: ,p_resale_batch_id => l_resale_batch_id
1451: ,x_return_status => l_return_status
1452: ,x_msg_data => l_msg_data
1445: OZF_SPECIAL_PRICING_PVT.Initiate_Payment (
1446: p_api_version => 1.0
1447: ,p_init_msg_list => FND_API.G_FALSE
1448: ,p_commit => FND_API.G_FALSE
1449: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1450: ,p_resale_batch_id => l_resale_batch_id
1451: ,x_return_status => l_return_status
1452: ,x_msg_data => l_msg_data
1453: ,x_msg_count => l_msg_count
1451: ,x_return_status => l_return_status
1452: ,x_msg_data => l_msg_data
1453: ,x_msg_count => l_msg_count
1454: );
1455: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1456: RAISE FND_API.G_EXC_ERROR;
1457: END IF;
1458: l_resultout := 'COMPLETE:SUCCESS';
1459: --
1452: ,x_msg_data => l_msg_data
1453: ,x_msg_count => l_msg_count
1454: );
1455: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1456: RAISE FND_API.G_EXC_ERROR;
1457: END IF;
1458: l_resultout := 'COMPLETE:SUCCESS';
1459: --
1460: ELSIF (funcmode = 'CANCEL') THEN
1467:
1468: resultout := l_resultout;
1469:
1470: EXCEPTION
1471: WHEN FND_API.G_EXC_ERROR THEN
1472: FND_MSG_PUB.Count_And_Get (
1473: p_encoded => FND_API.G_FALSE,
1474: p_count => l_msg_count,
1475: p_data => l_msg_data
1469:
1470: EXCEPTION
1471: WHEN FND_API.G_EXC_ERROR THEN
1472: FND_MSG_PUB.Count_And_Get (
1473: p_encoded => FND_API.G_FALSE,
1474: p_count => l_msg_count,
1475: p_data => l_msg_data
1476: );
1477: Handle_Error(
1489: IF OZF_UNEXP_ERROR THEN
1490: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1491: END IF;
1492: FND_MSG_PUB.Count_And_Get (
1493: p_encoded => FND_API.G_FALSE,
1494: p_count => l_msg_count,
1495: p_data => l_msg_data
1496: );
1497: Handle_Error(
1551: -- ,itemkey => itemkey);
1552:
1553: OZF_TRACING_ORDER_PVT.Initiate_Payment (
1554: p_api_version => 1.0
1555: ,p_init_msg_list => FND_API.G_FALSE
1556: ,p_commit => FND_API.G_FALSE
1557: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1558: ,p_resale_batch_id => l_resale_batch_id
1559: ,x_return_status => l_return_status
1552:
1553: OZF_TRACING_ORDER_PVT.Initiate_Payment (
1554: p_api_version => 1.0
1555: ,p_init_msg_list => FND_API.G_FALSE
1556: ,p_commit => FND_API.G_FALSE
1557: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1558: ,p_resale_batch_id => l_resale_batch_id
1559: ,x_return_status => l_return_status
1560: ,x_msg_data => l_msg_data
1553: OZF_TRACING_ORDER_PVT.Initiate_Payment (
1554: p_api_version => 1.0
1555: ,p_init_msg_list => FND_API.G_FALSE
1556: ,p_commit => FND_API.G_FALSE
1557: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1558: ,p_resale_batch_id => l_resale_batch_id
1559: ,x_return_status => l_return_status
1560: ,x_msg_data => l_msg_data
1561: ,x_msg_count => l_msg_count
1559: ,x_return_status => l_return_status
1560: ,x_msg_data => l_msg_data
1561: ,x_msg_count => l_msg_count
1562: );
1563: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1564: RAISE FND_API.G_EXC_ERROR;
1565: END IF;
1566: l_resultout := 'COMPLETE:SUCCESS';
1567: --
1560: ,x_msg_data => l_msg_data
1561: ,x_msg_count => l_msg_count
1562: );
1563: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1564: RAISE FND_API.G_EXC_ERROR;
1565: END IF;
1566: l_resultout := 'COMPLETE:SUCCESS';
1567: --
1568: ELSIF (funcmode = 'CANCEL') THEN
1575:
1576: resultout := l_resultout;
1577:
1578: EXCEPTION
1579: WHEN FND_API.G_EXC_ERROR THEN
1580: FND_MSG_PUB.Count_And_Get (
1581: p_encoded => FND_API.G_FALSE,
1582: p_count => l_msg_count,
1583: p_data => l_msg_data
1577:
1578: EXCEPTION
1579: WHEN FND_API.G_EXC_ERROR THEN
1580: FND_MSG_PUB.Count_And_Get (
1581: p_encoded => FND_API.G_FALSE,
1582: p_count => l_msg_count,
1583: p_data => l_msg_data
1584: );
1585: Handle_Error(
1597: IF OZF_UNEXP_ERROR THEN
1598: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1599: END IF;
1600: FND_MSG_PUB.Count_And_Get (
1601: p_encoded => FND_API.G_FALSE,
1602: p_count => l_msg_count,
1603: p_data => l_msg_data
1604: );
1605: Handle_Error(
1683: itemkey => itemkey,
1684: aname => G_WF_ATTR_BATCH_ID);
1685: OZF_CHARGEBACK_PVT.Process_Order(
1686: p_api_version => 1.0
1687: ,p_init_msg_list => FND_API.G_FALSE
1688: ,p_commit => FND_API.G_FALSE
1689: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1690: ,p_resale_batch_id => l_resale_batch_id
1691: ,x_return_status => l_return_status
1684: aname => G_WF_ATTR_BATCH_ID);
1685: OZF_CHARGEBACK_PVT.Process_Order(
1686: p_api_version => 1.0
1687: ,p_init_msg_list => FND_API.G_FALSE
1688: ,p_commit => FND_API.G_FALSE
1689: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1690: ,p_resale_batch_id => l_resale_batch_id
1691: ,x_return_status => l_return_status
1692: ,x_msg_data => l_msg_data
1685: OZF_CHARGEBACK_PVT.Process_Order(
1686: p_api_version => 1.0
1687: ,p_init_msg_list => FND_API.G_FALSE
1688: ,p_commit => FND_API.G_FALSE
1689: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1690: ,p_resale_batch_id => l_resale_batch_id
1691: ,x_return_status => l_return_status
1692: ,x_msg_data => l_msg_data
1693: ,x_msg_count => l_msg_count
1694: );
1695: IF OZF_DEBUG_LOW_ON THEN
1696: OZF_UTILITY_PVT.debug_message('subscribe process chargeback order complete ');
1697: END IF;
1698: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1699: RAISE FND_API.G_EXC_ERROR;
1700: END IF;
1701: l_resultout := 'COMPLETE:SUCCESS';
1702: --
1695: IF OZF_DEBUG_LOW_ON THEN
1696: OZF_UTILITY_PVT.debug_message('subscribe process chargeback order complete ');
1697: END IF;
1698: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1699: RAISE FND_API.G_EXC_ERROR;
1700: END IF;
1701: l_resultout := 'COMPLETE:SUCCESS';
1702: --
1703: ELSIF (funcmode = 'CANCEL') THEN
1710:
1711: resultout := l_resultout;
1712:
1713: EXCEPTION
1714: WHEN FND_API.G_EXC_ERROR THEN
1715: FND_MSG_PUB.Count_And_Get (
1716: p_encoded => FND_API.G_FALSE,
1717: p_count => l_msg_count,
1718: p_data => l_msg_data
1712:
1713: EXCEPTION
1714: WHEN FND_API.G_EXC_ERROR THEN
1715: FND_MSG_PUB.Count_And_Get (
1716: p_encoded => FND_API.G_FALSE,
1717: p_count => l_msg_count,
1718: p_data => l_msg_data
1719: );
1720: Handle_Error(
1732: IF OZF_UNEXP_ERROR THEN
1733: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1734: END IF;
1735: FND_MSG_PUB.Count_And_Get (
1736: p_encoded => FND_API.G_FALSE,
1737: p_count => l_msg_count,
1738: p_data => l_msg_data
1739: );
1740: Handle_Error(
1820: itemkey => itemkey,
1821: aname => G_WF_ATTR_BATCH_ID);
1822: OZF_RESALE_PVT.Process_Resale (
1823: p_api_version => 1
1824: ,p_init_msg_list => FND_API.G_FALSE
1825: ,p_commit => FND_API.G_FALSE
1826: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1827: ,p_resale_batch_id => l_resale_batch_id
1828: ,x_return_status => l_return_status
1821: aname => G_WF_ATTR_BATCH_ID);
1822: OZF_RESALE_PVT.Process_Resale (
1823: p_api_version => 1
1824: ,p_init_msg_list => FND_API.G_FALSE
1825: ,p_commit => FND_API.G_FALSE
1826: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1827: ,p_resale_batch_id => l_resale_batch_id
1828: ,x_return_status => l_return_status
1829: ,x_msg_data => l_msg_data
1822: OZF_RESALE_PVT.Process_Resale (
1823: p_api_version => 1
1824: ,p_init_msg_list => FND_API.G_FALSE
1825: ,p_commit => FND_API.G_FALSE
1826: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1827: ,p_resale_batch_id => l_resale_batch_id
1828: ,x_return_status => l_return_status
1829: ,x_msg_data => l_msg_data
1830: ,x_msg_count => l_msg_count
1828: ,x_return_status => l_return_status
1829: ,x_msg_data => l_msg_data
1830: ,x_msg_count => l_msg_count
1831: );
1832: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1833: RAISE FND_API.G_EXC_ERROR;
1834: END IF;
1835: l_resultout := 'COMPLETE:SUCCESS';
1836: --
1829: ,x_msg_data => l_msg_data
1830: ,x_msg_count => l_msg_count
1831: );
1832: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1833: RAISE FND_API.G_EXC_ERROR;
1834: END IF;
1835: l_resultout := 'COMPLETE:SUCCESS';
1836: --
1837: ELSIF (funcmode = 'CANCEL') THEN
1844:
1845: resultout := l_resultout;
1846:
1847: EXCEPTION
1848: WHEN FND_API.G_EXC_ERROR THEN
1849: FND_MSG_PUB.Count_And_Get (
1850: p_encoded => FND_API.G_FALSE,
1851: p_count => l_msg_count,
1852: p_data => l_msg_data
1846:
1847: EXCEPTION
1848: WHEN FND_API.G_EXC_ERROR THEN
1849: FND_MSG_PUB.Count_And_Get (
1850: p_encoded => FND_API.G_FALSE,
1851: p_count => l_msg_count,
1852: p_data => l_msg_data
1853: );
1854: Handle_Error(
1866: IF OZF_UNEXP_ERROR THEN
1867: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1868: END IF;
1869: FND_MSG_PUB.Count_And_Get (
1870: p_encoded => FND_API.G_FALSE,
1871: p_count => l_msg_count,
1872: p_data => l_msg_data
1873: );
1874: Handle_Error(
1953: itemkey => itemkey,
1954: aname => G_WF_ATTR_BATCH_ID);
1955: OZF_SPECIAL_PRICING_PVT.Process_Order(
1956: p_api_version => 1.0
1957: ,p_init_msg_list => FND_API.G_FALSE
1958: ,p_commit => FND_API.G_FALSE
1959: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1960: ,p_resale_batch_id => l_resale_batch_id
1961: ,x_return_status => l_return_status
1954: aname => G_WF_ATTR_BATCH_ID);
1955: OZF_SPECIAL_PRICING_PVT.Process_Order(
1956: p_api_version => 1.0
1957: ,p_init_msg_list => FND_API.G_FALSE
1958: ,p_commit => FND_API.G_FALSE
1959: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1960: ,p_resale_batch_id => l_resale_batch_id
1961: ,x_return_status => l_return_status
1962: ,x_msg_data => l_msg_data
1955: OZF_SPECIAL_PRICING_PVT.Process_Order(
1956: p_api_version => 1.0
1957: ,p_init_msg_list => FND_API.G_FALSE
1958: ,p_commit => FND_API.G_FALSE
1959: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1960: ,p_resale_batch_id => l_resale_batch_id
1961: ,x_return_status => l_return_status
1962: ,x_msg_data => l_msg_data
1963: ,x_msg_count => l_msg_count
1964: );
1965: IF OZF_DEBUG_LOW_ON THEN
1966: OZF_UTILITY_PVT.debug_message('subscribe process chargeback order complete ');
1967: END IF;
1968: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1969: RAISE FND_API.G_EXC_ERROR;
1970: END IF;
1971: l_resultout := 'COMPLETE:SUCCESS';
1972: --
1965: IF OZF_DEBUG_LOW_ON THEN
1966: OZF_UTILITY_PVT.debug_message('subscribe process chargeback order complete ');
1967: END IF;
1968: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1969: RAISE FND_API.G_EXC_ERROR;
1970: END IF;
1971: l_resultout := 'COMPLETE:SUCCESS';
1972: --
1973: ELSIF (funcmode = 'CANCEL') THEN
1980:
1981: resultout := l_resultout;
1982:
1983: EXCEPTION
1984: WHEN FND_API.G_EXC_ERROR THEN
1985: FND_MSG_PUB.Count_And_Get (
1986: p_encoded => FND_API.G_FALSE,
1987: p_count => l_msg_count,
1988: p_data => l_msg_data
1982:
1983: EXCEPTION
1984: WHEN FND_API.G_EXC_ERROR THEN
1985: FND_MSG_PUB.Count_And_Get (
1986: p_encoded => FND_API.G_FALSE,
1987: p_count => l_msg_count,
1988: p_data => l_msg_data
1989: );
1990: Handle_Error(
2002: IF OZF_UNEXP_ERROR THEN
2003: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2004: END IF;
2005: FND_MSG_PUB.Count_And_Get (
2006: p_encoded => FND_API.G_FALSE,
2007: p_count => l_msg_count,
2008: p_data => l_msg_data
2009: );
2010: Handle_Error(
2089: itemkey => itemkey,
2090: aname => G_WF_ATTR_BATCH_ID);
2091: OZF_TRACING_ORDER_PVT.Process_Order(
2092: p_api_version => 1.0
2093: ,p_init_msg_list => FND_API.G_FALSE
2094: ,p_commit => FND_API.G_FALSE
2095: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
2096: ,p_resale_batch_id => l_resale_batch_id
2097: ,x_return_status => l_return_status
2090: aname => G_WF_ATTR_BATCH_ID);
2091: OZF_TRACING_ORDER_PVT.Process_Order(
2092: p_api_version => 1.0
2093: ,p_init_msg_list => FND_API.G_FALSE
2094: ,p_commit => FND_API.G_FALSE
2095: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
2096: ,p_resale_batch_id => l_resale_batch_id
2097: ,x_return_status => l_return_status
2098: ,x_msg_data => l_msg_data
2091: OZF_TRACING_ORDER_PVT.Process_Order(
2092: p_api_version => 1.0
2093: ,p_init_msg_list => FND_API.G_FALSE
2094: ,p_commit => FND_API.G_FALSE
2095: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
2096: ,p_resale_batch_id => l_resale_batch_id
2097: ,x_return_status => l_return_status
2098: ,x_msg_data => l_msg_data
2099: ,x_msg_count => l_msg_count
2100: );
2101: IF OZF_DEBUG_LOW_ON THEN
2102: OZF_UTILITY_PVT.debug_message('subscribe process tracing order complete ');
2103: END IF;
2104: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2105: RAISE FND_API.G_EXC_ERROR;
2106: END IF;
2107: l_resultout := 'COMPLETE:SUCCESS';
2108: --
2101: IF OZF_DEBUG_LOW_ON THEN
2102: OZF_UTILITY_PVT.debug_message('subscribe process tracing order complete ');
2103: END IF;
2104: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2105: RAISE FND_API.G_EXC_ERROR;
2106: END IF;
2107: l_resultout := 'COMPLETE:SUCCESS';
2108: --
2109: ELSIF (funcmode = 'CANCEL') THEN
2116:
2117: resultout := l_resultout;
2118:
2119: EXCEPTION
2120: WHEN FND_API.G_EXC_ERROR THEN
2121: FND_MSG_PUB.Count_And_Get (
2122: p_encoded => FND_API.G_FALSE,
2123: p_count => l_msg_count,
2124: p_data => l_msg_data
2118:
2119: EXCEPTION
2120: WHEN FND_API.G_EXC_ERROR THEN
2121: FND_MSG_PUB.Count_And_Get (
2122: p_encoded => FND_API.G_FALSE,
2123: p_count => l_msg_count,
2124: p_data => l_msg_data
2125: );
2126: Handle_Error(
2138: IF OZF_UNEXP_ERROR THEN
2139: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2140: END IF;
2141: FND_MSG_PUB.Count_And_Get (
2142: p_encoded => FND_API.G_FALSE,
2143: p_count => l_msg_count,
2144: p_data => l_msg_data
2145: );
2146: Handle_Error(
2212: CLOSE batch_status_csr;
2213:
2214: IF l_batch_status is null THEN
2215: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_STATUS_NULL');
2216: RAISE FND_API.G_EXC_ERROR;
2217: END IF;
2218:
2219: -- reset the status based on # of disputed lines
2220: OPEN OZF_RESALE_COMMON_PVT.g_disputed_line_count_csr (l_resale_batch_id);
2264: result := l_resultout;
2265: RETURN;
2266: --
2267: EXCEPTION
2268: WHEN FND_API.G_EXC_ERROR THEN
2269: FND_MSG_PUB.Count_And_Get (
2270: p_encoded => FND_API.G_FALSE,
2271: p_count => l_msg_count,
2272: p_data => l_msg_data
2266: --
2267: EXCEPTION
2268: WHEN FND_API.G_EXC_ERROR THEN
2269: FND_MSG_PUB.Count_And_Get (
2270: p_encoded => FND_API.G_FALSE,
2271: p_count => l_msg_count,
2272: p_data => l_msg_data
2273: );
2274: Handle_Error(
2285: IF OZF_UNEXP_ERROR THEN
2286: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2287: END IF;
2288: FND_MSG_PUB.Count_And_Get (
2289: p_encoded => FND_API.G_FALSE,
2290: p_count => l_msg_count,
2291: p_data => l_msg_data
2292: );
2293: Handle_Error(
2516: );
2517: --
2518: IF l_batch_status is null THEN
2519: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_STATUS_NULL');
2520: RAISE FND_API.G_EXC_ERROR;
2521: END IF;
2522:
2523:
2524: IF l_batch_status in (OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSING,
2534: WHERE resale_batch_id = l_resale_batch_id;
2535:
2536: ELSE
2537: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_STATUS_ERR');
2538: RAISE FND_API.G_EXC_ERROR;
2539: END IF;
2540: END IF;
2541:
2542:
2557: resultout := l_resultout;
2558: RETURN;
2559: --
2560: EXCEPTION
2561: WHEN FND_API.G_EXC_ERROR THEN
2562: FND_MSG_PUB.Count_And_Get (
2563: p_encoded => FND_API.G_FALSE,
2564: p_count => l_msg_count,
2565: p_data => l_msg_data
2559: --
2560: EXCEPTION
2561: WHEN FND_API.G_EXC_ERROR THEN
2562: FND_MSG_PUB.Count_And_Get (
2563: p_encoded => FND_API.G_FALSE,
2564: p_count => l_msg_count,
2565: p_data => l_msg_data
2566: );
2567: Handle_Error(
2578: IF OZF_UNEXP_ERROR THEN
2579: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2580: END IF;
2581: FND_MSG_PUB.Count_And_Get (
2582: p_encoded => FND_API.G_FALSE,
2583: p_count => l_msg_count,
2584: p_data => l_msg_data
2585: );
2586: Handle_Error(
2688: resultout := l_resultout;
2689: RETURN;
2690: --
2691: EXCEPTION
2692: WHEN FND_API.G_EXC_ERROR THEN
2693: FND_MSG_PUB.Count_And_Get (
2694: p_encoded => FND_API.G_FALSE,
2695: p_count => l_msg_count,
2696: p_data => l_msg_data
2690: --
2691: EXCEPTION
2692: WHEN FND_API.G_EXC_ERROR THEN
2693: FND_MSG_PUB.Count_And_Get (
2694: p_encoded => FND_API.G_FALSE,
2695: p_count => l_msg_count,
2696: p_data => l_msg_data
2697: );
2698: Handle_Error(
2709: IF OZF_UNEXP_ERROR THEN
2710: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2711: END IF;
2712: FND_MSG_PUB.Count_And_Get (
2713: p_encoded => FND_API.G_FALSE,
2714: p_count => l_msg_count,
2715: p_data => l_msg_data
2716: );
2717: Handle_Error(
2931: resultout := l_resultout;
2932: RETURN;
2933: --
2934: EXCEPTION
2935: WHEN FND_API.G_EXC_ERROR THEN
2936: FND_MSG_PUB.Count_And_Get (
2937: p_encoded => FND_API.G_FALSE,
2938: p_count => l_msg_count,
2939: p_data => l_msg_data
2933: --
2934: EXCEPTION
2935: WHEN FND_API.G_EXC_ERROR THEN
2936: FND_MSG_PUB.Count_And_Get (
2937: p_encoded => FND_API.G_FALSE,
2938: p_count => l_msg_count,
2939: p_data => l_msg_data
2940: );
2941: Handle_Error(
2952: IF OZF_UNEXP_ERROR THEN
2953: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2954: END IF;
2955: FND_MSG_PUB.Count_And_Get (
2956: p_encoded => FND_API.G_FALSE,
2957: p_count => l_msg_count,
2958: p_data => l_msg_data
2959: );
2960: Handle_Error(
3047: END IF;
3048: IF l_batch_id IS NOT NULL THEN
3049: OZF_RESALE_COMMON_PVT.Validate_Batch (
3050: p_api_version => 1.0,
3051: p_init_msg_list => FND_API.G_FALSE,
3052: p_commit => FND_API.G_FALSE,
3053: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
3054: p_resale_batch_id => l_batch_id,
3055: x_batch_status => l_batch_status,
3048: IF l_batch_id IS NOT NULL THEN
3049: OZF_RESALE_COMMON_PVT.Validate_Batch (
3050: p_api_version => 1.0,
3051: p_init_msg_list => FND_API.G_FALSE,
3052: p_commit => FND_API.G_FALSE,
3053: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
3054: p_resale_batch_id => l_batch_id,
3055: x_batch_status => l_batch_status,
3056: x_return_status => l_return_status,
3049: OZF_RESALE_COMMON_PVT.Validate_Batch (
3050: p_api_version => 1.0,
3051: p_init_msg_list => FND_API.G_FALSE,
3052: p_commit => FND_API.G_FALSE,
3053: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
3054: p_resale_batch_id => l_batch_id,
3055: x_batch_status => l_batch_status,
3056: x_return_status => l_return_status,
3057: x_msg_count => l_msg_count,
3059:
3060: IF OZF_DEBUG_LOW_ON THEN
3061: OZF_UTILITY_PVT.debug_message('Validate Batch is complete '||l_return_status);
3062: END IF;
3063: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3064: RAISE FND_API.G_EXC_ERROR;
3065: END IF;
3066: l_resultout := 'COMPLETE:SUCCESS';
3067: ELSE
3060: IF OZF_DEBUG_LOW_ON THEN
3061: OZF_UTILITY_PVT.debug_message('Validate Batch is complete '||l_return_status);
3062: END IF;
3063: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3064: RAISE FND_API.G_EXC_ERROR;
3065: END IF;
3066: l_resultout := 'COMPLETE:SUCCESS';
3067: ELSE
3068: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_ID_NULL');
3065: END IF;
3066: l_resultout := 'COMPLETE:SUCCESS';
3067: ELSE
3068: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_ID_NULL');
3069: RAISE FND_API.G_EXC_ERROR;
3070: END IF;
3071: l_resultout := 'COMPLETE:SUCCESS';
3072: --
3073: ELSIF (funcmode = 'CANCEL') THEN
3080:
3081: resultout := l_resultout;
3082:
3083: EXCEPTION
3084: WHEN FND_API.G_EXC_ERROR THEN
3085: FND_MSG_PUB.Count_And_Get (
3086: p_encoded => FND_API.G_FALSE,
3087: p_count => l_msg_count,
3088: p_data => l_msg_data
3082:
3083: EXCEPTION
3084: WHEN FND_API.G_EXC_ERROR THEN
3085: FND_MSG_PUB.Count_And_Get (
3086: p_encoded => FND_API.G_FALSE,
3087: p_count => l_msg_count,
3088: p_data => l_msg_data
3089: );
3090: Handle_Error(
3102: IF OZF_UNEXP_ERROR THEN
3103: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3104: END IF;
3105: FND_MSG_PUB.Count_And_Get (
3106: p_encoded => FND_API.G_FALSE,
3107: p_count => l_msg_count,
3108: p_data => l_msg_data
3109: );
3110: Handle_Error(
3194: IF l_batch_id IS NOT NULL THEN
3195: -- Verify the line information for this batch
3196: OZF_RESALE_COMMON_PVT.Validate_Order_Record (
3197: p_api_version => 1.0
3198: ,p_init_msg_list => FND_API.G_FALSE
3199: ,p_commit => FND_API.G_FALSE
3200: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3201: ,p_resale_batch_id => l_batch_id
3202: ,x_return_status => l_return_status
3195: -- Verify the line information for this batch
3196: OZF_RESALE_COMMON_PVT.Validate_Order_Record (
3197: p_api_version => 1.0
3198: ,p_init_msg_list => FND_API.G_FALSE
3199: ,p_commit => FND_API.G_FALSE
3200: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3201: ,p_resale_batch_id => l_batch_id
3202: ,x_return_status => l_return_status
3203: ,x_msg_data => l_msg_data
3196: OZF_RESALE_COMMON_PVT.Validate_Order_Record (
3197: p_api_version => 1.0
3198: ,p_init_msg_list => FND_API.G_FALSE
3199: ,p_commit => FND_API.G_FALSE
3200: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3201: ,p_resale_batch_id => l_batch_id
3202: ,x_return_status => l_return_status
3203: ,x_msg_data => l_msg_data
3204: ,x_msg_count => l_msg_count
3202: ,x_return_status => l_return_status
3203: ,x_msg_data => l_msg_data
3204: ,x_msg_count => l_msg_count
3205: );
3206: IF l_return_status<> FND_API.G_RET_STS_SUCCESS THEN
3207: OZF_UTILITY_PVT.error_message('OZF_RESALE_VALIDATE_ERR');
3208: RAISE FND_API.G_EXC_ERROR;
3209: END IF;
3210: ELSE
3204: ,x_msg_count => l_msg_count
3205: );
3206: IF l_return_status<> FND_API.G_RET_STS_SUCCESS THEN
3207: OZF_UTILITY_PVT.error_message('OZF_RESALE_VALIDATE_ERR');
3208: RAISE FND_API.G_EXC_ERROR;
3209: END IF;
3210: ELSE
3211: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_ID_NULL');
3212: RAISE FND_API.G_EXC_ERROR;
3208: RAISE FND_API.G_EXC_ERROR;
3209: END IF;
3210: ELSE
3211: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_ID_NULL');
3212: RAISE FND_API.G_EXC_ERROR;
3213: END IF;
3214:
3215: l_resultout := 'COMPLETE:SUCCESS';
3216: --
3224:
3225: resultout := l_resultout;
3226:
3227: EXCEPTION
3228: WHEN FND_API.G_EXC_ERROR THEN
3229: FND_MSG_PUB.Count_And_Get (
3230: p_encoded => FND_API.G_FALSE,
3231: p_count => l_msg_count,
3232: p_data => l_msg_data
3226:
3227: EXCEPTION
3228: WHEN FND_API.G_EXC_ERROR THEN
3229: FND_MSG_PUB.Count_And_Get (
3230: p_encoded => FND_API.G_FALSE,
3231: p_count => l_msg_count,
3232: p_data => l_msg_data
3233: );
3234: Handle_Error(
3246: IF OZF_UNEXP_ERROR THEN
3247: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3248: END IF;
3249: FND_MSG_PUB.Count_And_Get (
3250: p_encoded => FND_API.G_FALSE,
3251: p_count => l_msg_count,
3252: p_data => l_msg_data
3253: );
3254: Handle_Error(
3341: IF l_batch_id IS NOT NULL THEN
3342: -- Verify the line information for this batch
3343: OZF_CHARGEBACK_PVT.Validate_Order_Record (
3344: p_api_version => 1
3345: ,p_init_msg_list => FND_API.G_FALSE
3346: ,p_commit => FND_API.G_FALSE
3347: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3348: ,p_resale_batch_id => l_batch_id
3349: ,x_return_status => l_return_status
3342: -- Verify the line information for this batch
3343: OZF_CHARGEBACK_PVT.Validate_Order_Record (
3344: p_api_version => 1
3345: ,p_init_msg_list => FND_API.G_FALSE
3346: ,p_commit => FND_API.G_FALSE
3347: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3348: ,p_resale_batch_id => l_batch_id
3349: ,x_return_status => l_return_status
3350: ,x_msg_data => l_msg_data
3343: OZF_CHARGEBACK_PVT.Validate_Order_Record (
3344: p_api_version => 1
3345: ,p_init_msg_list => FND_API.G_FALSE
3346: ,p_commit => FND_API.G_FALSE
3347: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3348: ,p_resale_batch_id => l_batch_id
3349: ,x_return_status => l_return_status
3350: ,x_msg_data => l_msg_data
3351: ,x_msg_count => l_msg_count
3349: ,x_return_status => l_return_status
3350: ,x_msg_data => l_msg_data
3351: ,x_msg_count => l_msg_count
3352: );
3353: IF l_return_status<> FND_API.G_RET_STS_SUCCESS THEN
3354: OZF_UTILITY_PVT.error_message('OZF_RESALE_CHBK_VALIDATE_ERR');
3355: RAISE FND_API.G_EXC_ERROR;
3356: END IF;
3357: ELSE
3351: ,x_msg_count => l_msg_count
3352: );
3353: IF l_return_status<> FND_API.G_RET_STS_SUCCESS THEN
3354: OZF_UTILITY_PVT.error_message('OZF_RESALE_CHBK_VALIDATE_ERR');
3355: RAISE FND_API.G_EXC_ERROR;
3356: END IF;
3357: ELSE
3358: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_ID_NULL');
3359: RAISE FND_API.G_EXC_ERROR;
3355: RAISE FND_API.G_EXC_ERROR;
3356: END IF;
3357: ELSE
3358: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_ID_NULL');
3359: RAISE FND_API.G_EXC_ERROR;
3360: END IF;
3361: l_resultout := 'COMPLETE:SUCCESS';
3362: --
3363: ELSIF (funcmode = 'CANCEL') THEN
3370:
3371: resultout := l_resultout;
3372:
3373: EXCEPTION
3374: WHEN FND_API.G_EXC_ERROR THEN
3375: FND_MSG_PUB.Count_And_Get (
3376: p_encoded => FND_API.G_FALSE,
3377: p_count => l_msg_count,
3378: p_data => l_msg_data
3372:
3373: EXCEPTION
3374: WHEN FND_API.G_EXC_ERROR THEN
3375: FND_MSG_PUB.Count_And_Get (
3376: p_encoded => FND_API.G_FALSE,
3377: p_count => l_msg_count,
3378: p_data => l_msg_data
3379: );
3380: Handle_Error(
3392: IF OZF_UNEXP_ERROR THEN
3393: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3394: END IF;
3395: FND_MSG_PUB.Count_And_Get (
3396: p_encoded => FND_API.G_FALSE,
3397: p_count => l_msg_count,
3398: p_data => l_msg_data
3399: );
3400: Handle_Error(
3486: IF l_batch_id IS NOT NULL THEN
3487: -- Verify the line information for this batch
3488: OZF_SPECIAL_PRICING_PVT.Validate_Order_Record (
3489: p_api_version => 1
3490: ,p_init_msg_list => FND_API.G_FALSE
3491: ,p_commit => FND_API.G_FALSE
3492: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3493: ,p_resale_batch_id => l_batch_id
3494: ,x_return_status => l_return_status
3487: -- Verify the line information for this batch
3488: OZF_SPECIAL_PRICING_PVT.Validate_Order_Record (
3489: p_api_version => 1
3490: ,p_init_msg_list => FND_API.G_FALSE
3491: ,p_commit => FND_API.G_FALSE
3492: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3493: ,p_resale_batch_id => l_batch_id
3494: ,x_return_status => l_return_status
3495: ,x_msg_data => l_msg_data
3488: OZF_SPECIAL_PRICING_PVT.Validate_Order_Record (
3489: p_api_version => 1
3490: ,p_init_msg_list => FND_API.G_FALSE
3491: ,p_commit => FND_API.G_FALSE
3492: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3493: ,p_resale_batch_id => l_batch_id
3494: ,x_return_status => l_return_status
3495: ,x_msg_data => l_msg_data
3496: ,x_msg_count => l_msg_count
3494: ,x_return_status => l_return_status
3495: ,x_msg_data => l_msg_data
3496: ,x_msg_count => l_msg_count
3497: );
3498: IF l_return_status<> FND_API.G_RET_STS_SUCCESS THEN
3499: OZF_UTILITY_PVT.error_message('OZF_RESALE_CHBK_VALIDATE_ERR');
3500: RAISE FND_API.G_EXC_ERROR;
3501: END IF;
3502: ELSE
3496: ,x_msg_count => l_msg_count
3497: );
3498: IF l_return_status<> FND_API.G_RET_STS_SUCCESS THEN
3499: OZF_UTILITY_PVT.error_message('OZF_RESALE_CHBK_VALIDATE_ERR');
3500: RAISE FND_API.G_EXC_ERROR;
3501: END IF;
3502: ELSE
3503: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_ID_NULL');
3504: RAISE FND_API.G_EXC_ERROR;
3500: RAISE FND_API.G_EXC_ERROR;
3501: END IF;
3502: ELSE
3503: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_ID_NULL');
3504: RAISE FND_API.G_EXC_ERROR;
3505: END IF;
3506: l_resultout := 'COMPLETE:SUCCESS';
3507: --
3508: ELSIF (funcmode = 'CANCEL') THEN
3515:
3516: resultout := l_resultout;
3517:
3518: EXCEPTION
3519: WHEN FND_API.G_EXC_ERROR THEN
3520: FND_MSG_PUB.Count_And_Get (
3521: p_encoded => FND_API.G_FALSE,
3522: p_count => l_msg_count,
3523: p_data => l_msg_data
3517:
3518: EXCEPTION
3519: WHEN FND_API.G_EXC_ERROR THEN
3520: FND_MSG_PUB.Count_And_Get (
3521: p_encoded => FND_API.G_FALSE,
3522: p_count => l_msg_count,
3523: p_data => l_msg_data
3524: );
3525: Handle_Error(
3537: IF OZF_UNEXP_ERROR THEN
3538: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3539: END IF;
3540: FND_MSG_PUB.Count_And_Get (
3541: p_encoded => FND_API.G_FALSE,
3542: p_count => l_msg_count,
3543: p_data => l_msg_data
3544: );
3545: Handle_Error(
3632: IF l_batch_id IS NOT NULL THEN
3633: -- Verify the line information for this batch
3634: OZF_TRACING_ORDER_PVT.Validate_Order_Record (
3635: p_api_version => 1
3636: ,p_init_msg_list => FND_API.G_FALSE
3637: ,p_commit => FND_API.G_FALSE
3638: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3639: ,p_resale_batch_id => l_batch_id
3640: ,x_return_status => l_return_status
3633: -- Verify the line information for this batch
3634: OZF_TRACING_ORDER_PVT.Validate_Order_Record (
3635: p_api_version => 1
3636: ,p_init_msg_list => FND_API.G_FALSE
3637: ,p_commit => FND_API.G_FALSE
3638: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3639: ,p_resale_batch_id => l_batch_id
3640: ,x_return_status => l_return_status
3641: ,x_msg_data => l_msg_data
3634: OZF_TRACING_ORDER_PVT.Validate_Order_Record (
3635: p_api_version => 1
3636: ,p_init_msg_list => FND_API.G_FALSE
3637: ,p_commit => FND_API.G_FALSE
3638: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3639: ,p_resale_batch_id => l_batch_id
3640: ,x_return_status => l_return_status
3641: ,x_msg_data => l_msg_data
3642: ,x_msg_count => l_msg_count
3640: ,x_return_status => l_return_status
3641: ,x_msg_data => l_msg_data
3642: ,x_msg_count => l_msg_count
3643: );
3644: IF l_return_status<> FND_API.G_RET_STS_SUCCESS THEN
3645: OZF_UTILITY_PVT.error_message('OZF_RESALE_TRAC_VALIDATE_ERR');
3646: RAISE FND_API.G_EXC_ERROR;
3647: END IF;
3648: ELSE
3642: ,x_msg_count => l_msg_count
3643: );
3644: IF l_return_status<> FND_API.G_RET_STS_SUCCESS THEN
3645: OZF_UTILITY_PVT.error_message('OZF_RESALE_TRAC_VALIDATE_ERR');
3646: RAISE FND_API.G_EXC_ERROR;
3647: END IF;
3648: ELSE
3649: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_ID_NULL');
3650: RAISE FND_API.G_EXC_ERROR;
3646: RAISE FND_API.G_EXC_ERROR;
3647: END IF;
3648: ELSE
3649: OZF_UTILITY_PVT.error_message('OZF_RESALE_BATCH_ID_NULL');
3650: RAISE FND_API.G_EXC_ERROR;
3651: END IF;
3652: l_resultout := 'COMPLETE:SUCCESS';
3653: --
3654: ELSIF (funcmode = 'CANCEL') THEN
3661:
3662: resultout := l_resultout;
3663:
3664: EXCEPTION
3665: WHEN FND_API.G_EXC_ERROR THEN
3666: FND_MSG_PUB.Count_And_Get (
3667: p_encoded => FND_API.G_FALSE,
3668: p_count => l_msg_count,
3669: p_data => l_msg_data
3663:
3664: EXCEPTION
3665: WHEN FND_API.G_EXC_ERROR THEN
3666: FND_MSG_PUB.Count_And_Get (
3667: p_encoded => FND_API.G_FALSE,
3668: p_count => l_msg_count,
3669: p_data => l_msg_data
3670: );
3671: Handle_Error(
3683: IF OZF_UNEXP_ERROR THEN
3684: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3685: END IF;
3686: FND_MSG_PUB.Count_And_Get (
3687: p_encoded => FND_API.G_FALSE,
3688: p_count => l_msg_count,
3689: p_data => l_msg_data
3690: );
3691: Handle_Error(
3935:
3936: END IF; -- IF l_batch_process_mode = 'SYNC' THEN
3937:
3938: EXCEPTION
3939: WHEN FND_API.G_EXC_ERROR THEN
3940: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3941: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
3942: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
3943: FND_MSG_PUB.Add;
3942: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
3943: FND_MSG_PUB.Add;
3944: END IF;
3945: RAISE;
3946: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3947: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3948: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
3949: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
3950: FND_MSG_PUB.Add;
4171:
4172:
4173:
4174: EXCEPTION
4175: WHEN FND_API.G_EXC_ERROR THEN
4176: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4177: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
4178: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
4179: FND_MSG_PUB.Add;
4178: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
4179: FND_MSG_PUB.Add;
4180: END IF;
4181: RAISE;
4182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4183: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4184: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
4185: FND_MESSAGE.Set_Token('TEXT',G_PKG_NAME||'.'||l_api_name||': Error');
4186: FND_MSG_PUB.Add;