drop function if exists mmt_staging2.fn_PTO_report_block;
CREATE OR REPLACE FUNCTION mmt_staging2.fn_PTO_report_block(p_client_id int,p_function_id int, p_file_format text,
p_sheet_mnemonic text, p_file_syspk int)
   RETURNS text AS $$
   declare __make text;
   declare __model text;
   
   declare __client_id int :=p_client_id;
   declare __function_id int :=p_function_id;
   declare __file_format text  :=p_file_format;
   declare __sheet_mnemonic text :=p_sheet_mnemonic;
   declare __file_syspk int :=p_file_syspk;
   declare v_state   text;
   declare v_msg     text;
   declare v_detail  text;
   declare v_hint    text;
   declare v_context text;   
   declare _error int;
   declare v_block text;    
 begin

/***********************************************************************************
Function Name:fn_PTO_PNA_block
Function Desc: This function populates data into staging2 blocks
File Format: PTOBST
Sheet Format: PTOBST_RPT
Creation Date: March 21 2021
Updation Date:
Author: compegence team
Function Call: select mmt_staging2.fn_PTO_report_block(1,1,'PTOBST','PTOBST_RPT',880)
************************************************************************************/


SET search_path TO  mmt_staging2;

/* rerunnability - delete block tables and update config tables to null */
truncate table  mmt_staging2.stg_specific_table_PTO_report;
truncate table  mmt_staging2.stg_process_table_PTO_report;
truncate table  mmt_staging2.PTOBST_RPT_tractor_specs_block;
truncate table  mmt_staging2.PTOBST_RPT_PTO_performance_report_block;
truncate table  mmt_staging2.PTOBST_RPT_MMTKeyword1_block;
truncate table  mmt_staging2.PTOBST_RPT_MMTKeyword2_block;
truncate table  mmt_staging2.PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block;


