eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IEX_CASE_UTL_PUB dependencies on FND_LOG

Line 19: PG_DEBUG NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

15: **Appends to a message the api name, parameter name and parameter Value
16: */
17:
18: --PG_DEBUG NUMBER(2) := TO_NUMBER(NVL(FND_PROFILE.value('IEX_DEBUG_LEVEL'), '20'));
19: PG_DEBUG NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
20:
21: PROCEDURE AddInvalidArgMsg
22: ( p_api_name IN VARCHAR2,
23: p_param_value IN VARCHAR2,

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

88: p_cas_rec IN iex_case_utl_pub.cas_Rec_Type,
89: x_cas_rec OUT NOCOPY iex_cases_pvt.cas_Rec_Type) IS
90: Begin
91: -- IF PG_DEBUG < 10 THEN
92: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
93: iex_debug_pub.LogMessage('Convert_case_Record: ' || '*********Start of Convert Case record *********');
94: END IF;
95: x_cas_rec.CAS_ID := p_cas_rec.CAS_ID;
96: x_cas_rec.CASE_NUMBER := p_cas_rec.CASE_NUMBER;

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

132: x_cas_rec.LAST_UPDATE_LOGIN := p_cas_rec.LAST_UPDATE_LOGIN;
133: x_cas_rec.PREDICTED_RECOVERY_AMOUNT := p_cas_rec.PREDICTED_RECOVERY_AMOUNT;
134: x_cas_rec.PREDICTED_CHANCE := p_cas_rec.PREDICTED_CHANCE;
135: -- IF PG_DEBUG < 10 THEN
136: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
137: iex_debug_pub.LogMessage('Convert_case_Record: ' || '*********End of Convert Case record *********');
138: END IF;
139:
140: end Convert_case_Record;

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

145: p_attribute_rec IN iex_case_utl_pub.cas_Rec_Type,
146: x_case_object_rec OUT NOCOPY iex_case_objects_pvt.case_object_Rec_Type)IS
147: Begin
148: -- IF PG_DEBUG < 10 THEN
149: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
150: iex_debug_pub.LogMessage('Convert_case_object_Record: ' || '*********End of Convert case object Record record *********');
151: END IF;
152: x_case_object_rec.ACTIVE_FLAG := p_attribute_rec.ACTIVE_FLAG ;
153: x_case_object_rec.REQUEST_ID := p_attribute_rec.REQUEST_ID;

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

176: x_case_object_rec.LAST_UPDATE_DATE := p_attribute_rec.LAST_UPDATE_DATE;
177: x_case_object_rec.LAST_UPDATE_LOGIN := p_attribute_rec.LAST_UPDATE_LOGIN;
178:
179: -- IF PG_DEBUG < 10 THEN
180: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
181: iex_debug_pub.LogMessage('Convert_case_object_Record: ' || '*********Start of Convert case object Record record *********');
182: END IF;
183: end Convert_case_object_Record;
184:

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

187: p_attribute_rec IN iex_case_utl_pub.cas_Rec_Type,
188: x_case_def_rec OUT NOCOPY iex_case_definitions_pvt.CASE_DEFINITION_Rec_Type) IS
189: Begin
190: -- IF PG_DEBUG < 10 THEN
191: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
192: iex_debug_pub.LogMessage('Convert_case_def_Record: ' || '*********End of Convert case def Record record *********');
193: END IF;
194: x_case_def_rec.ACTIVE_FLAG := p_attribute_rec.ACTIVE_FLAG ;
195: x_case_def_rec.REQUEST_ID := p_attribute_rec.REQUEST_ID;

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

218: x_case_def_rec.LAST_UPDATE_DATE := p_attribute_rec.LAST_UPDATE_DATE;
219: x_case_def_rec.LAST_UPDATE_LOGIN := p_attribute_rec.LAST_UPDATE_LOGIN;
220:
221: -- IF PG_DEBUG < 10 THEN
222: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
223: iex_debug_pub.LogMessage('Convert_case_def_Record: ' || '*********Start of Convert case def Record record *********');
224: END IF;
225: end Convert_case_def_Record;
226:

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

240: and active_flag ='Y';
241: tbl_ctr NUMBER ;
242: BEGIN
243: -- IF PG_DEBUG < 10 THEN
244: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
245: IEX_DEBUG_PUB.LogMessage ('*********Start of Procedure =>PopulateCaseDefTbl ********* ');
246: END IF;
247: tbl_ctr := 1;
248: FOR get_case_def_rec IN get_case_def LOOP

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

251: x_case_definition_tbl(tbl_ctr).table_name :=get_case_def_rec.table_name ;
252: tbl_ctr := tbl_ctr +1;
253: END LOOP;
254: -- IF PG_DEBUG < 10 THEN
255: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
256: IEX_DEBUG_PUB.LogMessage ('*********End of Procedure =>PopulateCaseDefTbl ********* ');
257: END IF;
258: END PopulateCaseDefTbl;
259:

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

272: and active_flag ='Y';
273:
274: BEGIN
275: -- IF PG_DEBUG < 10 THEN
276: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
277: IEX_DEBUG_PUB.LogMessage ('*********Start of Procedure =>PopCaseRec ********* ');
278: END IF;
279: FOR get_cas_rec in Case_rec_cur(p_cas_id) LOOP
280:

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

315:
316: END LOOP;
317: --get comments
318: -- IF PG_DEBUG < 10 THEN
319: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
320: IEX_DEBUG_PUB.LogMessage ('PopCaseRec: ' || 'Get comments for the case');
321: END IF;
322: For Case_comments_rec in Case_comments_cur (p_cas_id)
323: LOOP

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

324: x_cas_rec.COMMENTS :=Case_comments_rec.COMMENTS;
325: END LOOP;
326:
327: -- IF PG_DEBUG < 10 THEN
328: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
329: IEX_DEBUG_PUB.LogMessage ('*********End of Procedure =>PopCaseRec *********');
330: END IF;
331: END PopCaseRec;
332:

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

339: x_case_def_rec OUT NOCOPY
340: iex_case_definitions_pvt.case_definition_rec_type) IS
341: BEGIN
342: -- IF PG_DEBUG < 10 THEN
343: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
344: IEX_DEBUG_PUB.LogMessage ('*********Start of Procedure =>PopulateCaseDefRec*********');
345: END IF;
346: --to populate attributes 1-15 and concurrent programs
347: convert_case_def_record(p_attribute_rec,

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

350: x_case_def_rec.column_name := p_column_name;
351: x_case_def_rec.column_value := p_column_value;
352: x_case_def_rec.cas_id := p_cas_id;
353: -- IF PG_DEBUG < 10 THEN
354: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
355: IEX_DEBUG_PUB.LogMessage ('*********End of Procedure =>PopulateCaseDefRec*********');
356: END IF;
357: END PopulateCaseDefRec;
358:

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

364: p_attribute_rec IN CAS_Rec_Type := G_MISS_CAS_REC,
365: x_cas_rec OUT NOCOPY iex_cases_pvt.cas_rec_type) IS
366: BEGIN
367: -- IF PG_DEBUG < 10 THEN
368: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
369: IEX_DEBUG_PUB.LogMessage ('*********Start of Procedure =>PopulateCaseRec ********* ');
370: END IF;
371: --to populate attributes 1-15 and concurrent programs
372: convert_case_record(p_attribute_rec,x_cas_rec);

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

375: x_cas_rec.COMMENTS :=p_comments;
376: x_cas_rec.case_established_date :=p_case_established_date;
377:
378: -- IF PG_DEBUG < 10 THEN
379: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
380: IEX_DEBUG_PUB.LogMessage ('*********End of Procedure =>PopulateCaseRec *********');
381: END IF;
382: END PopulateCaseRec;
383:

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

390: iex_case_objects_pvt.case_object_rec_type)IS
391:
392: BEGIN
393: -- IF PG_DEBUG < 10 THEN
394: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
395: IEX_DEBUG_PUB.LogMessage ('*********Start of Procedure =>PopulateCaseObjectRec*********');
396: END IF;
397: --to populate attributes 1-15 and concurrent programs
398: convert_case_object_record(p_attribute_rec,x_case_object_rec);

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

