eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.BOM_IMPORT_PUB dependencies on ERROR_HANDLER

Line 48: l_message_list Error_Handler.Error_Tbl_Type;

44: WHERE NAME = 'utl_file_dir';
45: l_debug_file VARCHAR2(80) := pG_ouputFileName||TO_CHAR(SYSDATE,'DDMONYYHH24MISS');
46:
47: l_out_dir VARCHAR2(240);
48: l_message_list Error_Handler.Error_Tbl_Type;
49: l_debug_error_status VARCHAR2(1);
50: l_debug_error_mesg VARCHAR2(2000);
51:
52: BEGIN

Line 53: IF Error_Handler.Get_Debug <> 'Y'

49: l_debug_error_status VARCHAR2(1);
50: l_debug_error_mesg VARCHAR2(2000);
51:
52: BEGIN
53: IF Error_Handler.Get_Debug <> 'Y'
54: THEN
55: OPEN c_get_utl_file_dir;
56: FETCH c_get_utl_file_dir INTO l_out_dir;
57: IF c_get_utl_file_dir%FOUND THEN

Line 65: Error_Handler.Initialize;

61: IF INSTR(l_out_dir,',') <> 0 THEN
62: l_out_dir := SUBSTR(l_out_dir, 1, INSTR(l_out_dir, ',') - 1);
63: END IF;
64: END IF;
65: Error_Handler.Initialize;
66: Error_Handler.Set_Debug ('Y');
67: Bom_Globals.Set_Debug ('Y');
68:
69: Error_Handler.Open_Debug_Session

Line 66: Error_Handler.Set_Debug ('Y');

62: l_out_dir := SUBSTR(l_out_dir, 1, INSTR(l_out_dir, ',') - 1);
63: END IF;
64: END IF;
65: Error_Handler.Initialize;
66: Error_Handler.Set_Debug ('Y');
67: Bom_Globals.Set_Debug ('Y');
68:
69: Error_Handler.Open_Debug_Session
70: ( p_debug_filename => l_debug_file

Line 69: Error_Handler.Open_Debug_Session

65: Error_Handler.Initialize;
66: Error_Handler.Set_Debug ('Y');
67: Bom_Globals.Set_Debug ('Y');
68:
69: Error_Handler.Open_Debug_Session
70: ( p_debug_filename => l_debug_file
71: , p_output_dir => l_out_dir
72: , x_return_status => l_debug_error_status
73: , x_error_mesg => l_debug_error_mesg

Line 316: Error_Handler.write_debug(p_message);

312: IS
313: l_debug BOOLEAN := Init_Debug();
314: BEGIN
315: IF l_debug = true THEN
316: Error_Handler.write_debug(p_message);
317: END IF;
318: END;
319:
320: --Update any rows with null transactionids with proper sequence

Line 496: x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type,

492: x_error_code OUT NOCOPY number)*/
493:
494: PROCEDURE Retrieve_Batch_Options
495: ( p_batch_id IN NUMBER,
496: x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type,
497: x_error_code IN OUT NOCOPY VARCHAR2)
498: IS
499: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
500: l_Token_Tbl Error_Handler.Token_Tbl_Type;

Line 499: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

495: ( p_batch_id IN NUMBER,
496: x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type,
497: x_error_code IN OUT NOCOPY VARCHAR2)
498: IS
499: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
500: l_Token_Tbl Error_Handler.Token_Tbl_Type;
501: CURSOR batch_options_cr IS
502: SELECT
503: b.SOURCE_SYSTEM_ID,

Line 500: l_Token_Tbl Error_Handler.Token_Tbl_Type;

496: x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type,
497: x_error_code IN OUT NOCOPY VARCHAR2)
498: IS
499: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
500: l_Token_Tbl Error_Handler.Token_Tbl_Type;
501: CURSOR batch_options_cr IS
502: SELECT
503: b.SOURCE_SYSTEM_ID,
504: b.BATCH_TYPE,

Line 557: Error_Handler.Add_Error_Token

