End of communication channel while running proc

Question

Hi ,
As soon as i run a proc i get the following error
BEGIN cdw_load.pa_cdw_gi_extract.pr_cdw_gi_usr_rep_extract('PL'); END;
ERROR at line 1:
ORA-03113: end-of-file on communication channel
Process ID: 31568
Session ID: 963 Serial number: 693
THE OTHER STATEMENTS /PROGRAMS in the same data base run fine.
i checked the oracle directories are present.
Please help
procedure is below
procedure pr_cdw_gi_usr_rep_extract(i_cntry_cd in varchar2)
as
-- Procedure PR_GI_USR_REP_EXTRACT is created to extract data for user rep extract.
-- Modification History - None
-- Additional Procedure included and Purpose
-- PR_LOG_ERROR is added to handle the exceptions.
v_file utl_file.file_type;
v_file_name varchar2 (50);
v_file_rec nvarchar2 (32767);
va_strng nvarchar2 (200);
v_errcode varchar2 (30);
v_errmessage varchar2 (300);
v_cntry_cd codi.dim_mrkt.cntry_cd%type;
v_message hz_metadata.hz_job_log_detail.processor_message%type;
v_job_seq_id pls_integer := 0;
v_slct_cnt pls_integer := 0;
v_mrkt_id number := 0;
v_rec_cnt number := 0;
v_prev_3rd_cmpgn number := 0; -- Limit the search on frp table to a max of 3 campaigns
v_prev_2nd_cmpgn number := 0; -- LObtain the campaign previous campaign
v_cmpgn_perd_id number := 0; -- Obtain the latest available camapign from frp ..
--cursor for extracting the data for usr_rep
-- Note: The search campaigns (3 camapigns) were used in an inlist as partition pruning was not happenning with BETEEEN clause
cursor ext_usr_rep
is
select 1 from dual ;
-- procedure for logging the errors during exception handling
procedure log_error(v_message varchar2)
as
begin
hz_metadata.pa_log_gsl.end_logging ('ABORT');
hz_metadata.pa_log_gsl.log_error (p_entity_value => 'N/A',
p_app_message => v_message,
p_system_message => sqlerrm,
p_reprocess_ind => null,
p_continue_on_error => 'Y'
commit;
dbms_output.put_line ('Usr Rep - Extract not generated');
end log_error;
-- end of the log_error procedure
-------main begin ----------------------------
begin
v_cntry_cd := upper(i_cntry_cd);
v_message := 'Capture the market id';
select distinct mrkt_id
into v_mrkt_id
from codi.dim_mrkt
where cntry_cd = v_cntry_cd;
**v_file_name := 'OMSRPT_'||v_cntry_cd ||'_USR_REP.TXT';**
v_message := 'Logging details in to JOB LOG table';
pa_generic.lcl_init_logging (p_module_nm => 'Extracting data for User representatives',
p_program_nm => 'PR_GI_USR_REP_EXTRACT',
p_entity_nm => v_file_name,
p_job_nm => 'EXTRACT - DATA FOR USER REPRESENTATIVES',
p_job_log_id => pa_generic.g_job_seq_id,
p_cntry_cd => v_cntry_cd
commit;
execute immediate 'alter session set global_names=false';
-- Fetch the start and end camapigns for limiting the search on fact_rep_prfrmnc
select nvl(max(fld_sls_cmpgn_perd_id), 20040301) into v_cmpgn_perd_id from cdw.sum_mrkt_acct_sls where mrkt_id = v_mrkt_id ;
-- Fetch the 3rd previous campaign
v_prev_3rd_cmpgn := pa_generic.fn_get_past_cmpgn(v_mrkt_id,v_cmpgn_perd_id,3) ;
-- Fetch the 2nd previous campaign
v_prev_2nd_cmpgn := pa_generic.fn_get_past_cmpgn(v_mrkt_id,v_cmpgn_perd_id,2) ;
v_message := 'Opening the file';
v_file := utl_file.fopen_nchar ('CDW_GI_EXTRACT_' || v_cntry_cd || '_DIR', v_file_name, 'W', 32000);
--loop and fetch the cursor ext_usr_rep1
v_message := 'Opening Cursor ';
for ext_usr_reprec in ext_usr_rep
loop
va_strng := ext_usr_reprec.cur_fet;
utl_file.put_line_nchar (v_file, va_strng);
v_slct_cnt := v_slct_cnt + 1;
end loop;
v_message := 'Closing the file ';
utl_file.fclose (v_file);
v_message := 'Log the successful completion message';
hz_metadata.pa_log_gsl.end_logging ('SUCCESS');
v_message := 'Update the stats';
hz_metadata.pa_log_gsl.log_count (p_app_message => 'DATABASE OPERATION STATISTICS',
p_insert_count => 0,
p_update_count => 0,
p_select_count => v_slct_cnt,
p_error_count => 0
exception
when utl_file.invalid_path
then
log_error (v_message || ' due to invalid path');
raise;
when utl_file.invalid_mode
then
log_error (v_message || ' due to invalid mode');
raise;
when utl_file.invalid_operation
then
log_error (v_message || ' due to invalid operation');
raise;
when utl_file.write_error
then
log_error (v_message || ' due to write error');
raise;
when utl_file.internal_error
then
log_error (v_message || ' due to internal error');
raise;
when utl_file.invalid_filehandle
then
log_error (v_message || ' due to invalid file');
raise;
when no_data_found
then
log_error (v_message || ' due to no data');
raise;
when too_many_rows
then
log_error (v_message || ' due to more rows');
raise;
when others
then
log_error (v_message);
raise;
end pr_cdw_gi_usr_rep_extract;

Answer 1

ORA-3113 may be caused also (or should I say mostly ?) by Oracle bugs: you need to check your database instance alert log for ORA-07445 or ORA-00600 error message and for related trace file:
oerr ora 3113
03113, 00000, "end-of-file on communication channel"
// *Cause: The connection between Client and Server process was broken.
// *Action: There was a communication error that requires further investigation.
//          First, check for network problems and review the SQL*Net setup.
//          Also, look in the alert.log file for any errors. Finally, test to
//          see whether the server process is dead and whether a trace file
//          was generated at failure time.