400: x_case_object_rec.object_code :=p_object_code;
401: x_case_object_rec.object_id :=p_object_id;
402: x_case_object_rec.cas_id :=p_cas_id ;
403: -- IF PG_DEBUG < 10 THEN
404: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
405: IEX_DEBUG_PUB.LogMessage ('*********End of Procedure =>PopulateCaseObjectRec *********');
406: END IF;
407:
408: END PopulateCaseObjectRec;

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

552: into itemkey
553: from dual;
554:
555: -- IF PG_DEBUG < 10 THEN
556: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
557: iex_debug_pub.logmessage ('send_notification: ' || 'item Key in send notification of iex_cas_utl_pub '
558: || itemkey );
559: END IF;
560:

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

596: else
597: x_return_status := 'F';
598: end if;
599: -- IF PG_DEBUG < 10 THEN
600: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
601: iex_debug_PUB.logmessage ('send_notification: ' || 'send notification status ' || x_return_status);
602: END IF;
603: EXCEPTION
604: WHEN OTHERS THEN

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

625: vstr3 VARCHAR2(100) := ' = ';
626:
627: BEGIN
628: -- IF PG_DEBUG < 10 THEN
629: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
630: IEX_DEBUG_PUB.LogMessage ('********* Start of Function =>CheckCaseDef ******** ');
631: END IF;
632: -- IF PG_DEBUG < 10 THEN
633: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

629: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
630: IEX_DEBUG_PUB.LogMessage ('********* Start of Function =>CheckCaseDef ******** ');
631: END IF;
632: -- IF PG_DEBUG < 10 THEN
633: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
634: iex_debug_pub.logmessage ('CheckCaseDef: ' || 'table count'|| P_case_definition_tbl.COUNT );
635: END IF;
636:
637:

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

643: IF ((P_case_definition_tbl(i).column_name IS NOT NULL) and
644: (P_case_definition_tbl(i).column_value IS NOT NULL)) THEN
645:
646: -- IF PG_DEBUG < 10 THEN
647: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
648: iex_debug_pub.logmessage ('CheckCaseDef: ' || 'inside loop' ||P_case_definition_tbl(i).column_name||
649: P_case_definition_tbl(i).column_value);
650: END IF;
651:

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

663: ELSE
664: x_sql := x_sql || P_case_definition_tbl(i).column_value;
665: END IF;
666: -- IF PG_DEBUG < 10 THEN
667: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
668: IEX_DEBUG_PUB.LogMessage ('CheckCaseDef: ' || 'SQL =>'|| x_sql);
669: END IF;
670: BEGIN
671: EXECUTE IMMEDIATE x_sql INTO x_count;

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

670: BEGIN
671: EXECUTE IMMEDIATE x_sql INTO x_count;
672: If x_count =0 THEN
673: -- IF PG_DEBUG < 10 THEN
674: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
675: IEX_DEBUG_PUB.LogMessage ('CheckCaseDef: ' || 'Invalid Case defintion');
676: END IF;
677: return FALSE;
678: End if;

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

677: return FALSE;
678: End if;
679: EXCEPTION WHEN OTHERS THEN
680: -- IF PG_DEBUG < 10 THEN
681: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
682: IEX_DEBUG_PUB.LogMessage ('CheckCaseDef: ' || 'In Exception When Others =>'||SQLERRM);
683: END IF;
684: return FALSE;
685: END ;

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

685: END ;
686: END IF; --if table name is not null
687: ELSE -- else if column name or column value is null
688: -- IF PG_DEBUG < 10 THEN
689: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
690: IEX_DEBUG_PUB.LogMessage ('CheckCaseDef: ' || 'Column Name or column value is Null');
691: END IF;
692: return FALSE;
693: END IF; --if column name or column value is null

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

693: END IF; --if column name or column value is null
694: END LOOP;
695: Return TRUE;
696: -- IF PG_DEBUG < 10 THEN
697: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
698: IEX_DEBUG_PUB.LogMessage ('*************End of iex =>CheckCaseDef ******** ');
699: END IF;
700: END CheckCaseDef;
701:

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

758: l_multiple_rows VARCHAR2(32767) :='and rownum <2 ';
759:
760: BEGIN
761: -- IF PG_DEBUG < 10 THEN
762: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
763: IEX_DEBUG_PUB.LogMessage ('*********Start of Procedure =>GetCaseID ********* ');
764: END IF;
765:
766: -- clchang updated for sql bind var 05/07/2003

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

771:
772: l_table_clause := vstr7 || vstr4 || l_table_name || vstr4;
773:
774: -- IF PG_DEBUG < 10 THEN
775: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
776: IEX_DEBUG_PUB.LogMessage ('l_first_sql='|| l_first_sql);
777: IEX_DEBUG_PUB.LogMessage ('l_table_clause='|| l_table_clause);
778: END IF;
779: -- end

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

787: else
788: l_sql :=l_sql ||l_no_table_clause;
789: end if;
790: -- IF PG_DEBUG < 10 THEN
791: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
792: iex_debug_pub.logMessage('GetCaseID: ' || 'First Sql Stmt =>'||l_sql);
793: END IF;
794:
795: FOR i IN 2..P_case_definition_tbl.COUNT LOOP

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

815: ' and '||l_table_alias ||'.active_flag='||'''Y''' ;
816: */
817:
818: -- IF PG_DEBUG < 10 THEN
819: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
820: IEX_DEBUG_PUB.LogMessage ('l_sql='|| l_sql);
821: END IF;
822: -- end updated
823:

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

830: l_sql :=l_sql || ' and table_name=' ||''''||
831: l_table_name || ''''||l_end;
832: */
833: -- IF PG_DEBUG < 10 THEN
834: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
835: IEX_DEBUG_PUB.LogMessage ('l_sql='|| l_sql);
836: END IF;
837: -- end updated
838: else

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

838: else
839: l_sql :=l_sql ||l_no_table_clause||l_end;
840: end if;
841: -- IF PG_DEBUG < 10 THEN
842: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
843: iex_debug_pub.logMessage('GetCaseID: ' || ' ');
844: END IF;
845: -- IF PG_DEBUG < 10 THEN
846: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

842: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
843: iex_debug_pub.logMessage('GetCaseID: ' || ' ');
844: END IF;
845: -- IF PG_DEBUG < 10 THEN
846: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
847: iex_debug_pub.logMessage('GetCaseID: ' || 'Sql Stmt =>'||l_sql);
848: END IF;
849: END LOOP;
850: l_sql := l_sql ||l_case_sql;

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

850: l_sql := l_sql ||l_case_sql;
851:
852: l_sql := l_sql ||l_multiple_rows ;
853: -- IF PG_DEBUG < 10 THEN
854: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
855: iex_debug_pub.logMessage('GetCaseID: ' || ' ');
856: END IF;
857: -- IF PG_DEBUG < 10 THEN
858: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

854: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
855: iex_debug_pub.logMessage('GetCaseID: ' || ' ');
856: END IF;
857: -- IF PG_DEBUG < 10 THEN
858: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
859: iex_debug_pub.logMessage('GetCaseID: ' || 'Final Sql Stmt =>'||l_sql);
860: END IF;
861: BEGIN
862: EXECUTE IMMEDIATE l_sql INTO x_cas_id;

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

862: EXECUTE IMMEDIATE l_sql INTO x_cas_id;
863: EXCEPTION
864: WHEN OTHERS THEN
865: -- IF PG_DEBUG < 10 THEN
866: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
867: IEX_DEBUG_PUB.LogMessage ('GetCaseID: ' || '*********IN WHEN OTHERS => '||SQLERRM ||' ********* ');
868: END IF;
869: x_cas_id := NULL;
870: END;

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

868: END IF;
869: x_cas_id := NULL;
870: END;
871: -- IF PG_DEBUG < 10 THEN
872: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
873: IEX_DEBUG_PUB.LogMessage ('*********End of Procedure =>GetCaseID ********* ');
874: END IF;
875: END GetCaseID;
876:

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

934: and active_flag ='Y';
935:
936: BEGIN
937: -- IF PG_DEBUG < 10 THEN
938: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
939: iex_debug_pub.logMessage('CloseCase: ' || '---------------------------------');
940: END IF;
941: -- IF PG_DEBUG < 10 THEN
942: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

