DBA Data[Home] [Help]

APPS.EGO_ITEM_PEOPLE_IMPORT_PKG dependencies on ERROR_HANDLER

Line 79: -- Debug Profile option used to write Error_Handler.Write_Debug --

75: --He can make grants to the items etc.,
76: G_FULL_ACCESS_ITEMS BOOLEAN := FALSE;
77:
78: -----------------------------------------------------------------------
79: -- Debug Profile option used to write Error_Handler.Write_Debug --
80: -- Profile option name = INV_DEBUG_TRACE ; --
81: -- User Profile Option Name = INV: Debug Trace --
82: -- Values: 1 (True) ; 0 (False) --
83: -- NOTE: This better than MRP_DEBUG which is used at many places. --

Line 110: Generic Error Handler API that can be used for the same.

106: /*----------------------------------------------------------------------
107: -- TODO
108:
109: 1. Didnot do a bulk call for Error writing, as Rahul said he has the
110: Generic Error Handler API that can be used for the same.
111: So referred Item Category Assignment API for coding call to Generic
112: Error API.
113:
114: ----------------------------------------------------------------------*/

Line 149: -- Writing given string to Error Handler Log File --

145: NULL;
146: END Conc_Output;
147:
148: ----------------------------------------------------------
149: -- Writing given string to Error Handler Log File --
150: ----------------------------------------------------------
151:
152: PROCEDURE Write_Debug (p_message VARCHAR2) IS
153: -- Start OF comments

Line 182: -- If Error Handler Profile set to TRUE --

178: Conc_log ('['||To_Char(SYSDATE,'DD-MON-RRRR HH24:MI:SS')|| ' => '||p_message);
179: END IF;
180: -- sri_debug(p_message);
181: -------------------------------------------------
182: -- If Error Handler Profile set to TRUE --
183: -------------------------------------------------
184: IF (G_ERR_HANDLER_DEBUG = 1) THEN
185: Error_Handler.Write_Debug('['||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS')||'] '|| p_message);
186: END IF;

Line 185: Error_Handler.Write_Debug('['||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS')||'] '|| p_message);

181: -------------------------------------------------
182: -- If Error Handler Profile set to TRUE --
183: -------------------------------------------------
184: IF (G_ERR_HANDLER_DEBUG = 1) THEN
185: Error_Handler.Write_Debug('['||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS')||'] '|| p_message);
186: END IF;
187: EXCEPTION
188: WHEN OTHERS THEN
189: ROLLBACK;

Line 246: -- To flush the errors recorded in Error Handler into --

242: NULL;
243: END purge_login_items_table;
244:
245: ----------------------------------------------------------
246: -- To flush the errors recorded in Error Handler into --
247: -- appropriate destination --
248: ----------------------------------------------------------
249: PROCEDURE write_log_now IS
250: -- Start OF comments

