dbo.spu_update_nobl_bc23

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
/* jika sp belum ada ganti ALTER dengan CREATE jika sudah ada ganti dengn ALTER */ 
CREATE PROCEDURE dbo.spu_update_nobl_bc23
(@idbc23 bigint, @nobl_baru varchar(50), @username varchar(100))
AS
BEGIN
  declare @nobl varchar(50),@tglbl date, @tipedata varchar(50)
  select  top 1
 @nobl=[nobl]
    ,@tglbl=[tglbl] 
    ,@tipedata = [bc_in_from_in]
   FROM [tbl_bc_in_hdr] where id_bc_in_hdr=@idbc23 
  if (@nobl = '' or @tglbl='')
  begin
 select '06' as status, 'Data BL tidak ditemukan' as description
 return
  end

  if (@tipedata = 'INV NON HIB') 
  begin
 update [tbl_nonhib] set nobl = @nobl_baru where nobl=@nobl and [tgbl]=@tglbl
 update [tbl_bc_in_hdr] set nobl = @nobl_baru where id_bc_in_hdr=@idbc23 and nobl=@nobl and [tglbl]=@tglbl
  end
  else
  if (@tipedata = 'INV HIB') 
  begin
 update [dbo].[tbl_inv_hdr] set nobl = @nobl_baru where nobl=@nobl and [tgbl]=@tglbl
 update [tbl_bc_in_hdr] set nobl = @nobl_baru where id_bc_in_hdr=@idbc23 and nobl=@nobl and [tglbl]=@tglbl
  end
  else
  if  (@tipedata = 'INVMS')
  begin
 update [dbo].[tbl_invoice_mesinsparepart] set nobl = @nobl_baru where nobl=@nobl and [tglbl]=@tglbl
 update [tbl_bc_in_hdr] set nobl = @nobl_baru where id_bc_in_hdr=@idbc23 and nobl=@nobl and [tglbl]=@tglbl
  end
  
  
   
  select '00' as status, 'BL Data Updated: ' + @nobl_baru as description
  return
    
    
    
END
--go
-- exec('[spu_update_nobl_bc23] @username=''admin'', @nobl_baru=''XXXX'', @idbc23=10388 ')
GO