SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

IF EXISTS (SELECT * FROM sysobjects WHERE name = 'my_ImpDM_Dekr' AND user_name(uid) = 'CDN')
	DROP PROCEDURE [CDN].my_ImpDM_Dekr
GO

CREATE PROCEDURE [CDN].my_ImpDM_Dekr
(
  @DZKNr int     -- 1 - DZK_DIGNumer
)
AS
  SET NOCOUNT ON;

  declare @DEB table(DT_GIDNumer int, DT_GIDLp int, DT_DC int, DT_Konto varchar(100), DT_Kwota decimal(21,2), DT_DataCentrali int)
  declare @CRE table(DT_GIDNumer int, DT_GIDLp int, DT_DC int, DT_Konto varchar(100), DT_Kwota decimal(21,2), DT_DataCentrali int)

  insert into @DEB
    select DT_GIDNumer, DT_GIDLp, DT_DC, DT_Konto, DT_Kwota, DT_DataCentrali from CDN.Dekrety where DT_DC = 1 and DT_GIDNumer = @DZKNr
  insert into @CRE
    select DT_GIDNumer, DT_GIDLp, DT_DC, DT_Konto, DT_Kwota, DT_DataCentrali from CDN.Dekrety where DT_DC = 2 and DT_GIDNumer = @DZKNr

SELECT Lp = ROW_NUMBER() OVER(ORDER BY DZK_Opis, DEL_Opis, deb.DT_Konto, cre.DT_Konto),
       DZK_Opis = left (DZK_Opis, 80),
       [Data] = DEL_DataWyst, 
       DataDokumentu = DEL_DataOper, 
       Kwota = deb.DT_Kwota,
       DokZr = DZK_DokumentZrodlowy, 
       KontoDebet = deb.DT_Konto,
       KontoCredit = cre.DT_Konto,
       Identyfikator = left(DZK_Opis, 80),
       Opis = left(DEL_Opis, 80),
       DataImportu = CDN.TsToDate(coalesce(deb.DT_DataCentrali, 0), 1)
FROM   CDN.Dziennik inner join CDN.DziennikElem on DZK_GIDNumer = DEL_GIDNumer
		                inner join @DEB deb ON deb.DT_GIDNumer = DEL_GIDNumer and deb.DT_GIDLp = DEL_GIDLp
		                inner join @CRE cre ON cre.DT_GIDNumer = DEL_GIDNumer and cre.DT_GIDLp = DEL_GIDLp
where DZK_GIDNumer = @DZKNr
order by 1


  GO

GRANT execute ON CDN.my_ImpDM_Dekr TO CDNRaport
GO