dbo.MG_DATA_BC_LOAD_SETTING

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
create procedure dbo.MG_DATA_BC_LOAD_SETTING
@PARAMETER xml='' 
--with encryption
as

declare @pemisah varchar(2)
set @pemisah=CHAR(13) + CHAR(10)
declare @resultX varchar(3000)

declare @XmlSts xml
declare @raw xml
declare @xStsnoheader varchar(2),
  @xStsno varchar(2),
  @xStsdes varchar(4000)
  
set @xStsnoheader='07'
set @xStsno='00';
set @xStsdes='sukses'

    SET NOCOUNT ON
 exec  MG_CHECK_CREATE_PERIODE  @xStsno output,@xStsdes output;
 if not(
 @xStsno ='00'
  )
 begin
    set @XmlSts=(select @xStsnoheader + @xStsno as 'no', @xStsdes as 'des' for xml path('sts'))
   goto g 
  end
 SET NOCOUNT OFF
  
SET NOCOUNT ON
DECLARE @NOW datetime
set @NOW =GETDATE()
 
declare @ip varchar(255)

 declare  
 @id int  ,
 @readonly int
  
  execUTE  [dbo].[S_ALL_LOG_DETAIL]
  @LOG_PARAM =@PARAMETER,
  @id = @id OUTPUT,
  @readonly = @readonly OUTPUT,
  @no = @xStsno OUTPUT,
  @des = @xStsdes OUTPUT
 
if @xStsno <>'00'
goto f 
 
--declare @additional_id int
--declare @additional_value int
--set @additional_id=8010

--set @additional_value= dbo.additional_info(@additional_id)
--if @additional_value =0
--begin
--set @xStsno='06'
--set @xStsdes='Maaf Module "MODULE Monthly Report Incoming BC 2.3 " belum diaktivasi dalam system'
--goto f
--end
  


declare @fDecimal varchar(255),
   @fGroup varchar(255)

 SELECT
   @fDecimal= tempTable.item.value('DecimalSeparator[1]', 'varchar(255)') ,
   @fGroup= tempTable.item.value('GroupSeparator[1]', 'varchar(255)')  
  FROM @PARAMETER.nodes('param/field/float_info')  tempTable(item)
 
 --declare
 --@printed_location varchar(255)
 --,@printed_hanggar varchar(255)
 --,@hanggar_tdd_name varchar(255)
 --,@hanggar_tdd_nip varchar(255)
   

 --SELECT
 -- @printed_location= ltrim(rtrim( isnull(tempTable.item.value('printed_location[1]', 'varchar(255)'),'') )),
 -- @printed_hanggar= ltrim(rtrim( isnull(tempTable.item.value('printed_hanggar[1]', 'varchar(255)'),'') )),
 -- @printed_tdd_name= ltrim(rtrim( isnull(tempTable.item.value('printed_tdd_name[1]', 'varchar(255)'),'') )),
 -- @printed_tdd_nip= ltrim(rtrim( isnull(tempTable.item.value('printed_tdd_nip[1]', 'varchar(255)'),'') ))
 -- FROM @PARAMETER.nodes('param/field') tempTable(item)
   
--@date_start
--@date_end
--@barang_categori_id
--@barang_id
    
   declare @detail xml
  declare @xrow xml
  declare @jml_doc bigint
  declare @HASIL xml

  set @HASIL=(
 select 
  isnull(CONVERT(varchar(MAX),DecryptByPassphrase('Ap4TanyaT4nya MauT4uAj4 4h'    , set_hanggar)),'')    
 from      dt_app_set
 )
   
 set @xrow= (
  SELECT
   1 as rID,
    ltrim(rtrim( isnull(tempTable.item.value('hanggar_tdd_name[1]', 'varchar(255)'),'') )) as hanggar_tdd_name,
   ltrim(rtrim( isnull(tempTable.item.value('hanggar_tdd_nip[1]', 'varchar(255)'),'') )) as hanggar_tdd_nip 
  FROM @HASIL.nodes('param/field')  tempTable(item)
   for xml path('xrow')
  );


f:
 
g:
set @XmlSts=(select @xStsnoheader + @xStsno as 'no', @xStsdes as 'des' for xml path('sts'))
 select  CAST( (select 
 @XmlSts,
 isnull(@xrow ,'')  ,
 isnull(@detail ,'')  
 
     for xml path ('result')
)  as XML)  as dt;

  
GO