938: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
939: iex_debug_pub.logMessage('CloseCase: ' || '---------------------------------');
940: END IF;
941: -- IF PG_DEBUG < 10 THEN
942: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
943: IEX_DEBUG_PUB.LogMessage ('CloseCase: ' || '*********Start of Procedure => '||l_api_name||' *********');
944: END IF;
945: -- Standard Start of API savepoint
946: SAVEPOINT CLOSECASE_PUB;

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

961: FND_MSG_PUB.initialize;
962: END IF;
963:
964: -- IF PG_DEBUG < 10 THEN
965: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
966: iex_debug_pub.logMessage('CloseCase: ' || 'After Api compatability Check');
967: END IF;
968:
969: -- Initialize API return status to SUCCESS

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

984: END IF;
985: RAISE FND_API.G_EXC_ERROR;
986: END IF;
987: -- IF PG_DEBUG < 10 THEN
988: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
989: iex_debug_pub.logMessage('CloseCase: ' || 'After FND_GLOBAL_USER Check');
990: END IF;
991:
992: -- Item level validation

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

1022: END;
1023:
1024: END IF; --end of item level validation
1025: -- IF PG_DEBUG < 10 THEN
1026: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1027: iex_debug_pub.logMessage('CloseCase: ' || 'After Item validation ');
1028: END IF;
1029: -- Call update Case PVT to update the case_state to 'CLOSE';
1030: l_cas_rec.cas_id :=l_cas_id;

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

1032: l_cas_rec.case_state :='CLOSE';
1033: l_cas_rec.case_closing_date :=p_close_date;
1034:
1035: -- IF PG_DEBUG < 10 THEN
1036: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1037: iex_debug_pub.logMessage('CloseCase: ' || 'Before Calling Update PVT');
1038: END IF;
1039: iex_cases_pvt.update_cas
1040: (P_Api_Version_Number =>l_api_version_number,

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

1046: X_Msg_Count =>l_msg_count,
1047: X_Msg_Data =>l_msg_data,
1048: xo_object_version_number =>l_object_version_number);
1049: -- IF PG_DEBUG < 10 THEN
1050: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1051: iex_debug_pub.logMessage('CloseCase: ' || 'After Calling update case PVT and Status =>'||l_return_status);
1052: END IF;
1053:
1054: IF l_return_status = FND_API.G_RET_STS_ERROR then

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

1063: -- create case definitions for the new case id)
1064: --Update case object with the new case ID.
1065: IF p_copy_objects =g_yes THEN
1066: -- IF PG_DEBUG < 10 THEN
1067: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1068: iex_debug_pub.logMessage('CloseCase: ' || 'Before Calling Create Case PVT');
1069: END IF;
1070: PopCaseRec(p_cas_id =>l_cas_id,
1071: x_cas_rec =>l_cas_rec);

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

1103: else
1104: l_cas_rec.owner_resource_id := l_resource_id;
1105: end if;
1106:
1107: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1108: iex_debug_pub.logMessage('Get_assign_resource(C) : ' || 'After Calling Get_assign_resource and Status =>'||l_return_status);
1109: iex_debug_pub.logMessage('Resource ID : ' || l_cas_rec.owner_resource_id );
1110: END IF;
1111:

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

1125: X_Return_Status =>l_return_status,
1126: X_Msg_Count =>l_msg_count,
1127: X_Msg_Data =>l_msg_data);
1128: -- IF PG_DEBUG < 10 THEN
1129: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1130: iex_debug_pub.logMessage('CloseCase: ' || 'After Calling Create Case PVT and Status =>'||l_return_status);
1131: END IF;
1132: IF l_return_status = FND_API.G_RET_STS_ERROR then
1133: AddFailMsg( p_object => 'CASE',

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

1151: p_cas_id =>l_cas_new_id,
1152: p_attribute_rec =>p_cas_rec,
1153: x_case_def_rec =>l_case_definition_Rec);
1154: -- IF PG_DEBUG < 10 THEN
1155: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1156: iex_debug_pub.logMessage('CloseCase: ' || 'Before Calling Create Case Definition PVT');
1157: END IF;
1158: iex_case_definitions_pvt.create_case_definitions(
1159: P_Api_Version_Number =>l_api_version_number,

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

1165: X_Return_Status =>l_return_status,
1166: X_Msg_Count =>l_msg_count,
1167: X_Msg_Data =>l_msg_data);
1168: -- IF PG_DEBUG < 10 THEN
1169: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1170: iex_debug_pub.logMessage('CloseCase: ' || 'After Calling Create Case Definition PVT and Status =>'||l_return_status);
1171: END IF;
1172: IF l_return_status = FND_API.G_RET_STS_ERROR then
1173: AddFailMsg( p_object => 'CASE DEFINITION',

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

1177: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1178: END IF;
1179: END LOOP;
1180: -- IF PG_DEBUG < 10 THEN
1181: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1182: iex_debug_pub.logMessage('CloseCase: ' || 'End of Case Definition' );
1183: END IF;
1184: --Populate Case object record for one CASE
1185: For cas_obj_rec in get_case_objects_obj_ver_num(l_cas_id) LOOP

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

1183: END IF;
1184: --Populate Case object record for one CASE
1185: For cas_obj_rec in get_case_objects_obj_ver_num(l_cas_id) LOOP
1186: -- IF PG_DEBUG < 10 THEN
1187: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1188: IEX_DEBUG_PUB.LogMessage ('CloseCase: ' || ' the case object ID updated is =>'
1189: ||cas_obj_rec.case_object_id ||' and new cas ID is '||
1190: l_cas_new_id||' and old case id is => '||l_cas_id );
1191: END IF;

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

1196: :=cas_obj_rec.object_version_number;
1197:
1198: --Call update_case_object_pvt to update Case object_id
1199: -- IF PG_DEBUG < 10 THEN
1200: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1201: iex_debug_pub.logMessage('CloseCase: ' || 'Before Calling update Case Object PVT');
1202: END IF;
1203: iex_case_objects_pvt.update_case_objects(
1204: P_Api_Version_Number =>l_api_version_number,

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

1210: X_Msg_Count =>l_msg_count,
1211: X_Msg_Data =>l_msg_data,
1212: xo_object_version_number =>l_object_version_number);
1213: -- IF PG_DEBUG < 10 THEN
1214: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1215: iex_debug_pub.logMessage('CloseCase: ' || 'After Calling update Case Object PVT and Status =>'||l_return_status);
1216: END IF;
1217: -- Check return status from the above procedure call
1218: IF l_return_status = FND_API.G_RET_STS_ERROR then

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

1236: COMMIT WORK;
1237: END IF;
1238:
1239: -- IF PG_DEBUG < 10 THEN
1240: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1241: IEX_DEBUG_PUB.LogMessage ('CloseCase: ' || '*********End of Procedure => '||l_api_name||' *********');
1242: END IF;
1243: -- Debug Message
1244: -- Standard call to get message count and if count is 1, get message info.

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

1351:
1352:
1353: BEGIN
1354: -- IF PG_DEBUG < 10 THEN
1355: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1356: IEX_DEBUG_PUB.LogMessage ('CreateCaseObjects: ' || '*********Start of Procedure => '||l_api_name||' *********');
1357: END IF;
1358: -- Standard Start of API savepoint
1359: SAVEPOINT CREATECASEOBJECTS_PUB;

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

1374: FND_MSG_PUB.initialize;
1375: END IF;
1376:
1377: -- IF PG_DEBUG < 10 THEN
1378: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1379: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'After Api compatability Check');
1380: END IF;
1381:
1382: -- Initialize API return status to SUCCESS

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

1398: RAISE FND_API.G_EXC_ERROR;
1399: END IF;
1400:
1401: -- IF PG_DEBUG < 10 THEN
1402: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1403: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'After FND_GLOBAL_USER Check');
1404: END IF;
1405:
1406: -- Item level validation

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

1414: --l_org_id := fnd_profile.value('ORG_ID');
1415: l_org_id := mo_global.get_current_org_id;
1416: END IF;
1417: -- IF PG_DEBUG < 10 THEN
1418: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1419: IEX_DEBUG_PUB.LogMessage('CreateCaseObjects: ' || 'After ORG ID Check and Org_id is => '||l_org_id);
1420: END IF;
1421:
1422: --Default Case_established_date to sysdate if null

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