553: dual;
554: /*
555: l_Token_Tbl(1).token_name := 'BATCH_ID';
556: l_Token_Tbl(1).token_value := p_batch_id;
557: Error_Handler.Add_Error_Token
558: (
559: p_message_name => 'BOM_SOURCE_SYSTEM_INVALID'
560: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
561: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 576: Error_Handler.Add_Error_Token

572: EXCEPTION
573: WHEN OTHERS THEN
574: l_Token_Tbl(1).token_name := 'BATCH_ID';
575: l_Token_Tbl(1).token_value := p_batch_id;
576: Error_Handler.Add_Error_Token
577: (
578: p_message_name => 'BOM_SOURCE_SYSTEM_INVALID'
579: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
580: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 738: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

734: p_batch_id IN NUMBER
735: )
736: IS
737: l_errbuff VARCHAR2(3000);
738: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
739: l_retCode VARCHAR2(1);
740: BEGIN
741: Retrieve_Batch_Options(p_batch_id => p_batch_id,
742: x_Mesg_Token_Tbl => l_Mesg_Token_Tbl,

Line 769: l_message_list Error_Handler.Error_Tbl_Type;

765: )
766: IS
767: l_ret_code VARCHAR2(2);
768: l_err_buff VARCHAR2(1000);
769: l_message_list Error_Handler.Error_Tbl_Type;
770: l_request_id NUMBER := 0;
771: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
772: l_from_jcp VARCHAR2(1) := 'N';
773: l_start_upload VARCHAR(1) := p_start_upload;

Line 771: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;

767: l_ret_code VARCHAR2(2);
768: l_err_buff VARCHAR2(1000);
769: l_message_list Error_Handler.Error_Tbl_Type;
770: l_request_id NUMBER := 0;
771: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
772: l_from_jcp VARCHAR2(1) := 'N';
773: l_start_upload VARCHAR(1) := p_start_upload;
774: G_EXC_SEV_QUIT_OBJECT EXCEPTION;
775: BEGIN

Line 906: Error_Handler.Get_Message_List( x_message_list => l_message_list);

902: EXCEPTION
903: WHEN G_EXC_SEV_QUIT_OBJECT THEN
904: write_debug('Exception Occured');
905: x_retcode := 'E';
906: Error_Handler.Get_Message_List( x_message_list => l_message_list);
907: END Process_Structure_Data;
908:
909: /****************** Resolve Cross References **************************
910: * Procedure : RESOLVE_XREFS_FOR_BATCH

Line 923: ,x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

919:
920: PROCEDURE RESOLVE_XREFS_FOR_BATCH
921: (
922: p_batch_id IN NUMBER
923: ,x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
924: ,x_Return_Status IN OUT NOCOPY VARCHAR2
925: )
926: IS
927: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

Line 927: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

923: ,x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
924: ,x_Return_Status IN OUT NOCOPY VARCHAR2
925: )
926: IS
927: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
928: l_Token_Tbl Error_Handler.Token_Tbl_Type;
929: l_err_text VARCHAR2(1000);
930:
931: TYPE num_type IS TABLE OF NUMBER;

Line 928: l_Token_Tbl Error_Handler.Token_Tbl_Type;

924: ,x_Return_Status IN OUT NOCOPY VARCHAR2
925: )
926: IS
927: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
928: l_Token_Tbl Error_Handler.Token_Tbl_Type;
929: l_err_text VARCHAR2(1000);
930:
931: TYPE num_type IS TABLE OF NUMBER;
932: TYPE var_type IS TABLE OF VARCHAR2(1000);

Line 1001: Error_Handler.Add_Error_Token

997: FOR i IN 1..l_count
998: LOOP
999: IF l_ss_record_table(i) IS NULL OR l_ss_record_table(i) = FND_API.G_MISS_CHAR
1000: THEN
1001: Error_Handler.Add_Error_Token
1002: (
1003: p_message_name => 'BOM_SOURCE_SYS_REF_INVALID'
1004: ,p_Mesg_token_Tbl => l_Mesg_Token_Tbl
1005: ,x_Mesg_token_Tbl => l_Mesg_Token_Tbl

Line 1033: Error_Handler.Add_Error_Token

1029: FOR i IN 1..l_count
1030: LOOP
1031: IF l_ss_record_table(i) IS NULL OR l_ss_record_table(i) = FND_API.G_MISS_CHAR
1032: THEN
1033: Error_Handler.Add_Error_Token
1034: (
1035: p_message_name => 'BOM_SOURCE_SYS_REF_INVALID'
1036: ,p_Mesg_token_Tbl => l_Mesg_Token_Tbl
1037: ,x_Mesg_token_Tbl => l_Mesg_Token_Tbl

Line 1081: Error_Handler.Add_Error_Token

1077:
1078: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1079: THEN
1080: l_err_text := SUBSTR(SQLERRM, 1, 200);
1081: Error_Handler.Add_Error_Token
1082: (
1083: p_Message_Name => NULL
1084: , p_Message_Text => l_err_text
1085: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 1100: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

1096: PROCEDURE UPDATE_MATCH_DATA
1097: (
1098: p_batch_id IN NUMBER
1099: , p_source_system_id IN NUMBER
1100: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1101: , x_Return_Status IN OUT NOCOPY VARCHAR2
1102: )
1103: IS
1104: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

Line 1104: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

1100: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1101: , x_Return_Status IN OUT NOCOPY VARCHAR2
1102: )
1103: IS
1104: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1105: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1106: l_err_text VARCHAR2(1000);
1107:
1108: TYPE num_type IS TABLE OF NUMBER;

Line 1105: l_Token_Tbl Error_Handler.Token_Tbl_Type;

1101: , x_Return_Status IN OUT NOCOPY VARCHAR2
1102: )
1103: IS
1104: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1105: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1106: l_err_text VARCHAR2(1000);
1107:
1108: TYPE num_type IS TABLE OF NUMBER;
1109: TYPE var_type IS TABLE OF VARCHAR2(1000);

Line 1168: Error_Handler.Add_Error_Token

1164: FOR i IN 1..l_count
1165: LOOP
1166: IF ( (l_ss_record_table(i) IS NULL AND l_item_num_table(i) IS NULL ) OR ( l_ss_record_table(i) = FND_API.G_MISS_CHAR AND l_item_num_table(i) = FND_API.G_MISS_CHAR) )
1167: THEN
1168: Error_Handler.Add_Error_Token
1169: (
1170: p_message_name => 'BOM_SOURCE_SYS_REF_INVALID'
1171: ,p_Mesg_token_Tbl => l_Mesg_Token_Tbl
1172: ,x_Mesg_token_Tbl => l_Mesg_Token_Tbl

Line 1202: Error_Handler.Add_Error_Token

1198: FOR i IN 1..l_count
1199: LOOP
1200: IF ( (l_ss_record_table(i) IS NULL AND l_item_num_table(i) IS NULL ) OR ( l_ss_record_table(i) = FND_API.G_MISS_CHAR AND l_item_num_table(i) = FND_API.G_MISS_CHAR) )
1201: THEN
1202: Error_Handler.Add_Error_Token
1203: (
1204: p_message_name => 'BOM_SOURCE_SYS_REF_INVALID'
1205: ,p_Mesg_token_Tbl => l_Mesg_Token_Tbl
1206: ,x_Mesg_token_Tbl => l_Mesg_Token_Tbl

Line 1250: Error_Handler.Add_Error_Token

1246: Write_Debug('Unexpected Error occured..'|| SQLERRM);
1247: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1248: THEN
1249: l_err_text := SUBSTR(SQLERRM, 1, 200);
1250: Error_Handler.Add_Error_Token
1251: (
1252: p_Message_Name => NULL
1253: , p_Message_Text => l_err_text
1254: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 1267: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

1263:
1264: PROCEDURE UPDATE_BILL_INFO
1265: (
1266: p_batch_id IN NUMBER
1267: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1268: , x_Return_Status IN OUT NOCOPY VARCHAR2
1269: )
1270: IS
1271:

Line 1279: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

1275: TYPE num_type IS TABLE OF NUMBER;
1276: TYPE var_type IS TABLE OF VARCHAR2(1000);
1277:
1278: l_err_text VARCHAR2(1000);
1279: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1280:
1281: l_comp_seq_id NUMBER;
1282: l_header_count NUMBER;
1283: l_comp_count NUMBER;

Line 1581: Error_Handler.Add_Error_Token

1577: Write_Debug('Unexpected Error occured' || SQLERRM);
1578: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1579: THEN
1580: l_err_text := SUBSTR(SQLERRM, 1, 200);
1581: Error_Handler.Add_Error_Token
1582: (
1583: p_Message_Name => NULL
1584: , p_Message_Text => l_err_text
1585: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 1615: l_message_list Error_Handler.Error_Tbl_Type;

1611: )
1612: IS
1613: G_EXC_SEV_QUIT_OBJECT EXCEPTION;
1614:
1615: l_message_list Error_Handler.Error_Tbl_Type;
1616: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1617: l_other_message VARCHAR2(50);
1618: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1619: l_err_text VARCHAR2(2000);

Line 1616: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

1612: IS
1613: G_EXC_SEV_QUIT_OBJECT EXCEPTION;
1614:
1615: l_message_list Error_Handler.Error_Tbl_Type;
1616: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1617: l_other_message VARCHAR2(50);
1618: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1619: l_err_text VARCHAR2(2000);
1620: l_return_status VARCHAR2(1);

Line 1618: l_Token_Tbl Error_Handler.Token_Tbl_Type;

1614:
1615: l_message_list Error_Handler.Error_Tbl_Type;
1616: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1617: l_other_message VARCHAR2(50);
1618: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1619: l_err_text VARCHAR2(2000);
1620: l_return_status VARCHAR2(1);
1621: l_debug_flag VARCHAR2(1) := p_debug;
1622: l_debug BOOLEAN := FALSE;

Line 1746: Error_Handler.Initialize();

1742:
1743: BEGIN
1744: IF p_init_msg_list = 'Y'
1745: THEN
1746: Error_Handler.Initialize();
1747: END IF;
1748:
1749: IF l_debug_flag = 'Y'
1750: THEN

Line 1756: Error_Handler.Add_Error_Token

1752: trim(p_output_dir) = ''
1753: THEN
1754: -- IF debug is Y THEN out dir must be
1755: -- specified
1756: Error_Handler.Add_Error_Token
1757: ( p_Message_text =>
1758: 'Debug is set to Y so an output directory' ||
1759: ' must be specified. Debug will be turned' ||
1760: ' off since no directory is specified'

Line 1771: Error_Handler.Add_Error_Token

1767:
1768: IF trim(p_debug_filename) IS NULL OR
1769: trim(p_debug_filename) = ''
1770: THEN
1771: Error_Handler.Add_Error_Token
1772: ( p_Message_text =>
1773: 'Debug is set to Y so an output filename' ||
1774: ' must be specified. Debug will be turned' ||
1775: ' off since no filename is specified'

Line 1786: Error_Handler.Open_Debug_Session

1782: Bom_Globals.Set_Debug(l_debug_flag);
1783:
1784: IF Bom_Globals.Get_Debug = 'Y'
1785: THEN
1786: Error_Handler.Open_Debug_Session
1787: ( p_debug_filename => p_debug_filename
1788: , p_output_dir => p_output_dir
1789: , x_return_status => l_return_status
1790: , p_mesg_token_tbl => l_mesg_token_tbl

Line 1803: IF Error_Handler.get_debug <> 'Y' THEN

1799: END IF;
1800:
1801: Bom_Globals.Set_Debug(l_debug_flag);
1802:
1803: IF Error_Handler.get_debug <> 'Y' THEN
1804: l_debug := Init_Debug;
1805: ELSE
1806: l_debug := TRUE;
1807: END IF;

Line 1819: Error_Handler.Add_Error_Token

1815: l_app_id := FND_GLOBAL.RESP_APPL_ID;
1816:
1817: IF (NVL(l_user_id,-1)=-1 OR NVL(l_resp_id,-1)=-1 OR NVL(l_app_id,-1)=-1)
1818: THEN
1819: Error_Handler.Add_Error_Token
1820: ( p_Message_Name => 'BOM_IMPORT_USER_INVALID'
1821: , p_Mesg_Token_Tbl => l_Mesg_Token_tbl
1822: , x_Mesg_Token_Tbl => l_Mesg_Token_tbl
1823: , p_Token_Tbl => l_token_tbl

Line 1826: Error_Handler.Translate_And_Insert_Messages

1822: , x_Mesg_Token_Tbl => l_Mesg_Token_tbl
1823: , p_Token_Tbl => l_token_tbl
1824: );
1825:
1826: Error_Handler.Translate_And_Insert_Messages
1827: ( p_mesg_token_tbl => l_Mesg_Token_tbl
1828: , p_application_id => 'BOM'
1829: );
1830:

Line 1831: Error_Handler.Get_Message_List( x_message_list => l_message_list);

1827: ( p_mesg_token_tbl => l_Mesg_Token_tbl
1828: , p_application_id => 'BOM'
1829: );
1830:
1831: Error_Handler.Get_Message_List( x_message_list => l_message_list);
1832: x_Error_Mesg := l_message_list(1).Message_Text;
1833: x_return_status := FND_API.G_RET_STS_ERROR;
1834: RETURN;
1835: END IF;

Line 1857: Error_Handler.Add_Error_Token

1853: , l_return_status
1854: );
1855: IF l_return_status <> 'S'
1856: THEN
1857: Error_Handler.Add_Error_Token
1858: (
1859: p_message_name => NULL
1860: , p_Mesg_Token_Tbl => l_mesg_token_tbl
1861: , x_Mesg_Token_Tbl => l_mesg_token_tbl

Line 2090: Error_Handler.Add_Error_Token

2086: );
2087: IF l_return_status <> 'S'
2088: THEN
2089:
2090: Error_Handler.Add_Error_Token
2091: (
2092: p_message_name => NULL
2093: , p_Mesg_Token_Tbl => l_mesg_token_tbl
2094: , x_Mesg_Token_Tbl => l_mesg_token_tbl

Line 2101: Error_Handler.Get_Message_List( x_message_list => l_message_list);

2097: END IF;
2098:
2099:
2100: x_return_status := l_return_status;
2101: Error_Handler.Get_Message_List( x_message_list => l_message_list);
2102: x_Error_Mesg := l_message_list(1).Message_Text;
2103:
2104: EXCEPTION
2105:

Line 2107: Error_Handler.Add_Error_Token

2103:
2104: EXCEPTION
2105:
2106:
2107: Error_Handler.Add_Error_Token
2108: (
2109: p_message_name => NULL
2110: , p_Mesg_token_Tbl => l_Mesg_Token_Tbl
2111: , x_Mesg_token_Tbl => l_Mesg_Token_Tbl

Line 2116: x_return_status := Error_Handler.G_STATUS_UNEXPECTED;

2112: , p_token_Tbl => l_Token_Tbl
2113: , p_message_type => 'E'
2114: );
2115:
2116: x_return_status := Error_Handler.G_STATUS_UNEXPECTED;
2117: Error_Handler.Get_Message_List( x_message_list => l_message_list);
2118: x_Error_Mesg := l_message_list(1).Message_Text;
2119:
2120: IF Bom_Globals.Get_Debug = 'Y'

Line 2117: Error_Handler.Get_Message_List( x_message_list => l_message_list);

2113: , p_message_type => 'E'
2114: );
2115:
2116: x_return_status := Error_Handler.G_STATUS_UNEXPECTED;
2117: Error_Handler.Get_Message_List( x_message_list => l_message_list);
2118: x_Error_Mesg := l_message_list(1).Message_Text;
2119:
2120: IF Bom_Globals.Get_Debug = 'Y'
2121: THEN

Line 2122: Error_Handler.Write_Debug('After getting exception for invalid batch id ');

2118: x_Error_Mesg := l_message_list(1).Message_Text;
2119:
2120: IF Bom_Globals.Get_Debug = 'Y'
2121: THEN
2122: Error_Handler.Write_Debug('After getting exception for invalid batch id ');
2123: Error_Handler.Write_To_DebugFile;
2124: Error_Handler.Dump_Message_List;
2125: Error_Handler.Close_Debug_Session;
2126: END IF;

Line 2123: Error_Handler.Write_To_DebugFile;

2119:
2120: IF Bom_Globals.Get_Debug = 'Y'
2121: THEN
2122: Error_Handler.Write_Debug('After getting exception for invalid batch id ');
2123: Error_Handler.Write_To_DebugFile;
2124: Error_Handler.Dump_Message_List;
2125: Error_Handler.Close_Debug_Session;
2126: END IF;
2127: */

