DBA Data[Home] [Help]

APPS.EC_INBOUND_STAGE dependencies on EC_UTILS

Line 6: i_stage_record_type ec_utils.mapping_tbl;

2: -- $Header: ECISTGB.pls 120.4 2005/09/29 10:38:49 arsriniv ship $
3:
4: --- Local PL/SQL table variables.
5: --- i_stage_record_type Stage_Record_Type;
6: i_stage_record_type ec_utils.mapping_tbl;
7: i_level_info Level_Info;
8: --bug 2110652
9: i_db_charset varchar2(50);
10: i_db_charset_flag varchar2(1);

Line 82: i_empty_tbl ec_utils.mapping_tbl;

78: i_previous_level number :=0;
79: i_stage_id number :=0;
80: i_insert_cursor number :=0;
81: i_document_number number :=0;
82: i_empty_tbl ec_utils.mapping_tbl;
83: i_translator_code varchar2(400);
84: i_location_code varchar2(400);
85: i_tp_code varchar2(400);
86: i_translator_code_pos number;

Line 202: EC_UTILS.i_ret_code := 2;

198: ec_debug.pl(0,'EC','ECE_SEED_DATA_MISSING','TRANSACTION_TYPE',i_transaction_type);
199: /**
200: Set the Retcode for the Concurrent Manager
201: **/
202: EC_UTILS.i_ret_code := 2;
203: raise EC_UTILS.PROGRAM_EXIT;
204: end if;
205:
206: -- Bug 2162062

Line 203: raise EC_UTILS.PROGRAM_EXIT;

199: /**
200: Set the Retcode for the Concurrent Manager
201: **/
202: EC_UTILS.i_ret_code := 2;
203: raise EC_UTILS.PROGRAM_EXIT;
204: end if;
205:
206: -- Bug 2162062
207:

Line 240: EC_UTILS.i_ret_code := 2;

236: and lookup_code = ec_inbound_stage.g_source_charset;
237:
238: if sql%notfound then
239: ec_debug.pl(0,'Invalid Character Set specified in the FND_LOOKUPS');
240: EC_UTILS.i_ret_code := 2;
241: raise EC_UTILS.PROGRAM_EXIT;
242: end if;
243:
244:

Line 241: raise EC_UTILS.PROGRAM_EXIT;

237:
238: if sql%notfound then
239: ec_debug.pl(0,'Invalid Character Set specified in the FND_LOOKUPS');
240: EC_UTILS.i_ret_code := 2;
241: raise EC_UTILS.PROGRAM_EXIT;
242: end if;
243:
244:
245: --- Open the Inbound Transaction File in the Read Mode

Line 303: EC_UTILS.i_ret_code := 1;

299:
300: /**
301: Set the Retcode for the Concurrent Manager BUT do not RAISE program exit
302: **/
303: EC_UTILS.i_ret_code := 1;
304:
305: WHEN NO_DATA_FOUND then
306: ec_debug.pl(3,'counter',counter);
307:

Line 549: EC_UTILS.i_ret_code := 2;

545: ec_debug.pl(0,'EC','ECE_MISSING_HEADER_RECORD',null);
546: /**
547: Set the Retcode for the Concurrent Manager
548: **/
549: EC_UTILS.i_ret_code := 2;
550: raise EC_UTILS.PROGRAM_EXIT;
551: end if;
552: end if;
553:

Line 550: raise EC_UTILS.PROGRAM_EXIT;

546: /**
547: Set the Retcode for the Concurrent Manager
548: **/
549: EC_UTILS.i_ret_code := 2;
550: raise EC_UTILS.PROGRAM_EXIT;
551: end if;
552: end if;
553:
554: i_first_line_flag := FALSE;

Line 585: EC_UTILS.i_ret_code := 1;

581: 'TRANSACTION_TYPE',i_transaction_type);
582: /**
583: Set the Retcode for the Concurrent Manager
584: **/
585: EC_UTILS.i_ret_code := 1;
586: raise EC_UTILS.PROGRAM_EXIT;
587: end if;
588:
589: end;

Line 586: raise EC_UTILS.PROGRAM_EXIT;

582: /**
583: Set the Retcode for the Concurrent Manager
584: **/
585: EC_UTILS.i_ret_code := 1;
586: raise EC_UTILS.PROGRAM_EXIT;
587: end if;
588:
589: end;
590:

Line 604: EC_UTILS.i_ret_code :=2;

