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 371: Error_Handler.initialize();

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

Line 372: Error_Handler.set_bo_identifier(G_BO_IDENTIFIER);

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

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

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

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

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

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

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

Line 400: Error_Handler.Open_Debug_Session(

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

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

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

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

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

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

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

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

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

Line 460: Error_Handler.Close_Debug_Session;

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

Line 774: l_token_tbl Error_Handler.Token_Tbl_Type;

770: l_item_num_cursor INTEGER;
771: l_item_num_exec INTEGER;
772: l_item_num_rows_cnt NUMBER;
773: l_msg fnd_new_messages.message_text%TYPE;
774: l_token_tbl Error_Handler.Token_Tbl_Type;
775:
776: BEGIN
777:
778: l_item_num_sql :=

Line 811: Error_Handler.Add_Error_Message

807: DBMS_SQL.CLOSE_CURSOR(l_item_num_cursor);
808: IF (l_item_num_rows_cnt > 0) THEN
809: FOR i IN 1..l_item_num_rows_cnt LOOP
810: Developer_Debug(l_msg||' ['||i||'] = '||l_item_num_table(i));
811: Error_Handler.Add_Error_Message
812: ( p_message_name => 'EGO_ITEM_CREATION_SUCC'
813: , p_application_id => 'EGO'
814: , p_message_text => NULL
815: , p_token_tbl => l_token_tbl

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

1366: l_secondary_uom_code_col := l_intf_col_name;
1367: ELSIF (l_prod_col_name = G_TRACKING_QTY_IND) THEN
1368: l_tracking_qty_ind_col := l_intf_col_name;
1369: --Bug: 3969593 End
1370: ELSIF (l_prod_col_name = G_INVENTORY_ITEM_STATUS) THEN-- required in error handler
1371: l_inventory_item_status_col := l_intf_col_name;
1372: ELSIF (l_prod_col_name = G_TRADE_ITEM_DESCRIPTOR) THEN
1373: -- R12C Pack Hierarchy Changes for Trade Item Descriptor --
1374: l_trade_item_descriptor_col := l_intf_col_name;

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

4558: -- used.
4559: L_ATTR_GRP_ROW_IDENT NUMBER(18);
4560:
4561: ---------------------------------------------------------
4562: -- Token tables to log errors, through Error_Handler
4563: ---------------------------------------------------------
4564: l_token_tbl_two Error_Handler.Token_Tbl_Type;
4565: l_token_tbl_one Error_Handler.Token_Tbl_Type;
4566:

Line 4564: l_token_tbl_two Error_Handler.Token_Tbl_Type;

4560:
4561: ---------------------------------------------------------
4562: -- Token tables to log errors, through Error_Handler
4563: ---------------------------------------------------------
4564: l_token_tbl_two Error_Handler.Token_Tbl_Type;
4565: l_token_tbl_one Error_Handler.Token_Tbl_Type;
4566:
4567: l_gdsn_attrs_exist VARCHAR2(1);
4568: l_dummy_char VARCHAR2(1000);

Line 4565: l_token_tbl_one Error_Handler.Token_Tbl_Type;

4561: ---------------------------------------------------------
4562: -- Token tables to log errors, through Error_Handler
4563: ---------------------------------------------------------
4564: l_token_tbl_two Error_Handler.Token_Tbl_Type;
4565: l_token_tbl_one Error_Handler.Token_Tbl_Type;
4566:
4567: l_gdsn_attrs_exist VARCHAR2(1);
4568: l_dummy_char VARCHAR2(1000);
4569: l_dummy NUMBER;

Line 5161: Error_Handler.Add_Error_Message

5157: IF ( LENGTH(l_usr_attr_data_tbl(i).ATTR_VALUE_STR) > 1000 ) THEN
5158: l_token_tbl_one(1).token_name := 'VALUE';
5159: l_token_tbl_one(1).token_value := l_usr_attr_data_tbl(i).ATTR_VALUE_STR;
5160:
5161: Error_Handler.Add_Error_Message
5162: ( p_message_name => 'EGO_STR_ATTR_LEN_GT1000_ERR'
5163: , p_application_id => 'EGO'
5164: , p_message_text => NULL
5165: , p_token_tbl => l_token_tbl_one

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

6077: l_log_file := SUBSTR(l_err_logfile_fullpath, INSTR(l_err_logfile_fullpath, 'EGO_BULKLOAD_INTF'));
6078:
6079: -----------------------------------------------------------------------
6080: -- To open the Debug Session to write the Debug Log. --
6081: -- This sets Debug value so that Error_Handler.Get_Debug returns 'Y' --
6082: -----------------------------------------------------------------------
6083: Error_Handler.Open_Debug_Session(
6084: p_debug_filename => l_log_file
6085: ,p_output_dir => l_log_dir

Line 6083: Error_Handler.Open_Debug_Session(

6079: -----------------------------------------------------------------------
6080: -- To open the Debug Session to write the Debug Log. --
6081: -- This sets Debug value so that Error_Handler.Get_Debug returns 'Y' --
6082: -----------------------------------------------------------------------
6083: Error_Handler.Open_Debug_Session(
6084: p_debug_filename => l_log_file
6085: ,p_output_dir => l_log_dir
6086: ,x_return_status => l_retcode
6087: ,x_error_mesg => l_errbuff

Line 6245: -- Open Error Handler Debug Session.

6241: --END IF;
6242: -----------------------------------------------------------------------
6243:
6244: -----------------------------------------------------
6245: -- Open Error Handler Debug Session.
6246: -----------------------------------------------------
6247: Open_Debug_Session;
6248:
6249: Developer_Debug('Completely Reformatted EGO_ITEM_BULKLOAD_PKG with Error Handler Changes');

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

6245: -- Open Error Handler Debug Session.
6246: -----------------------------------------------------
6247: Open_Debug_Session;
6248:
6249: Developer_Debug('Completely Reformatted EGO_ITEM_BULKLOAD_PKG with Error Handler Changes');
6250:
6251: Developer_Debug('After Open_Debug_Session');
6252: SetGobals();
6253: G_LANGUAGE_CODE := p_language_code;

Line 6550: Error_Handler.Log_Error(

6546:
6547: -------------------------------------------------------------
6548: -- Log Errors only to MTL_INTERFACE_ERRORS table.
6549: -------------------------------------------------------------
6550: Error_Handler.Log_Error(
6551: p_write_err_to_inttable => 'Y',
6552: p_write_err_to_debugfile => 'Y'
6553: );
6554: ------------------------------------------------------------------------

Line 6591: x_retcode := Error_Handler.G_STATUS_WARNING;

6587: Developer_Debug('Errors exist in MTL_INTERFACE_ERRORS.');
6588: l_conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('WARNING', --Status
6589: 'Completed with Warnings' --Message
6590: );
6591: x_retcode := Error_Handler.G_STATUS_WARNING;
6592: ELSE
6593: Developer_Debug('*NO* Errors exist in MTL_INTERFACE_ERRORS.');
6594: x_retcode := G_STATUS_SUCCESS;
6595: END IF;

Line 6607: -- Close Error Handler Debug Session.

6603: -- Log_created_Items(G_REQUEST_ID);
6604: -- END IF;
6605:
6606: -----------------------------------------------------
6607: -- Close Error Handler Debug Session.
6608: -----------------------------------------------------
6609:
6610: Close_Debug_Session;
6611:

Line 6624: x_retcode := Error_Handler.G_STATUS_ERROR;

6620: Developer_Debug('Exception encountered processing one of the procedures in Process_Item_Interface_lines.');
6621: Developer_Debug('error code : '|| to_char(SQLCODE));
6622: Developer_Debug('error text : '|| SQLERRM);
6623: x_errbuff := 'Error : '||to_char(SQLCODE)||'---'||SQLERRM;
6624: x_retcode := Error_Handler.G_STATUS_ERROR;
6625: Developer_Debug('Returning x_retcode : '|| x_retcode);
6626: l_conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR', --Status
6627: to_char(SQLCODE) --Message
6628: );

Line 6646: -- Close Error Handler Debug Session.

6642: COMMIT;
6643: Developer_Debug('COMMITing the error statuses for EBI Rows.');
6644:
6645: -----------------------------------------------------
6646: -- Close Error Handler Debug Session.
6647: -----------------------------------------------------
6648: Close_Debug_Session;
6649:
6650: --Exception block ends.

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

6829: l_err_log_file_dir := SUBSTR (l_err_log_file , 0 , INSTR (l_err_log_file , 'EGO_BULKLOAD_INTF' ) - 1 );
6830: l_err_log_file_name := SUBSTR (l_err_log_file , INSTR ( l_err_log_file , 'EGO_BULKLOAD_INTF' )-1 );
6831: -----------------------------------------------------------------------
6832: -- To open the Debug Session to write the Debug Log. --
6833: -- This sets Debug value so that Error_Handler.Get_Debug returns 'Y' --
6834: -----------------------------------------------------------------------
6835: Error_Handler.Open_Debug_Session(
6836: p_debug_filename => l_err_log_file_name
6837: ,p_output_dir => l_err_log_file_dir

Line 6835: Error_Handler.Open_Debug_Session(

6831: -----------------------------------------------------------------------
6832: -- To open the Debug Session to write the Debug Log. --
6833: -- This sets Debug value so that Error_Handler.Get_Debug returns 'Y' --
6834: -----------------------------------------------------------------------
6835: Error_Handler.Open_Debug_Session(
6836: p_debug_filename => l_err_log_file_name
6837: ,p_output_dir => l_err_log_file_dir
6838: ,x_return_status => l_retCode
6839: ,x_error_mesg => l_errbuff