Line 2124: Error_Handler.Dump_Message_List;

2120: IF Bom_Globals.Get_Debug = 'Y'
2121: THEN
2122: Error_Handler.Write_Debug('After getting exception for invalid batch id ');
2123: Error_Handler.Write_To_DebugFile;
2124: Error_Handler.Dump_Message_List;
2125: Error_Handler.Close_Debug_Session;
2126: END IF;
2127: */
2128:

Line 2125: Error_Handler.Close_Debug_Session;

2121: THEN
2122: Error_Handler.Write_Debug('After getting exception for invalid batch id ');
2123: Error_Handler.Write_To_DebugFile;
2124: Error_Handler.Dump_Message_List;
2125: Error_Handler.Close_Debug_Session;
2126: END IF;
2127: */
2128:
2129: END Data_Upload_Complete;

Line 2625: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

2621: )
2622: IS
2623: G_EXC_SEV_QUIT_OBJECT EXCEPTION;
2624:
2625: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
2626: l_other_message VARCHAR2(50);
2627: l_Token_Tbl Error_Handler.Token_Tbl_Type;
2628: l_err_text VARCHAR2(2000);
2629: l_return_status VARCHAR2(1);

Line 2627: l_Token_Tbl Error_Handler.Token_Tbl_Type;

2623: G_EXC_SEV_QUIT_OBJECT EXCEPTION;
2624:
2625: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
2626: l_other_message VARCHAR2(50);
2627: l_Token_Tbl Error_Handler.Token_Tbl_Type;
2628: l_err_text VARCHAR2(2000);
2629: l_return_status VARCHAR2(1);
2630: l_Debug_flag VARCHAR2(1) := p_debug;
2631: l_source_system_id NUMBER;