1424: (p_Case_established_date = FND_API.G_MISS_DATE) THEN
1425: l_Case_established_date := sysdate;
1426: END IF;
1427: -- IF PG_DEBUG < 10 THEN
1428: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1429: IEX_DEBUG_PUB.LogMessage('CreateCaseObjects: ' || 'After Case ESTABLISHED Date Check and case_established is => '||l_case_ESTABLISHED_DATE);
1430: END IF;
1431:
1432: -- Get object_code if not present

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

1434: (p_object_code = FND_API.G_MISS_CHAR) THEN
1435: l_object_code := 'CONTRACTS';
1436: END IF;
1437: -- IF PG_DEBUG < 10 THEN
1438: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1439: IEX_DEBUG_PUB.LogMessage('CreateCaseObjects: ' || 'After Object Code Check and object is => '||l_object_code);
1440: END IF;
1441:
1442: -- Check for required parameter object_id

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

1441:
1442: -- Check for required parameter object_id
1443: IF (p_object_id IS NULL) OR (p_object_id = FND_API.G_MISS_NUM) THEN
1444: -- IF PG_DEBUG < 10 THEN
1445: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1446: IEX_DEBUG_PUB.LogMessage('CreateCaseObjects: ' || 'Required Parameter p_object_id is invalid');
1447: END IF;
1448: AddMissingArgMsg(
1449: p_api_name => l_api_name_full,

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

1453:
1454: -- Check for required parameter party_id
1455: IF (p_party_id IS NULL) OR (p_party_id = FND_API.G_MISS_NUM) THEN
1456: -- IF PG_DEBUG < 10 THEN
1457: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1458: IEX_DEBUG_PUB.LogMessage('CreateCaseObjects: ' || 'Required Parameter p_party_id is invalid');
1459: END IF;
1460: AddMissingArgMsg(
1461: p_api_name => l_api_name_full,

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

1473: and active_flag ='Y';
1474:
1475: ELSIF ( P_case_definition_tbl.COUNT = 0 ) THEN
1476: -- IF PG_DEBUG < 10 THEN
1477: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1478: IEX_DEBUG_PUB.LogMessage('CreateCaseObjects: ' || 'Required Parameter P_case_definition_tbl is EMPTY');
1479: END IF;
1480: AddMissingArgMsg(
1481: p_api_name => l_api_name_full,

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

1484: END IF;
1485: EXCEPTION
1486: WHEN NO_DATA_FOUND THEN
1487: -- IF PG_DEBUG < 10 THEN
1488: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1489: IEX_DEBUG_PUB.LogMessage('CreateCaseObjects: ' || 'Required Parameter p_cas_id is invalid');
1490: END IF;
1491: AddInvalidArgMsg(
1492: p_api_name => l_api_name_full,

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

1499:
1500:
1501: --END IF; --end of item level validation
1502: -- IF PG_DEBUG < 10 THEN
1503: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1504: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'After Item validation ');
1505: END IF;
1506:
1507: --- Check Case Definition

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

1512: -- and create case and then finally create case object.
1513:
1514: IF (l_cas_id IS NOT NULL) AND (l_cas_id <> FND_API.G_MISS_NUM) THEN
1515: -- IF PG_DEBUG < 10 THEN
1516: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1517: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'case Id is passed '||l_cas_id);
1518: END IF;
1519: --Populate Case object record
1520: PopulateCaseObjectRec(p_object_code =>l_object_code,

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

1523: p_attribute_rec =>p_cas_rec,
1524: x_case_object_rec =>l_case_object_Rec);
1525: --Call create_case_object_pvt to create Case object_id
1526: -- IF PG_DEBUG < 10 THEN
1527: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1528: iex_debug_pub.logMessage('CreateCaseObjects: ' || '---------------------------------');
1529: END IF;
1530: iex_case_objects_pvt.Create_case_objects(
1531: P_Api_Version_Number =>l_api_version_number,

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

1538: X_Msg_Count =>l_msg_count,
1539: X_Msg_Data =>l_msg_data);
1540:
1541: -- IF PG_DEBUG < 10 THEN
1542: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1543: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Status of Create Case object PVT => '||l_return_status);
1544: END IF;
1545: -- Check return status from the above procedure call
1546: IF l_return_status = FND_API.G_RET_STS_ERROR then

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

1551: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1552: else
1553: x_case_object_id :=l_case_object_id;
1554: -- IF PG_DEBUG < 10 THEN
1555: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1556: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Value of x_case_object_id =>' ||x_case_object_id);
1557: END IF;
1558: END IF;
1559:

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

1559:
1560: ELSE -- Check if case definition is valid and
1561: --get case id for the given case definition
1562: -- IF PG_DEBUG < 10 THEN
1563: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1564: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'case Id is not passed ');
1565: END IF;
1566: -- IF PG_DEBUG < 10 THEN
1567: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1563: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1564: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'case Id is not passed ');
1565: END IF;
1566: -- IF PG_DEBUG < 10 THEN
1567: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1568: iex_debug_pub.logMessage('CreateCaseObjects: ' || '---------------------------------');
1569: END IF;
1570: If CheckCaseDef(P_case_definition_tbl) THEN
1571: -- IF PG_DEBUG < 10 THEN

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

1568: iex_debug_pub.logMessage('CreateCaseObjects: ' || '---------------------------------');
1569: END IF;
1570: If CheckCaseDef(P_case_definition_tbl) THEN
1571: -- IF PG_DEBUG < 10 THEN
1572: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1573: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'case Defintion is Valid ');
1574: END IF;
1575: --Get case Id for the given Case definition
1576: -- IF PG_DEBUG < 10 THEN

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

1573: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'case Defintion is Valid ');
1574: END IF;
1575: --Get case Id for the given Case definition
1576: -- IF PG_DEBUG < 10 THEN
1577: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1578: iex_debug_pub.logMessage('CreateCaseObjects: ' || '---------------------------------');
1579: END IF;
1580: GetCaseId(
1581: P_case_definition_tbl=>P_case_definition_tbl,

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

1581: P_case_definition_tbl=>P_case_definition_tbl,
1582: x_cas_id =>l_cas_id);
1583: --Case definition is valid and if a matching case is found
1584: -- IF PG_DEBUG < 10 THEN
1585: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1586: iex_debug_pub.logMessage('CreateCaseObjects: ' || '---------------------------------');
1587: END IF;
1588: if l_cas_id is NOT NULL THEN
1589: -- IF PG_DEBUG < 10 THEN

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

1586: iex_debug_pub.logMessage('CreateCaseObjects: ' || '---------------------------------');
1587: END IF;
1588: if l_cas_id is NOT NULL THEN
1589: -- IF PG_DEBUG < 10 THEN
1590: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1591: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Matching case is found and CAS ID is => '||l_Cas_id);
1592: END IF;
1593: --Populate Case object record
1594: PopulateCaseObjectRec(p_object_code =>l_object_code,

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

1597: p_attribute_rec =>p_cas_rec,
1598: x_case_object_rec =>l_case_object_Rec);
1599: --Call create_case_object_pvt to create Case object_id
1600: -- IF PG_DEBUG < 10 THEN
1601: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1602: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Before Calling Create Case Object PVT');
1603: END IF;
1604: -- IF PG_DEBUG < 10 THEN
1605: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1601: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1602: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Before Calling Create Case Object PVT');
1603: END IF;
1604: -- IF PG_DEBUG < 10 THEN
1605: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1606: iex_debug_pub.logMessage('CreateCaseObjects: ' || '---------------------------------');
1607: END IF;
1608: iex_case_objects_pvt.Create_case_objects(
1609: P_Api_Version_Number =>l_api_version_number,

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

1615: X_Return_Status =>l_return_status,
1616: X_Msg_Count =>l_msg_count,
1617: X_Msg_Data =>l_msg_data);
1618: -- IF PG_DEBUG < 10 THEN
1619: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1620: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'After Calling Create Case Object PVT and Status =>'||l_return_status);
1621: END IF;
1622: -- Check return status from the above procedure call
1623: IF l_return_status = FND_API.G_RET_STS_ERROR then

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