600: ec_debug.pop('EC_INBOUND_STAGE.LOAD_DATA');
601: end if;
602: EXCEPTION
603: WHEN UTL_FILE.write_error THEN
604: EC_UTILS.i_ret_code :=2;
605: ec_debug.pl(0,'EC','ECE_UTL_WRITE_ERROR',null);
606: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
607: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
608: utl_file.fclose(u_file_handle);

Line 609: raise EC_UTILS.PROGRAM_EXIT;

605: ec_debug.pl(0,'EC','ECE_UTL_WRITE_ERROR',null);
606: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
607: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
608: utl_file.fclose(u_file_handle);
609: raise EC_UTILS.PROGRAM_EXIT;
610: WHEN UTL_FILE.read_error THEN
611: EC_UTILS.i_ret_code :=2;
612: ec_debug.pl(0,'EC','ECE_UTL_READ_ERROR',null);
613: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');

Line 611: EC_UTILS.i_ret_code :=2;

607: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
608: utl_file.fclose(u_file_handle);
609: raise EC_UTILS.PROGRAM_EXIT;
610: WHEN UTL_FILE.read_error THEN
611: EC_UTILS.i_ret_code :=2;
612: ec_debug.pl(0,'EC','ECE_UTL_READ_ERROR',null);
613: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
614: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
615: utl_file.fclose(u_file_handle);

Line 616: raise EC_UTILS.PROGRAM_EXIT;

612: ec_debug.pl(0,'EC','ECE_UTL_READ_ERROR',null);
613: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
614: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
615: utl_file.fclose(u_file_handle);
616: raise EC_UTILS.PROGRAM_EXIT;
617: WHEN UTL_FILE.invalid_path THEN
618: EC_UTILS.i_ret_code :=2;
619: ec_debug.pl(0,'EC','ECE_UTL_INVALID_PATH',null);
620: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');

Line 618: EC_UTILS.i_ret_code :=2;

614: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
615: utl_file.fclose(u_file_handle);
616: raise EC_UTILS.PROGRAM_EXIT;
617: WHEN UTL_FILE.invalid_path THEN
618: EC_UTILS.i_ret_code :=2;
619: ec_debug.pl(0,'EC','ECE_UTL_INVALID_PATH',null);
620: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
621: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
622: utl_file.fclose(u_file_handle);

Line 623: raise EC_UTILS.PROGRAM_EXIT;

619: ec_debug.pl(0,'EC','ECE_UTL_INVALID_PATH',null);
620: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
621: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
622: utl_file.fclose(u_file_handle);
623: raise EC_UTILS.PROGRAM_EXIT;
624: WHEN UTL_FILE.invalid_mode THEN
625: EC_UTILS.i_ret_code :=2;
626: ec_debug.pl(0,'EC','ECE_UTL_INVALID_MODE',null);
627: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');

Line 625: EC_UTILS.i_ret_code :=2;

621: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
622: utl_file.fclose(u_file_handle);
623: raise EC_UTILS.PROGRAM_EXIT;
624: WHEN UTL_FILE.invalid_mode THEN
625: EC_UTILS.i_ret_code :=2;
626: ec_debug.pl(0,'EC','ECE_UTL_INVALID_MODE',null);
627: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
628: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
629: utl_file.fclose(u_file_handle);

Line 630: raise EC_UTILS.PROGRAM_EXIT;

626: ec_debug.pl(0,'EC','ECE_UTL_INVALID_MODE',null);
627: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
628: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
629: utl_file.fclose(u_file_handle);
630: raise EC_UTILS.PROGRAM_EXIT;
631: WHEN UTL_FILE.invalid_operation THEN
632: EC_UTILS.i_ret_code :=2;
633: ec_debug.pl(0,'EC','ECE_UTL_INVALID_OPERATION',null);
634: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');

Line 632: EC_UTILS.i_ret_code :=2;

628: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
629: utl_file.fclose(u_file_handle);
630: raise EC_UTILS.PROGRAM_EXIT;
631: WHEN UTL_FILE.invalid_operation THEN
632: EC_UTILS.i_ret_code :=2;
633: ec_debug.pl(0,'EC','ECE_UTL_INVALID_OPERATION',null);
634: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
635: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
636: utl_file.fclose(u_file_handle);

Line 637: raise EC_UTILS.PROGRAM_EXIT;

633: ec_debug.pl(0,'EC','ECE_UTL_INVALID_OPERATION',null);
634: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
635: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
636: utl_file.fclose(u_file_handle);
637: raise EC_UTILS.PROGRAM_EXIT;
638: WHEN UTL_FILE.invalid_filehandle THEN
639: EC_UTILS.i_ret_code :=2;
640: ec_debug.pl(0,'EC','ECE_UTL_INVALID_FILEHANDLE',null);
641: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');

