dbo.CompareTables_hdrbc23

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
CREATE PROCEDURE dbo.CompareTables_hdrbc23(@car varchar(26), @conn varchar(500))

AS
declare @SQL varchar(8000);
declare @tempbc23hdr varchar(MAX);
declare @table2 Varchar(MAX)
declare @table1 varchar(MAX)
declare @T1ColumnList varchar(MAX)
declare @T2ColumnList varchar(MAX)
 SET ANSI_WARNINGS ON
 SET ANSI_NULLS ON

set @T1ColumnList = 
'[CAR] ,[KdKpbc] ,[Tujuan] ,[JnsBarang] ,[TujuanKirim] ,[PasokNama] ,[PasokAlmt] ,[PasokNeg] ,[UsahaId] ,[UsahaNpwp] ,[KdTPB] ,[Registrasi] ,[UsahaNama] ,[UsahaAlmt] ,[UsahaStatus] ,[ApiKd] ,[ApiNo] ,[PpjkId] ,[PpjkNpwp] ,[PpjkNama] ,[PpjkAlmt] ,[PpjkNo] ,[PpjkTg] ,[IndId] ,[IndNpwp] ,[IndNama] ,[IndAlmt] ,[Moda] ,[AngkutNama] ,[AngkutNo] ,[AngkutFl] ,[PelBkr] ,[PelMuat] ,[PelTransit] ,[BC23No] ,[BC23Tg] ,[KdKpbcBongkar] ,[KdKpbcAwas] ,[DokTupKd] ,[DokTupNo] ,[DokTupTg] ,[PosNo] ,[PosSub] ,[TmpTbn] ,[KdVal] ,[Ndpbm] ,[NilInv] ,[Freight] ,[BTambahan] ,[Diskon] ,[KdAss] ,[Asuransi] ,[KdHrg] ,[Fob] ,[Cif] ,[Bruto] ,[Netto] ,[JmCont] ,[JmBrg] ,[TglTtd] ,[KotaTtd] ,[Namattd] ,[ContakPerson] ,[NoPhone] ,[NoFax] ,[Email] ,[Status] ,[Snrf] ,[Lengkap] ,[PosSubSub]'
set @T2ColumnList = @T1ColumnList
set @tempbc23hdr= 'tbltempbc23hdr' + replace(convert(varchar(255) , newid()), '-','')

exec (
' create table ' + @tempbc23hdr + 
' ( [CAR] varchar(26), [KdKpbc] varchar(6), [Tujuan] varchar(1), [JnsBarang] varchar(2), [TujuanKirim] varchar(2), [PasokNama] varchar(50), [PasokAlmt] varchar(70), [PasokNeg] varchar(2), [UsahaId] varchar(1), [UsahaNpwp] varchar(15), [KdTPB] varchar(1), [Registrasi] varchar(20), [UsahaNama] varchar(50), [UsahaAlmt] varchar(70), [UsahaStatus] varchar(2), [ApiKd] varchar(1), [ApiNo] varchar(15), [PpjkId] varchar(1), [PpjkNpwp] varchar(15), [PpjkNama] varchar(50), [PpjkAlmt] varchar(70), [PpjkNo] varchar(6), [PpjkTg] datetime NULL, [IndId] varchar(1), [IndNpwp] varchar(15), [IndNama] varchar(50), [IndAlmt] varchar(70), [Moda] varchar(1), [AngkutNama] varchar(20), [AngkutNo] varchar(7), [AngkutFl] varchar(2), [PelBkr] varchar(5), [PelMuat] varchar(5), [PelTransit] varchar(5), [BC23No] varchar(6), [BC23Tg] datetime NULL, [KdKpbcBongkar] varchar(6), [KdKpbcAwas] varchar(6), [DokTupKd] varchar(1), [DokTupNo] varchar(6), [DokTupTg] datetime NULL, [PosNo] varchar(4), [PosSub] varchar(4), [TmpTbn] varchar(4), [KdVal] varchar(3), [Ndpbm] float NULL, [NilInv] float NULL, [Freight] float NULL, [BTambahan] float NULL, [Diskon] float NULL, [KdAss] varchar(1), [Asuransi] float NULL, [KdHrg] varchar(1), [Fob] float NULL, [Cif] float NULL, [Bruto] float NULL, [Netto] float NULL, [JmCont] int NULL, [JmBrg] int NULL, [TglTtd] datetime NULL, [KotaTtd] varchar(30), [Namattd] varchar(30), [ContakPerson] varchar(30), [NoPhone] varchar(25), [NoFax] varchar(25), [Email] varchar(50), [Status] varchar(2), [Snrf] varchar(10), [Lengkap] char(1), [PosSubSub] varchar(4) ) ');

