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_REG4_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
SET NOCOUNT ON
declare @data_by varchar(20)
,@key varchar(1000)
,@info_interface varbinary(max)
SELECT
@data_by=tempTable.item.value('data_by[1]', 'varchar(255)') ,
@info_interface= tempTable.item.value('info_interface[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
UPDATE dt_app_set
SET
set_30 = @info_interface ;
----CHECK APAKAH DATA IMPORTIR SAMA DENGAN YANG LAMA
declare @XMLValidString varchar(max),@motherboard_id 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
declare @detail xml
if @XMLValidString <>''
begin
set @XMLValidString =isnull(substring(@XMLValidString,len(@motherboard_id)+1,LEN(@XMLValidString)-LEN(@motherboard_id)+1) ,'')
declare @XMLString xml
set @XMLString=@XMLValidString
declare
@jenis_indentitas_id int
,@jenis_indentitas_name varchar(50)
,@identitas_no varchar(50)
,@angka_pengenal_import_id int
,@angka_pengenal_import_nama varchar(50)
,@angka_pengenal_import_nomor varchar(50)
,@no_skep varchar(50)
,@tanggal_skep date
,@address varchar(255)
,@city varchar(255)
,@area_code varchar(255)
,@area_name varchar(255)
,@area_city varchar(255)
,@nama varchar(100)
,@nama_by_identitas varchar(100)
select
@jenis_indentitas_id= isnull(tempTable.item.value('jenis_indentitas_id[1]', 'varchar(255)'),''),
@jenis_indentitas_name= isnull(tempTable.item.value('jenis_indentitas_name[1]', 'varchar(255)'),'') ,
@identitas_no= isnull(tempTable.item.value('identitas_no[1]', 'varchar(255)'),'') ,
@angka_pengenal_import_id= isnull(tempTable.item.value('j_api_id[1]', 'varchar(255)'),'') ,
@angka_pengenal_import_nama= isnull(tempTable.item.value('j_api_name[1]', 'varchar(255)'),'') ,
@angka_pengenal_import_nomor= isnull(tempTable.item.value('nomor_api[1]', 'varchar(255)'),'') ,
@no_skep= isnull(tempTable.item.value('no_skep[1]', 'varchar(255)'),'') ,
@tanggal_skep= convert( date, isnull(tempTable.item.value('tanggal_skep[1]', 'varchar(255)'),'') ,121) ,
@address= isnull(tempTable.item.value('address[1]', 'varchar(255)'),'') ,
@city= isnull(tempTable.item.value('city[1]', 'varchar(255)'),''),
@nama= isnull(tempTable.item.value('nama[1]', 'varchar(255)'),''),
@nama_by_identitas= isnull(tempTable.item.value('nama_by_identitas[1]', 'varchar(255)'),'') ,
@area_code= isnull(tempTable.item.value('area_code[1]', 'varchar(255)'),'') ,
@area_name= isnull(tempTable.item.value('area_name[1]', 'varchar(255)'),'') ,
@area_city= isnull(tempTable.item.value('area_city[1]', 'varchar(255)'),'')
FROM @XMLString.nodes('module/importir') tempTable(item)
end
declare @importir_id int
if (select count(*) from dt_importir)=0
begin
INSERT INTO dt_importir
(field_1, field_2, field_3, field_4, field_5, field_6, field_7, field_8, field_9, field_10, field_11, field_12, field_13, field_14, field_15)
VALUES (
ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , cast(@jenis_indentitas_id as varchar(255)))
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @jenis_indentitas_name)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @identitas_no)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , cast(@angka_pengenal_import_id as varchar(255)))
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @angka_pengenal_import_nama)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @angka_pengenal_import_nomor)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @no_skep)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , convert(varchar(255),@tanggal_skep,121))
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @address)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @city)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @area_code)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @area_name)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @area_city)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @nama)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @nama_by_identitas)
)
set @importir_id=scope_identity()
end
else
begin
set @importir_id=(SELECT top 1 importir_id
FROM dv_importir
WHERE (jenis_indentitas_id = @jenis_indentitas_id) AND (jenis_indentitas_name = @jenis_indentitas_name) AND (identitas_no = @identitas_no) AND
(angka_pengenal_import_id = @angka_pengenal_import_id) AND (angka_pengenal_import_nama = @angka_pengenal_import_nama) AND
(angka_pengenal_import_nomor = @angka_pengenal_import_nomor) AND (no_skep = @no_skep) AND (tanggal_skep = @tanggal_skep) AND
(address = @address) AND (city = @city) AND (area_code = @area_code) AND (area_name = @area_name) AND (area_city = @area_city) AND (nama = @nama)
AND (nama_by_identitas = @nama_by_identitas)
order by importir_id desc
)
if @importir_id is null
begin
INSERT INTO dt_importir
(field_1, field_2, field_3, field_4, field_5, field_6, field_7, field_8, field_9, field_10, field_11, field_12, field_13, field_14, field_15)
VALUES (
ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , cast(@jenis_indentitas_id as varchar(255)))
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @jenis_indentitas_name)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @identitas_no)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , cast(@angka_pengenal_import_id as varchar(255)))
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @angka_pengenal_import_nama)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @angka_pengenal_import_nomor)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @no_skep)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , convert(varchar(255),@tanggal_skep,121))
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @address)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @city)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @area_code)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @area_name)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @area_city)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @nama)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @nama_by_identitas)
)
set @importir_id=scope_identity()
end
end
--IF (NOT EXISTS (SELECT *
-- FROM INFORMATION_SCHEMA.TABLES
-- WHERE TABLE_SCHEMA = 'dbo'
-- AND TABLE_NAME = 'dt_doc_in_header_bc'))
-- begin
-- UPDATE dt_doc_in_header_bc
-- SET importir_id = @importir_id
-- WHERE (importir_id IS NULL)
--end
-- IF (NOT EXISTS (SELECT *
-- FROM INFORMATION_SCHEMA.TABLES
-- WHERE TABLE_SCHEMA = 'dbo'
-- AND TABLE_NAME = 'dt_doc_out_plan_bc'))
-- begin
-- UPDATE dt_doc_out_plan_bc
--SET importir_id = @importir_id
--WHERE (importir_id IS NULL)
--end
----
end
f:
set @XmlSts=(select @xStsnoheader + @xStsno as 'no', @xStsdes as 'des' for xml path('sts'))
SET NOCOUNT OFF
select CAST( (select @XmlSts ,@raw for xml path ('result')
) as XML) as dt;
GO
GO
create procedure dbo.MG_REG4_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
SET NOCOUNT ON
declare @data_by varchar(20)
,@key varchar(1000)
,@info_interface varbinary(max)
SELECT
@data_by=tempTable.item.value('data_by[1]', 'varchar(255)') ,
@info_interface= tempTable.item.value('info_interface[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
UPDATE dt_app_set
SET
set_30 = @info_interface ;
----CHECK APAKAH DATA IMPORTIR SAMA DENGAN YANG LAMA
declare @XMLValidString varchar(max),@motherboard_id 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
declare @detail xml
if @XMLValidString <>''
begin
set @XMLValidString =isnull(substring(@XMLValidString,len(@motherboard_id)+1,LEN(@XMLValidString)-LEN(@motherboard_id)+1) ,'')
declare @XMLString xml
set @XMLString=@XMLValidString
declare
@jenis_indentitas_id int
,@jenis_indentitas_name varchar(50)
,@identitas_no varchar(50)
,@angka_pengenal_import_id int
,@angka_pengenal_import_nama varchar(50)
,@angka_pengenal_import_nomor varchar(50)
,@no_skep varchar(50)
,@tanggal_skep date
,@address varchar(255)
,@city varchar(255)
,@area_code varchar(255)
,@area_name varchar(255)
,@area_city varchar(255)
,@nama varchar(100)
,@nama_by_identitas varchar(100)
select
@jenis_indentitas_id= isnull(tempTable.item.value('jenis_indentitas_id[1]', 'varchar(255)'),''),
@jenis_indentitas_name= isnull(tempTable.item.value('jenis_indentitas_name[1]', 'varchar(255)'),'') ,
@identitas_no= isnull(tempTable.item.value('identitas_no[1]', 'varchar(255)'),'') ,
@angka_pengenal_import_id= isnull(tempTable.item.value('j_api_id[1]', 'varchar(255)'),'') ,
@angka_pengenal_import_nama= isnull(tempTable.item.value('j_api_name[1]', 'varchar(255)'),'') ,
@angka_pengenal_import_nomor= isnull(tempTable.item.value('nomor_api[1]', 'varchar(255)'),'') ,
@no_skep= isnull(tempTable.item.value('no_skep[1]', 'varchar(255)'),'') ,
@tanggal_skep= convert( date, isnull(tempTable.item.value('tanggal_skep[1]', 'varchar(255)'),'') ,121) ,
@address= isnull(tempTable.item.value('address[1]', 'varchar(255)'),'') ,
@city= isnull(tempTable.item.value('city[1]', 'varchar(255)'),''),
@nama= isnull(tempTable.item.value('nama[1]', 'varchar(255)'),''),
@nama_by_identitas= isnull(tempTable.item.value('nama_by_identitas[1]', 'varchar(255)'),'') ,
@area_code= isnull(tempTable.item.value('area_code[1]', 'varchar(255)'),'') ,
@area_name= isnull(tempTable.item.value('area_name[1]', 'varchar(255)'),'') ,
@area_city= isnull(tempTable.item.value('area_city[1]', 'varchar(255)'),'')
FROM @XMLString.nodes('module/importir') tempTable(item)
end
declare @importir_id int
if (select count(*) from dt_importir)=0
begin
INSERT INTO dt_importir
(field_1, field_2, field_3, field_4, field_5, field_6, field_7, field_8, field_9, field_10, field_11, field_12, field_13, field_14, field_15)
VALUES (
ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , cast(@jenis_indentitas_id as varchar(255)))
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @jenis_indentitas_name)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @identitas_no)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , cast(@angka_pengenal_import_id as varchar(255)))
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @angka_pengenal_import_nama)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @angka_pengenal_import_nomor)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @no_skep)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , convert(varchar(255),@tanggal_skep,121))
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @address)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @city)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @area_code)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @area_name)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @area_city)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @nama)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @nama_by_identitas)
)
set @importir_id=scope_identity()
end
else
begin
set @importir_id=(SELECT top 1 importir_id
FROM dv_importir
WHERE (jenis_indentitas_id = @jenis_indentitas_id) AND (jenis_indentitas_name = @jenis_indentitas_name) AND (identitas_no = @identitas_no) AND
(angka_pengenal_import_id = @angka_pengenal_import_id) AND (angka_pengenal_import_nama = @angka_pengenal_import_nama) AND
(angka_pengenal_import_nomor = @angka_pengenal_import_nomor) AND (no_skep = @no_skep) AND (tanggal_skep = @tanggal_skep) AND
(address = @address) AND (city = @city) AND (area_code = @area_code) AND (area_name = @area_name) AND (area_city = @area_city) AND (nama = @nama)
AND (nama_by_identitas = @nama_by_identitas)
order by importir_id desc
)
if @importir_id is null
begin
INSERT INTO dt_importir
(field_1, field_2, field_3, field_4, field_5, field_6, field_7, field_8, field_9, field_10, field_11, field_12, field_13, field_14, field_15)
VALUES (
ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , cast(@jenis_indentitas_id as varchar(255)))
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @jenis_indentitas_name)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @identitas_no)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , cast(@angka_pengenal_import_id as varchar(255)))
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @angka_pengenal_import_nama)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @angka_pengenal_import_nomor)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @no_skep)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , convert(varchar(255),@tanggal_skep,121))
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @address)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @city)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @area_code)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @area_name)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @area_city)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @nama)
,ENCRYPTBYPASSPHRASE('Ap4TanyaT4nyA MauT4uAja' , @nama_by_identitas)
)
set @importir_id=scope_identity()
end
end
--IF (NOT EXISTS (SELECT *
-- FROM INFORMATION_SCHEMA.TABLES
-- WHERE TABLE_SCHEMA = 'dbo'
-- AND TABLE_NAME = 'dt_doc_in_header_bc'))
-- begin
-- UPDATE dt_doc_in_header_bc
-- SET importir_id = @importir_id
-- WHERE (importir_id IS NULL)
--end
-- IF (NOT EXISTS (SELECT *
-- FROM INFORMATION_SCHEMA.TABLES
-- WHERE TABLE_SCHEMA = 'dbo'
-- AND TABLE_NAME = 'dt_doc_out_plan_bc'))
-- begin
-- UPDATE dt_doc_out_plan_bc
--SET importir_id = @importir_id
--WHERE (importir_id IS NULL)
--end
----
end
f:
set @XmlSts=(select @xStsnoheader + @xStsno as 'no', @xStsdes as 'des' for xml path('sts'))
SET NOCOUNT OFF
select CAST( (select @XmlSts ,@raw for xml path ('result')
) as XML) as dt;
GO
Depends On
3Used By
No items found