Line 639: EC_UTILS.i_ret_code :=2;

635: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
636: utl_file.fclose(u_file_handle);
637: raise EC_UTILS.PROGRAM_EXIT;
638: WHEN UTL_FILE.invalid_filehandle THEN
639: EC_UTILS.i_ret_code :=2;
640: ec_debug.pl(0,'EC','ECE_UTL_INVALID_FILEHANDLE',null);
641: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
642: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
643: utl_file.fclose(u_file_handle);

Line 644: raise EC_UTILS.PROGRAM_EXIT;

640: ec_debug.pl(0,'EC','ECE_UTL_INVALID_FILEHANDLE',null);
641: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
642: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
643: utl_file.fclose(u_file_handle);
644: raise EC_UTILS.PROGRAM_EXIT;
645: WHEN UTL_FILE.internal_error THEN
646: EC_UTILS.i_ret_code :=2;
647: ec_debug.pl(0,'EC','ECE_UTL_INTERNAL_ERROR',null);
648: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');

Line 646: EC_UTILS.i_ret_code :=2;

642: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
643: utl_file.fclose(u_file_handle);
644: raise EC_UTILS.PROGRAM_EXIT;
645: WHEN UTL_FILE.internal_error THEN
646: EC_UTILS.i_ret_code :=2;
647: ec_debug.pl(0,'EC','ECE_UTL_INTERNAL_ERROR',null);
648: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
649: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
650: utl_file.fclose(u_file_handle);

Line 651: raise EC_UTILS.PROGRAM_EXIT;

647: ec_debug.pl(0,'EC','ECE_UTL_INTERNAL_ERROR',null);
648: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
649: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
650: utl_file.fclose(u_file_handle);
651: raise EC_UTILS.PROGRAM_EXIT;
652: WHEN EC_UTILS.PROGRAM_EXIT THEN
653: raise;
654: WHEN OTHERS THEN
655: EC_UTILS.i_ret_code :=2;

Line 652: WHEN EC_UTILS.PROGRAM_EXIT THEN

648: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
649: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
650: utl_file.fclose(u_file_handle);
651: raise EC_UTILS.PROGRAM_EXIT;
652: WHEN EC_UTILS.PROGRAM_EXIT THEN
653: raise;
654: WHEN OTHERS THEN
655: EC_UTILS.i_ret_code :=2;
656: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');

Line 655: EC_UTILS.i_ret_code :=2;

651: raise EC_UTILS.PROGRAM_EXIT;
652: WHEN EC_UTILS.PROGRAM_EXIT THEN
653: raise;
654: WHEN OTHERS THEN
655: EC_UTILS.i_ret_code :=2;
656: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
657: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
658: utl_file.fclose(u_file_handle);
659: raise EC_UTILS.PROGRAM_EXIT;

Line 659: raise EC_UTILS.PROGRAM_EXIT;

655: EC_UTILS.i_ret_code :=2;
656: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA');
657: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
658: utl_file.fclose(u_file_handle);
659: raise EC_UTILS.PROGRAM_EXIT;
660: END Load_Data;
661:
662: /**
663: This Function returns the Boolean True or False for a match between the

Line 722: EC_UTILS.i_ret_code:=2;

718: EXCEPTION
719: WHEN OTHERS then
720: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.MATCH_RECORD_NUM');
721: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
722: EC_UTILS.i_ret_code:=2;
723: raise EC_UTILS.PROGRAM_EXIT;
724: end match_record_num;
725:
726: /**

Line 723: raise EC_UTILS.PROGRAM_EXIT;

719: WHEN OTHERS then
720: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.MATCH_RECORD_NUM');
721: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
722: EC_UTILS.i_ret_code:=2;
723: raise EC_UTILS.PROGRAM_EXIT;
724: end match_record_num;
725:
726: /**
727: After a successful match of record number between the Line Read from

Line 805: EC_UTILS.i_ret_code:=2;

801: EXCEPTION
802: WHEN OTHERS then
803: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA_FROM_FILE');
804: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
805: EC_UTILS.i_ret_code:=2;
806: raise EC_UTILS.PROGRAM_EXIT;
807: end load_data_from_file;
808:
809: /**

Line 806: raise EC_UTILS.PROGRAM_EXIT;

802: WHEN OTHERS then
803: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.LOAD_DATA_FROM_FILE');
804: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
805: EC_UTILS.i_ret_code:=2;
806: raise EC_UTILS.PROGRAM_EXIT;
807: end load_data_from_file;
808:
809: /**
810: This procedures loads the mapping information between the Flat File

Line 905: EC_UTILS.i_ret_code := 2;

901: ec_debug.pl(0,'EC','ECE_SEED_NOT_LEVEL','TRANSACTION_TYPE',i_transaction_type,'LEVEL',i_level);
902: /**
903: Set the Retcode for the Concurrent Manager to Error.
904: **/
905: EC_UTILS.i_ret_code := 2;
906: raise EC_UTILS.PROGRAM_EXIT;
907: end if;
908:
909: if EC_DEBUG.G_debug_level >= 2 then