exec(
' insert into ' + @tempbc23hdr + 
' ( [CAR] ,[KdKpbc] ,[Tujuan] ,[JnsBarang] ,[TujuanKirim] ,[PasokNama] ,[PasokAlmt] ,[PasokNeg] ,[UsahaId] ,[UsahaNpwp] ,[KdTPB] ,[Registrasi] ,[UsahaNama] ,[UsahaAlmt] ,[UsahaStatus] ,[ApiKd] ,[ApiNo] ,[PpjkId] ,[PpjkNpwp] ,[PpjkNama] ,[PpjkAlmt] ,[PpjkNo] ,[PpjkTg] ,[IndId] ,[IndNpwp] ,[IndNama] ,[IndAlmt] ,[Moda] ,[AngkutNama] ,[AngkutNo] ,[AngkutFl] ,[PelBkr] ,[PelMuat] ,[PelTransit] ,[BC23No] ,[BC23Tg] ,[KdKpbcBongkar] ,[KdKpbcAwas] ,[DokTupKd] ,[DokTupNo] ,[DokTupTg] ,[PosNo] ,[PosSub] ,[TmpTbn] ,[KdVal] ,[Ndpbm] ,[NilInv] ,[Freight] ,[BTambahan] ,[Diskon] ,[KdAss] ,[Asuransi] ,[KdHrg] ,[Fob] ,[Cif] ,[Bruto] ,[Netto] ,[JmCont] ,[JmBrg] ,[TglTtd] ,[KotaTtd] ,[Namattd] ,[ContakPerson] ,[NoPhone] ,[NoFax] ,[Email] ,[Status] ,[Snrf] ,[Lengkap] ,[PosSubSub] ) SELECT [CAR] ,[KdKpbc] ,[Tujuan] ,[JnsBarang] ,[TujuanKirim] ,[PasokNama] ,[PasokAlmt] ,[PasokNeg] ,[UsahaId] ,[UsahaNpwp] ,[KdTPB] ,[Registrasi] ,[UsahaNama] ,[UsahaAlmt] ,[UsahaStatus] ,[ApiKd] ,[ApiNo] ,[PpjkId] ,[PpjkNpwp] ,[PpjkNama] ,[PpjkAlmt] ,[PpjkNo] ,[PpjkTg] ,[IndId] ,[IndNpwp] ,[IndNama] ,[IndAlmt] ,[Moda] ,[AngkutNama] ,[AngkutNo] ,[AngkutFl] ,[PelBkr] ,[PelMuat] ,[PelTransit] ,[BC23No] ,[BC23Tg] ,[KdKpbcBongkar] ,[KdKpbcAwas] ,[DokTupKd] ,[DokTupNo] ,[DokTupTg] ,[PosNo] ,[PosSub] ,[TmpTbn] ,[KdVal] ,[Ndpbm] ,[NilInv] ,[Freight] ,[BTambahan] ,[Diskon] ,[KdAss] ,[Asuransi] ,[KdHrg] ,[Fob] ,[Cif] ,[Bruto] ,[Netto] ,[JmCont] ,[JmBrg] ,[TglTtd] ,[KotaTtd] ,[Namattd] ,[ContakPerson] ,[NoPhone] ,[NoFax] ,[Email] ,[Status] ,[Snrf] ,[Lengkap] ,[PosSubSub] from OPENDATASOURCE(''Microsoft.ACE.OLEDB.12.0'', ''Data Source='+ @conn +
'; Jet OLEDB:Database Password=MumtazFarisHana;Persist Security Info=False;'' )...tblBC23Hdr where car='+ @car +
'; ')

--exec ('select * from ' + @tempbc23hdr + '');
set @Table2 = @tempbc23hdr
set @table1 = 'v_bc23hdr'

IF @t2ColumnList = '' SET @T2ColumnList = @T1ColumnList
set @SQL = 'SELECT ''' + @table1 + ''' AS TableName, ' + @t1ColumnList +
 ' FROM ' + @Table1 + ' where CAR = '''+@car+''' UNION ALL SELECT ''' + @table2 + ''' As TableName, ' +
 @t2ColumnList + ' FROM ' + @Table2 +  ' where CAR = '''+@car+''''
 
set @SQL = 'SELECT Max(TableName) as TableName, ' + @t1ColumnList +
 ' FROM (' + @SQL + ') A GROUP BY ' + @t1ColumnList +
 ' HAVING COUNT(*) = 1'

exec ( @SQL)
exec ('drop table '+ @tempbc23hdr +'');

GO