DBA Data[Home] [Help]

APPS.IEX_DISPUTE_PVT dependencies on FND_LOG

Line 8: PG_DEBUG NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

4: --G_FILE_NAME CONSTANT VARCHAR2(12) := 'iexpimpb.pls';
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'IEX_DISPUTE_PVT';
6:
7: --PG_DEBUG NUMBER(2) := TO_NUMBER(NVL(FND_PROFILE.value('IEX_DEBUG_LEVEL'), '20'));
8: PG_DEBUG NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
9: --Added parameters p_skip_workflow_flag and p_dispute_date
10: --for bug#6347547 by schekuri on 08-Nov-2007
11: -- Bug #6777367 bibeura 28-Jan-2008 Added parameter p_batch_source_name
12: PROCEDURE Create_Dispute(p_api_version IN NUMBER,

Line 87: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

83: END IF;
84:
85: -- Debug Message
86: -- IF PG_DEBUG < 10 THEN
87: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
88: IEX_DEBUG_PUB.logMessage('Create_Dispute: ' || 'PVT: ' || l_api_name || ' start');
89: END IF;
90: --
91: -- API body

Line 96: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

92: -- --------------------------------------------------------
93:
94:
95: -- IF PG_DEBUG < 10 THEN
96: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
97: IEX_DEBUG_PUB.logMessage('Create_Dispute: ' || 'IEX_DISPUTES_PVT: CreateDispute: getting creation_sign');
98: END IF;
99: -- added by ehuh for URL parameters
100: Open Get_Currency_Code;

Line 153: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

149: elsif l_creationSign = 'N' then
150: l_multiplier := 1;
151: end if;
152: -- IF PG_DEBUG < 10 THEN
153: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
154: IEX_DEBUG_PUB.logMessage('Create_Dispute: ' || 'IEX_DISPUTES_PVT: CreateDispute: creation_sign is ' || l_creationSign);
155: END IF;
156: -- IF PG_DEBUG < 10 THEN
157: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 157: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

153: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
154: IEX_DEBUG_PUB.logMessage('Create_Dispute: ' || 'IEX_DISPUTES_PVT: CreateDispute: creation_sign is ' || l_creationSign);
155: END IF;
156: -- IF PG_DEBUG < 10 THEN
157: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
158: IEX_DEBUG_PUB.logMessage('Create_Dispute: ' || 'IEX_DISPUTES_PVT: CreateDispute: multiplier is ' || l_multiplier);
159: END IF;
160:
161: -- add this to avoid bug# 2166002

Line 172: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

168:
169: if lp_disp_line_tbl is not null then
170: lines_count := lp_disp_line_tbl.count;
171: -- IF PG_DEBUG < 10 THEN
172: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
173: IEX_DEBUG_PUB.logMessage('Create_Dispute: ' || 'lines count is ' || lines_count);
174: END IF;
175:
176: if lines_count >= 1 then

Line 203: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

199: end if;
200: end if;
201:
202: -- IF PG_DEBUG < 10 THEN
203: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
204: IEX_DEBUG_PUB.logMessage('Create_Dispute: ' || 'IEX_DISPUTES_PVT: CreateDispute: Calling AR Create Request API');
205: END IF;
206: AR_CREDIT_MEMO_API_PUB.create_request(
207: p_api_version => l_api_version_number,

Line 239: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

235: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
236: SELECT iex_disputes_s.nextval INTO l_dis_id FROM dual;
237:
238: -- IF PG_DEBUG < 10 THEN
239: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
240: IEX_DEBUG_PUB.logMessage('Create_Dispute: ' || 'IEX_DISPUTES_PVT: CreateDispute: Inserting a dispute row in IEX_DISPUTES');
241: END IF;
242: IEX_DISPUTES_PKG.Insert_Row(x_rowid => x,
243: p_dispute_id => l_dis_id,

Line 254: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

250: p_dispute_section => p_disp_header_rec.dispute_section,
251: p_delinquency_id => p_disp_header_rec.delinquency_id);
252: ELSE
253: -- IF PG_DEBUG < 10 THEN
254: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
255: IEX_DEBUG_PUB.logMessage('Create_Dispute: ' || 'IEX_DISPUTES_PVT: CreateDispute: Insert Failed');
256: END IF;
257: FND_MESSAGE.SET_NAME('IEX', 'IEX_DISPUTE_FAILED');
258: FND_MSG_PUB.Add;

Line 266: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

262: END IF ;
263:
264: else -- no credit memo associated with transaction
265: -- IF PG_DEBUG < 10 THEN
266: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
267: IEX_DEBUG_PUB.logMessage('Create_Dispute: ' || 'IEX_DISPUTES_PVT: CreateDispute: Credit Memo Configuration failure');
268: END IF;
269: FND_MESSAGE.SET_NAME('IEX', 'IEX_NO_CREDIT_MEMO');
270: FND_MSG_PUB.Add;

Line 289: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

285: -- End of API body
286:
287: -- Debug Message
288: -- IF PG_DEBUG < 10 THEN
289: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
290: IEX_DEBUG_PUB.logMessage('Create_Dispute: ' || 'PVT: ' || l_api_name || ' end');
291: END IF;
292:
293: -- Standard call to get message count and if count is 1, get message info.

Line 354: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

350: END IF;
351:
352: -- Debug Message
353: -- IF PG_DEBUG < 10 THEN
354: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
355: IEX_DEBUG_PUB.logMessage('is_delinquency_dispute: ' || 'PVT: ' || l_api_name || ' start');
356: END IF;
357:
358: --

Line 398: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

394: -- End of API body
395:
396: -- Debug Message
397: -- IF PG_DEBUG < 10 THEN
398: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
399: IEX_DEBUG_PUB.logMessage('is_delinquency_dispute: ' || 'PVT: ' || l_api_name || ' end');
400: END IF;
401:
402: -- Standard call to get message count and if count is 1, get message info.

Line 511: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

507: where customer_trx_id = p_cust_trx_id;
508:
509: BEGIN
510:
511: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
512: IEX_DEBUG_PUB.logMessage('**** BEGIN IEX_DISPUTE_PVT.CANCEL_DISPUTE ************');
513: END IF;
514:
515: SAVEPOINT CANCEL_DISPUTE;

Line 525: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

521: FETCH c_item_type
522: INTO l_item_type;
523: CLOSE c_item_type;
524:
525: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
526: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: l_item_type : '|| l_item_type);
527: END IF;
528:
529: IF l_item_type IS NOT NULL THEN

Line 542: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

538: INTO l_org_id
539: FROM ra_cm_requests_all
540: WHERE request_id = p_dispute_id;
541:
542: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
543: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: l_org_id: ' || l_org_id);
544: END IF;
545: ----------------------------------------------------------
546: l_debug_mesg := 'Get the org_id for the credit memo request';

Line 550: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

546: l_debug_mesg := 'Get the org_id for the credit memo request';
547: ----------------------------------------------------------
548:
549: mo_global.set_policy_context('S', l_org_id);
550: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
551: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: l_org_id: ' || l_org_id);
552: END IF;
553:
554: EXCEPTION

Line 558: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

554: EXCEPTION
555: WHEN others THEN
556: ROLLBACK TO CANCEL_DISPUTE;
557: x_return_status := FND_API.G_RET_STS_ERROR;
558: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
559: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - exception');
560: errmsg := SQLERRM;
561: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - errmsg='||errmsg);
562: END IF;

Line 573: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

569:
570: IF(l_function_mode = 'RUN') THEN
571:
572: l_customer_trx_id := wf_engine.getitemattrnumber(l_item_type, p_dispute_id, 'CUSTOMER_TRX_ID');
573: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
574: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: l_customer_trx_id: ' || l_customer_trx_id);
575: END IF;
576:
577: SELECT total_amount * -1

Line 582: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

578: INTO remove_from_dispute_amt
579: FROM ra_cm_requests
580: WHERE request_id = p_dispute_id;
581:
582: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
583: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: remove_from_dispute_amt: ' || remove_from_dispute_amt);
584: END IF;
585:
586: BEGIN

Line 599: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

595: ELSE
596: new_dispute_date := ps_rec.dispute_date;
597: END IF;
598:
599: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
600: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: new_dispute_date: '||new_dispute_date);
601: END IF;
602: arp_process_cutil.update_ps(p_ps_id => ps_rec.payment_schedule_id,
603: p_due_date => ps_rec.due_date,

Line 623: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

619: p_attribute12 => NULL,
620: p_attribute13 => NULL,
621: p_attribute14 => NULL,
622: p_attribute15 => NULL);
623: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
624: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: After arp_process_cutil.update_ps for p_ps_id => ' || ps_rec.payment_schedule_id);
625: END IF;
626: END LOOP;
627:

Line 628: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

624: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: After arp_process_cutil.update_ps for p_ps_id => ' || ps_rec.payment_schedule_id);
625: END IF;
626: END LOOP;
627:
628: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
629: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: End of FOR LOOP');
630: END IF;
631: END;
632:

Line 639: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

635: EXCEPTION
636: WHEN others THEN
637: ROLLBACK TO CANCEL_DISPUTE;
638: x_return_status := FND_API.G_RET_STS_ERROR;
639: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
640: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - exception');
641: errmsg := SQLERRM;
642: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - errmsg='||errmsg);
643: END IF;

Line 648: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

644: RAISE FND_API.G_EXC_ERROR;
645:
646: END;
647:
648: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
649: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: Before calling wf_engine.itemstatus');
650: END IF;
651: wf_engine.itemstatus(itemtype => l_item_type, itemkey => p_dispute_id, status => l_status, result => l_result);
652:

Line 653: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

649: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: Before calling wf_engine.itemstatus');
650: END IF;
651: wf_engine.itemstatus(itemtype => l_item_type, itemkey => p_dispute_id, status => l_status, result => l_result);
652:
653: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
654: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: after workflow status check ' || l_status || ' item key' || p_dispute_id);
655: END IF;
656:
657: IF l_status <> wf_engine.eng_completed THEN

Line 658: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

654: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: after workflow status check ' || l_status || ' item key' || p_dispute_id);
655: END IF;
656:
657: IF l_status <> wf_engine.eng_completed THEN
658: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
659: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: process has not completed and status =>' || l_status);
660: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: Calling wf_engine.abortprocess');
661: END IF;
662: BEGIN

Line 665: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

661: END IF;
662: BEGIN
663: wf_engine.abortprocess(itemtype => l_item_type, itemkey => p_dispute_id);
664: wf_engine.itemstatus(itemtype => l_item_type, itemkey => p_dispute_id, status => l_status, result => l_result);
665: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
666: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: Abort process has completed and status =>' || l_status);
667: END IF;
668:
669: EXCEPTION

Line 673: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

669: EXCEPTION
670: WHEN others THEN
671: ROLLBACK TO CANCEL_DISPUTE;
672: x_return_status := FND_API.G_RET_STS_ERROR;
673: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
674: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - exception');
675: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: abort process ' || l_item_type || 'itemkey ' || p_dispute_id || 'has failed');
676: errmsg := SQLERRM;
677: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - errmsg='||errmsg);

Line 687: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

683: ---------------------------------------------------------------------
684: l_debug_mesg := 'Insert Rejected Response notes';
685: ---------------------------------------------------------------------
686: BEGIN
687: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
688: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: Insert Rejected Response notes');
689: END IF;
690: arp_global.init_global;
691:

Line 694: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

690: arp_global.init_global;
691:
692: l_last_updated_by := arp_global.user_id;
693: l_last_update_login := arp_global.last_update_login;
694: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
695: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: l_last_updated_by: ' || l_last_updated_by || ' l_last_update_login: '|| l_last_update_login);
696: END IF;
697: l_document_id := wf_engine.getitemattrnumber(l_item_type, p_dispute_id, 'WORKFLOW_DOCUMENT_ID');
698: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 698: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

694: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
695: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: l_last_updated_by: ' || l_last_updated_by || ' l_last_update_login: '|| l_last_update_login);
696: END IF;
697: l_document_id := wf_engine.getitemattrnumber(l_item_type, p_dispute_id, 'WORKFLOW_DOCUMENT_ID');
698: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
699: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: l_document_id: '||l_document_id);
700: END IF;
701: l_customer_trx_id := wf_engine.getitemattrnumber(l_item_type, p_dispute_id, 'CUSTOMER_TRX_ID');
702: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 702: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

698: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
699: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: l_document_id: '||l_document_id);
700: END IF;
701: l_customer_trx_id := wf_engine.getitemattrnumber(l_item_type, p_dispute_id, 'CUSTOMER_TRX_ID');
702: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
703: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: l_customer_trx_id: '||l_customer_trx_id);
704: END IF;
705:
706: if l_customer_trx_id is null then

Line 712: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

708: INTO l_customer_trx_id
709: FROM ra_cm_requests
710: WHERE request_id = l_document_id;
711:
712: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
713: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: l_customer_trx_id: '||l_customer_trx_id);
714: END IF;
715: end if;
716:

Line 720: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

716:
717:
718: l_notes := wf_engine.getitemattrtext(l_item_type, p_dispute_id, 'NOTES');
719:
720: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
721: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: l_notes: '||l_notes);
722: END IF;
723:
724: fnd_message.set_name('AR', 'AR_WF_REJECTED_RESPONSE');

Line 729: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

725: fnd_message.set_token('REQUEST_ID', to_char(p_dispute_id));
726: fnd_message.set_token('APPROVER', fnd_global.user_id);
727:
728: l_note_text := fnd_message.GET;
729: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
730: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: l_note_text: ' ||l_note_text);
731: END IF;
732:
733: IF l_notes IS NOT NULL THEN

Line 749: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

745: l_creation_date := sysdate;
746: l_last_update_login := arp_global.last_update_login;
747: l_last_update_date := sysdate;
748: l_last_updated_by := fnd_global.user_id;
749: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
750: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: Before calling arp_notes_pkg.insert_cover');
751: END IF;
752: arp_notes_pkg.insert_cover(
753: p_note_type => 'MAINTAIN',

Line 770: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

766: EXCEPTION
767: WHEN others THEN
768: ROLLBACK TO CANCEL_DISPUTE;
769: x_return_status := FND_API.G_RET_STS_ERROR;
770: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
771: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - exception');
772: errmsg := SQLERRM;
773: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - errmsg='||errmsg);
774: END IF;

Line 777: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

773: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - errmsg='||errmsg);
774: END IF;
775: RAISE FND_API.G_EXC_ERROR;
776: END;
777: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
778: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: After calling arp_notes_pkg.insert_cover');
779: END IF;
780:
781: END;

Line 787: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

783:
784: -- inserting a note
785: if p_cancel_comments is not null then
786:
787: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
788: iex_debug_pub.LogMessage('CANCEL_DISPUTE: Going to build context for note...');
789: END IF;
790:
791: i := 1;

Line 826: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

822: l_context_tab(i).context_id := l_payment_schedule_id;
823: i := i + 1;
824:
825: FOR i IN 1..l_context_tab.COUNT LOOP
826: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
827: iex_debug_pub.LogMessage('CANCEL_DISPUTE: l_context_tab(' || i || ').context_type = ' || l_context_tab(i).context_type);
828: iex_debug_pub.LogMessage('CANCEL_DISPUTE: l_context_tab(' || i || ').context_id = ' || l_context_tab(i).context_id);
829: END IF;
830: END LOOP;

Line 832: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

828: iex_debug_pub.LogMessage('CANCEL_DISPUTE: l_context_tab(' || i || ').context_id = ' || l_context_tab(i).context_id);
829: END IF;
830: END LOOP;
831:
832: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
833: iex_debug_pub.LogMessage('CANCEL_DISPUTE: Calling IEX_NOTES_PVT.Create_Note...');
834: END IF;
835:
836: IEX_NOTES_PVT.Create_Note(

Line 854: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

850: x_note_id => l_note_id);
851:
852: --X_PRORESP_REC.NOTE_ID := l_note_id;
853:
854: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
855: iex_debug_pub.LogMessage('CANCEL_DISPUTE: After call to IEX_NOTES_PVT.Create_Note');
856: iex_debug_pub.LogMessage('CANCEL_DISPUTE: Status = ' || L_RETURN_STATUS);
857: END IF;
858:

Line 861: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

857: END IF;
858:
859: -- check for errors
860: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
861: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
862: iex_debug_pub.LogMessage('CANCEL_DISPUTE: IEX_NOTES_PVT.Create_Note failed');
863: END IF;
864: RAISE FND_API.G_EXC_ERROR;
865: END IF;

Line 867: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

863: END IF;
864: RAISE FND_API.G_EXC_ERROR;
865: END IF;
866: else
867: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
868: iex_debug_pub.LogMessage('CANCEL_DISPUTE: no note to save');
869: END IF;
870: end if;
871:

Line 887: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

883: p_encoded => FND_API.G_FALSE,
884: p_count => x_msg_count,
885: p_data => x_msg_data);
886:
887: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
888: IEX_DEBUG_PUB.logMessage('**** END IEX_DISPUTE_PVT.CANCEL_DISPUTE ************');
889: END IF;
890:
891: EXCEPTION

Line 895: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

891: EXCEPTION
892: WHEN FND_API.G_EXC_ERROR THEN
893: ROLLBACK TO CANCEL_DISPUTE;
894: x_return_status := FND_API.G_RET_STS_ERROR;
895: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
896: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - exception');
897: errmsg := SQLERRM;
898: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - errmsg='||errmsg);
899: END IF;

Line 904: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

900: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
901: WHEN others THEN
902: ROLLBACK TO CANCEL_DISPUTE;
903: x_return_status := FND_API.G_RET_STS_ERROR;
904: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
905: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - exception');
906: errmsg := SQLERRM;
907: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - errmsg='||errmsg);
908: END IF;