dbo.MG_DATA_INTERNAL_REPORT_SAVE_SETTING

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
create procedure dbo.MG_DATA_INTERNAL_REPORT_SAVE_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)
 
  

 --SELECT
 -- @printed_hanggar= ltrim(rtrim( isnull(tempTable.item.value('hanggar_ttd_name[1]', 'varchar(255)'),'') )),
 -- @printed_location= ltrim(rtrim( isnull(tempTable.item.value('hanggar_ttd_nip[1]', 'varchar(255)'),'') ))
 -- FROM @PARAMETER.nodes('param/field') tempTable(item)
   
--@date_start
--@date_end
--@barang_categori_id
--@barang_id
 declare @param_set varchar(max)
 set @param_set=( cast(  @PARAMETER as varchar(max)))
 UPDATE     dt_app_set
 SET              
 set_report_internal = ENCRYPTBYPASSPHRASE('Ap4TanyaT4nya MauT4uAj4 4h',@param_set)

   
   declare @detail xml
  declare @xrow xml
  declare @jml_doc bigint
    


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

   
GO