DBA Data[Home] [Help]

APPS.EGO_ITEM_BULKLOAD_PKG dependencies on ERROR_HANDLER

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

16: --------------------------------------------
17: G_LANGUAGE_CODE VARCHAR2(3);
18:
19: --------------------------------------------------------------------------
20: -- Debug Profile option used to write Error_Handler.Write_Debug --
21: -- Profile option name = INV_DEBUG_TRACE ; --
22: -- User Profile Option Name = INV: Debug Trace --
23: -- Values: 1 (True) ; 0 (False) --
24: -- NOTE: This better than MRP_DEBUG which is used at many places. --

Line 43: -- The following two variables are for Error_Handler --

39: -----------------------------------------------------------------------
40: G_RESULTFMT_USAGE_ID NUMBER;
41:
42: -------------------------------------------------------
43: -- The following two variables are for Error_Handler --
44: -------------------------------------------------------
45: G_ENTITY_ID NUMBER := NULL;
46: G_ENTITY_CODE CONSTANT VARCHAR2(30) := 'ITEM_OPER_ATTRS_ENTITY_CODE';
47:

Line 301: -- Write Debug statements to Log using Error Handler procedure --

297:
298: PRAGMA EXCEPTION_INIT(G_SEGMENT_SEQ_INVALID, -20000);
299: PRAGMA EXCEPTION_INIT(G_DATA_TYPE_INVALID, -20001);
300: -----------------------------------------------------------------
301: -- Write Debug statements to Log using Error Handler procedure --
302: -----------------------------------------------------------------
303: PROCEDURE Write_Debug (p_msg IN VARCHAR2) IS
304:
305: BEGIN

Line 311: -- NOTE: No need to check for profile now, as Error_Handler checks

307: FND_FILE.put_line(which => FND_FILE.LOG
308: ,buff => 'EGO_ITEM_BULKLOAD_PKG: '||p_msg);
309:
310: END IF;
311: -- NOTE: No need to check for profile now, as Error_Handler checks
312: -- for Error_Handler.Get_Debug = 'Y' before writing to Debug Log.
313: -- If Profile set to TRUE --
314: -- IF (G_DEBUG = 1) THEN
315: -- Error_Handler.Write_Debug('['||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS')||'] '|| p_msg);

Line 312: -- for Error_Handler.Get_Debug = 'Y' before writing to Debug Log.

308: ,buff => 'EGO_ITEM_BULKLOAD_PKG: '||p_msg);
309:
310: END IF;
311: -- NOTE: No need to check for profile now, as Error_Handler checks
312: -- for Error_Handler.Get_Debug = 'Y' before writing to Debug Log.
313: -- If Profile set to TRUE --
314: -- IF (G_DEBUG = 1) THEN
315: -- Error_Handler.Write_Debug('['||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS')||'] '|| p_msg);
316: -- END IF;

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

311: -- NOTE: No need to check for profile now, as Error_Handler checks
312: -- for Error_Handler.Get_Debug = 'Y' before writing to Debug Log.
313: -- If Profile set to TRUE --
314: -- IF (G_DEBUG = 1) THEN
315: -- Error_Handler.Write_Debug('['||TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS')||'] '|| p_msg);
316: -- END IF;
317: EXCEPTION
318: WHEN OTHERS THEN
319: NULL;

Line 368: Error_Handler.initialize();

364: l_log_return_status VARCHAR2(99);
365: l_errbuff VARCHAR2(999);
366: BEGIN
367:
368: Error_Handler.initialize();
369: Error_Handler.set_bo_identifier(G_BO_IDENTIFIER);
370:
371: ---------------------------------------------------------------------------------
372: -- Commented on 12/17/2003 (PPEDDAMA). Open_Debug_Session should set the value

Line 369: Error_Handler.set_bo_identifier(G_BO_IDENTIFIER);

365: l_errbuff VARCHAR2(999);
366: BEGIN
367:
368: Error_Handler.initialize();
369: Error_Handler.set_bo_identifier(G_BO_IDENTIFIER);
370:
371: ---------------------------------------------------------------------------------
372: -- Commented on 12/17/2003 (PPEDDAMA). Open_Debug_Session should set the value
373: -- appropriately, so that when the Debug Session is successfully opened :

Line 374: -- will return Error_Handler.Get_Debug = 'Y', else Error_Handler.Get_Debug = 'N'

370:
371: ---------------------------------------------------------------------------------
372: -- Commented on 12/17/2003 (PPEDDAMA). Open_Debug_Session should set the value
373: -- appropriately, so that when the Debug Session is successfully opened :
374: -- will return Error_Handler.Get_Debug = 'Y', else Error_Handler.Get_Debug = 'N'
375: ---------------------------------------------------------------------------------
376: -- Error_Handler.Set_Debug('Y');
377:
378: OPEN c_get_utl_file_dir;

