dbo.MG_PEMI_RPT_PENGANTAR

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
CREATE PROCEDURE dbo.MG_PEMI_RPT_PENGANTAR
@PARAMETER xml 
--with encryption
as
DECLARE @xStsnoheader varchar(2),
  @xStsno varchar(2),
  @xStsdes varchar(100)
SET @xStsnoheader='03'
SET @xStsno='00';
SET @xStsdes='sukses'

DECLARE @XmlSts xml
DECLARE @raw xml

 
DECLARE @rowspage int,
  @page int,
  @desc int,
  @sort varchar(255) ,
    @date_printed date ,
   @start_date date,
    @end_date date,
   @mode int,
  @format varchar(255),
  @source varchar(255),
  @periode_pengantar varchar(255),
  @year varchar(255),
  @month varchar(255),
  @PeriodeName3 varchar(max)

SELECT
 @rowspage=isnull(tempTable.xItem.value('@rowspage', 'int'),50) ,
 @page=isnull(tempTable.xItem.value('@page', 'int'),1) ,
 @desc=isnull(tempTable.xItem.value('@desc', 'bit'),0) ,
 @sort=isnull(tempTable.xItem.value('@sort', 'varchar(255)'),'rID') ,
 @date_printed= isnull(tempTable.xItem.value('date_printed[1]', 'varchar(255)'),'')   ,
 @start_date=dbo.str_to_date(tempTable.xItem.value('start_date[1]', 'varchar(255)') ) ,
 @end_date=dbo.str_to_date(tempTable.xItem.value('end_date[1]', 'varchar(255)') ) ,
 @mode=isnull(tempTable.xItem.value('mode[1]', 'int'),1) ,
  @format=isnull(tempTable.xItem.value('format[1]', 'varchar(255)'),1),
 @source=isnull(tempTable.xItem.value('source[1]', 'varchar(255)'),'All'),
 @periode_pengantar=isnull(tempTable.xItem.value('periode_pengantar[1]', 'varchar(255)'),'All')  
FROM @PARAMETER.nodes('param/field')  tempTable(xItem)

select @year = txt_value from dbo.SplitStr('2017_10','_') where Position = 1
select @month = txt_value from dbo.SplitStr('2017_10','_') where Position = 2

declare @PeriodeName varchar(255)
declare @PeriodeName2 varchar(255)

set @PeriodeName=  'PERIODE ' +  dbo.dateToIndStr(@start_date) +' S.D ' + dbo.dateToIndStr( @end_date)
set @PeriodeName2=  ': ' + dbo.dateToIndStr(@start_date) +' S.D ' + dbo.dateToIndStr( @end_date)
set @PeriodeName3 = 'Laporan Bulanan Periode ' + case 
             when @month = 1 then 'Januari'
             when @month = 2 then 'Febuari'
             when @month = 3 then 'Maret'
             when @month = 4 then 'April'
             when @month = 5 then 'Mei'
             when @month = 6 then 'Juni'
             when @month = 7 then 'Juli'
             when @month = 8 then 'Agustus'
             when @month = 9 then 'September'
             when @month = 10 then 'Oktober'
             when @month = 11 then 'November'
             when @month = 12 then 'Desember'
             else ''
            end + ' ' + @year
              
 
declare @maxdec int

set @maxdec=(SELECT        MAX(set_decimal.detail_total) AS Expr1
FROM            set_decimal INNER JOIN
                         enum_bc_type ON set_decimal.bc_type_id = enum_bc_type.bc_type_id
WHERE        (enum_bc_type.x = 1))

if @maxdec is null
set @maxdec=4
 

DECLARE @motherboard_id varchar(255)
DECLARE @XMLValidString varchar(max)


DECLARE @max_dec_detail_unit int
, @max_dec_detail_total int
, @max_dec_detail_bruto int
, @max_dec_detail_netto int
, @max_dec_header_total int
, @max_dec_header_valuta int
, @max_dec_header_tambahan int
, @max_dec_header_diskon int
, @max_dec_header_asuransi int
, @max_dec_header_freight int
 
IF @max_dec_detail_unit is null
 SET @max_dec_detail_unit=4
IF @max_dec_detail_total is null
 SET @max_dec_detail_total=4
IF @max_dec_header_total is null
 SET @max_dec_header_total=2
IF @max_dec_header_tambahan is null
 SET @max_dec_header_tambahan=2
IF @max_dec_header_diskon is null
 SET @max_dec_header_diskon=2
IF @max_dec_header_asuransi is null
 SET @max_dec_header_asuransi=2
IF @max_dec_header_freight is null
 SET @max_dec_header_freight=2
IF @max_dec_header_valuta is null
 SET @max_dec_header_valuta=2
IF @max_dec_detail_bruto is null
 SET @max_dec_detail_bruto=2
IF @max_dec_detail_netto is null
 SET @max_dec_detail_netto=2
  

IF @format =''
SET @format='pdf'

declare @xlsreadonly bit
set @xlsreadonly=1
declare @additional_id int
declare @additional_value int

DECLARE @XMLMAPING xml
DECLARE @TABELDATA varchar(max)

declare @detail xml
declare @totalpages bigint


declare @SISAROWS bigint
declare @PT_NAME varchar(max)
   SELECT     TOP (1) @PT_NAME = isnull(CONVERT(varchar(MAX),DecryptByPassphrase('Ap4TanyaT4nya MauT4uAj4 4h'    , set_2)),'DEMO ONLY')  
  FROM         dt_app_set

set  @detail=(
    SELECT  top 1   
   @sort as 'sort' , 
   @desc as 'desc' , 
   @rowspage as 'rowspage' , 
   @totalpages as 'pages' ,
   @PeriodeName as 'periode_name',
   @PeriodeName2 as 'param1',
   @PT_NAME as 'nama_pt',
   @maxdec as 'max_decimal_digit_price',
   @xlsreadonly as 'xls_readonly',
   dbo.additional_info(3110) as 'ada_invoice',
   CONVERT(varchar(255),NEWID()) as 'report_ID',
   convert(varchar(10),getdate(),121) as 'param2',
   @PeriodeName3 as 'param3',
   @PeriodeName3 as 'param4'
   FROM         APP_SETTING
   for xml path('detail') )
 
 
f:
 

set @XmlSts=(select @xStsnoheader + @xStsno as 'no', @xStsdes as 'des' for xml path('sts'))

 select  CAST( (select  @XmlSts,@detail,@raw   for xml path ('result')
)  as XML)  as dt;


GO