dbo.spi_scrap_out

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
CREATE PROCEDURE dbo.spi_scrap_out
(@datadiff varchar(max), @cmd varchar(10), @no_scrap_out varchar(20), @tgl_scrap_out date, @username varchar(50))
AS
BEGIN
   declare @datasplit varchar(8000)
   declare @id_scrap_in bigint
   if @cmd='cancel'
   begin
  update  dbo.tbl_scrap set status='New' where id_scrap=@no_scrap_out
  delete from  dbo.tbl_scrap_out  where id_scrap=@no_scrap_out
  
  select '00' as status, ' SUKSES CANCLED' as description
 end
 
 if @cmd='proses'
    begin
  if (select COUNT(*) as cnt from tbl_scrap_out where no_dok_out=@no_scrap_out and date_scrap=@tgl_scrap_out) > 0
  begin
   select '07' as status, 'Data sudah pernah di proses' as description
   return 
  end
  
  declare @no_id_scrap_out varchar(50)
  declare @hasil varchar(50)
  exec [dbo].[spu_seq] @nomor_untuk = N'scrap_out', @hasil = @hasil OUTPUT
  set @no_id_scrap_out = @hasil 
   
  DECLARE a_cursor CURSOR FOR select f_result from dbo.fn_ParseCSVString (@datadiff, '|')
  OPEN a_cursor
  FETCH NEXT FROM a_cursor INTO @datasplit
  WHILE @@FETCH_STATUS = 0 
  BEGIN -- begin here
   insert into dbo.tbl_scrap_out (
    date_scrap
    ,no_dok_out
    ,part_no
    ,part_name
    ,qty
    ,unit
    ,id_scrap
    ,no_scrap
    ,create_date
    ,create_by
    ,update_date
    ,update_by
   ) values (
    @tgl_scrap_out
    ,@no_scrap_out
    ,(select data from dbo.Split(@datasplit, ',') where id=2)
    ,(select data from dbo.Split(@datasplit, ',') where id=5)
    ,(select data from dbo.Split(@datasplit, ',') where id=3)
    ,(select data from dbo.Split(@datasplit, ',') where id=4)
    ,(select data from dbo.Split(@datasplit, ',') where id=1)
    ,@no_id_scrap_out
    ,GETDATE()
    ,@username
    ,GETDATE()
    ,@username
    
   )
   
   update dbo.tbl_scrap set status='DATA PROCESSED OUT' where id_scrap=(select data from dbo.Split(@datasplit, ',') where id=1)
    
  FETCH NEXT FROM a_cursor INTO @datasplit
  END
  CLOSE a_cursor
  DEALLOCATE a_cursor 
  
  select '00' as status, ' SUKSES PROCESED' as description
    
    end
 
END


GO