Line 263: ERROR_HANDLER.Log_Error(p_write_err_to_inttable => 'Y'

259:
260: BEGIN
261: G_HAS_ERRORS := TRUE;
262: IF G_TABLE_LOG THEN
263: ERROR_HANDLER.Log_Error(p_write_err_to_inttable => 'Y'
264: ,p_write_err_to_conclog => 'Y'
265: ,p_write_err_to_debugfile => 'N');
266: ELSE
267: ERROR_HANDLER.Log_Error(p_write_err_to_inttable => 'N'

Line 267: ERROR_HANDLER.Log_Error(p_write_err_to_inttable => 'N'

263: ERROR_HANDLER.Log_Error(p_write_err_to_inttable => 'Y'
264: ,p_write_err_to_conclog => 'Y'
265: ,p_write_err_to_debugfile => 'N');
266: ELSE
267: ERROR_HANDLER.Log_Error(p_write_err_to_inttable => 'N'
268: ,p_write_err_to_conclog => 'Y'
269: ,p_write_err_to_debugfile => 'N');
270: END IF;
271: EXCEPTION

Line 299: IF Error_Handler.Get_Message_Count() > p_msg_size THEN

295: -- return status of the program
296: --
297:
298: BEGIN
299: IF Error_Handler.Get_Message_Count() > p_msg_size THEN
300: write_log_now();
301: error_Handler.Initialize();
302: END IF;
303: x_retcode := RETCODE_SUCCESS;

Line 301: error_Handler.Initialize();

297:
298: BEGIN
299: IF Error_Handler.Get_Message_Count() > p_msg_size THEN
300: write_log_now();
301: error_Handler.Initialize();
302: END IF;
303: x_retcode := RETCODE_SUCCESS;
304: EXCEPTION
305: WHEN OTHERS THEN

Line 711: l_token_tbl_two Error_Handler.Token_Tbl_Type;

707: )
708: AND start_date <= NVL(cp_end_date, start_date)
709: AND NVL(end_date,cp_start_date) >= cp_start_date;
710:
711: l_token_tbl_two Error_Handler.Token_Tbl_Type;
712: l_token_tbl_one Error_Handler.Token_Tbl_Type;
713: l_grant_guid fnd_grants.grant_guid%TYPE;
714: l_temp_grant_guid fnd_grants.grant_guid%TYPE;
715:

Line 712: l_token_tbl_one Error_Handler.Token_Tbl_Type;

708: AND start_date <= NVL(cp_end_date, start_date)
709: AND NVL(end_date,cp_start_date) >= cp_start_date;
710:
711: l_token_tbl_two Error_Handler.Token_Tbl_Type;
712: l_token_tbl_one Error_Handler.Token_Tbl_Type;
713: l_grant_guid fnd_grants.grant_guid%TYPE;
714: l_temp_grant_guid fnd_grants.grant_guid%TYPE;
715:
716: l_success VARCHAR2(999);

Line 762: error_handler.Add_Error_Message

758: l_token_tbl_two(1).token_name := 'START_DATE';
759: l_token_tbl_two(1).token_value := p_start_date;
760: l_token_tbl_two(2).token_name := 'END_DATE';
761: l_token_tbl_two(2).token_value := p_end_date;
762: error_handler.Add_Error_Message
763: ( p_message_name => 'EGO_IPI_OVERLAP_GRANT'
764: , p_application_id => 'EGO'
765: , p_message_text => NULL
766: , p_token_tbl => l_token_tbl_two

Line 800: error_handler.Add_Error_Message

796: FROM MTL_SYSTEM_ITEMS_KFV
797: WHERE INVENTORY_ITEM_ID = p_inventory_item_id
798: AND ORGANIZATION_ID = p_organization_id;
799: l_token_tbl_one(1).token_value := l_item_number;
800: error_handler.Add_Error_Message
801: ( p_message_name => 'EGO_IPI_GRANT_NOT_FOUND'
802: , p_application_id => 'EGO'
803: , p_message_text => NULL
804: , p_token_tbl => l_token_tbl_one

Line 896: l_token_tbl_two Error_Handler.Token_Tbl_Type;

892: AND start_date <= NVL(cp_end_date, start_date)
893: AND NVL(end_date,cp_start_date) >= cp_start_date;
894:
895:
896: l_token_tbl_two Error_Handler.Token_Tbl_Type;
897: l_grant_guid fnd_grants.grant_guid%TYPE;
898: l_temp_grant_guid fnd_grants.grant_guid%TYPE;
899:
900: l_success VARCHAR2(999);

Line 925: error_handler.Add_Error_Message

921: l_token_tbl_two(1).token_name := 'START_DATE';
922: l_token_tbl_two(1).token_value := p_start_date;
923: l_token_tbl_two(2).token_name := 'END_DATE';
924: l_token_tbl_two(2).token_value := p_end_date;
925: error_handler.Add_Error_Message
926: ( p_message_name => 'EGO_IPI_OVERLAP_GRANT'
927: , p_application_id => 'EGO'
928: , p_message_text => NULL
929: , p_token_tbl => l_token_tbl_two

Line 1062: l_token_tbl_none Error_Handler.Token_Tbl_Type;

1058: FROM ego_item_people_intf
1059: WHERE data_set_id = cp_data_set_id
1060: AND process_status = G_PS_IN_PROCESS;
1061:
1062: l_token_tbl_none Error_Handler.Token_Tbl_Type;
1063: l_token_tbl_one Error_Handler.Token_Tbl_Type;
1064:
1065: l_user_party_id_char VARCHAR2(100);
1066: l_group_party_id_char VARCHAR2(100);

Line 1063: l_token_tbl_one Error_Handler.Token_Tbl_Type;

1059: WHERE data_set_id = cp_data_set_id
1060: AND process_status = G_PS_IN_PROCESS;
1061:
1062: l_token_tbl_none Error_Handler.Token_Tbl_Type;
1063: l_token_tbl_one Error_Handler.Token_Tbl_Type;
1064:
1065: l_user_party_id_char VARCHAR2(100);
1066: l_group_party_id_char VARCHAR2(100);
1067: l_company_party_id_char VARCHAR2(100);

Line 1155: error_handler.Add_Error_Message

1151: ELSE
1152: IF G_DEBUG_MODE >= DEBUG_MODE_ERROR THEN
1153: l_token_tbl_one(1).token_name := 'ITEM';
1154: l_token_tbl_one(1).token_value := cr.item_number;
1155: error_handler.Add_Error_Message
1156: ( p_message_name => 'EGO_IPI_GRANT_NOT_FOUND'
1157: , p_application_id => 'EGO'
1158: , p_message_text => NULL
1159: , p_token_tbl => l_token_tbl_one

Line 1376: Error_Handler.Open_Debug_Session(

1372:
1373: G_ERROR_FILE_NAME := G_ERROR_TABLE_NAME||'_'||to_char(sysdate, 'DDMONYYYY_HH24MISS')||'.err';
1374: --Conc_Log('Trying to open the Error File => '||G_ERROR_FILE_NAME);
1375:
1376: Error_Handler.Open_Debug_Session(
1377: p_debug_filename => G_ERROR_FILE_NAME
1378: ,p_output_dir => l_log_output_dir
1379: ,x_return_status => l_log_return_status
1380: ,x_error_mesg => l_errbuff

Line 1658: l_token_tbl_none Error_Handler.Token_Tbl_Type;

1654: SELECT VALUE
1655: FROM V$PARAMETER
1656: WHERE NAME = 'utl_file_dir';
1657:
1658: l_token_tbl_none Error_Handler.Token_Tbl_Type;
1659: l_token_tbl_one Error_Handler.Token_Tbl_Type;
1660: l_token_tbl_two Error_Handler.Token_Tbl_Type;
1661: l_token_tbl_three Error_Handler.Token_Tbl_Type;
1662:

Line 1659: l_token_tbl_one Error_Handler.Token_Tbl_Type;

1655: FROM V$PARAMETER
1656: WHERE NAME = 'utl_file_dir';
1657:
1658: l_token_tbl_none Error_Handler.Token_Tbl_Type;
1659: l_token_tbl_one Error_Handler.Token_Tbl_Type;
1660: l_token_tbl_two Error_Handler.Token_Tbl_Type;
1661: l_token_tbl_three Error_Handler.Token_Tbl_Type;
1662:
1663: l_login_party_id hz_parties.party_id%TYPE;

Line 1660: l_token_tbl_two Error_Handler.Token_Tbl_Type;

1656: WHERE NAME = 'utl_file_dir';
1657:
1658: l_token_tbl_none Error_Handler.Token_Tbl_Type;
1659: l_token_tbl_one Error_Handler.Token_Tbl_Type;
1660: l_token_tbl_two Error_Handler.Token_Tbl_Type;
1661: l_token_tbl_three Error_Handler.Token_Tbl_Type;
1662:
1663: l_login_party_id hz_parties.party_id%TYPE;
1664: l_login_party_name VARCHAR2(240);

Line 1661: l_token_tbl_three Error_Handler.Token_Tbl_Type;

1657:
1658: l_token_tbl_none Error_Handler.Token_Tbl_Type;
1659: l_token_tbl_one Error_Handler.Token_Tbl_Type;
1660: l_token_tbl_two Error_Handler.Token_Tbl_Type;
1661: l_token_tbl_three Error_Handler.Token_Tbl_Type;
1662:
1663: l_login_party_id hz_parties.party_id%TYPE;
1664: l_login_party_name VARCHAR2(240);
1665: l_ipi_lines_count NUMBER;

Line 1681: l_log_mesg_token_tbl ERROR_HANDLER.Mesg_Token_Tbl_Type;

1677: l_inventory_item_id NUMBER;
1678:
1679: l_log_output_dir VARCHAR2(200);
1680: l_log_return_status VARCHAR2(99);
1681: l_log_mesg_token_tbl ERROR_HANDLER.Mesg_Token_Tbl_Type;
1682:
1683: l_program_name VARCHAR2(30) := 'LOAD_INTERFACE_LINES';
1684: l_err_msg_sql VARCHAR2(4000);
1685: --

Line 1706: ERROR_HANDLER.initialize();

1702: ------------------------------------------------------------
1703: G_DEBUG_MODE := DEBUG_MODE_ERROR;
1704: END IF; -- IF p_debug_mode
1705:
1706: ERROR_HANDLER.initialize();
1707: ERROR_HANDLER.set_bo_identifier(G_BO_IDENTIFIER);
1708:
1709: --Opens Error_Handler debug session, only if Debug session is not already open.
1710: IF (Error_Handler.Get_Debug <> 'Y') THEN

Line 1707: ERROR_HANDLER.set_bo_identifier(G_BO_IDENTIFIER);

1703: G_DEBUG_MODE := DEBUG_MODE_ERROR;
1704: END IF; -- IF p_debug_mode
1705:
1706: ERROR_HANDLER.initialize();
1707: ERROR_HANDLER.set_bo_identifier(G_BO_IDENTIFIER);
1708:
1709: --Opens Error_Handler debug session, only if Debug session is not already open.
1710: IF (Error_Handler.Get_Debug <> 'Y') THEN
1711: Open_Debug_Session;

Line 1709: --Opens Error_Handler debug session, only if Debug session is not already open.

1705:
1706: ERROR_HANDLER.initialize();
1707: ERROR_HANDLER.set_bo_identifier(G_BO_IDENTIFIER);
1708:
1709: --Opens Error_Handler debug session, only if Debug session is not already open.
1710: IF (Error_Handler.Get_Debug <> 'Y') THEN
1711: Open_Debug_Session;
1712: END IF;
1713:

Line 1710: IF (Error_Handler.Get_Debug <> 'Y') THEN

1706: ERROR_HANDLER.initialize();
1707: ERROR_HANDLER.set_bo_identifier(G_BO_IDENTIFIER);
1708:
1709: --Opens Error_Handler debug session, only if Debug session is not already open.
1710: IF (Error_Handler.Get_Debug <> 'Y') THEN
1711: Open_Debug_Session;
1712: END IF;
1713:
1714: Write_Debug('Start of the Process');

Line 1760: error_handler.Add_Error_Message

1756: FETCH c_count_ipi_lines INTO l_ipi_lines_count;
1757: CLOSE c_count_ipi_lines;
1758: IF l_ipi_lines_count = 0 THEN
1759: IF G_DEBUG_MODE >= DEBUG_MODE_ERROR THEN
1760: error_handler.Add_Error_Message
1761: ( p_message_name => 'EGO_IPI_NO_LINES'
1762: , p_application_id => 'EGO'
1763: , p_message_text => NULL
1764: , p_token_tbl => l_token_tbl_none

Line 1867: error_handler.Add_Error_Message

1863: SET process_status = G_PS_ERROR
1864: WHERE CURRENT OF c_err_mand_params;
1865: IF G_DEBUG_MODE >= DEBUG_MODE_ERROR THEN
1866: l_msg_name := 'EGO_INTF_MAND_PARAM_MISSING';
1867: error_handler.Add_Error_Message
1868: ( p_message_name => l_msg_name
1869: , p_application_id => 'EGO'
1870: , p_message_text => NULL
1871: , p_token_tbl => l_token_tbl_none

Line 1897: error_handler.Add_Error_Message

1893: SET process_status = G_PS_ERROR
1894: WHERE CURRENT OF c_err_dates;
1895: IF G_DEBUG_MODE >= DEBUG_MODE_ERROR THEN
1896: l_msg_name := 'EGO_IPI_INVALID_DATES';
1897: error_handler.Add_Error_Message
1898: ( p_message_name => l_msg_name
1899: , p_application_id => 'EGO'
1900: , p_message_text => NULL
1901: , p_token_tbl => l_token_tbl_none

Line 1932: error_handler.Add_Error_Message

1928: l_msg_name := 'EGO_IPI_MISSING_VALUE';
1929: l_token_tbl_one(1).token_name := 'VALUE';
1930: l_token_tbl_one(1).token_value := 'TRANSACTION TYPE';
1931:
1932: error_handler.Add_Error_Message
1933: ( p_message_name => l_msg_name
1934: , p_application_id => 'EGO'
1935: , p_message_text => NULL
1936: , p_token_tbl => l_token_tbl_one

Line 1951: error_handler.Add_Error_Message

1947: l_token_tbl_two(1).token_name := 'NAME';
1948: l_token_tbl_two(1).token_value := 'TRANSACTION TYPE';
1949: l_token_tbl_two(2).token_name := 'VALUE';
1950: l_token_tbl_two(2).token_value := cr.transaction_type;
1951: error_handler.Add_Error_Message
1952: ( p_message_name => l_msg_name
1953: , p_application_id => 'EGO'
1954: , p_message_text => NULL
1955: , p_token_tbl => l_token_tbl_two

Line 1989: error_handler.Add_Error_Message

1985: Write_Debug (to_char(cr.transaction_id)||' Missing Grantee Type');
1986: l_msg_name := 'EGO_IPI_MISSING_VALUE';
1987: l_token_tbl_one(1).token_name := 'VALUE';
1988: l_token_tbl_one(1).token_value := 'GRANTEE TYPE';
1989: error_handler.Add_Error_Message
1990: ( p_message_name => l_msg_name
1991: , p_application_id => 'EGO'
1992: , p_message_text => NULL
1993: , p_token_tbl => l_token_tbl_one

Line 2010: error_handler.Add_Error_Message

2006: l_token_tbl_two(1).token_name := 'NAME';
2007: l_token_tbl_two(1).token_value := 'GRANTEE TYPE';
2008: l_token_tbl_two(2).token_name := 'VALUE';
2009: l_token_tbl_two(2).token_value := cr.grantee_type;
2010: error_handler.Add_Error_Message
2011: ( p_message_name => l_msg_name
2012: , p_application_id => 'EGO'
2013: , p_message_text => NULL
2014: , p_token_tbl => l_token_tbl_two

Line 2126: error_handler.Add_Error_Message

2122: Write_Debug (to_char(cr.transaction_id) || ' Missing Grantee Name ');
2123: l_msg_name := 'EGO_IPI_MISSING_VALUE';
2124: l_token_tbl_one(1).token_name := 'VALUE';
2125: l_token_tbl_one(1).token_value := 'GRANTEE NAME';
2126: error_handler.Add_Error_Message
2127: ( p_message_name => l_msg_name
2128: , p_application_id => 'EGO'
2129: , p_message_text => NULL
2130: , p_token_tbl => l_token_tbl_one

Line 2145: error_handler.Add_Error_Message

2141: l_token_tbl_two(1).token_name := 'NAME';
2142: l_token_tbl_two(1).token_value := 'GRANTEE NAME';
2143: l_token_tbl_two(2).token_name := 'VALUE';
2144: l_token_tbl_two(2).token_value := cr.grantee_name;
2145: error_handler.Add_Error_Message
2146: ( p_message_name => l_msg_name
2147: , p_application_id => 'EGO'
2148: , p_message_text => NULL
2149: , p_token_tbl => l_token_tbl_two

Line 2220: error_handler.Add_Error_Message

2216: IF ( cr.display_role_name IS NULL ) THEN
2217: l_msg_name := 'EGO_IPI_MISSING_VALUE';
2218: l_token_tbl_one(1).token_name := 'VALUE';
2219: l_token_tbl_one(1).token_value := 'DISPLAY ROLE NAME';
2220: error_handler.Add_Error_Message
2221: ( p_message_name => l_msg_name
2222: , p_application_id => 'EGO'
2223: , p_message_text => NULL
2224: , p_token_tbl => l_token_tbl_one

Line 2238: error_handler.Add_Error_Message

2234: l_token_tbl_two(1).token_name := 'NAME';
2235: l_token_tbl_two(1).token_value := 'DISPLAY ROLE NAME';
2236: l_token_tbl_two(2).token_name := 'VALUE';
2237: l_token_tbl_two(2).token_value := cr.display_role_name;
2238: error_handler.Add_Error_Message
2239: ( p_message_name => l_msg_name
2240: , p_application_id => 'EGO'
2241: , p_message_text => NULL
2242: , p_token_tbl => l_token_tbl_two

Line 2378: -- error_handler.Add_Error_Message

2374: -- l_token_tbl_three(2).token_name := 'ITEM';
2375: -- l_token_tbl_three(2).token_value := cr.item_number;
2376: -- l_token_tbl_three(3).token_name := 'ORGANIZATION';
2377: -- l_token_tbl_three(3).token_value := cr.organization_code;
2378: -- error_handler.Add_Error_Message
2379: -- ( p_message_name => l_msg_name
2380: -- , p_application_id => 'EGO'
2381: -- , p_message_text => NULL
2382: -- , p_token_tbl => l_token_tbl_three

Line 2409: -- error_handler.Add_Error_Message

2405: -- IF ( cr.item_number IS NULL ) THEN
2406: -- l_msg_name := 'EGO_IPI_MISSING_VALUE';
2407: -- l_token_tbl_one(1).token_name := 'VALUE';
2408: -- l_token_tbl_one(1).token_value := 'ITEM NUMBER';
2409: -- error_handler.Add_Error_Message
2410: -- ( p_message_name => l_msg_name
2411: -- , p_application_id => 'EGO'
2412: -- , p_message_text => NULL
2413: -- , p_token_tbl => l_token_tbl_one

Line 2427: -- error_handler.Add_Error_Message

2423: -- l_token_tbl_two(1).token_name := 'ITEM';
2424: -- l_token_tbl_two(1).token_value := cr.item_number;
2425: -- l_token_tbl_two(2).token_name := 'ORGANIZATION';
2426: -- l_token_tbl_two(2).token_value := cr.organization_code;
2427: -- error_handler.Add_Error_Message
2428: -- ( p_message_name => l_msg_name
2429: -- , p_application_id => 'EGO'
2430: -- , p_message_text => NULL
2431: -- , p_token_tbl => l_token_tbl_two

Line 2531: error_handler.Add_Error_Message

2527: l_token_tbl_two(1).token_value := cr.item_number;
2528: l_token_tbl_two(2).token_name := 'ORGANIZATION';
2529: l_token_tbl_two(2).token_value := cr.organization_code;
2530: END IF;
2531: error_handler.Add_Error_Message
2532: ( p_message_name => l_msg_name
2533: , p_application_id => 'EGO'
2534: , p_message_text => NULL
2535: , p_token_tbl => l_token_tbl_two

Line 2587: error_handler.Add_Error_Message

2583: l_token_tbl_three(2).token_name := 'ITEM';
2584: l_token_tbl_three(2).token_value := cr.item_number;
2585: l_token_tbl_three(3).token_name := 'ORGANIZATION';
2586: l_token_tbl_three(3).token_value := cr.organization_code;
2587: error_handler.Add_Error_Message
2588: ( p_message_name => l_msg_name
2589: , p_application_id => 'EGO'
2590: , p_message_text => NULL
2591: , p_token_tbl => l_token_tbl_three

Line 2702: --Close Error_Handler debug session, only if Debug session is already open.

2698:
2699: Conc_Log('Loading of Item People Import Interface lines complete.');
2700:
2701: -----------------------------------------------------------------------------
2702: --Close Error_Handler debug session, only if Debug session is already open.
2703: -----------------------------------------------------------------------------
2704: IF (Error_Handler.Get_Debug = 'Y') THEN
2705: Error_Handler.Close_Debug_Session;
2706: END IF;

Line 2704: IF (Error_Handler.Get_Debug = 'Y') THEN

2700:
2701: -----------------------------------------------------------------------------
2702: --Close Error_Handler debug session, only if Debug session is already open.
2703: -----------------------------------------------------------------------------
2704: IF (Error_Handler.Get_Debug = 'Y') THEN
2705: Error_Handler.Close_Debug_Session;
2706: END IF;
2707:
2708: EXCEPTION

Line 2705: Error_Handler.Close_Debug_Session;

2701: -----------------------------------------------------------------------------
2702: --Close Error_Handler debug session, only if Debug session is already open.
2703: -----------------------------------------------------------------------------
2704: IF (Error_Handler.Get_Debug = 'Y') THEN
2705: Error_Handler.Close_Debug_Session;
2706: END IF;
2707:
2708: EXCEPTION
2709: WHEN OTHERS THEN

Line 2774: Error_Handler.Close_Debug_Session;

2770: END IF;
2771: -----------------------------------------------------
2772: -- Close Debug Session, as we cant proceed further.
2773: -----------------------------------------------------
2774: Error_Handler.Close_Debug_Session;
2775:
2776: -------------------------------------------------------------
2777: -- Rollback incomplete processing, and raise the exception
2778: -- to trace all the way up.