dbo.MG_REG2_DATA

Description

Properties

Name Value
ANSI Nulls ON

True

Quoted Identifier ON

True

Encrypted

False

Execute As
Assembly

Parameters

Name Data Type Length Description
@PARAMETER xml -1

SQL Script

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
create procedure dbo.MG_REG2_DATA
@PARAMETER xml 
--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)
   ,@valid_end varbinary(max)
   ,@info_license varbinary(max)
    

 SELECT
  @data_by=tempTable.item.value('data_by[1]', 'varchar(255)') ,
  @info_license= tempTable.item.value('info_license[1]', 'varbinary(max)') ,
  @valid_end= tempTable.item.value('valid_end[1]', 'varbinary(max)')  ,
   @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
  --set_23 varbinary(MAX) Yes motherboard_id
 --set_24 varbinary(MAX) Yes hardisk_id
 --set_25 varbinary(MAX) Yes count down valild day
 --set_3 varbinary(MAX) Yes INITIAL_ID
 --set_2 varbinary(MAX) Yes PT_NAME
 
  UPDATE     dt_app_set
    SET              
    set_29 = @info_license  , 
    set_22 =  @valid_end 
   end
   else
   begin
   set @xStsno='01';
 set @xStsdes='invalid access'
    end
  f:
  
 set @XmlSts=(select @xStsnoheader + @xStsno as 'no', @xStsdes as 'des' for xml path('sts'))

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

GO

Depends On

1

Used By

No items found