execute 'delete from mmt_ods.fw_jobctrl_file_sheet_block_run_schedule where file_syspk='||p_file_syspk||' and sheet_mnemonic='''||p_sheet_mnemonic||'''';

execute 'update mmt_ods.mmt_config a
set row_number_start=null,
row_previous_number=null,
row_read_end=null,
run_time=null
where   a.file_format='''||p_file_format||''' and a.sheet_mnemonic='''||p_sheet_mnemonic||'''';

/* transfer data from generic to specific for PTOBST */
execute 'insert into  mmt_staging2.stg_specific_table_PTO_report 
select * from mmt_staging1.mmt_staging_generic_table a
where   a.file_format='''||p_file_format||''' and a.sheet_mnemonic='''||p_sheet_mnemonic||'''
and a.file_syspk='||p_file_syspk||'';

/* trimming data */
update mmt_staging2.stg_specific_table_PTO_report set column3 =  TRIM (TRAILING FROM column3 );
update mmt_staging2.stg_specific_table_PTO_report set column3 =  TRIM (LEADING FROM column3 );

update mmt_ods.mmt_config set F1_modified =  TRIM (TRAILING FROM F1_modified) ;
update mmt_ods.mmt_config set F1_modified =  TRIM (LEADING FROM F1_modified) ;
update mmt_ods.mmt_config set F1_source=F1_modified ;
update mmt_ods.mmt_config set F1_source =  TRIM (TRAILING FROM F1_source);
update mmt_ods.mmt_config set F1_source =  TRIM (LEADING FROM F1_source);

/* keyword match in config table*/
execute 'update mmt_ods.mmt_config a  
set row_number_start=(select min(b.row_number)
from mmt_staging2.stg_specific_table_PTO_report  b
where trim(upper(F1_modified))=trim(upper(column3))
and b.is_rownumber_fetched is null)
where a.row_number_start is null
and a.file_format='''||p_file_format||''' and a.sheet_mnemonic='''||p_sheet_mnemonic||'''';

/* reverese update in process table for match*/
execute 'update mmt_staging2.stg_specific_table_PTO_report  a  
set is_rownumber_fetched=1
from mmt_ods.mmt_config  b
where trim(upper(F1_modified))=trim(upper(column3))
and b.row_number_start=a.row_number
and is_rownumber_fetched is null
and a.file_format='''||p_file_format||''' and a.sheet_mnemonic='''||p_sheet_mnemonic||'''';

/*  update config files for row numbers start, end */
execute 'update mmt_ods.mmt_config a set row_previous_number=row_number_start-1
where a.file_format='''||p_file_format||''' and a.sheet_mnemonic='''||p_sheet_mnemonic||'''';

execute 'update mmt_ods.mmt_config a
set row_read_end= (select b.row_number_start
from mmt_ods.mmt_config b 
where b.syspk=a.syspk+1 and file_format='''||p_file_format||''' and sheet_mnemonic='''||p_sheet_mnemonic||''' ) 
where a.file_format='''||p_file_format||''' and a.sheet_mnemonic='''||p_sheet_mnemonic||'''';

/* config file last field update as null otherwise it picks up next format row number*/
execute 'update mmt_ods.mmt_config a 
set row_read_end = null ,run_time=current_timestamp
where f1_modified =''PTO Performance Test Observations Summary'' 
and a.file_format='''||p_file_format||''' and a.sheet_mnemonic='''||p_sheet_mnemonic||'''';

/* tagging ranks for each block in process table*/
execute 'insert into mmt_staging2.stg_process_table_PTO_report
select a.* , RANK () OVER ( ORDER BY row_number) as rank,b.rank_tag as rank_tag
from  mmt_staging2.stg_specific_table_PTO_report  a
join mmt_ods.mmt_config b 
on a.row_number >=row_number_start 
and (a.row_number< row_read_end or row_read_end is null)
and f1_modified=''Test Tractor Specifiactions''
and  b.file_format='''||p_file_format||''' and b.sheet_mnemonic='''||p_sheet_mnemonic||'''';

execute 'insert into mmt_staging2.stg_process_table_PTO_report
select a.* , RANK () OVER ( ORDER BY row_number) as rank,b.rank_tag as rank_tag 
from  mmt_staging2.stg_specific_table_PTO_report  a
join mmt_ods.mmt_config b 
on a.row_number >=row_number_start 
and (a.row_number< row_read_end or row_read_end is null)
and f1_modified=''PTO Performance Report''
and  b.file_format='''||p_file_format||''' and b.sheet_mnemonic='''||p_sheet_mnemonic||'''';

execute 'insert into mmt_staging2.stg_process_table_PTO_report
select a.* , RANK () OVER ( ORDER BY row_number) as rank,b.rank_tag as rank_tag from  mmt_staging2.stg_specific_table_PTO_report  a
join mmt_ods.mmt_config b 
on a.row_number >=row_number_start 
and (a.row_number< row_read_end or row_read_end is null)
and f1_modified=''MMTKeyword1''
and  b.file_format='''||p_file_format||''' and b.sheet_mnemonic='''||p_sheet_mnemonic||'''';

execute 'insert into mmt_staging2.stg_process_table_PTO_report
select a.* , RANK () OVER ( ORDER BY row_number) as rank,b.rank_tag as rank_tag from  mmt_staging2.stg_specific_table_PTO_report  a
join mmt_ods.mmt_config b 
on a.row_number >=row_number_start 
and (a.row_number< row_read_end or row_read_end is null)
and f1_modified=''MMTKeyword2''
and  b.file_format='''||p_file_format||''' and b.sheet_mnemonic='''||p_sheet_mnemonic||'''';

execute 'insert into mmt_staging2.stg_process_table_PTO_report
select a.* , RANK () OVER ( ORDER BY row_number) as rank,b.rank_tag as rank_tag
from  mmt_staging2.stg_specific_table_PTO_report  a
join mmt_ods.mmt_config b 
on a.row_number >=row_number_start 
and (a.row_number< row_read_end or row_read_end is null)
and f1_modified=''PTO Performance Test Observations Summary''
and  b.file_format='''||p_file_format||''' and b.sheet_mnemonic='''||p_sheet_mnemonic||'''';

/* fetching tractor model and make */
select column3  into __make from mmt_staging2.stg_process_table_PTO_report a
where  rank_tag='PTOBST_RPT_test_tractor_specifiactions' and rank=3 ;

select column4  into __model from mmt_staging2.stg_process_table_PTO_report a
where  rank_tag='PTOBST_RPT_test_tractor_specifiactions' and rank=3;


/* blocks data loading start - PTOBST_RPT_tractor_specs_block */


perform mmt_staging2.fn_jobctrl_block_begin(__client_id,__function_id,__file_syspk,
'PTOBST_RPT_tractor_specs_block',__file_format,__sheet_mnemonic,1); 
v_block :='PTOBST_RPT_tractor_specs_block';
insert into mmt_staging2.PTOBST_RPT_tractor_specs_block
(make,model,tractor_HP,rated_rpm,configuration,transmission_type,wheel_drive_type,FIP_type,rank)
select column3,column4,column5,column6,column7,column8,column9,column10,rank
from mmt_staging2.stg_process_table_PTO_report where rank_tag='PTOBST_RPT_test_tractor_specifiactions'
and rank=3;

execute 'update mmt_staging2.PTOBST_RPT_tractor_specs_block set file_syspk='||p_file_syspk||'';

update  mmt_staging2.PTOBST_RPT_tractor_specs_block a
set date= date '1899-12-30' + column12::int * interval '1' day 
from mmt_staging2.stg_process_table_PTO_report b 
where b.rank_tag='PTOBST_RPT_test_tractor_specifiactions'
and b.rank=1 
and a.file_syspk=b.file_syspk ;

update  mmt_staging2.PTOBST_RPT_tractor_specs_block a
set steering_type=column3,Engine_to_PTO_ratio= column4
from mmt_staging2.stg_process_table_PTO_report b 
where b.rank_tag='PTOBST_RPT_test_tractor_specifiactions'
and b.rank=5
and a.file_syspk=b.file_syspk;
 
 update mmt_staging2.PTOBST_RPT_tractor_specs_block set make=__make; 
 update mmt_staging2.PTOBST_RPT_tractor_specs_block set model=__model;
 execute 'update mmt_staging2.PTOBST_RPT_tractor_specs_block set client_id='||p_client_id||'';
 execute 'update mmt_staging2.PTOBST_RPT_tractor_specs_block set function_id='||p_function_id||'';
 execute 'update mmt_staging2.PTOBST_RPT_tractor_specs_block set file_format='''||p_file_format||'''';
 execute 'update mmt_staging2.PTOBST_RPT_tractor_specs_block set sheet_mnemonic='''||p_sheet_mnemonic||'''';

perform mmt_staging2.fn_jobctrl_block_end(__file_syspk,'PTOBST_RPT_tractor_specs_block'); 

/* blocks data loading - PTOBST_RPT_PTO_performance_report_block  */

perform mmt_staging2.fn_jobctrl_block_begin(__client_id,__function_id,__file_syspk,
'PTOBST_RPT_PTO_performance_report_block',__file_format,__sheet_mnemonic,2); 
v_block :='PTOBST_RPT_PTO_performance_report_block';

insert into mmt_staging2.PTOBST_RPT_PTO_performance_report_block
( c2,c3,c4,c5,c6,c7,c8,c9,c10,rank)
select column2,column3,column4,column5,column6,column7,column8,column9,column10,rank
from mmt_staging2.stg_process_table_PTO_report
where rank_tag='PTOBST_RPT_PTO_performance_report';


update mmt_staging2.PTOBST_RPT_PTO_performance_report_block
set c2=c3;

update mmt_staging2.PTOBST_RPT_PTO_performance_report_block
set c2=null 
where c2 like 'i%';

update mmt_staging2.PTOBST_RPT_PTO_performance_report_block
set c2=null 
where c2 like 'v%';

update mmt_staging2.PTOBST_RPT_PTO_performance_report_block a 
set c2= b.first_value from (SELECT
  rank, c2, value_partition, first_value(c2) over (partition by value_partition order by rank)
FROM (
  SELECT
    rank,
    c2,
    sum(case when c2 is null then 0 else 1 end) over (order by rank) as value_partition  
    FROM mmt_staging2.PTOBST_RPT_PTO_performance_report_block 
  ORDER BY rank ASC
) as q) b where a.rank = b.rank ;

update mmt_staging2.PTOBST_RPT_PTO_performance_report_block
set c3 =null 
where c2=c3;

update mmt_staging2.PTOBST_RPT_PTO_performance_report_block
set ods_record=0 where rank in (1,2,3);


update mmt_staging2.PTOBST_RPT_PTO_performance_report_block set ods_record=0 where c3 is null 
and c2 in(
select c2 from mmt_staging2.PTOBST_RPT_PTO_performance_report_block group by c2 having count(*)>1
);
  
  update mmt_staging2.PTOBST_RPT_PTO_performance_report_block set make=__make; 
 update mmt_staging2.PTOBST_RPT_PTO_performance_report_block set model=__model;
 execute 'update mmt_staging2.PTOBST_RPT_PTO_performance_report_block set client_id='||p_client_id||'';
 execute 'update mmt_staging2.PTOBST_RPT_PTO_performance_report_block set function_id='||p_function_id||'';
 execute 'update mmt_staging2.PTOBST_RPT_PTO_performance_report_block set file_format='''||p_file_format||'''';
 execute 'update mmt_staging2.PTOBST_RPT_PTO_performance_report_block set sheet_mnemonic='''||p_sheet_mnemonic||'''';
  execute 'update mmt_staging2.PTOBST_RPT_PTO_performance_report_block set file_syspk='||p_file_syspk||'';
 
perform mmt_staging2.fn_jobctrl_block_end(__file_syspk,'PTOBST_RPT_PTO_performance_report_block'); 

 /* block loading data  - PTOBST_RPT_MMTKeyword1_block*/

 perform mmt_staging2.fn_jobctrl_block_begin(__client_id,__function_id,__file_syspk,
'PTOBST_RPT_MMTKeyword1_block',__file_format,__sheet_mnemonic,3); 
 v_block :='PTOBST_RPT_MMTKeyword1_block';

 insert into mmt_staging2.PTOBST_RPT_MMTKeyword1_block
( c2,c3,c4,c5,c6,c7,c8,c9,c10,c11,c12,rank)
select column2,column3,column4,column5,column6,column7,column8,column9,column10,column11,column12,rank
from mmt_staging2.stg_process_table_PTO_report
where rank_tag='PTOBST_RPT_MMTKeyword1';


update mmt_staging2.PTOBST_RPT_MMTKeyword1_block set ods_record=0 where rank in (1,2);

   update mmt_staging2.PTOBST_RPT_MMTKeyword1_block set make=__make; 
 update mmt_staging2.PTOBST_RPT_MMTKeyword1_block set model=__model;
 execute 'update mmt_staging2.PTOBST_RPT_MMTKeyword1_block set client_id='||p_client_id||'';
 execute 'update mmt_staging2.PTOBST_RPT_MMTKeyword1_block set function_id='||p_function_id||'';
 execute 'update mmt_staging2.PTOBST_RPT_MMTKeyword1_block set file_format='''||p_file_format||'''';
 execute 'update mmt_staging2.PTOBST_RPT_MMTKeyword1_block set sheet_mnemonic='''||p_sheet_mnemonic||'''';
  execute 'update mmt_staging2.PTOBST_RPT_MMTKeyword1_block set file_syspk='||p_file_syspk||'';
 
 
perform mmt_staging2.fn_jobctrl_block_end(__file_syspk,'PTOBST_RPT_MMTKeyword1_block'); 

 /* block loading data PTOBST_RPT_MMTKeyword2_block */
perform mmt_staging2.fn_jobctrl_block_begin(__client_id,__function_id,__file_syspk,
'PTOBST_RPT_MMTKeyword2_block',__file_format,__sheet_mnemonic,4); 
 v_block :='PTOBST_RPT_MMTKeyword2_block';

insert into mmt_staging2.PTOBST_RPT_MMTKeyword2_block
( c2,c3,c4,c5,c6,c7,c8,c9,c10,c11,c12,rank)
select column2,column3,column4,column5,column6,column7,column8,column9,column10,column11,column12,rank
from mmt_staging2.stg_process_table_PTO_report
where rank_tag='PTOBST_RPT_MMTKeyword2';


update mmt_staging2.PTOBST_RPT_MMTKeyword2_block set ods_record=0 where rank in (1,2);


   update mmt_staging2.PTOBST_RPT_MMTKeyword2_block set make=__make; 
 update mmt_staging2.PTOBST_RPT_MMTKeyword2_block set model=__model;
 execute 'update mmt_staging2.PTOBST_RPT_MMTKeyword2_block set client_id='||p_client_id||'';
 execute 'update mmt_staging2.PTOBST_RPT_MMTKeyword2_block set function_id='||p_function_id||'';
 execute 'update mmt_staging2.PTOBST_RPT_MMTKeyword2_block set file_format='''||p_file_format||'''';
 execute 'update mmt_staging2.PTOBST_RPT_MMTKeyword2_block set sheet_mnemonic='''||p_sheet_mnemonic||'''';
   execute 'update mmt_staging2.PTOBST_RPT_MMTKeyword2_block set file_syspk='||p_file_syspk||'';
 
  perform mmt_staging2.fn_jobctrl_block_end(__file_syspk,'PTOBST_RPT_MMTKeyword2_block'); 

/* block loading data PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block */
perform mmt_staging2.fn_jobctrl_block_begin(__client_id,__function_id,__file_syspk,
'PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block',__file_format,__sheet_mnemonic,5); 
 v_block :='PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block';


insert into mmt_staging2.PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block
( c2,c3,c4,c5,c6,c7,c8,c9,c10,c11,c12,rank)
select column2,column3,column4,column5,column6,column7,column8,column9,column10,column11,column12,rank
from mmt_staging2.stg_process_table_PTO_report
where rank_tag='PTOBST_RPT_PTO_Performance_Test_Observations_Summary';



update mmt_staging2.PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block set ods_record=0 where rank in (1,2);

   update mmt_staging2.PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block set make=__make; 
 update mmt_staging2.PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block set model=__model;
 execute 'update mmt_staging2.PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block set client_id='||p_client_id||'';
 execute 'update mmt_staging2.PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block set function_id='||p_function_id||'';
 execute 'update mmt_staging2.PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block set file_format='''||p_file_format||'''';
 execute 'update mmt_staging2.PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block set sheet_mnemonic='''||p_sheet_mnemonic||'''';
   execute 'update mmt_staging2.PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block set file_syspk='||p_file_syspk||'';

perform mmt_staging2.fn_jobctrl_block_end(__file_syspk,'PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block'); 

/* final update */

update mmt_staging2.PTOBST_RPT_PTO_performance_report_block set test_condition='PTO performance report';
update mmt_staging2.PTOBST_RPT_PTO_performance_report_block set test_condition='PTO performance report';
update mmt_staging2.PTOBST_RPT_PTO_Performance_Test_Observations_Summary_block set test_condition='PTO_Performance_Test_Observations_Summary';

 v_context := '';
perform  mmt_staging2.mmt_insert_db_error ( __client_id, __function_id, 1001, 'Compegence', __file_syspk ,__file_format,__sheet_mnemonic ,null,'stg2', 'fn_PTO_report_block', v_state, v_msg, v_detail, v_hint, v_context,'success');
return v_context;	

EXCEPTION when OTHERS then 
	
GET STACKED DIAGNOSTICS 
       v_state   = returned_sqlstate,
       v_msg     = message_text,
       v_detail  = pg_exception_detail,
       v_hint    = pg_exception_hint,
       v_context = pg_exception_context;

   	   perform  mmt_staging2.mmt_insert_db_error ( __client_id, __function_id, 1001, 'Compegence', __file_syspk ,__file_format,__sheet_mnemonic ,v_block,'stg2', 'fn_PTO_report_block', v_state, v_msg, v_detail, v_hint, v_context,'error');
return v_context;
end
$$ LANGUAGE plpgsql;