DBA Data[Home] [Help]

APPS.IEX_CASE_INFO_PUB dependencies on FND_LOG

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

22:
23: BEGIN
24:
25: if PG_DEBUG < 10 then
26: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
27: IEX_DEBUG_PUB.LogMessage('IEX_CASE_INFO_PUB.get_amount_overdue Start');
28: END IF;
29: end if;
30:

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

45: end loop;
46: close object_cur;
47:
48: if PG_DEBUG < 10 then
49: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
50: IEX_DEBUG_PUB.LogMessage('Found ' || j || ' objects for case ' || p_case_id);
51: IEX_DEBUG_PUB.LogMessage('IEX_CASE_INFO_PUB.get_amount_overdue END');
52: END IF;
53: end if;

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

86: l_total_amt := 0;
87: l_rcvble_amt := 0;
88: l_api_name := 'get_total_rcvble_for_case';
89: if PG_DEBUG < 10 then
90: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
91: IEX_DEBUG_PUB.LogMessage('PUB:'||G_PKG_NAME||'.'||l_api_name||' Start');
92: END IF;
93: end if;
94:

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

104: null;
105: end;
106:
107: if PG_DEBUG < 10 then
108: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
109: IEX_DEBUG_PUB.LogMessage('ContractID: ' || l_contract_id || ' Recvble Amt: ' || l_rcvble_amt);
110: END IF;
111: end if;
112:

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

117:
118: x_total_amt := NVL(l_total_amt, 0);
119:
120: if PG_DEBUG < 10 then
121: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
122: IEX_DEBUG_PUB.LogMessage('Total Case Overdue Amount $'||x_total_amt);
123: END IF;
124: end if;
125:

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

127: WHEN FND_API.G_EXC_ERROR THEN
128: x_return_status := FND_API.G_RET_STS_ERROR;
129: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
130: if PG_DEBUG < 10 then
131: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
132: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
133: END IF;
134: end if;
135:

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

136: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
138: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
139: if PG_DEBUG < 10 then
140: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
141: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);
142: END IF;
143: end if;
144:

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

148: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
149: END IF;
150: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
151: if PG_DEBUG < 10 then
152: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
153: IEX_DEBUG_PUB.LogMessage('Other Error ' || sqlerrm);
154: END IF;
155: end if;
156:

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

167: get_total_rcvble_for_case(p_case_id, l_amount, l_return_status) ;
168: return l_amount ;
169: EXCEPTION
170: WHEN OTHERS then
171: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
172: IEX_DEBUG_PUB.LogMessage('Exec Error - get_total_rcvble_for_case_fn ' || SQLCODE || sqlerrm);
173: END IF;
174: End ;
175:

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

207: l_api_name := 'get_total_net_book_value';
208: l_api_version := 2.0;
209: l_nbook_amt := 0;
210: if PG_DEBUG < 10 then
211: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
212: IEX_DEBUG_PUB.LogMessage('PUB:'||G_PKG_NAME||'.'||l_api_name||' Start');
213: END IF;
214: end if;
215:

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

220:
221: l_nbook_amt := 0;
222: x_return_status := OKL_CONTRACT_INFO.get_net_book_value(l_contract_id, l_nbook_amt);
223: if PG_DEBUG < 10 then
224: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
225: IEX_DEBUG_PUB.LogMessage('ContractID: ' || l_contract_id || ' Net Book: ' || l_nbook_amt);
226: END IF;
227: end if;
228:

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

238:
239: x_total_amt := NVL(l_total_amt, 0);
240:
241: if PG_DEBUG < 10 then
242: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
243: IEX_DEBUG_PUB.LogMessage('--------->Total Case Net Book Amount $'||x_total_amt);
244: END IF;
245: end if;
246:

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

248: WHEN FND_API.G_EXC_ERROR THEN
249: x_return_status := FND_API.G_RET_STS_ERROR;
250: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
251: if PG_DEBUG < 10 then
252: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
253: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
254: END IF;
255: end if;
256:

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

257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
259: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
260: if PG_DEBUG < 10 then
261: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
262: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);
263: END IF;
264: end if;
265:

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

269: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
270: END IF;
271: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
272: if PG_DEBUG < 10 then
273: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
274: IEX_DEBUG_PUB.LogMessage('Other Error ' || sqlerrm);
275: END IF;
276: end if;
277:

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