Line 376: -- Error_Handler.Set_Debug('Y');

372: -- Commented on 12/17/2003 (PPEDDAMA). Open_Debug_Session should set the value
373: -- appropriately, so that when the Debug Session is successfully opened :
374: -- will return Error_Handler.Get_Debug = 'Y', else Error_Handler.Get_Debug = 'N'
375: ---------------------------------------------------------------------------------
376: -- Error_Handler.Set_Debug('Y');
377:
378: OPEN c_get_utl_file_dir;
379: FETCH c_get_utl_file_dir INTO l_log_output_dir;
380: --developer_debug('UTL_FILE_DIR : '||l_log_output_dir);

Line 395: -- This sets Debug value so that Error_Handler.Get_Debug returns 'Y' --

391: --developer_debug('Trying to open the Error File => '||G_ERROR_FILE_NAME);
392:
393: -----------------------------------------------------------------------
394: -- To open the Debug Session to write the Debug Log. --
395: -- This sets Debug value so that Error_Handler.Get_Debug returns 'Y' --
396: -----------------------------------------------------------------------
397: Error_Handler.Open_Debug_Session(
398: p_debug_filename => G_ERROR_FILE_NAME
399: ,p_output_dir => l_log_output_dir

Line 397: Error_Handler.Open_Debug_Session(

393: -----------------------------------------------------------------------
394: -- To open the Debug Session to write the Debug Log. --
395: -- This sets Debug value so that Error_Handler.Get_Debug returns 'Y' --
396: -----------------------------------------------------------------------
397: Error_Handler.Open_Debug_Session(
398: p_debug_filename => G_ERROR_FILE_NAME
399: ,p_output_dir => l_log_output_dir
400: ,x_return_status => l_log_return_status
401: ,x_error_mesg => l_errbuff

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

431: ----------------------------------------------------------------
432: IF (G_DEBUG = 1) THEN
433:
434: ----------------------------------------------------------------------------------
435: -- Opens Error_Handler debug session, only if Debug session is not already open.
436: -- Suggested by RFAROOK, so that multiple debug sessions are not open PER
437: -- Concurrent Request.
438: ----------------------------------------------------------------------------------
439: IF (Error_Handler.Get_Debug <> 'Y') THEN

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

435: -- Opens Error_Handler debug session, only if Debug session is not already open.
436: -- Suggested by RFAROOK, so that multiple debug sessions are not open PER
437: -- Concurrent Request.
438: ----------------------------------------------------------------------------------
439: IF (Error_Handler.Get_Debug <> 'Y') THEN
440: Open_Debug_Session_Internal;
441: END IF;
442:
443: END IF;

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

450: PROCEDURE Close_Debug_Session IS
451:
452: BEGIN
453: -----------------------------------------------------------------------------
454: -- Close Error_Handler debug session, only if Debug session is already open.
455: -----------------------------------------------------------------------------
456: IF (Error_Handler.Get_Debug = 'Y') THEN
457: Error_Handler.Close_Debug_Session;
458: END IF;

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

452: BEGIN
453: -----------------------------------------------------------------------------
454: -- Close Error_Handler debug session, only if Debug session is already open.
455: -----------------------------------------------------------------------------
456: IF (Error_Handler.Get_Debug = 'Y') THEN
457: Error_Handler.Close_Debug_Session;
458: END IF;
459:
460: END Close_Debug_Session;

Line 457: Error_Handler.Close_Debug_Session;

453: -----------------------------------------------------------------------------
454: -- Close Error_Handler debug session, only if Debug session is already open.
455: -----------------------------------------------------------------------------
456: IF (Error_Handler.Get_Debug = 'Y') THEN
457: Error_Handler.Close_Debug_Session;
458: END IF;
459:
460: END Close_Debug_Session;
461:

Line 737: l_token_tbl Error_Handler.Token_Tbl_Type;

733: l_item_num_cursor INTEGER;
734: l_item_num_exec INTEGER;
735: l_item_num_rows_cnt NUMBER;
736: l_msg fnd_new_messages.message_text%TYPE;
737: l_token_tbl Error_Handler.Token_Tbl_Type;
738:
739: BEGIN
740:
741: l_item_num_sql :=

Line 774: Error_Handler.Add_Error_Message

770: DBMS_SQL.CLOSE_CURSOR(l_item_num_cursor);
771: IF (l_item_num_rows_cnt > 0) THEN
772: FOR i IN 1..l_item_num_rows_cnt LOOP
773: Developer_Debug(l_msg||' ['||i||'] = '||l_item_num_table(i));
774: Error_Handler.Add_Error_Message
775: ( p_message_name => 'EGO_ITEM_CREATION_SUCC'
776: , p_application_id => 'EGO'
777: , p_message_text => NULL
778: , p_token_tbl => l_token_tbl

Line 1328: ELSIF (l_prod_col_name = G_INVENTORY_ITEM_STATUS) THEN-- required in error handler

1324: l_secondary_uom_code_col := l_intf_col_name;
1325: ELSIF (l_prod_col_name = G_TRACKING_QTY_IND) THEN
1326: l_tracking_qty_ind_col := l_intf_col_name;
1327: --Bug: 3969593 End
1328: ELSIF (l_prod_col_name = G_INVENTORY_ITEM_STATUS) THEN-- required in error handler
1329: l_inventory_item_status_col := l_intf_col_name;
1330: ELSIF (l_prod_col_name = G_TRADE_ITEM_DESCRIPTOR) THEN
1331: -- R12C Pack Hierarchy Changes for Trade Item Descriptor --
1332: l_trade_item_descriptor_col := l_intf_col_name;

Line 4477: -- Token tables to log errors, through Error_Handler

4473: -- used.
4474: L_ATTR_GRP_ROW_IDENT NUMBER(18);
4475:
4476: ---------------------------------------------------------
4477: -- Token tables to log errors, through Error_Handler
4478: ---------------------------------------------------------
4479: l_token_tbl_two Error_Handler.Token_Tbl_Type;
4480: l_token_tbl_one Error_Handler.Token_Tbl_Type;
4481:

Line 4479: l_token_tbl_two Error_Handler.Token_Tbl_Type;

4475:
4476: ---------------------------------------------------------
4477: -- Token tables to log errors, through Error_Handler
4478: ---------------------------------------------------------
4479: l_token_tbl_two Error_Handler.Token_Tbl_Type;
4480: l_token_tbl_one Error_Handler.Token_Tbl_Type;
4481:
4482: l_gdsn_attrs_exist VARCHAR2(1);
4483: l_dummy_char VARCHAR2(1000);

Line 4480: l_token_tbl_one Error_Handler.Token_Tbl_Type;

4476: ---------------------------------------------------------
4477: -- Token tables to log errors, through Error_Handler
4478: ---------------------------------------------------------
4479: l_token_tbl_two Error_Handler.Token_Tbl_Type;
4480: l_token_tbl_one Error_Handler.Token_Tbl_Type;
4481:
4482: l_gdsn_attrs_exist VARCHAR2(1);
4483: l_dummy_char VARCHAR2(1000);
4484: l_dummy NUMBER;

Line 5074: Error_Handler.Add_Error_Message

5070: IF ( LENGTH(l_usr_attr_data_tbl(i).ATTR_VALUE_STR) > 1000 ) THEN
5071: l_token_tbl_one(1).token_name := 'VALUE';
5072: l_token_tbl_one(1).token_value := l_usr_attr_data_tbl(i).ATTR_VALUE_STR;
5073:
5074: Error_Handler.Add_Error_Message
5075: ( p_message_name => 'EGO_STR_ATTR_LEN_GT1000_ERR'
5076: , p_application_id => 'EGO'
5077: , p_message_text => NULL
5078: , p_token_tbl => l_token_tbl_one

Line 5928: -- This sets Debug value so that Error_Handler.Get_Debug returns 'Y' --

5924: l_log_file := SUBSTR(l_err_logfile_fullpath, INSTR(l_err_logfile_fullpath, 'EGO_BULKLOAD_INTF'));
5925:
5926: -----------------------------------------------------------------------
5927: -- To open the Debug Session to write the Debug Log. --
5928: -- This sets Debug value so that Error_Handler.Get_Debug returns 'Y' --
5929: -----------------------------------------------------------------------
5930: Error_Handler.Open_Debug_Session(
5931: p_debug_filename => l_log_file
5932: ,p_output_dir => l_log_dir

Line 5930: Error_Handler.Open_Debug_Session(

5926: -----------------------------------------------------------------------
5927: -- To open the Debug Session to write the Debug Log. --
5928: -- This sets Debug value so that Error_Handler.Get_Debug returns 'Y' --
5929: -----------------------------------------------------------------------
5930: Error_Handler.Open_Debug_Session(
5931: p_debug_filename => l_log_file
5932: ,p_output_dir => l_log_dir
5933: ,x_return_status => l_retcode
5934: ,x_error_mesg => l_errbuff

Line 6092: -- Open Error Handler Debug Session.

6088: --END IF;
6089: -----------------------------------------------------------------------
6090:
6091: -----------------------------------------------------
6092: -- Open Error Handler Debug Session.
6093: -----------------------------------------------------
6094: Open_Debug_Session;
6095:
6096: Developer_Debug('Completely Reformatted EGO_ITEM_BULKLOAD_PKG with Error Handler Changes');

Line 6096: Developer_Debug('Completely Reformatted EGO_ITEM_BULKLOAD_PKG with Error Handler Changes');

6092: -- Open Error Handler Debug Session.
6093: -----------------------------------------------------
6094: Open_Debug_Session;
6095:
6096: Developer_Debug('Completely Reformatted EGO_ITEM_BULKLOAD_PKG with Error Handler Changes');
6097:
6098: Developer_Debug('After Open_Debug_Session');
6099: SetGobals();
6100: G_LANGUAGE_CODE := p_language_code;

Line 6397: Error_Handler.Log_Error(

6393:
6394: -------------------------------------------------------------
6395: -- Log Errors only to MTL_INTERFACE_ERRORS table.
6396: -------------------------------------------------------------
6397: Error_Handler.Log_Error(
6398: p_write_err_to_inttable => 'Y',
6399: p_write_err_to_debugfile => 'Y'
6400: );
6401: ------------------------------------------------------------------------

Line 6438: x_retcode := Error_Handler.G_STATUS_WARNING;

6434: Developer_Debug('Errors exist in MTL_INTERFACE_ERRORS.');
6435: l_conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('WARNING', --Status
6436: 'Completed with Warnings' --Message
6437: );
6438: x_retcode := Error_Handler.G_STATUS_WARNING;
6439: ELSE
6440: Developer_Debug('*NO* Errors exist in MTL_INTERFACE_ERRORS.');
6441: x_retcode := G_STATUS_SUCCESS;
6442: END IF;

Line 6454: -- Close Error Handler Debug Session.

6450: -- Log_created_Items(G_REQUEST_ID);
6451: -- END IF;
6452:
6453: -----------------------------------------------------
6454: -- Close Error Handler Debug Session.
6455: -----------------------------------------------------
6456:
6457: Close_Debug_Session;
6458:

Line 6471: x_retcode := Error_Handler.G_STATUS_ERROR;

6467: Developer_Debug('Exception encountered processing one of the procedures in Process_Item_Interface_lines.');
6468: Developer_Debug('error code : '|| to_char(SQLCODE));
6469: Developer_Debug('error text : '|| SQLERRM);
6470: x_errbuff := 'Error : '||to_char(SQLCODE)||'---'||SQLERRM;
6471: x_retcode := Error_Handler.G_STATUS_ERROR;
6472: Developer_Debug('Returning x_retcode : '|| x_retcode);
6473: l_conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR', --Status
6474: to_char(SQLCODE) --Message
6475: );

Line 6493: -- Close Error Handler Debug Session.

6489: COMMIT;
6490: Developer_Debug('COMMITing the error statuses for EBI Rows.');
6491:
6492: -----------------------------------------------------
6493: -- Close Error Handler Debug Session.
6494: -----------------------------------------------------
6495: Close_Debug_Session;
6496:
6497: --Exception block ends.

Line 6680: -- This sets Debug value so that Error_Handler.Get_Debug returns 'Y' --

6676: l_err_log_file_dir := SUBSTR (l_err_log_file , 0 , INSTR (l_err_log_file , 'EGO_BULKLOAD_INTF' ) - 1 );
6677: l_err_log_file_name := SUBSTR (l_err_log_file , INSTR ( l_err_log_file , 'EGO_BULKLOAD_INTF' )-1 );
6678: -----------------------------------------------------------------------
6679: -- To open the Debug Session to write the Debug Log. --
6680: -- This sets Debug value so that Error_Handler.Get_Debug returns 'Y' --
6681: -----------------------------------------------------------------------
6682: Error_Handler.Open_Debug_Session(
6683: p_debug_filename => l_err_log_file_name
6684: ,p_output_dir => l_err_log_file_dir

Line 6682: Error_Handler.Open_Debug_Session(

6678: -----------------------------------------------------------------------
6679: -- To open the Debug Session to write the Debug Log. --
6680: -- This sets Debug value so that Error_Handler.Get_Debug returns 'Y' --
6681: -----------------------------------------------------------------------
6682: Error_Handler.Open_Debug_Session(
6683: p_debug_filename => l_err_log_file_name
6684: ,p_output_dir => l_err_log_file_dir
6685: ,x_return_status => l_retCode
6686: ,x_error_mesg => l_errbuff