Line 2637: Error_Handler.Initialize();

2633:
2634: BEGIN
2635: IF p_init_msg_list = 'Y'
2636: THEN
2637: Error_Handler.Initialize();
2638: END IF;
2639:
2640: IF l_debug_flag = 'Y'
2641: THEN

Line 2648: Error_Handler.Add_Error_Token

2644: THEN
2645: -- IF debug is Y THEN out dir must be
2646: -- specified
2647:
2648: Error_Handler.Add_Error_Token
2649: ( p_Message_text =>
2650: 'Debug is set to Y so an output directory' ||
2651: ' must be specified. Debug will be turned' ||
2652: ' off since no directory is specified'

Line 2663: Error_Handler.Add_Error_Token

2659:
2660: IF trim(p_debug_filename) IS NULL OR
2661: trim(p_debug_filename) = ''
2662: THEN
2663: Error_Handler.Add_Error_Token
2664: ( p_Message_text =>
2665: 'Debug is set to Y so an output filename' ||
2666: ' must be specified. Debug will be turned' ||
2667: ' off since no filename is specified'

Line 2678: Error_Handler.Open_Debug_Session

2674: BOM_Globals.Set_Debug(l_debug_flag);
2675:
2676: IF BOM_Globals.Get_Debug = 'Y'
2677: THEN
2678: Error_Handler.Open_Debug_Session
2679: ( p_debug_filename => p_debug_filename
2680: , p_output_dir => p_output_dir
2681: , x_return_status => l_return_status
2682: , p_mesg_token_tbl => l_mesg_token_tbl

Line 2703: IF Error_Handler.Get_Debug <> 'Y' THEN

2699: l_Token_Tbl(1).token_value := p_batch_id;
2700: RAISE G_EXC_SEV_QUIT_OBJECT;
2701: END IF;*/
2702:
2703: IF Error_Handler.Get_Debug <> 'Y' THEN
2704: l_debug := Init_Debug();
2705: ELSE
2706: l_debug := TRUE;
2707: END IF;

Line 2741: Error_Handler.Add_Error_Token

2737: x_Return_Status => l_return_status
2738: );
2739: IF l_return_status <> 'S'
2740: THEN
2741: Error_Handler.Add_Error_Token
2742: (
2743: p_message_name => NULL
2744: , p_Mesg_Token_Tbl => l_mesg_token_tbl
2745: , x_Mesg_Token_Tbl => l_mesg_token_tbl

Line 2763: Error_Handler.Add_Error_Token

2759: );
2760:
2761: IF l_return_status <> 'S'
2762: THEN
2763: Error_Handler.Add_Error_Token
2764: (
2765: p_message_name => NULL
2766: , p_Mesg_Token_Tbl => l_mesg_token_tbl
2767: , x_Mesg_Token_Tbl => l_mesg_token_tbl

Line 2782: Error_Handler.Add_Error_Token

2778:
2779: EXCEPTION
2780: WHEN G_EXC_SEV_QUIT_OBJECT THEN
2781:
2782: Error_Handler.Add_Error_Token
2783: (
2784: p_message_name => NULL
2785: , p_Mesg_token_Tbl => l_Mesg_Token_Tbl
2786: , x_Mesg_token_Tbl => l_Mesg_Token_Tbl

Line 2790: x_return_status := Error_Handler.G_STATUS_UNEXPECTED;

2786: , x_Mesg_token_Tbl => l_Mesg_Token_Tbl
2787: , p_token_Tbl => l_Token_Tbl
2788: , p_message_type => 'E'
2789: );
2790: x_return_status := Error_Handler.G_STATUS_UNEXPECTED;
2791: x_Error_Mesg := l_other_message;
2792:
2793: IF Bom_Globals.Get_Debug = 'Y'
2794: THEN

Line 2795: Error_Handler.Write_Debug('After getting exception for invalid batch id');

2791: x_Error_Mesg := l_other_message;
2792:
2793: IF Bom_Globals.Get_Debug = 'Y'
2794: THEN
2795: Error_Handler.Write_Debug('After getting exception for invalid batch id');
2796: Error_Handler.Write_To_DebugFile;
2797: Error_Handler.Dump_Message_List;
2798: Error_Handler.Close_Debug_Session;
2799: END IF;

Line 2796: Error_Handler.Write_To_DebugFile;

2792:
2793: IF Bom_Globals.Get_Debug = 'Y'
2794: THEN
2795: Error_Handler.Write_Debug('After getting exception for invalid batch id');
2796: Error_Handler.Write_To_DebugFile;
2797: Error_Handler.Dump_Message_List;
2798: Error_Handler.Close_Debug_Session;
2799: END IF;
2800:

Line 2797: Error_Handler.Dump_Message_List;

2793: IF Bom_Globals.Get_Debug = 'Y'
2794: THEN
2795: Error_Handler.Write_Debug('After getting exception for invalid batch id');
2796: Error_Handler.Write_To_DebugFile;
2797: Error_Handler.Dump_Message_List;
2798: Error_Handler.Close_Debug_Session;
2799: END IF;
2800:
2801: END Matching_Complete;

Line 2798: Error_Handler.Close_Debug_Session;

2794: THEN
2795: Error_Handler.Write_Debug('After getting exception for invalid batch id');
2796: Error_Handler.Write_To_DebugFile;
2797: Error_Handler.Dump_Message_List;
2798: Error_Handler.Close_Debug_Session;
2799: END IF;
2800:
2801: END Matching_Complete;
2802:

Line 3175: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

3171: )
3172: IS
3173: l_debug BOOLEAN := FALSE;
3174: l_request_id NUMBER;
3175: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
3176: BEGIN
3177:
3178: --Update the Batch Record for reference
3179: IF Error_Handler.get_debug = 'Y' THEN

Line 3179: IF Error_Handler.get_debug = 'Y' THEN

3175: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
3176: BEGIN
3177:
3178: --Update the Batch Record for reference
3179: IF Error_Handler.get_debug = 'Y' THEN
3180: l_debug := TRUE;
3181: ELSE
3182: l_debug := Init_Debug();
3183: END IF;

Line 3261: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

3257: p_batch_id IN NUMBER
3258: , p_items_import_complete IN VARCHAR2
3259: , x_error_message OUT NOCOPY VARCHAR2
3260: , x_return_code OUT NOCOPY VARCHAR2
3261: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
3262: )
3263: IS
3264: l_item_infcrows_exists NUMBER;
3265: BEGIN

Line 3639: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

3635: TYPE num_type IS TABLE OF NUMBER;
3636: TYPE var_type IS TABLE OF VARCHAR2(1000);
3637: TYPE date_type IS TABLE OF DATE;
3638:
3639: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
3640: l_other_message VARCHAR2(50);
3641: l_Token_Tbl Error_Handler.Token_Tbl_Type;
3642: l_err_text VARCHAR2(2000);
3643: l_return_status VARCHAR2(1);

Line 3641: l_Token_Tbl Error_Handler.Token_Tbl_Type;

3637: TYPE date_type IS TABLE OF DATE;
3638:
3639: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
3640: l_other_message VARCHAR2(50);
3641: l_Token_Tbl Error_Handler.Token_Tbl_Type;
3642: l_err_text VARCHAR2(2000);
3643: l_return_status VARCHAR2(1);
3644: l_message_list Error_Handler.Error_Tbl_Type;
3645: -- l_debug_flag VARCHAR2(1) := p_debug;

Line 3644: l_message_list Error_Handler.Error_Tbl_Type;

3640: l_other_message VARCHAR2(50);
3641: l_Token_Tbl Error_Handler.Token_Tbl_Type;
3642: l_err_text VARCHAR2(2000);
3643: l_return_status VARCHAR2(1);
3644: l_message_list Error_Handler.Error_Tbl_Type;
3645: -- l_debug_flag VARCHAR2(1) := p_debug;
3646: l_debug BOOLEAN := FALSE;
3647:
3648:

Line 3690: IF Error_Handler.Get_Debug <> 'Y' THEN

3686:
3687: BEGIN
3688: update_transaction_ids(p_batch_id);
3689:
3690: IF Error_Handler.Get_Debug <> 'Y' THEN
3691: l_debug := Init_Debug();
3692: ELSE
3693: l_debug := TRUE;
3694: END IF;

Line 3914: Error_Handler.Get_Message_List( x_message_list => l_message_list);

3910: END IF;
3911:
3912: x_Return_Status := l_Return_Status;
3913: IF x_Return_Status <> 'S' THEN
3914: Error_Handler.Get_Message_List( x_message_list => l_message_list);
3915: x_Error_Mesg := l_message_list(1).Message_Text;
3916: END IF;
3917:
3918: EXCEPTION

Line 3921: Error_Handler.Add_Error_Token

3917:
3918: EXCEPTION
3919: WHEN G_EXC_SEV_QUIT_OBJECT THEN
3920:
3921: Error_Handler.Add_Error_Token
3922: (
3923: p_message_name => NULL
3924: , p_Mesg_token_Tbl => l_Mesg_Token_Tbl
3925: , x_Mesg_token_Tbl => l_Mesg_Token_Tbl

Line 3930: x_return_status := Error_Handler.G_STATUS_UNEXPECTED;

3926: , p_token_Tbl => l_Token_Tbl
3927: , p_message_type => 'E'
3928: );
3929:
3930: x_return_status := Error_Handler.G_STATUS_UNEXPECTED;
3931: Error_Handler.Get_Message_List( x_message_list => l_message_list);
3932: x_Error_Mesg := l_message_list(1).Message_Text;
3933:
3934: END Update_Bill_Val_Id;

Line 3931: Error_Handler.Get_Message_List( x_message_list => l_message_list);

3927: , p_message_type => 'E'
3928: );
3929:
3930: x_return_status := Error_Handler.G_STATUS_UNEXPECTED;
3931: Error_Handler.Get_Message_List( x_message_list => l_message_list);
3932: x_Error_Mesg := l_message_list(1).Message_Text;
3933:
3934: END Update_Bill_Val_Id;
3935:

