75: g_Msg_Index := 0;
76:
77: END Initialize;
78:
79: PROCEDURE Initialize_Error_Handler
80: IS
81: BEGIN
82: Error_Handler.Initialize;
83: Error_Handler.Set_BO_Identifier ('INV_ITEM');
78:
79: PROCEDURE Initialize_Error_Handler
80: IS
81: BEGIN
82: Error_Handler.Initialize;
83: Error_Handler.Set_BO_Identifier ('INV_ITEM');
84: END Initialize_Error_Handler;
85: ------------------------------------------------------------------------------
86:
79: PROCEDURE Initialize_Error_Handler
80: IS
81: BEGIN
82: Error_Handler.Initialize;
83: Error_Handler.Set_BO_Identifier ('INV_ITEM');
84: END Initialize_Error_Handler;
85: ------------------------------------------------------------------------------
86:
87:
80: IS
81: BEGIN
82: Error_Handler.Initialize;
83: Error_Handler.Set_BO_Identifier ('INV_ITEM');
84: END Initialize_Error_Handler;
85: ------------------------------------------------------------------------------
86:
87:
88: ----------------------------- set_Message_Level ------------------------------
500: -- Write the message into concurrent request log file,
501: FND_FILE.Put_Line (FND_FILE.Log, SUBSTRB(l_msg_text, 1,240));
502: ELSIF (g_Message_Mode = 'PLM_LOG') THEN
503:
504: -- Write into Error handler.
505: Error_Handler.Add_Error_Message
506: (p_message_text => l_msg_text
507: ,p_message_type => 'E');
508:
501: FND_FILE.Put_Line (FND_FILE.Log, SUBSTRB(l_msg_text, 1,240));
502: ELSIF (g_Message_Mode = 'PLM_LOG') THEN
503:
504: -- Write into Error handler.
505: Error_Handler.Add_Error_Message
506: (p_message_text => l_msg_text
507: ,p_message_type => 'E');
508:
509: ELSIF (g_Message_Mode = 'CONSOLE') THEN