1628: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1629: else
1630: x_case_object_id :=l_case_object_id;
1631: -- IF PG_DEBUG < 10 THEN
1632: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1633: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Value of x_case_object_id =>' ||x_case_object_id);
1634: END IF;
1635:
1636: END IF;

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

1638: --If Case Definition is valid , but no matching Case,then create
1639: -- Case , Create case defintion and then create case object
1640: -- Populate Case Record
1641: -- IF PG_DEBUG < 10 THEN
1642: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1643: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Case Definition is Valid , no case found');
1644: END IF;
1645: PopulateCaseRec(p_case_number =>p_case_number,
1646: p_comments =>p_case_comments,

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

1690: else
1691: l_cas_rec.owner_resource_id := l_resource_id;
1692: end if;
1693:
1694: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1695: iex_debug_pub.logMessage('Get_assign_resource(O) : ' || 'After Calling Get_assign_resource and Status =>'||l_return_status);
1696: iex_debug_pub.logMessage('Resource ID : ' || l_cas_rec.owner_resource_id );
1697: END IF;
1698:

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

1703: -- ended by ehuh Aug 10 2003
1704:
1705: --Call iex_cases_pvt to create a case
1706: -- IF PG_DEBUG < 10 THEN
1707: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1708: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Before Calling Create Case PVT');
1709: END IF;
1710:
1711: -- IF PG_DEBUG < 10 THEN

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

1708: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Before Calling Create Case PVT');
1709: END IF;
1710:
1711: -- IF PG_DEBUG < 10 THEN
1712: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1713: iex_debug_pub.logMessage('CreateCaseObjects: ' || '---------------------------------');
1714: END IF;
1715:
1716: iex_cases_pvt.Create_CAS(

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

1723: X_Return_Status =>l_return_status,
1724: X_Msg_Count =>l_msg_count,
1725: X_Msg_Data =>l_msg_data);
1726: -- IF PG_DEBUG < 10 THEN
1727: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1728: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'After Calling Create Case PVT and Status =>'||l_return_status);
1729: END IF;
1730: IF l_return_status = FND_API.G_RET_STS_ERROR then
1731: AddFailMsg( p_object => 'CASE',

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

1743: p_cas_id =>l_cas_id,
1744: p_attribute_rec =>p_cas_rec,
1745: x_case_def_rec =>l_case_definition_Rec);
1746: -- IF PG_DEBUG < 10 THEN
1747: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1748: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Before Calling Create Case Definition PVT');
1749: END IF;
1750: -- IF PG_DEBUG < 10 THEN
1751: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1747: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1748: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Before Calling Create Case Definition PVT');
1749: END IF;
1750: -- IF PG_DEBUG < 10 THEN
1751: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1752: iex_debug_pub.logMessage('CreateCaseObjects: ' || '---------------------------------');
1753: END IF;
1754: iex_case_definitions_pvt.create_case_definitions(
1755: P_Api_Version_Number =>l_api_version_number,

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

1761: X_Return_Status =>l_return_status,
1762: X_Msg_Count =>l_msg_count,
1763: X_Msg_Data =>l_msg_data);
1764: -- IF PG_DEBUG < 10 THEN
1765: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1766: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'After Calling Create Case Definition PVT and Status =>'||l_return_status);
1767: END IF;
1768: IF l_return_status = FND_API.G_RET_STS_ERROR then
1769: AddFailMsg( p_object => 'CASE DEFINITIONS',

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

1780: p_attribute_rec =>p_cas_rec,
1781: x_case_object_rec =>l_case_object_Rec);
1782: --Call create_case_object_pvt to create Case object_id
1783: -- IF PG_DEBUG < 10 THEN
1784: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1785: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Before Calling Create Case Object PVT');
1786: END IF;
1787: -- IF PG_DEBUG < 10 THEN
1788: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

1784: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1785: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Before Calling Create Case Object PVT');
1786: END IF;
1787: -- IF PG_DEBUG < 10 THEN
1788: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1789: iex_debug_pub.logMessage('CreateCaseObjects: ' || '---------------------------------');
1790: END IF;
1791: iex_case_objects_pvt.Create_case_objects(
1792: P_Api_Version_Number =>l_api_version_number,

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

1798: X_Return_Status =>l_return_status,
1799: X_Msg_Count =>l_msg_count,
1800: X_Msg_Data =>l_msg_data);
1801: -- IF PG_DEBUG < 10 THEN
1802: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1803: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'After Calling Create Case Object PVT and Status =>'||l_return_status);
1804: END IF;
1805: -- Check return status from the above procedure call
1806: IF l_return_status = FND_API.G_RET_STS_ERROR then

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

1811: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1812: else
1813: x_case_object_id :=l_case_object_id;
1814: -- IF PG_DEBUG < 10 THEN
1815: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1816: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Value of x_case_object_id =>' ||x_case_object_id);
1817: END IF;
1818: END IF;
1819:

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

1820: END IF; -- end of if G_match_Case_id is NOT NULL
1821: ELSE -- if case Definition is invalid then error out.
1822: --How to assign value of parameter,since it is table?
1823: -- IF PG_DEBUG < 10 THEN
1824: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1825: iex_debug_pub.logMessage('CreateCaseObjects: ' || 'Case Definition is invalid');
1826: END IF;
1827: AddInvalidArgMsg(
1828: p_api_name => l_api_name_full,

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

1849: ( p_count => x_msg_count,
1850: p_data => x_msg_data
1851: );
1852: -- IF PG_DEBUG < 10 THEN
1853: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1854: IEX_DEBUG_PUB.LogMessage ('CreateCaseObjects: ' || '*********End of Procedure => '||l_api_name||' *********');
1855: END IF;
1856: EXCEPTION
1857: WHEN FND_API.G_EXC_ERROR THEN

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

1974:
1975: BEGIN
1976:
1977: -- IF PG_DEBUG < 10 THEN
1978: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1979: IEX_DEBUG_PUB.LogMessage ('ReassignCaseObjects: ' || '*********Start of Procedure => '||l_api_name||' *********');
1980: END IF;
1981: -- Standard Start of API savepoint
1982: SAVEPOINT REASSIGNCASEOBJECTS_PUB;

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

1997: FND_MSG_PUB.initialize;
1998: END IF;
1999:
2000: -- IF PG_DEBUG < 10 THEN
2001: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2002: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'After Api compatability Check');
2003: END IF;
2004:
2005: -- Initialize API return status to SUCCESS

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

2023: RAISE FND_API.G_EXC_ERROR;
2024: END IF;
2025:
2026: -- IF PG_DEBUG < 10 THEN
2027: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2028: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'After FND_GLOBAL_USER Check');
2029: END IF;
2030:
2031: -- Item level validation

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

2040: --l_org_id := fnd_profile.value('ORG_ID');
2041: l_org_id := mo_global.get_current_org_id;
2042: END IF;
2043: -- IF PG_DEBUG < 10 THEN
2044: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2045: IEX_DEBUG_PUB.LogMessage('ReassignCaseObjects: ' || 'After ORG ID Check and Org_id is => '||l_org_id);
2046: END IF;
2047:
2048: --Default Case_established_date to sysdate if null

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

2050: (p_Case_established_date = FND_API.G_MISS_DATE) THEN
2051: l_Case_established_date := sysdate;
2052: END IF;
2053: -- IF PG_DEBUG < 10 THEN
2054: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2055: IEX_DEBUG_PUB.LogMessage('ReassignCaseObjects: ' || 'After Case ESTABLISHED Date Check and case_established is => '||l_case_ESTABLISHED_DATE);
2056: END IF;
2057:
2058: -- Get object_code if not present

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

2060: (p_object_code = FND_API.G_MISS_CHAR) THEN
2061: l_object_code := 'CONTRACTS';
2062: END IF;
2063: -- IF PG_DEBUG < 10 THEN
2064: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2065: IEX_DEBUG_PUB.LogMessage('ReassignCaseObjects: ' || 'After Object Code Check and object is => '||l_object_code);
2066: END IF;
2067:
2068: -- Check for required parameter object_id

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