Line 906: raise EC_UTILS.PROGRAM_EXIT;

902: /**
903: Set the Retcode for the Concurrent Manager to Error.
904: **/
905: EC_UTILS.i_ret_code := 2;
906: raise EC_UTILS.PROGRAM_EXIT;
907: end if;
908:
909: if EC_DEBUG.G_debug_level >= 2 then
910: ec_debug.pop('EC_INBOUND_STAGE.POPULATE_FLATFILE_MAPPING');

Line 913: WHEN EC_UTILS.PROGRAM_EXIT then

909: if EC_DEBUG.G_debug_level >= 2 then
910: ec_debug.pop('EC_INBOUND_STAGE.POPULATE_FLATFILE_MAPPING');
911: end if;
912: EXCEPTION
913: WHEN EC_UTILS.PROGRAM_EXIT then
914: raise;
915: WHEN OTHERS then
916: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.POPULATE_FLATFILE_MAPPING');
917: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);

Line 918: EC_UTILS.i_ret_code:=2;

914: raise;
915: WHEN OTHERS then
916: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.POPULATE_FLATFILE_MAPPING');
917: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
918: EC_UTILS.i_ret_code:=2;
919: raise EC_UTILS.PROGRAM_EXIT;
920: END populate_flatfile_mapping;
921:
922: /**

Line 919: raise EC_UTILS.PROGRAM_EXIT;

915: WHEN OTHERS then
916: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.POPULATE_FLATFILE_MAPPING');
917: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
918: EC_UTILS.i_ret_code:=2;
919: raise EC_UTILS.PROGRAM_EXIT;
920: END populate_flatfile_mapping;
921:
922: /**
923: The Data loaded in the Local PL/SQL table is inserted into the Staging table.

Line 1006: EC_UTILS.i_ret_code :=2;

1002: when others then
1003: error_position := dbms_sql.last_error_position;
1004: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.INSERT_INTO_STAGE_TABLE');
1005: ece_error_handling_pvt.print_parse_error (error_position,cInsert_stmt);
1006: EC_UTILS.i_ret_code :=2;
1007: raise EC_UTILS.PROGRAM_EXIT;
1008: end;
1009: end if;
1010:

Line 1007: raise EC_UTILS.PROGRAM_EXIT;

1003: error_position := dbms_sql.last_error_position;
1004: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.INSERT_INTO_STAGE_TABLE');
1005: ece_error_handling_pvt.print_parse_error (error_position,cInsert_stmt);
1006: EC_UTILS.i_ret_code :=2;
1007: raise EC_UTILS.PROGRAM_EXIT;
1008: end;
1009: end if;
1010:
1011: if i_Insert_Cursor > 0

Line 1095: EC_UTILS.i_ret_code :=2;

1091: ec_debug.pl(3,'EC','ECE_STAGE_INSERTED',null);
1092: end if;
1093: i_data_status_flag := TRUE; --Bug 2164672
1094: else
1095: EC_UTILS.i_ret_code :=2;
1096: raise EC_UTILS.PROGRAM_EXIT;
1097: end if;
1098:
1099: exception

Line 1096: raise EC_UTILS.PROGRAM_EXIT;

1092: end if;
1093: i_data_status_flag := TRUE; --Bug 2164672
1094: else
1095: EC_UTILS.i_ret_code :=2;
1096: raise EC_UTILS.PROGRAM_EXIT;
1097: end if;
1098:
1099: exception
1100: when others then

Line 1107: EC_UTILS.i_ret_code :=2;

1103: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
1104: ec_debug.pl(0,'EC','ECE_ERROR_SQL',null);
1105: ec_debug.pl(0,cInsert_stmt);
1106:
1107: EC_UTILS.i_ret_code :=2;
1108: raise EC_UTILS.PROGRAM_EXIT;
1109: end;
1110: end if;
1111:

Line 1108: raise EC_UTILS.PROGRAM_EXIT;

1104: ec_debug.pl(0,'EC','ECE_ERROR_SQL',null);
1105: ec_debug.pl(0,cInsert_stmt);
1106:
1107: EC_UTILS.i_ret_code :=2;
1108: raise EC_UTILS.PROGRAM_EXIT;
1109: end;
1110: end if;
1111:
1112: if EC_DEBUG.G_debug_level >= 2 then

Line 1117: WHEN EC_UTILS.PROGRAM_EXIT then

1113: ec_debug.pl(3,'i_insert_cursor',i_insert_cursor);
1114: ec_debug.pop('EC_INBOUND_STAGE.INSERT_INTO_STAGE_TABLE');
1115: end if;
1116: EXCEPTION
1117: WHEN EC_UTILS.PROGRAM_EXIT then
1118: raise;
1119: WHEN OTHERS then
1120: IF dbms_sql.IS_OPEN(i_insert_cursor)
1121: then

Line 1126: EC_UTILS.i_ret_code:=2;

1122: dbms_sql.close_cursor(i_insert_cursor);
1123: end if;
1124: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.INSERT_INTO_STAGE_TABLE');
1125: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
1126: EC_UTILS.i_ret_code:=2;
1127: raise EC_UTILS.PROGRAM_EXIT;
1128: END Insert_Into_Stage_Table;
1129:
1130:

Line 1127: raise EC_UTILS.PROGRAM_EXIT;

1123: end if;
1124: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.INSERT_INTO_STAGE_TABLE');
1125: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
1126: EC_UTILS.i_ret_code:=2;
1127: raise EC_UTILS.PROGRAM_EXIT;
1128: END Insert_Into_Stage_Table;
1129:
1130:
1131: procedure get_tp_code

Line 1317: EC_UTILS.i_ret_code:=2;

1313: EXCEPTION
1314: WHEN OTHERS then
1315: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.GET_TP_CODE');
1316: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
1317: EC_UTILS.i_ret_code:=2;
1318: raise EC_UTILS.PROGRAM_EXIT;
1319: end get_tp_code;
1320:
1321: procedure find_pos

Line 1318: raise EC_UTILS.PROGRAM_EXIT;

1314: WHEN OTHERS then
1315: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.GET_TP_CODE');
1316: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
1317: EC_UTILS.i_ret_code:=2;
1318: raise EC_UTILS.PROGRAM_EXIT;
1319: end get_tp_code;
1320:
1321: procedure find_pos
1322: (

Line 1371: EC_UTILS.i_ret_code := 2;

1367: EXCEPTION
1368: WHEN POS_NOT_FOUND THEN
1369: ec_debug.pl(0,'EC','ECE_PLSQL_POS_NOT_FOUND','COLUMN_NAME',cIn_String);
1370: ec_debug.POP('EC_INBOUND_STAGE.FIND_POS');
1371: EC_UTILS.i_ret_code := 2;
1372: raise EC_UTILS.PROGRAM_EXIT;
1373: WHEN OTHERS THEN
1374: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.FIND_POS');
1375: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);

Line 1372: raise EC_UTILS.PROGRAM_EXIT;

1368: WHEN POS_NOT_FOUND THEN
1369: ec_debug.pl(0,'EC','ECE_PLSQL_POS_NOT_FOUND','COLUMN_NAME',cIn_String);
1370: ec_debug.POP('EC_INBOUND_STAGE.FIND_POS');
1371: EC_UTILS.i_ret_code := 2;
1372: raise EC_UTILS.PROGRAM_EXIT;
1373: WHEN OTHERS THEN
1374: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.FIND_POS');
1375: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
1376: EC_UTILS.i_ret_code := 2;

Line 1376: EC_UTILS.i_ret_code := 2;

1372: raise EC_UTILS.PROGRAM_EXIT;
1373: WHEN OTHERS THEN
1374: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.FIND_POS');
1375: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
1376: EC_UTILS.i_ret_code := 2;
1377: raise EC_UTILS.PROGRAM_EXIT;
1378: END find_pos;
1379:
1380: END EC_INBOUND_STAGE;

Line 1377: raise EC_UTILS.PROGRAM_EXIT;

1373: WHEN OTHERS THEN
1374: ec_debug.pl(0,'EC','ECE_PROGRAM_ERROR','PROGRESS_LEVEL','EC_INBOUND_STAGE.FIND_POS');
1375: ec_debug.pl(0,'EC','ECE_ERROR_MESSAGE','ERROR_MESSAGE',SQLERRM);
1376: EC_UTILS.i_ret_code := 2;
1377: raise EC_UTILS.PROGRAM_EXIT;
1378: END find_pos;
1379:
1380: END EC_INBOUND_STAGE;