311: l_api_version := 2.0;
312: l_api_name := 'get_contract_oec';
313:
314: if PG_DEBUG < 10 then
315: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
316: IEX_DEBUG_PUB.LogMessage('PUB:'||G_PKG_NAME||'.'||l_api_name||' Start');
317: END IF;
318: end if;
319:

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

328: l_oec_amt := 0;
329: l_oec_amt := OKL_SEEDED_FUNCTIONS_PVT.contract_oec(p_chr_id => l_contract_id,
330: p_line_id => null);
331: if PG_DEBUG < 10 then
332: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
333: IEX_DEBUG_PUB.LogMessage('ContractID: ' || l_contract_id || ' OEC Amt: ' || l_oec_amt);
334: END IF;
335: end if;
336:

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

341:
342: x_total_amt := NVL(l_total_amt, 0);
343:
344: if PG_DEBUG < 10 then
345: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
346: IEX_DEBUG_PUB.LogMessage('Total Contract oec $'||x_total_amt);
347: END IF;
348: end if;
349:

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

351: WHEN FND_API.G_EXC_ERROR THEN
352: x_return_status := FND_API.G_RET_STS_ERROR;
353: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
354: if PG_DEBUG < 10 then
355: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
356: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
357: END IF;
358: end if;
359:

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

360: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
362: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
363: if PG_DEBUG < 10 then
364: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
365: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);
366: END IF;
367: end if;
368:

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

372: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
373: END IF;
374: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
375: if PG_DEBUG < 10 then
376: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
377: IEX_DEBUG_PUB.LogMessage('Other Error ' || sqlerrm);
378: END IF;
379: end if;
380:

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

413: l_tradein_amt := 0;
414: l_api_version := 2.0;
415: l_api_name := 'get_contract_tradein';
416: if PG_DEBUG < 10 then
417: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
418: IEX_DEBUG_PUB.LogMessage('PUB:'||G_PKG_NAME||'.'||l_api_name||' Start');
419: END IF;
420: end if;
421:

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

433:
434: l_tradein_amt := OKL_SEEDED_FUNCTIONS_PVT.contract_tradein(p_chr_id => l_contract_id,
435: p_line_id => null);
436: if PG_DEBUG < 10 then
437: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
438: IEX_DEBUG_PUB.LogMessage('ContractID: ' || l_contract_id || ' TradeinAmt: ' || l_tradein_amt);
439: END IF;
440: end if;
441:

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

446:
447: x_total_amt := NVL(l_total_amt, 0);
448:
449: if PG_DEBUG < 10 then
450: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
451: IEX_DEBUG_PUB.LogMessage( debug_msg => 'Total Contract Tradein $'||x_total_amt);
452: END IF;
453: end if;
454:

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

456: WHEN FND_API.G_EXC_ERROR THEN
457: x_return_status := FND_API.G_RET_STS_ERROR;
458: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
459: if PG_DEBUG < 10 then
460: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
461: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
462: END IF;
463: end if;
464:

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

465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
466: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
467: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
468: if PG_DEBUG < 10 then
469: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
470: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);
471: END IF;
472: end if;
473:

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

477: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
478: END IF;
479: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
480: if PG_DEBUG < 10 then
481: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
482: IEX_DEBUG_PUB.LogMessage('Other Error ' || sqlerrm);
483: END IF;
484: end if;
485:

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

517: l_total_amt := 0;
518: l_capred_amt := 0;
519: l_api_version := 2.0;
520: l_api_name := 'get_contract_capital_reduction';
521: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
522: IEX_DEBUG_PUB.LogMessage('PUB:'||G_PKG_NAME||'.'||l_api_name||' Start');
523: END IF;
524:
525: OPEN C_CASE(p_case_id);

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

534: l_capred_amt := 0;
535: l_capred_amt := OKL_SEEDED_FUNCTIONS_PVT.contract_capital_reduction(p_chr_id => l_contract_id,
536: p_line_id => null);
537: if PG_DEBUG < 10 then
538: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
539: IEX_DEBUG_PUB.LogMessage('ContractID: ' || l_contract_id || ' CapRed_Amt: ' || l_capred_amt);
540: END IF;
541: end if;
542:

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