2067:
2068: -- Check for required parameter object_id
2069: IF (p_object_id IS NULL) OR (p_object_id = FND_API.G_MISS_NUM) THEN
2070: -- IF PG_DEBUG < 10 THEN
2071: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2072: IEX_DEBUG_PUB.LogMessage('ReassignCaseObjects: ' || 'Required Parameter p_object_id is invalid');
2073: END IF;
2074: AddMissingArgMsg(
2075: p_api_name => l_api_name_full,

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

2079:
2080: -- Check for required parameter party_id
2081: IF (p_party_id IS NULL) OR (p_party_id = FND_API.G_MISS_NUM) THEN
2082: -- IF PG_DEBUG < 10 THEN
2083: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2084: IEX_DEBUG_PUB.LogMessage('ReassignCaseObjects: ' || 'Required Parameter p_party_id is invalid');
2085: END IF;
2086: AddMissingArgMsg(
2087: p_api_name => l_api_name_full,

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

2099: and active_flag ='Y';
2100:
2101: ELSIF ( P_case_definition_tbl.COUNT = 0 ) THEN
2102: -- IF PG_DEBUG < 10 THEN
2103: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2104: IEX_DEBUG_PUB.LogMessage('ReassignCaseObjects: ' || 'Required Parameter P_case_definition_tbl is EMPTY');
2105: END IF;
2106: AddMissingArgMsg(
2107: p_api_name => l_api_name_full,

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

2110: END IF;
2111: EXCEPTION
2112: WHEN NO_DATA_FOUND THEN
2113: -- IF PG_DEBUG < 10 THEN
2114: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2115: IEX_DEBUG_PUB.LogMessage('ReassignCaseObjects: ' || 'Required Parameter p_cas_id is invalid');
2116: END IF;
2117: AddInvalidArgMsg(
2118: p_api_name => l_api_name_full,

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

2131: where a.object_id =p_object_id
2132: and b.id =a.object_id;
2133:
2134: -- IF PG_DEBUG < 10 THEN
2135: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2136: iex_debug_pub.logmessage ('ReassignCaseObjects: ' || 'old case Id ' || l_old_case_id);
2137: END IF;
2138: -- IF PG_DEBUG < 10 THEN
2139: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2135: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2136: iex_debug_pub.logmessage ('ReassignCaseObjects: ' || 'old case Id ' || l_old_case_id);
2137: END IF;
2138: -- IF PG_DEBUG < 10 THEN
2139: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2140: iex_debug_pub.logmessage ('ReassignCaseObjects: ' || 'Contract Number ' || l_contract_number);
2141: END IF;
2142:
2143: EXCEPTION WHEN OTHERS THEN

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

2147: -- Check if the case has any later stage delinquencies
2148: --if there is do not re assign, exit out.
2149: IF CheckAdvanceDelinquencies(l_old_case_id,x_del_id) THEN
2150: -- IF PG_DEBUG < 10 THEN
2151: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2152: iex_debug_pub.logmessage ('ReassignCaseObjects: ' || l_old_case_id || ' has later stage of delinquencies');
2153: END IF;
2154: fnd_message.set_name('IEX', 'IEX_ADVANCE_DEL_EXISTS');
2155: fnd_message.set_token('DEL_ID', x_del_id);

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

2180: p_operation => 'DELETE' );
2181: raise FND_API.G_EXC_ERROR;
2182: ELSE
2183: -- IF PG_DEBUG < 10 THEN
2184: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2185: iex_debug_pub.logmessage ('ReassignCaseObjects: ' || 'deletion of ' || p_object_id
2186: ||' successfull');
2187: END IF;
2188: END IF;

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

2190:
2191:
2192: --END IF; --end of item level validation
2193: -- IF PG_DEBUG < 10 THEN
2194: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2195: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'After Item validation ');
2196: END IF;
2197:
2198: --- Check Case Definition

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

2203: -- and create case and then finally create case object.
2204:
2205: IF (l_cas_id IS NOT NULL) AND (l_cas_id <> FND_API.G_MISS_NUM) THEN
2206: -- IF PG_DEBUG < 10 THEN
2207: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2208: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'case Id is passed '||l_cas_id);
2209: END IF;
2210: --Populate Case object record
2211: PopulateCaseObjectRec(p_object_code =>l_object_code,

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

2214: p_attribute_rec =>p_cas_rec,
2215: x_case_object_rec =>l_case_object_Rec);
2216: --Call create_case_object_pvt to create Case object_id
2217: -- IF PG_DEBUG < 10 THEN
2218: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2219: iex_debug_pub.logMessage('ReassignCaseObjects: ' || '---------------------------------');
2220: END IF;
2221: iex_case_objects_pvt.Create_case_objects(
2222: P_Api_Version_Number =>l_api_version_number,

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

2229: X_Msg_Count =>l_msg_count,
2230: X_Msg_Data =>l_msg_data);
2231:
2232: -- IF PG_DEBUG < 10 THEN
2233: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2234: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Status of Create Case object PVT => '||l_return_status);
2235: END IF;
2236: -- Check return status from the above procedure call
2237: IF l_return_status = FND_API.G_RET_STS_ERROR then

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

2242: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2243: else
2244: x_case_object_id :=l_case_object_id;
2245: -- IF PG_DEBUG < 10 THEN
2246: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2247: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Value of x_case_object_id =>' ||x_case_object_id);
2248: END IF;
2249: END IF;
2250:

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

2250:
2251: ELSE -- Check if case definition is valid and
2252: --get case id for the given case definition
2253: -- IF PG_DEBUG < 10 THEN
2254: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2255: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'case Id is not passed ');
2256: END IF;
2257: -- IF PG_DEBUG < 10 THEN
2258: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2254: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2255: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'case Id is not passed ');
2256: END IF;
2257: -- IF PG_DEBUG < 10 THEN
2258: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2259: iex_debug_pub.logMessage('ReassignCaseObjects: ' || '---------------------------------');
2260: END IF;
2261: If CheckCaseDef(P_case_definition_tbl) THEN
2262: -- IF PG_DEBUG < 10 THEN

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

2259: iex_debug_pub.logMessage('ReassignCaseObjects: ' || '---------------------------------');
2260: END IF;
2261: If CheckCaseDef(P_case_definition_tbl) THEN
2262: -- IF PG_DEBUG < 10 THEN
2263: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2264: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'case Defintion is Valid ');
2265: END IF;
2266: --Get case Id for the given Case definition
2267: -- IF PG_DEBUG < 10 THEN

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

2264: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'case Defintion is Valid ');
2265: END IF;
2266: --Get case Id for the given Case definition
2267: -- IF PG_DEBUG < 10 THEN
2268: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2269: iex_debug_pub.logMessage('ReassignCaseObjects: ' || '---------------------------------');
2270: END IF;
2271: GetCaseId(
2272: P_case_definition_tbl=>P_case_definition_tbl,

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

2272: P_case_definition_tbl=>P_case_definition_tbl,
2273: x_cas_id =>l_cas_id);
2274: --Case definition is valid and if a matching case is found
2275: -- IF PG_DEBUG < 10 THEN
2276: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2277: iex_debug_pub.logMessage('ReassignCaseObjects: ' || '---------------------------------');
2278: END IF;
2279: if l_cas_id is NOT NULL THEN
2280: -- IF PG_DEBUG < 10 THEN

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

2277: iex_debug_pub.logMessage('ReassignCaseObjects: ' || '---------------------------------');
2278: END IF;
2279: if l_cas_id is NOT NULL THEN
2280: -- IF PG_DEBUG < 10 THEN
2281: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2282: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Matching case is found and CAS ID is => '||l_Cas_id);
2283: END IF;
2284: --Populate Case object record
2285: PopulateCaseObjectRec(p_object_code =>l_object_code,

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

2288: p_attribute_rec =>p_cas_rec,
2289: x_case_object_rec =>l_case_object_Rec);
2290: --Call create_case_object_pvt to create Case object_id
2291: -- IF PG_DEBUG < 10 THEN
2292: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2293: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Before Calling Create Case Object PVT');
2294: END IF;
2295: -- IF PG_DEBUG < 10 THEN
2296: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2292: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2293: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Before Calling Create Case Object PVT');
2294: END IF;
2295: -- IF PG_DEBUG < 10 THEN
2296: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2297: iex_debug_pub.logMessage('ReassignCaseObjects: ' || '---------------------------------');
2298: END IF;
2299: iex_case_objects_pvt.Create_case_objects(
2300: P_Api_Version_Number =>l_api_version_number,

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

2306: X_Return_Status =>l_return_status,
2307: X_Msg_Count =>l_msg_count,
2308: X_Msg_Data =>l_msg_data);
2309: -- IF PG_DEBUG < 10 THEN
2310: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2311: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'After Calling Create Case Object PVT and Status =>'||l_return_status);
2312: END IF;
2313: -- Check return status from the above procedure call
2314: IF l_return_status = FND_API.G_RET_STS_ERROR then

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

