dbo.MG_MS_FIND_TIPE

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
CREATE procedure dbo.MG_MS_FIND_TIPE
@PARAMETER xml='' 
---XencX---with encryption
as
SET NOCOUNT ON 
declare @xStsnoheader varchar(2),
  @xStsno varchar(2),
  @xStsdes varchar(100)
  
set @xStsnoheader='05'
set @xStsno='00';
set @xStsdes='sukses'

  
declare @XmlSts xml
declare @raw xml 

declare  @findtext varchar(255), 
   @rows int 

 SELECT
  @findtext=ltrim(rtrim(isnull(tempTable.item.value('findtext[1]', 'varchar(255)'),''))) ,
   @rows=isnull(tempTable.item.value('rows[1]', 'int'),0)  
   FROM @PARAMETER.nodes('param/field')  tempTable(item)
 -- CHECK supp_code_old
 
DECLARE @SQLString nvarchar(2000);
DECLARE @ParmDefinition nvarchar(1000);

 SET @findtext= replace(@findtext ,'[', '[[]')
 SET @findtext= replace(@findtext ,'''', '''''')
 SET @findtext= replace(@findtext ,'%','[%]')
 SET @findtext= replace(@findtext ,'_','[_]')
 SET @findtext= replace(@findtext ,'*','%')

 declare @TOP varchar(100);
 declare @xcari varchar(60)
 declare @where varchar(1000)
    
 declare @tp_find_tipe tp_find_tipe 
  if @rows>0 
   begin 

  if (select count(*) from @tp_find_tipe)<@rows
  begin 
  insert into @tp_find_tipe(code, name)
  SELECT    top (@rows-(select count(*) from @tp_find_tipe))         ms_type_id, ms_type_name
  FROM            enum_ms_type
   where (ms_type_id like   @findtext + '%')  
  and len(isnull(ms_type_id,''))>0
  and not exists (
   select * from @tp_find_tipe as xfilter
   where enum_ms_type.ms_type_id=xfilter.code 
  ) 
  order by   ms_type_id desc, len(isnull(ms_type_id,''))
  end

  if (select count(*) from @tp_find_tipe)<@rows
  begin 

   insert into @tp_find_tipe(code, name)
   SELECT    top (@rows-(select count(*) from @tp_find_tipe))         ms_type_id, ms_type_name
   FROM            enum_ms_type
    where (ms_type_name like   @findtext + '%')  
   and len(isnull(ms_type_name,''))>0
   and not exists (
   select * from @tp_find_tipe as xfilter
   where enum_ms_type.ms_type_id=xfilter.code 
   ) 
    order by   ms_type_name asc, len(isnull(ms_type_name,'')) 
  end
  
  
  if (select count(*) from @tp_find_tipe)<@rows
  begin 
  insert into @tp_find_tipe(code, name)
  SELECT    top (@rows-(select count(*) from @tp_find_tipe))         ms_type_id, ms_type_name
  FROM            enum_ms_type
   where (ms_type_id like '%' + @findtext + '%')  
  and len(isnull(ms_type_id,''))>0
  and not exists (
   select * from @tp_find_tipe as xfilter
   where enum_ms_type.ms_type_id=xfilter.code 
  ) 
  order by   ms_type_id desc, len(isnull(ms_type_id,''))
  end

 
  if (select count(*) from @tp_find_tipe)<@rows
  begin 

   insert into @tp_find_tipe(code, name)
   SELECT    top (@rows-(select count(*) from @tp_find_tipe))         ms_type_id, ms_type_name
   FROM            enum_ms_type
    where (ms_type_name like '%' +  @findtext + '%')  
   and len(isnull(ms_type_name,''))>0
   and not exists (
   select * from @tp_find_tipe as xfilter
   where enum_ms_type.ms_type_id=xfilter.code 
   ) 
    order by   ms_type_name asc, len(isnull(ms_type_name,'')) 
  end
    
end
 set @raw=(
 select 
 code as rID , 
 name as r1 
 from @tp_find_tipe
 for xml path ('xrow')) 

SET NOCOUNT OFF
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