241: OPEN batch_status_csr(l_batch_id);
242: FETCH batch_status_csr into l_batch_status;
243: CLOSE batch_status_csr;
244:
245: IF l_batch_status = OZF_RESALE_COMMON_PVT.G_BATCH_PENDING_PAYMENT THEN
246: l_batch_return_status := l_batch_status;
247: ELSE
248: OZF_RESALE_COMMON_PVT.Update_Duplicates (
249: p_api_version => 1.0,
244:
245: IF l_batch_status = OZF_RESALE_COMMON_PVT.G_BATCH_PENDING_PAYMENT THEN
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,
276: itemkey => itemkey ,
277: aname => G_WF_ATTR_BATCH_STATUS,
278: avalue => l_batch_return_status );
279:
280: IF l_batch_return_status not in (OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSED,
281: OZF_RESALE_COMMON_PVT.G_BATCH_REJECTED,
282: OZF_RESALE_COMMON_PVT.G_BATCH_CLOSED) THEN
283: l_resultout := 'COMPLETE:OTHER';
284: ELSE
277: aname => G_WF_ATTR_BATCH_STATUS,
278: avalue => l_batch_return_status );
279:
280: IF l_batch_return_status not in (OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSED,
281: OZF_RESALE_COMMON_PVT.G_BATCH_REJECTED,
282: OZF_RESALE_COMMON_PVT.G_BATCH_CLOSED) THEN
283: l_resultout := 'COMPLETE:OTHER';
284: ELSE
285: l_resultout := 'COMPLETE:' || l_batch_return_status;
278: avalue => l_batch_return_status );
279:
280: IF l_batch_return_status not in (OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSED,
281: OZF_RESALE_COMMON_PVT.G_BATCH_REJECTED,
282: OZF_RESALE_COMMON_PVT.G_BATCH_CLOSED) THEN
283: l_resultout := 'COMPLETE:OTHER';
284: ELSE
285: l_resultout := 'COMPLETE:' || l_batch_return_status;
286: END IF;
707:
708: IF OZF_DEBUG_LOW_ON THEN
709: OZF_UTILITY_PVT.debug_message('Batch status '|| l_status_code );
710: END IF;
711: IF l_status_code not in ( OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSED,
712: OZF_RESALE_COMMON_PVT.G_BATCH_REJECTED,
713: OZF_RESALE_COMMON_PVT.G_BATCH_CLOSED) THEN
714: l_resultout := 'COMPLETE:OTHER';
715: ELSE
708: IF OZF_DEBUG_LOW_ON THEN
709: OZF_UTILITY_PVT.debug_message('Batch status '|| l_status_code );
710: END IF;
711: IF l_status_code not in ( OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSED,
712: OZF_RESALE_COMMON_PVT.G_BATCH_REJECTED,
713: OZF_RESALE_COMMON_PVT.G_BATCH_CLOSED) THEN
714: l_resultout := 'COMPLETE:OTHER';
715: ELSE
716: l_resultout := 'COMPLETE:' || l_status_code;
709: OZF_UTILITY_PVT.debug_message('Batch status '|| l_status_code );
710: END IF;
711: IF l_status_code not in ( OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSED,
712: OZF_RESALE_COMMON_PVT.G_BATCH_REJECTED,
713: OZF_RESALE_COMMON_PVT.G_BATCH_CLOSED) THEN
714: l_resultout := 'COMPLETE:OTHER';
715: ELSE
716: l_resultout := 'COMPLETE:' || l_status_code;
717: END IF;
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);
2221: FETCH OZF_RESALE_COMMON_PVT.g_disputed_line_count_csr into l_lines_disputed;
2222: CLOSE OZF_RESALE_COMMON_PVT.g_disputed_line_count_csr;
2223:
2224: IF l_batch_status = OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSING THEN
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);
2221: FETCH OZF_RESALE_COMMON_PVT.g_disputed_line_count_csr into l_lines_disputed;
2222: CLOSE OZF_RESALE_COMMON_PVT.g_disputed_line_count_csr;
2223:
2224: IF l_batch_status = OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSING THEN
2225: IF l_lines_disputed = 0 THEN
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);
2221: FETCH OZF_RESALE_COMMON_PVT.g_disputed_line_count_csr into l_lines_disputed;
2222: CLOSE OZF_RESALE_COMMON_PVT.g_disputed_line_count_csr;
2223:
2224: IF l_batch_status = OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSING THEN
2225: IF l_lines_disputed = 0 THEN
2226: -- update status to Processed
2220: OPEN OZF_RESALE_COMMON_PVT.g_disputed_line_count_csr (l_resale_batch_id);
2221: FETCH OZF_RESALE_COMMON_PVT.g_disputed_line_count_csr into l_lines_disputed;
2222: CLOSE OZF_RESALE_COMMON_PVT.g_disputed_line_count_csr;
2223:
2224: IF l_batch_status = OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSING THEN
2225: IF l_lines_disputed = 0 THEN
2226: -- update status to Processed
2227: UPDATE ozf_resale_batches_all
2228: SET status_code = OZF_RESALE_COMMON_PVT.G_BATCH_OPEN
2224: IF l_batch_status = OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSING THEN
2225: IF l_lines_disputed = 0 THEN
2226: -- update status to Processed
2227: UPDATE ozf_resale_batches_all
2228: SET status_code = OZF_RESALE_COMMON_PVT.G_BATCH_OPEN
2229: WHERE resale_batch_id = l_resale_batch_id;
2230: ELSE
2231: -- update status to Disputed
2232: UPDATE ozf_resale_batches_all
2229: WHERE resale_batch_id = l_resale_batch_id;
2230: ELSE
2231: -- update status to Disputed
2232: UPDATE ozf_resale_batches_all
2233: SET status_code = OZF_RESALE_COMMON_PVT.G_BATCH_DISPUTED
2234: WHERE resale_batch_id = l_resale_batch_id;
2235: END IF;
2236: ELSIF l_batch_status = OZF_RESALE_COMMON_PVT.G_BATCH_PENDING_PAYMENT THEN
2237:
2232: UPDATE ozf_resale_batches_all
2233: SET status_code = OZF_RESALE_COMMON_PVT.G_BATCH_DISPUTED
2234: WHERE resale_batch_id = l_resale_batch_id;
2235: END IF;
2236: ELSIF l_batch_status = OZF_RESALE_COMMON_PVT.G_BATCH_PENDING_PAYMENT THEN
2237:
2238: IF l_lines_disputed = 0 THEN
2239: -- update status to Processed
2240: UPDATE ozf_resale_batches_all
2237:
2238: IF l_lines_disputed = 0 THEN
2239: -- update status to Processed
2240: UPDATE ozf_resale_batches_all
2241: SET status_code = OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSED
2242: WHERE resale_batch_id = l_resale_batch_id;
2243: ELSE
2244: -- update status to Disputed
2245: UPDATE ozf_resale_batches_all
2242: WHERE resale_batch_id = l_resale_batch_id;
2243: ELSE
2244: -- update status to Disputed
2245: UPDATE ozf_resale_batches_all
2246: SET status_code = OZF_RESALE_COMMON_PVT.G_BATCH_DISPUTED
2247: WHERE resale_batch_id = l_resale_batch_id;
2248: END IF;
2249: END IF;
2250: l_resultout := 'COMPLETE';
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,
2525: OZF_RESALE_COMMON_PVT.G_BATCH_PENDING_PAYMENT) THEN
2526: l_batch_next_status := l_batch_status;
2527: ELSE
2528: IF l_batch_status IN (OZF_RESALE_COMMON_PVT.G_BATCH_OPEN,
2521: END IF;
2522:
2523:
2524: IF l_batch_status in (OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSING,
2525: OZF_RESALE_COMMON_PVT.G_BATCH_PENDING_PAYMENT) THEN
2526: l_batch_next_status := l_batch_status;
2527: ELSE
2528: IF l_batch_status IN (OZF_RESALE_COMMON_PVT.G_BATCH_OPEN,
2529: OZF_RESALE_COMMON_PVT.G_BATCH_DISPUTED) THEN
2524: IF l_batch_status in (OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSING,
2525: OZF_RESALE_COMMON_PVT.G_BATCH_PENDING_PAYMENT) THEN
2526: l_batch_next_status := l_batch_status;
2527: ELSE
2528: IF l_batch_status IN (OZF_RESALE_COMMON_PVT.G_BATCH_OPEN,
2529: OZF_RESALE_COMMON_PVT.G_BATCH_DISPUTED) THEN
2530: l_batch_next_status := OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSING;
2531:
2532: UPDATE ozf_resale_batches_all
2525: OZF_RESALE_COMMON_PVT.G_BATCH_PENDING_PAYMENT) THEN
2526: l_batch_next_status := l_batch_status;
2527: ELSE
2528: IF l_batch_status IN (OZF_RESALE_COMMON_PVT.G_BATCH_OPEN,
2529: OZF_RESALE_COMMON_PVT.G_BATCH_DISPUTED) THEN
2530: l_batch_next_status := OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSING;
2531:
2532: UPDATE ozf_resale_batches_all
2533: SET status_code = l_batch_next_status
2526: l_batch_next_status := l_batch_status;
2527: ELSE
2528: IF l_batch_status IN (OZF_RESALE_COMMON_PVT.G_BATCH_OPEN,
2529: OZF_RESALE_COMMON_PVT.G_BATCH_DISPUTED) THEN
2530: l_batch_next_status := OZF_RESALE_COMMON_PVT.G_BATCH_PROCESSING;
2531:
2532: UPDATE ozf_resale_batches_all
2533: SET status_code = l_batch_next_status
2534: WHERE resale_batch_id = l_resale_batch_id;
2667: itemkey => itemkey,
2668: aname => G_WF_ATTR_BATCH_ID);
2669:
2670: UPDATE ozf_resale_batches_all
2671: SET status_code = OZF_RESALE_COMMON_PVT.G_BATCH_PENDING_PAYMENT
2672: WHERE resale_batch_id = l_resale_batch_id;
2673:
2674: l_resultout := 'COMPLETE';
2675: --
3045: IF OZF_DEBUG_LOW_ON THEN
3046: OZF_UTILITY_PVT.debug_message('Batch ID '|| l_batch_id);
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,
3192: OZF_UTILITY_PVT.debug_message('Batch ID '|| l_batch_id);
3193: END IF;
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