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
CREATE PROCEDURE dbo.spuload_fgin
(@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 @filedir varchar(200)
Declare @dir varchar(100)
declare @cmdmove varchar(500)
set @dir = (select top 1 direktori from dbo.tbl_direktori)
set @filedir=@dir+'\inventory\finishgood'
set @cmdmove = 'MOVE /Y '+ @filedir +'\'+ @FileName + ' '+ @filedir +'\log\' + @FileName
if @trx = 'add'
begin
if (select COUNT(*) from [tbl_uploadfg_in] where [filename] = @filename and [status_upload] = 'Sukses') > 0
begin
EXEC xp_cmdshell @cmdmove, NO_OUTPUT
select '06' as status, 'File Sudah Pernah Di Proses ' as description
return
end
EXEC (
' DECLARE @cnt INT SET @cnt = ( SELECT COUNT(*) FROM OPENROWSET(''Microsoft.ACE.OLEDB.12.0'', ''text;HDR=NO;IMEX=1;FMT=Delimited;Database='+@filedir +
''', ''SELECT * FROM ['+@filename+
'] '') WHERE F5=''ASSY_NO'' and f6=''ASSY_CODE'') IF @cnt=0 BEGIN SELECT ''06'' AS status, ''FILE INCOMING FG TIDAK SESUAI'' AS description RETURN END INSERT INTO [tbl_uploadfg_in] ([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'' AS description ')
end
if @trx = 'delete'
begin
if (select COUNT(*) from [tbl_uploadfg_in] where id_fgin_upload = @id and [status_upload] = 'Deleted') > 0
begin
select '06' as status, 'File Sudah Deleted' as description
return
end
if (select COUNT(*) from [tbl_uploadfg_in] where id_fgin_upload = @id and [status_upload] <> 'SUKSES') > 0
begin
select '06' as status, 'DATA TIDAK BISA DI DELETE' as description
return
end
update tbl_uploadfg_in set status_upload='Deleted' where id_fgin_upload = @id
SELECT '00' AS status, 'DATA DELETED' AS description
end
END
GO
GO
CREATE PROCEDURE dbo.spuload_fgin
(@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 @filedir varchar(200)
Declare @dir varchar(100)
declare @cmdmove varchar(500)
set @dir = (select top 1 direktori from dbo.tbl_direktori)
set @filedir=@dir+'\inventory\finishgood'
set @cmdmove = 'MOVE /Y '+ @filedir +'\'+ @FileName + ' '+ @filedir +'\log\' + @FileName
if @trx = 'add'
begin
if (select COUNT(*) from [tbl_uploadfg_in] where [filename] = @filename and [status_upload] = 'Sukses') > 0
begin
EXEC xp_cmdshell @cmdmove, NO_OUTPUT
select '06' as status, 'File Sudah Pernah Di Proses ' as description
return
end
EXEC (
' DECLARE @cnt INT SET @cnt = ( SELECT COUNT(*) FROM OPENROWSET(''Microsoft.ACE.OLEDB.12.0'', ''text;HDR=NO;IMEX=1;FMT=Delimited;Database='+@filedir +
''', ''SELECT * FROM ['+@filename+
'] '') WHERE F5=''ASSY_NO'' and f6=''ASSY_CODE'') IF @cnt=0 BEGIN SELECT ''06'' AS status, ''FILE INCOMING FG TIDAK SESUAI'' AS description RETURN END INSERT INTO [tbl_uploadfg_in] ([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'' AS description ')
end
if @trx = 'delete'
begin
if (select COUNT(*) from [tbl_uploadfg_in] where id_fgin_upload = @id and [status_upload] = 'Deleted') > 0
begin
select '06' as status, 'File Sudah Deleted' as description
return
end
if (select COUNT(*) from [tbl_uploadfg_in] where id_fgin_upload = @id and [status_upload] <> 'SUKSES') > 0
begin
select '06' as status, 'DATA TIDAK BISA DI DELETE' as description
return
end
update tbl_uploadfg_in set status_upload='Deleted' where id_fgin_upload = @id
SELECT '00' AS status, 'DATA DELETED' AS description
end
END
GO
Depends On
2Used By
No items found