2319: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2320: else
2321: x_case_object_id :=l_case_object_id;
2322: -- IF PG_DEBUG < 10 THEN
2323: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2324: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Value of x_case_object_id =>' ||x_case_object_id);
2325: END IF;
2326:
2327: END IF;

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

2329: --If Case Definition is valid , but no matching Case,then create
2330: -- Case , Create case defintion and then create case object
2331: -- Populate Case Record
2332: -- IF PG_DEBUG < 10 THEN
2333: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2334: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Case Definition is Valid , no case found');
2335: END IF;
2336: PopulateCaseRec(p_case_number =>p_case_number,
2337: p_comments =>p_case_comments,

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

2342: l_cas_rec.party_id :=p_party_id;
2343: --Call iex_cases_pvt to create a case
2344:
2345: -- IF PG_DEBUG < 10 THEN
2346: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2347: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Before Calling Create Case PVT');
2348: END IF;
2349: -- IF PG_DEBUG < 10 THEN
2350: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2346: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2347: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Before Calling Create Case PVT');
2348: END IF;
2349: -- IF PG_DEBUG < 10 THEN
2350: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2351: iex_debug_pub.logMessage('ReassignCaseObjects: ' || '---------------------------------');
2352: END IF;
2353:
2354: -- added by ehuh Aug 10 2003

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

2385: else
2386: l_cas_rec.owner_resource_id := l_resource_id;
2387: end if;
2388:
2389: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2390: iex_debug_pub.logMessage('Get_assign_resource(R) : ' || 'After Calling Get_assign_resource and Status =>'||l_return_status);
2391: iex_debug_pub.logMessage('Resource ID : ' || l_cas_rec.owner_resource_id );
2392: END IF;
2393:

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

2409: X_Return_Status =>l_return_status,
2410: X_Msg_Count =>l_msg_count,
2411: X_Msg_Data =>l_msg_data);
2412: -- IF PG_DEBUG < 10 THEN
2413: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2414: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'After Calling Create Case PVT and Status =>'||l_return_status);
2415: END IF;
2416: IF l_return_status = FND_API.G_RET_STS_ERROR then
2417: AddFailMsg( p_object => 'CASE',

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

2429: p_cas_id =>l_cas_id,
2430: p_attribute_rec =>p_cas_rec,
2431: x_case_def_rec =>l_case_definition_Rec);
2432: -- IF PG_DEBUG < 10 THEN
2433: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2434: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Before Calling Create Case Definition PVT');
2435: END IF;
2436: -- IF PG_DEBUG < 10 THEN
2437: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2433: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2434: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Before Calling Create Case Definition PVT');
2435: END IF;
2436: -- IF PG_DEBUG < 10 THEN
2437: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2438: iex_debug_pub.logMessage('ReassignCaseObjects: ' || '---------------------------------');
2439: END IF;
2440: iex_case_definitions_pvt.create_case_definitions(
2441: P_Api_Version_Number =>l_api_version_number,

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

2447: X_Return_Status =>l_return_status,
2448: X_Msg_Count =>l_msg_count,
2449: X_Msg_Data =>l_msg_data);
2450: -- IF PG_DEBUG < 10 THEN
2451: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2452: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'After Calling Create Case Definition PVT and Status =>'||l_return_status);
2453: END IF;
2454: IF l_return_status = FND_API.G_RET_STS_ERROR then
2455: AddFailMsg( p_object => 'CASE DEFINITIONS',

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

2466: p_attribute_rec =>p_cas_rec,
2467: x_case_object_rec =>l_case_object_Rec);
2468: --Call create_case_object_pvt to create Case object_id
2469: -- IF PG_DEBUG < 10 THEN
2470: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2471: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Before Calling Create Case Object PVT');
2472: END IF;
2473: -- IF PG_DEBUG < 10 THEN
2474: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2470: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2471: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Before Calling Create Case Object PVT');
2472: END IF;
2473: -- IF PG_DEBUG < 10 THEN
2474: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2475: iex_debug_pub.logMessage('ReassignCaseObjects: ' || '---------------------------------');
2476: END IF;
2477: iex_case_objects_pvt.Create_case_objects(
2478: P_Api_Version_Number =>l_api_version_number,

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

2484: X_Return_Status =>l_return_status,
2485: X_Msg_Count =>l_msg_count,
2486: X_Msg_Data =>l_msg_data);
2487: -- IF PG_DEBUG < 10 THEN
2488: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2489: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'After Calling Create Case Object PVT and Status =>'||l_return_status);
2490: END IF;
2491: -- Check return status from the above procedure call
2492: IF l_return_status = FND_API.G_RET_STS_ERROR then

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

2497: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2498: else
2499: x_case_object_id :=l_case_object_id;
2500: -- IF PG_DEBUG < 10 THEN
2501: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2502: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Value of x_case_object_id =>' ||x_case_object_id);
2503: END IF;
2504: END IF;
2505:

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

2506: END IF; -- end of if G_match_Case_id is NOT NULL
2507: ELSE -- if case Definition is invalid then error out.
2508: --How to assign value of parameter,since it is table?
2509: -- IF PG_DEBUG < 10 THEN
2510: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2511: iex_debug_pub.logMessage('ReassignCaseObjects: ' || 'Case Definition is invalid');
2512: END IF;
2513: AddInvalidArgMsg(
2514: p_api_name => l_api_name_full,

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

2519: END IF; --If CheckCaseDef(P_case_definition_tbl)
2520: END IF; -- (l_cas_id IS NOT NULL) OR (l_cas_id <> FND_API.G_MISS_NUM)
2521:
2522: -- IF PG_DEBUG < 10 THEN
2523: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2524: iex_debug_pub.logmessage ('ReassignCaseObjects: ' || 'Case creation over, ready for notification');
2525: END IF;
2526:
2527:

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

2528: OPEN c_contract(p_object_id);
2529: FETCH c_contract INTO l_contract_number;
2530: CLOSE c_contract;
2531: -- IF PG_DEBUG < 10 THEN
2532: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2533: iex_debug_pub.logmessage ('ReassignCaseObjects: ' || 'contract Number'||l_contract_number);
2534: END IF;
2535:
2536:

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

2537: OPEN c_getname(l_old_case_id);
2538: FETCH c_getname INTO l_case_agent;
2539: CLOSE c_getname;
2540: -- IF PG_DEBUG < 10 THEN
2541: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2542: iex_debug_pub.logmessage ('ReassignCaseObjects: ' || 'case agent'||l_case_Agent);
2543: END IF;
2544:
2545: --l_case_agent :='KWALKER';

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

2552: p_CaseAgent =>l_case_agent,
2553: x_return_status =>l_return_status);
2554: else
2555: -- IF PG_DEBUG < 10 THEN
2556: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2557: iex_debug_pub.logmessage ('ReassignCaseObjects: ' || 'Could not send notification');
2558: END IF;
2559: l_return_status :='F';
2560: end if;

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

2591: ( p_count => x_msg_count,
2592: p_data => x_msg_data
2593: );
2594: -- IF PG_DEBUG < 10 THEN
2595: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2596: IEX_DEBUG_PUB.LogMessage ('ReassignCaseObjects: ' || '*********End of Procedure => '||l_api_name||' *********');
2597: END IF;
2598: EXCEPTION
2599: WHEN FND_API.G_EXC_ERROR THEN

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

2652: := iex_cases_pvt.g_miss_cas_rec;
2653: l_object_version_number NUMBER;
2654: BEGIN
2655: -- IF PG_DEBUG < 10 THEN
2656: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2657: IEX_DEBUG_PUB.LogMessage ('UpdateCase: ' || '*********Start of Procedure => '||l_api_name||' *********');
2658: END IF;
2659: -- Standard Start of API savepoint
2660: SAVEPOINT UPDATECASE_PUB;

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

