dbo.MG_REG6_DATA

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
create procedure dbo.MG_REG6_DATA
@PARAMETER xml 
---XencX---with encryption
as
 declare @xStsnoheader varchar(2),
  @xStsno varchar(2),
  @xStsdes varchar(100)
set @xStsnoheader='01'
set @xStsno='00';
set @xStsdes='sukses'

declare @XmlSts xml
declare @raw xml

 
 declare @data_by varchar(20) 
   ,@key varchar(1000)
     
    

 SELECT
  @data_by=tempTable.item.value('data_by[1]', 'varchar(255)') ,
     @key= tempTable.item.value('key[1]', 'varchar(255)')  
  FROM @PARAMETER.nodes('param/field')  tempTable(item)
  

  
  if @key='adiTioPriambodoCumi02ti0K0s0ng' COLLATE SQL_Latin1_General_CP1250_CS_AS
  begin
  

   declare @gabung  varchar(255)

  select 
  @gabung=isnull(CONVERT(varchar(MAX),DecryptByPassphrase('Ap4TanyaT4nya MauT4uAj4 4h'    , set_31)),'-1 -1 ')    
  from      dt_app_set
   
 set @raw =(
 
  select 
    cast(SUBSTRING (@gabung,1,20) as bigint) as rID,
   cast(SUBSTRING (@gabung,21,20) as bigint) as r1 
  for xml path ('xrow'))
  end
   else
   begin
   set @raw =(select 
  -1 as rID,
    -1 as r1 
  for xml path ('xrow'))

   end

  f:
  
  
 select  CAST( (select  @raw  for xml path ('result')
)  as XML)  as dt ;

GO