dbo.supload_data_mesin_in_out

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
CREATE PROCEDURE dbo.supload_data_mesin_in_out
(@filepath varchar(500), @filename varchar(100), @username varchar(50), @tipe varchar(50), @trx varchar(50), @id bigint )
AS
BEGIN
 SET ANSI_WARNINGS ON
 SET ANSI_NULLS ON
  if @trx = 'add' 
  begin
      declare @sheetxl varchar(100)
      declare @tgl varchar(100)
      declare @no_dok varchar(100)
      if @tipe='MPKIN'
      begin
  set @sheetxl='DATA MPK IN$'
  set @tgl='DATE_IN'
  set @no_dok='NO_DOK_IN'
      end
      if @tipe='MPKOUT'
      begin
  set @sheetxl='DATA MPK OUT$'
  set @tgl='DATE_OUT'
  set @no_dok='NO_DOK_OUT'
      end
   if (select COUNT(*) from tbl_upload_data_mesin_in_out where [filename] = @filename and [status_upload] = 'SUKSES' and tipe=@tipe) > 0
   begin
  select '06' as status, 'File Sudah Pernah Di Upload' as description
  return 
   end
   
   EXEC (
' DECLARE @cnt INT SET @cnt = ( SELECT COUNT(*) FROM OPENROWSET(''Microsoft.ACE.OLEDB.12.0'', ''Excel 8.0;HDR=NO;IMEX=1;Database='+@filepath +''', ['''+@sheetxl+''']) WHERE F1=''KODE_BARANG'' AND F2=''NAMA_BARANG'' and F3='''+@no_dok+''' and F4='''+@tgl+
''' and f7=''query'') IF @cnt=0 BEGIN SELECT ''06'' AS status, ''FILE DATA MESIN DAN PERALATAN KANTOR IN/OUT TIDAK SESUAI'' AS description RETURN END INSERT INTO [tbl_upload_data_mesin_in_out] ([filename],[filepath],[status_upload], create_by,create_date, update_by, update_date, date_upload, tipe) VALUES ('''+ @filename +''','''+ @filepath +''',''SUKSES'','''+@username+''',GETDATE(), '''+@username+''',GETDATE(), GETDATE(), '''+@tipe+
''') SELECT ''00'' AS status, ''SUKSES UPLOAD'' AS description ')  
   
  end
  if @trx = 'delete' 
  begin
 if (select COUNT(*) from tbl_upload_data_mesin_in_out where id_data_mesin = @id and [status_upload] = 'Deleted') > 0
 begin
  select '06' as status, 'File Sudah Deleted' as description
  return 
 end
 if (select COUNT(*) from tbl_upload_data_mesin_in_out where id_data_mesin = @id and [status_upload] <> 'SUKSES') > 0
 begin
  select '06' as status, 'DATA TIDAK BISA DI DELETE' as description
  return 
 end
 
 update tbl_upload_data_mesin_in_out set status_upload='Deleted' where id_data_mesin = @id
 SELECT '00' AS status, 'DATA DELETED' AS description
  end
 
END
GO