2675: FND_MSG_PUB.initialize;
2676: END IF;
2677:
2678: -- IF PG_DEBUG < 10 THEN
2679: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2680: iex_debug_pub.logMessage('UpdateCase: ' || 'After Api compatability Check');
2681: END IF;
2682:
2683: -- Initialize API return status to SUCCESS

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

2699: RAISE FND_API.G_EXC_ERROR;
2700: END IF;
2701:
2702: -- IF PG_DEBUG < 10 THEN
2703: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2704: iex_debug_pub.logMessage('UpdateCase: ' || 'After FND_GLOBAL_USER Check');
2705: END IF;
2706:
2707: -- Item level validation

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

2737: END;
2738:
2739: END IF; --end of item level validation
2740: -- IF PG_DEBUG < 10 THEN
2741: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2742: iex_debug_pub.logMessage('UpdateCase: ' || 'After Item validation ');
2743: END IF;
2744:
2745: -- Call update Case PVT to update

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

2754: l_cas_rec.object_version_number :=l_object_version_number;
2755:
2756:
2757: -- IF PG_DEBUG < 10 THEN
2758: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2759: iex_debug_pub.logMessage('UpdateCase: ' || 'Before Calling Update PVT');
2760: END IF;
2761: iex_cases_pvt.update_cas
2762: (P_Api_Version_Number =>l_api_version_number,

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

2768: X_Msg_Count =>l_msg_count,
2769: X_Msg_Data =>l_msg_data,
2770: xo_object_version_number =>l_object_version_number);
2771: -- IF PG_DEBUG < 10 THEN
2772: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2773: iex_debug_pub.logMessage('UpdateCase: ' || 'After Calling update case PVT and Status =>'||l_return_status);
2774: END IF;
2775:
2776: IF l_return_status = FND_API.G_RET_STS_ERROR then

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

2797: ( p_count => x_msg_count,
2798: p_data => x_msg_data
2799: );
2800: -- IF PG_DEBUG < 10 THEN
2801: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2802: IEX_DEBUG_PUB.LogMessage ('UpdateCase: ' || '*********End of Procedure => '||l_api_name||' *********');
2803: END IF;
2804: EXCEPTION
2805: WHEN FND_API.G_EXC_ERROR THEN

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

2879: -- := iex_case_contact_roles_pvt.g_miss_case_contact_role_rec;
2880: l_assign BOOLEAN DEFAULT FALSE;
2881: BEGIN
2882: -- IF PG_DEBUG < 10 THEN
2883: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2884: IEX_DEBUG_PUB.LogMessage ('CreateCasecontacts: ' || '*********Start of Procedure => '||l_api_name||' *********');
2885: END IF;
2886: -- Standard Start of API savepoint
2887: SAVEPOINT CREATECASECONTACTS_PUB;

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

2902: FND_MSG_PUB.initialize;
2903: END IF;
2904:
2905: -- IF PG_DEBUG < 10 THEN
2906: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2907: iex_debug_pub.logMessage('CreateCasecontacts: ' || 'After Api compatability Check');
2908: END IF;
2909:
2910: -- Initialize API return status to SUCCESS

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

2925: END IF;
2926: RAISE FND_API.G_EXC_ERROR;
2927: END IF;
2928: -- IF PG_DEBUG < 10 THEN
2929: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2930: iex_debug_pub.logMessage('CreateCasecontacts: ' || 'After FND_GLOBAL_USER Check');
2931: END IF;
2932: -- Check for required parameter cas_id
2933: IF (p_cas_id IS NULL) OR (p_cas_id = FND_API.G_MISS_NUM) THEN

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

2931: END IF;
2932: -- Check for required parameter cas_id
2933: IF (p_cas_id IS NULL) OR (p_cas_id = FND_API.G_MISS_NUM) THEN
2934: -- IF PG_DEBUG < 10 THEN
2935: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2936: IEX_DEBUG_PUB.LogMessage('CreateCasecontacts: ' || 'Required Parameter p_cas_id is invalid');
2937: END IF;
2938: AddMissingArgMsg(
2939: p_api_name => l_api_name_full,

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

2947: l_case_contact_Rec.address_id :=P_case_contact_tbl(i).address_id;
2948: l_case_contact_Rec.phone_id :=P_case_contact_tbl(i).phone_id;
2949: l_case_contact_Rec.primary_flag :=P_case_contact_tbl(i).primary_flag;
2950: -- IF PG_DEBUG < 10 THEN
2951: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2952: iex_debug_pub.logMessage('CreateCasecontacts: ' || 'Before Calling Create Case Contacts PVT');
2953: END IF;
2954: -- IF PG_DEBUG < 10 THEN
2955: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

2951: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2952: iex_debug_pub.logMessage('CreateCasecontacts: ' || 'Before Calling Create Case Contacts PVT');
2953: END IF;
2954: -- IF PG_DEBUG < 10 THEN
2955: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2956: iex_debug_pub.logMessage('CreateCasecontacts: ' || '---------------------------------');
2957: END IF;
2958: iex_case_contacts_pvt.create_case_contact(
2959: P_Api_Version_Number =>l_api_version_number,

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

2965: X_Return_Status =>l_return_status,
2966: X_Msg_Count =>l_msg_count,
2967: X_Msg_Data =>l_msg_data);
2968: -- IF PG_DEBUG < 10 THEN
2969: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2970: iex_debug_pub.logMessage('CreateCasecontacts: ' || 'After Calling Create Case'||
2971: 'contacts PVT and Status =>'||l_return_status);
2972: END IF;
2973: IF l_return_status = FND_API.G_RET_STS_ERROR then

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

2984: END IF;
2985:
2986: FOR j IN 1..P_case_contact_roles_tbl.COUNT LOOP
2987: -- IF PG_DEBUG < 10 THEN
2988: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2989: iex_debug_pub.LogMessage ('CreateCasecontacts: ' || 'Roles for contact Party_id = '||
2990: P_case_contact_roles_tbl(j).contact_party_id||
2991: 'P_case_contact_tbl(i).contact_party_id ='||
2992: P_case_contact_tbl(i).contact_party_id);

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

3006: l_case_contact_role_rec.cas_contact_role_code :=P_case_contact_roles_tbl(j).CONTACT_ROLE;
3007:
3008:
3009: -- IF PG_DEBUG < 10 THEN
3010: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3011: iex_debug_pub.logMessage('CreateCasecontacts: ' || 'Before Calling Create Case Contact roles PVT');
3012: END IF;
3013: -- IF PG_DEBUG < 10 THEN
3014: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

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

3010: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3011: iex_debug_pub.logMessage('CreateCasecontacts: ' || 'Before Calling Create Case Contact roles PVT');
3012: END IF;
3013: -- IF PG_DEBUG < 10 THEN
3014: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3015: iex_debug_pub.logMessage('CreateCasecontacts: ' || '---------------------------------');
3016: END IF;
3017: iex_case_contact_roles_pvt.create_case_contact_roles(
3018: P_Api_Version_Number =>l_api_version_number,

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

3024: X_Return_Status =>l_return_status,
3025: X_Msg_Count =>l_msg_count,
3026: X_Msg_Data =>l_msg_data);
3027: -- IF PG_DEBUG < 10 THEN
3028: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3029: iex_debug_pub.logMessage('CreateCasecontacts: ' || 'After Calling Create Case'||
3030: 'contacts roles PVT and Status =>'||l_return_status);
3031: END IF;
3032: IF l_return_status = FND_API.G_RET_STS_ERROR then

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

3038: END IF;
3039: END IF; --contact party id are similar
3040: END LOOP; --contact roles table loop
3041: -- IF PG_DEBUG < 10 THEN
3042: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3043: iex_debug_pub.logMessage('CreateCasecontacts: ' || 'After creation of Case'||
3044: 'contacts roles for cas_contact_id '||l_case_contact_id);
3045: END IF;
3046: */

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

3046: */
3047: END IF; --checking return status of case contact insert
3048: END LOOP;
3049: -- IF PG_DEBUG < 10 THEN
3050: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
3051: IEX_DEBUG_PUB.LogMessage ('CreateCasecontacts: ' || '*********End of Procedure => '||l_api_name||' *********');
3052: END IF;
3053:
3054: -- Debug Message