dbo.spuload_invoicebc40

Description

Properties

Name Value
ANSI Nulls ON

True

Quoted Identifier ON

True

Encrypted

False

Execute As
Assembly

Parameters

Name Data Type Length Description
@filepath varchar 500
@filename varchar 100
@username varchar 50
@tipe varchar 50
@trx varchar 50
@id bigint 8

SQL Script

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
/* jika sp belum ada ganti ALTER dengan CREATE jika sudah ada ganti dengn ALTER */       
create PROCEDURE dbo.spuload_invoicebc40
(@filepath varchar(500), @filename varchar(100), @username varchar(50), @tipe varchar(50), @trx varchar(50), @id bigint )
AS
BEGIN
 SET ANSI_NULLS ON
 SET ANSI_WARNINGS ON
  declare @fullpath varchar(200)
  set @fullpath=@filepath + @filename

  if @trx = 'add' 
  begin
   if (select COUNT(*) from tbl_upload_invoicebc40 where [filename] = @filename and [status_upload] = 'Sukses') > 0
   begin
  select '06' as status, 'File Sudah Pernah Di Upload' as description
  return 
   end
   
   --SELECT '00' AS status, @filepath AS description
   --return
   EXEC (
' declare @cnt int --set @cnt = (select COUNT(*) as cnt -- FROM OPENROWSET( ''Microsoft.ACE.OLEDB.12.0'', -- ''Text;Database='+@filepath+
';HDR=NO;IMEX=1 ;FMT=Delimited;'', -- ''SELECT * FROM ['+@FileName+
'] '') where F1 = ''part_name'' and F2 = ''kode_barang'' and F3=''part_no'' and F4=''kode_supplier'' and F5=''maker'' SET @cnt = ( SELECT COUNT(*) FROM OPENROWSET(''Microsoft.ACE.OLEDB.12.0'', ''Excel 8.0;HDR=NO;IMEX=1;Database='+@fullpath +
''', [INVOICEBC40$]) where F1 = ''part_name'' and F2 = ''kode_barang'' and F3=''part_no'' and F4=''kode_supplier'' and F5=''maker'' ) IF @cnt=0 BEGIN SELECT ''06'' AS status, ''FILE DATA INV BAHAN PENOLONG BC40 TIDAK SESUAI'' AS description RETURN END INSERT INTO [tbl_upload_invoicebc40] ([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_invoicebc40 where id_invoice_uploadbc40 = @id and [status_upload] = 'Deleted') > 0
 begin
  select '06' as status, 'File Sudah Deleted' as description
  return 
 end
 if (select COUNT(*) from tbl_upload_invoicebc40  where id_invoice_uploadbc40 = @id and [status_upload] <> 'SUKSES') > 0
 begin
  select '06' as status, 'DATA TIDAK BISA DI DELETE' as description
  return 
 end
 
 update tbl_upload_invoicebc40  set status_upload='Deleted' where id_invoice_uploadbc40 = @id
 SELECT '00' AS status, 'DATA DELETED' AS description
  end
  
 
END
GO

Used By

No items found