dbo.sp_rate_valuta_new_insert_auto

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
CREATE PROCEDURE dbo.sp_rate_valuta_new_insert_auto
@valuta_date date , @valuta_code varchar(255)
---XencX---with encryption
as 
set nocount on
declare  @rate decimal(38,4)=1
declare @kurs_cur_id bigint
SELECT     top 1   @kurs_cur_id=id
FROM            dt_currencies_master 
WHERE        (currenciescode = @valuta_code)
if @kurs_cur_id is not null
begin  
 declare @kurs_header_id bigint
 declare @NOW datetime =getdate()
 declare @sql VARCHAR(8000),@cmd VARCHAR(8000)
 declare @result_kurs varchar(255)
 set @result_kurs= dbo.getKurs('https://esbbcext01.beacukai.go.id:9082/penerimaandatasvc/WSTPB',@valuta_code,@valuta_date) 
 if left(@result_kurs,1)='1'
 begin  
   if @kurs_header_id is null
   begin 
    INSERT INTO dt_currencies_header 
           (no_skep, startdate, enddate, createby, createdate)
    VALUES        ('', @valuta_date, dateadd(dd,6,@valuta_date ), -9999,@NOW)
    set @kurs_header_id= SCOPE_IDENTITY()
   end 
   set @rate=substring(@result_kurs,3,100)
   
   INSERT INTO dt_currencies
        (headerid, currenciesid, rate, createby, createdate)
   VALUES        (@kurs_header_id,@kurs_cur_id,substring(@result_kurs,3,100), -9999,@NOW) 
 end
end 
set nocount off
select @rate as rate
 
GO