Line 4010: x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

4006: PROCEDURE Check_Change_Options
4007: (
4008: p_batch_id IN NUMBER,
4009: x_error_code IN OUT NOCOPY VARCHAR2,
4010: x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
4011: )
4012: IS
4013: TYPE num_type IS TABLE OF NUMBER;
4014: l_bill_seq_table num_type;

Line 4017: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

4013: TYPE num_type IS TABLE OF NUMBER;
4014: l_bill_seq_table num_type;
4015: l_change_policy VARCHAR2(500);
4016: l_change_flag VARCHAR2(1);
4017: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
4018: l_Token_Tbl Error_Handler.Token_Tbl_Type;
4019:
4020: CURSOR Get_Bill_Seq_Id
4021: IS

Line 4018: l_Token_Tbl Error_Handler.Token_Tbl_Type;

4014: l_bill_seq_table num_type;
4015: l_change_policy VARCHAR2(500);
4016: l_change_flag VARCHAR2(1);
4017: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
4018: l_Token_Tbl Error_Handler.Token_Tbl_Type;
4019:
4020: CURSOR Get_Bill_Seq_Id
4021: IS
4022: SELECT bill_sequence_id

Line 4048: Error_Handler.Add_Error_Token

4044: IF l_change_flag = 'N' OR l_change_flag IS NULL THEN
4045: l_change_policy := Bom_Globals.Get_Change_Policy_Val(l_bill_seq_table(i),NULL);
4046: IF l_change_policy = 'NOT_ALLOWED' THEN
4047: -- Thorw error
4048: Error_Handler.Add_Error_Token
4049: (
4050: p_message_name => 'BOM_CHANGES_NOT_ALLOWED'
4051: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4052: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4080: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

4076:
4077: PROCEDURE PROCESS_ALL_COMPS_BATCH
4078: (
4079: p_batch_id IN NUMBER
4080: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
4081: , x_Return_Status IN OUT NOCOPY VARCHAR2
4082: )
4083: IS
4084: TYPE bom_comp_intf_type IS TABLE OF bom_inventory_comps_interface%ROWTYPE;

Line 4089: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

4085: TYPE bom_comp_type IS TABLE OF bom_components_b%ROWTYPE;
4086: TYPE num_type IS TABLE OF NUMBER;
4087: TYPE var_type IS TABLE OF VARCHAR2(1000);
4088: l_err_text VARCHAR2(1000);
4089: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
4090: l_comp_seq_id NUMBER;
4091: l_header_count NUMBER;
4092: l_comp_count NUMBER;
4093: l_comp_seq_count NUMBER;

Line 4158: IF Error_Handler.get_debug <> 'Y' THEN

4154: BEGIN
4155:
4156: --logMessage_forsnell(' Inside New method' || 2933);
4157:
4158: IF Error_Handler.get_debug <> 'Y' THEN
4159: l_debug := Init_Debug;
4160: ELSE
4161: l_debug := TRUE;
4162: END IF;

Line 4685: Error_Handler.Add_Error_Token

4681: Write_Debug('Unexpected Error occured' || SQLERRM);
4682: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4683: THEN
4684: l_err_text := SUBSTR(SQLERRM, 1, 200);
4685: Error_Handler.Add_Error_Token
4686: (
4687: p_Message_Name => NULL
4688: , p_Message_Text => l_err_text
4689: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4735: IF Error_Handler.get_debug <> 'Y' THEN

4731: stmt_num NUMBER;
4732: BEGIN
4733:
4734: stmt_num := 0;
4735: IF Error_Handler.get_debug <> 'Y' THEN
4736: l_debug := Init_Debug;
4737: ELSE
4738: l_debug := TRUE;
4739: END IF;