dbo.MG_IMPORTIR_DATA

Description

Properties

Name Value
ANSI Nulls ON

True

Quoted Identifier ON

True

Encrypted

True

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_IMPORTIR_DATA
@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

BEGIN TRY
 BEGIN TRANSACTION;
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 @motherboard_id varchar(255)
declare @XMLValidString varchar(max)

SELECT     
TOP (1)
@XMLValidString=isnull(CONVERT(varchar(MAX),DecryptByPassphrase('Ap4TanyaT4nya MauT4uAj4 4h'    , set_30)),'')   ,
@motherboard_id=isnull(CONVERT(varchar(MAX),DecryptByPassphrase('Ap4TanyaT4nya MauT4uAj4 4h'    , set_23)),'XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX')   
FROM         dt_app_set
  
if @XMLValidString <>''
begin
set @XMLValidString =isnull(substring(@XMLValidString,len(@motherboard_id)+1,LEN(@XMLValidString)-LEN(@motherboard_id)+1) ,'')
declare  @XMLString xml 
set @XMLString=@XMLValidString
 
set @raw = (SELECT
isnull(tempTable.item.value('client_id[1]', 'int'),-1)as client_id,
isnull(tempTable.item.value('jenis_indentitas_id[1]', 'int'),-1) as jenis_indentitas_id,
isnull(tempTable.item.value('jenis_indentitas_name[1]', 'varchar(50)'),0) as jenis_indentitas_name,
isnull(tempTable.item.value('identitas_no[1]', 'varchar(50)'),0) as identitas_no,
isnull(tempTable.item.value('j_api_id[1]', 'int'),-1) as j_api_id,
isnull(tempTable.item.value('j_api_name[1]', 'varchar(50)'),0) as j_api_name,
isnull(tempTable.item.value('nomor_api[1]', 'varchar(50)'),0) as nomor_api,
isnull(tempTable.item.value('no_skep[1]', 'varchar(50)'),0)  as no_skep,
 tempTable.item.value('tanggal_skep[1]', 'datetime')   as tanggal_skep,
isnull(tempTable.item.value('address[1]', 'varchar(255)'),0) as address ,
isnull(tempTable.item.value('city[1]', 'varchar(255)'),0) as city,
isnull(tempTable.item.value('nama[1]', 'varchar(100)'),0)   as nama ,
isnull(tempTable.item.value('area_code[1]', 'varchar(255)'),0)   as area_code ,
isnull(tempTable.item.value('area_name[1]', 'varchar(255)'),0)   as area_name ,
isnull(tempTable.item.value('area_city[1]', 'varchar(255)'),0)   as area_city  
FROM @XMLString.nodes('module/importir')  tempTable(item) 
for xml path ('xrow')
);
end    

 
f:

 
COMMIT TRANSACTION;
set nocount off

END TRY  
BEGIN CATCH
 IF (@@TRANCOUNT > 0) 
 ROLLBACK TRAN;
 
 set @xStsno='88'
 set @xStsdes= ERROR_MESSAGE() 
END CATCH

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

GO

Used By

No items found