31: p_debug_message IN VARCHAR2
32: ) IS
33: l_err_msg VARCHAR2(240);
34: BEGIN
35: Fnd_File.Put_Line(which => Fnd_File.LOG,
36: buff => p_debug_message );
37: --Fnd_File.New_Line(which => Fnd_File.LOG );
38: EXCEPTION
39: WHEN OTHERS THEN
33: l_err_msg VARCHAR2(240);
34: BEGIN
35: Fnd_File.Put_Line(which => Fnd_File.LOG,
36: buff => p_debug_message );
37: --Fnd_File.New_Line(which => Fnd_File.LOG );
38: EXCEPTION
39: WHEN OTHERS THEN
40: l_err_msg := SUBSTRB(SQLERRM, 1, 240);
41: Fnd_File.Put_Line(which => Fnd_File.LOG,
37: --Fnd_File.New_Line(which => Fnd_File.LOG );
38: EXCEPTION
39: WHEN OTHERS THEN
40: l_err_msg := SUBSTRB(SQLERRM, 1, 240);
41: Fnd_File.Put_Line(which => Fnd_File.LOG,
42: buff => l_err_msg );
43: END Developer_Debug;
44:
45: --========================================================================
626: THEN
627: Error_Handler.Get_Message_List( x_message_list => l_error_table);
628: FOR i IN 1..l_error_table.COUNT
629: LOOP
630: FND_FILE.New_line(which => Fnd_File.LOG );
631: FND_FILE.PUT_LINE(FND_FILE.LOG,'Entity Id: '||l_error_table(i).entity_id);
632: FND_FILE.PUT_LINE(FND_FILE.LOG,'Index: '||l_error_table(i).entity_index);
633: FND_FILE.PUT_LINE(FND_FILE.LOG,'Mesg: '||l_error_table(i).message_text);
634: END LOOP;
627: Error_Handler.Get_Message_List( x_message_list => l_error_table);
628: FOR i IN 1..l_error_table.COUNT
629: LOOP
630: FND_FILE.New_line(which => Fnd_File.LOG );
631: FND_FILE.PUT_LINE(FND_FILE.LOG,'Entity Id: '||l_error_table(i).entity_id);
632: FND_FILE.PUT_LINE(FND_FILE.LOG,'Index: '||l_error_table(i).entity_index);
633: FND_FILE.PUT_LINE(FND_FILE.LOG,'Mesg: '||l_error_table(i).message_text);
634: END LOOP;
635: END IF;
628: FOR i IN 1..l_error_table.COUNT
629: LOOP
630: FND_FILE.New_line(which => Fnd_File.LOG );
631: FND_FILE.PUT_LINE(FND_FILE.LOG,'Entity Id: '||l_error_table(i).entity_id);
632: FND_FILE.PUT_LINE(FND_FILE.LOG,'Index: '||l_error_table(i).entity_index);
633: FND_FILE.PUT_LINE(FND_FILE.LOG,'Mesg: '||l_error_table(i).message_text);
634: END LOOP;
635: END IF;
636: EXCEPTION
629: LOOP
630: FND_FILE.New_line(which => Fnd_File.LOG );
631: FND_FILE.PUT_LINE(FND_FILE.LOG,'Entity Id: '||l_error_table(i).entity_id);
632: FND_FILE.PUT_LINE(FND_FILE.LOG,'Index: '||l_error_table(i).entity_index);
633: FND_FILE.PUT_LINE(FND_FILE.LOG,'Mesg: '||l_error_table(i).message_text);
634: END LOOP;
635: END IF;
636: EXCEPTION
637: WHEN OTHERS THEN