dbo.draft_car_bc_in

Description

Properties

Name Value
ANSI Nulls ON

True

Quoted Identifier ON

True

Encrypted

False

Execute As
Null on Null Input

False

Schema Bound

False

Assembly

Parameters

Name Data Type Length Description
(Result) varchar 255
@prefix varchar 255
@KODE_DOKUMEN_PABEAN varchar 10

SQL Script

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
 
CREATE FUNCTION dbo.draft_car_bc_in  (@prefix varchar(255),@KODE_DOKUMEN_PABEAN varchar(10) )
RETURNS varchar(255) 
WITH EXECUTE AS CALLER 
AS
BEGIN 

declare @hdr_car_temp varchar(255)= 'DRAFT ' + @prefix + ' '+ convert(varchar(10),getdate(),121) 
declare @max_loop_code int =0 
set @max_loop_code=isnull((
select  max(cast(substring(dt_ms_tpb_in_header.NOMOR_AJU,len(@hdr_car_temp )+2,100) as int))    
         
FROM            dt_ms_tpb_in_header INNER JOIN
                         dt_ms_tpb_in_header_h_status ON dt_ms_tpb_in_header.dt_ms_tpb_in_header_h_status_id = dt_ms_tpb_in_header_h_status.dt_ms_tpb_in_header_h_status_id
WHERE        (not(dt_ms_tpb_in_header_h_status.status_tpb_in_id =-1)) AND (dt_ms_tpb_in_header.KODE_DOKUMEN_PABEAN = @KODE_DOKUMEN_PABEAN) 
  AND (left(dt_ms_tpb_in_header.NOMOR_AJU,len(@hdr_car_temp)) =@hdr_car_temp)
AND (isnumeric( substring(dt_ms_tpb_in_header.NOMOR_AJU,len(@hdr_car_temp)+2,100))=1
or 
(dt_ms_tpb_in_header.NOMOR_AJU=@hdr_car_temp)  
) 
),0)
 
set @hdr_car_temp=@hdr_car_temp + ' ' + replace(space(4 - len(cast(@max_loop_code as varchar(255)))),' ','0') + cast(@max_loop_code + 1 as varchar(255))
 
return(@hdr_car_temp)
END;


GO