547:
548: x_total_amt := NVL(l_total_amt, 0);
549:
550: if PG_DEBUG < 10 then
551: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
552: IEX_DEBUG_PUB.LogMessage('Total Capital Reduction $'||x_total_amt);
553: END IF;
554: end if;
555:

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

557: WHEN FND_API.G_EXC_ERROR THEN
558: x_return_status := FND_API.G_RET_STS_ERROR;
559: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
560: if PG_DEBUG < 10 then
561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
562: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
563: END IF;
564: end if;
565:

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

566: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
567: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
568: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
569: if PG_DEBUG < 10 then
570: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
571: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);
572: END IF;
573: end if;
574:

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

578: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
579: END IF;
580: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
581: if PG_DEBUG < 10 then
582: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
583: IEX_DEBUG_PUB.LogMessage('Other Error ' || sqlerrm);
584: END IF;
585: end if;
586: END get_contract_capital_reduction;

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

618: l_feecap_amt := 0;
619: l_api_version := 2.0;
620: l_api_name := 'get_contract_fees_capitalized';
621: if PG_DEBUG < 10 then
622: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
623: IEX_DEBUG_PUB.LogMessage('PUB:'||G_PKG_NAME||'.'||l_api_name||' Start');
624: END IF;
625: end if;
626:

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

636: l_feecap_amt := 0;
637: l_feecap_amt := OKL_SEEDED_FUNCTIONS_PVT.contract_fees_capitalized(p_chr_id => l_contract_id,
638: p_line_id => null);
639: if PG_DEBUG < 10 then
640: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
641: IEX_DEBUG_PUB.LogMessage('ContractID: ' || l_contract_id || ' FeeCap_Amt: ' || l_feecap_amt);
642: END IF;
643: end if;
644:

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

649:
650: x_total_amt := NVL(l_total_amt, 0);
651:
652: if PG_DEBUG < 10 then
653: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
654: IEX_DEBUG_PUB.LogMessage( debug_msg => 'Contract Fees Capitalized $'||x_total_amt);
655: END IF;
656: end if;
657:

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

659: WHEN FND_API.G_EXC_ERROR THEN
660: x_return_status := FND_API.G_RET_STS_ERROR;
661: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
662: if PG_DEBUG < 10 then
663: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
664: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
665: END IF;
666: end if;
667:

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

668: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
669: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
670: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
671: if PG_DEBUG < 10 then
672: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
673: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);
674: END IF;
675: end if;
676:

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

680: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
681: END IF;
682: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
683: if PG_DEBUG < 10 then
684: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
685: IEX_DEBUG_PUB.LogMessage('Other Error ' || sqlerrm);
686: END IF;
687: end if;
688: END get_contract_fees_capitalized;

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

740: l_total_feecap_amt := 0;
741: l_api_version := 2.0;
742: l_api_name := 'get_total_capital_amount';
743: if PG_DEBUG < 10 then
744: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
745: IEX_DEBUG_PUB.LogMessage('PUB:'||G_PKG_NAME||'.'||l_api_name||' Start');
746: END IF;
747: end if;
748: OPEN c_Case_id (p_case_id);

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

751:
752: x_total_amt := NVL(l_total_cap_amt, 0);
753:
754: if PG_DEBUG < 10 then
755: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
756: IEX_DEBUG_PUB.LogMessage('Total Capital Amount $'||x_total_amt);
757: END IF;
758: end if;
759:

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

761: WHEN FND_API.G_EXC_ERROR THEN
762: x_return_status := FND_API.G_RET_STS_ERROR;
763: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
764: if PG_DEBUG < 10 then
765: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
766: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
767: END IF;
768: end if;
769:

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

770: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
771: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
772: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
773: if PG_DEBUG < 10 then
774: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
775: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);
776: END IF;
777: end if;
778:

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

782: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
783: END IF;
784: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
785: if PG_DEBUG < 10 then
786: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
787: IEX_DEBUG_PUB.LogMessage('Other Error ' || sqlerrm);
788: END IF;
789: end if;
790: END get_total_capital_amount;

Line 794: PG_DEBUG := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

790: END get_total_capital_amount;
791:
792: BEGIN
793:
794: PG_DEBUG := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
795:
796:
797: END IEX_CASE_INFO_PUB;