309 lines
16 KiB
C#
309 lines
16 KiB
C#
using System;
|
|
using System.Collections.Generic;
|
|
using System.Data;
|
|
using System.IO;
|
|
using System.Text;
|
|
using BeWo.Data.Access;
|
|
using BeWo.Data.Entities;
|
|
using BeWo.Service.DCEntityMapper;
|
|
using BS.Shared;
|
|
using BS.Shared.DataContracts;
|
|
using BS.Shared.Extensions;
|
|
|
|
namespace ZukunftLeben.Export
|
|
{
|
|
public class DatevExporter
|
|
{
|
|
|
|
public static QueryDC CreateQuery(QueryDC query)
|
|
{
|
|
DateTime dt = DateTime.Now;
|
|
DateTime.TryParse(query.Parameter[0].Value.ToString(), out dt);
|
|
query.FileName = String.Format("Datev Export {0:yyyyMM}.csv", dt);
|
|
query.QueryResult = GetAbrechnungenString(dt);
|
|
|
|
return query;
|
|
}
|
|
|
|
public static String GetAbrechnungenString(DateTime date)
|
|
{
|
|
StringBuilder sb = new StringBuilder();
|
|
|
|
sb.AppendLine(GetDatevKopfzeile(date));
|
|
sb.Append(GetDatevSpaltenUeberschrift());
|
|
|
|
var s = GetMonatlicheBetraegeString(date);
|
|
if (!String.IsNullOrWhiteSpace(s))
|
|
{
|
|
sb.AppendLine();
|
|
sb.Append(s);
|
|
}
|
|
|
|
s = GetMonatlicheRechnungenString(date);
|
|
if (!String.IsNullOrWhiteSpace(s))
|
|
{
|
|
sb.AppendLine();
|
|
sb.Append(s);
|
|
}
|
|
|
|
return sb.ToString();
|
|
}
|
|
|
|
private const int DatevSpaltenAnzahl = 125;
|
|
|
|
private static String GetDatevKopfzeile(DateTime date)
|
|
{
|
|
DateTime monatStart = new DateTime(date.Year, date.Month, 1);
|
|
DateTime monatEnde = monatStart.AddMonths(1).AddDays(-1);
|
|
DateTime jahrStart = new DateTime(date.Year, 1, 1);
|
|
|
|
StringBuilder sb = new StringBuilder();
|
|
sb.Append("\"DTVF\";700;21;\"Buchungsstapel\";13;");
|
|
sb.Append(String.Format("{0:yyyyMMddHHmmssfff}", DateTime.Now)); // Erzeugt am
|
|
sb.Append(";;\"SV\";\"mh\";\"\";38880;11925;");
|
|
sb.Append(String.Format("{0:yyyyMMdd}", jahrStart)); // WJ-Beginn
|
|
sb.Append(";4;"); // Sachkontennummernlänge
|
|
sb.Append(String.Format("{0:yyyyMMdd}", monatStart)); // Datum von
|
|
sb.Append(";");
|
|
sb.Append(String.Format("{0:yyyyMMdd}", monatEnde)); // Datum bis
|
|
sb.Append(";");
|
|
sb.Append(String.Format("\"Debitorenbuchungen {0:MM}\"", monatStart)); // Bezeichnung
|
|
sb.Append(";\"mh\";1;0;0;\"EUR\";;\"KP\";;212040;\"03\";;;\"\";\"\"");
|
|
return sb.ToString();
|
|
}
|
|
|
|
private static String GetDatevSpaltenUeberschrift()
|
|
{
|
|
return "Umsatz (ohne Soll/Haben-Kz);Soll/Haben-Kennzeichen;WKZ Umsatz;Kurs;Basis-Umsatz;WKZ Basis-Umsatz;Konto;Gegenkonto (ohne BU-Schlüssel);"
|
|
+ "BU-Schlüssel;Belegdatum;Belegfeld 1;Belegfeld 2;Skonto;Buchungstext;Postensperre;Diverse Adressnummer;Geschäftspartnerbank;Sachverhalt;Zinssperre;"
|
|
+ "Beleglink;Beleginfo - Art 1;Beleginfo - Inhalt 1;Beleginfo - Art 2;Beleginfo - Inhalt 2;Beleginfo - Art 3;Beleginfo - Inhalt 3;Beleginfo - Art 4;"
|
|
+ "Beleginfo - Inhalt 4;Beleginfo - Art 5;Beleginfo - Inhalt 5;Beleginfo - Art 6;Beleginfo - Inhalt 6;Beleginfo - Art 7;Beleginfo - Inhalt 7;"
|
|
+ "Beleginfo - Art 8;Beleginfo - Inhalt 8;KOST1 - Kostenstelle;KOST2 - Kostenstelle;Kost-Menge;EU-Land u. UStID (Bestimmung);EU-Steuersatz (Bestimmung);"
|
|
+ "Abw. Versteuerungsart;Sachverhalt L+L;Funktionsergänzung L+L;BU 49 Hauptfunktionstyp;BU 49 Hauptfunktionsnummer;BU 49 Funktionsergänzung;"
|
|
+ "Zusatzinformation - Art 1;Zusatzinformation- Inhalt 1;Zusatzinformation - Art 2;Zusatzinformation- Inhalt 2;Zusatzinformation - Art 3;"
|
|
+ "Zusatzinformation- Inhalt 3;Zusatzinformation - Art 4;Zusatzinformation- Inhalt 4;Zusatzinformation - Art 5;Zusatzinformation- Inhalt 5;"
|
|
+ "Zusatzinformation - Art 6;Zusatzinformation- Inhalt 6;Zusatzinformation - Art 7;Zusatzinformation- Inhalt 7;Zusatzinformation - Art 8;"
|
|
+ "Zusatzinformation- Inhalt 8;Zusatzinformation - Art 9;Zusatzinformation- Inhalt 9;Zusatzinformation - Art 10;Zusatzinformation- Inhalt 10;"
|
|
+ "Zusatzinformation - Art 11;Zusatzinformation- Inhalt 11;Zusatzinformation - Art 12;Zusatzinformation- Inhalt 12;Zusatzinformation - Art 13;"
|
|
+ "Zusatzinformation- Inhalt 13;Zusatzinformation - Art 14;Zusatzinformation- Inhalt 14;Zusatzinformation - Art 15;Zusatzinformation- Inhalt 15;"
|
|
+ "Zusatzinformation - Art 16;Zusatzinformation- Inhalt 16;Zusatzinformation - Art 17;Zusatzinformation- Inhalt 17;Zusatzinformation - Art 18;"
|
|
+ "Zusatzinformation- Inhalt 18;Zusatzinformation - Art 19;Zusatzinformation- Inhalt 19;Zusatzinformation - Art 20;Zusatzinformation- Inhalt 20;"
|
|
+ "Stück;Gewicht;Zahlweise;Forderungsart;Veranlagungsjahr;Zugeordnete Fälligkeit;Skontotyp;Auftragsnummer;Buchungstyp (Anzahlungen);"
|
|
+ "USt-Schlüssel (Anzahlungen);EU-Land (Anzahlungen);Sachverhalt L+L (Anzahlungen);EU-Steuersatz (Anzahlungen);Erlöskonto (Anzahlungen);Herkunft-Kz;"
|
|
+ "Buchungs GUID;KOST-Datum;SEPA-Mandatsreferenz;Skontosperre;Gesellschaftername;Beteiligtennummer;Identifikationsnummer;Zeichnernummer;"
|
|
+ "Postensperre bis;Bezeichnung SoBil-Sachverhalt;Kennzeichen SoBil-Buchung;Festschreibung;Leistungsdatum;Datum Zuord. Steuerperiode;Fälligkeit;"
|
|
+ "Generalumkehr (GU);Steuersatz;Land;Abrechnungsreferenz;BVV-Position;EU-Land u. UStID (Ursprung);EU-Steuersatz (Ursprung);Abw. Skontokonto";
|
|
}
|
|
|
|
|
|
public static String GetMonatlicheRechnungenString(DateTime date)
|
|
{
|
|
var sql = GetMonatlicheRechnungenSql(date);
|
|
var dt = ExecuteQuery(sql, date);
|
|
|
|
StringBuilder sb = new StringBuilder();
|
|
foreach (DataRow row in dt.Rows)
|
|
{
|
|
if (sb.Length > 0)
|
|
{
|
|
sb.AppendLine();
|
|
}
|
|
String buchungstext = "";
|
|
long? c2sOid = (long?)row[5];
|
|
if (c2sOid.HasValue)
|
|
{
|
|
var c2s = DAOFactory.GenericDAO.LoadByID<CostBearer2SupportConcept>(c2sOid.Value);
|
|
var c = c2s.SupportConcept.Customer;
|
|
buchungstext = String.Format("{0}, {1} {2:MM}/{2:yy}", c.Person.LastName, c.Person.FirstName, row[8]);
|
|
}
|
|
|
|
string konto = String.Format("{0}", row[7]).Trim(); // c2s.Notice als Debitor
|
|
string belegfeld1 = String.Format("{0}", row[3]).Trim(); // ib.invoicenumber
|
|
sb.Append(BuildBuchungszeile(row[0], konto, "8100", row[2], belegfeld1, buchungstext)); // Betrag, Konto (Debitor), Gegenkonto (Erlöskonto), Belegdatum, Belegfeld 1 (Rechnungsnummer), Buchungstext
|
|
}
|
|
|
|
return sb.ToString();
|
|
}
|
|
|
|
private static String BuildBuchungszeile(object betrag, string konto, string gegenkonto, object belegdatum, string belegfeld1, string buchungstext)
|
|
{
|
|
var felder = new string[DatevSpaltenAnzahl];
|
|
for (int i = 0; i < felder.Length; i++)
|
|
{
|
|
felder[i] = "";
|
|
}
|
|
felder[0] = String.Format("{0:0.00}", betrag); // Umsatz (ohne Soll/Haben-Kz)
|
|
felder[1] = "S"; // Soll/Haben-Kennzeichen
|
|
//felder[2] = "EUR"; // WKZ Umsatz
|
|
//felder[3] = "1"; // Kurs
|
|
//felder[4] = String.Format("{0:0.00}", betrag); // Basis-Umsatz
|
|
//felder[5] = "EUR"; // WKZ Basis-Umsatz
|
|
felder[6] = konto; // Konto
|
|
felder[7] = gegenkonto; // Gegenkonto (ohne BU-Schlüssel)
|
|
felder[9] = String.Format("{0:ddMM}", belegdatum); // Belegdatum
|
|
felder[10] = belegfeld1; // Belegfeld 1
|
|
felder[13] = buchungstext; // Buchungstext
|
|
return String.Join(";", felder);
|
|
}
|
|
|
|
public static String GetMonatlicheBetraegeString(DateTime date)
|
|
{
|
|
var sql = GetMonatlicheBetraegeLvrSql(date);
|
|
|
|
/*
|
|
'Betrag',
|
|
c.DebitorNumber,
|
|
c.CostCenter,
|
|
CONCAT(p.`LastName`, ', ', p.`FirstName`) as 'Verwendung',
|
|
cb2sc.Oid,
|
|
cb2sc.Notice AS 'Kostenstelle',
|
|
|
|
*/
|
|
|
|
// sb.AppendLine("Kontobezeichnung;Sollkonto;Belegdatum,Rechnungsbetrag,Habenkonto");
|
|
var dt = ExecuteQuery(sql, date);
|
|
|
|
StringBuilder sb = new StringBuilder();
|
|
foreach (DataRow row in dt.Rows)
|
|
{
|
|
if (sb.Length > 0)
|
|
{
|
|
sb.AppendLine();
|
|
}
|
|
DateTime lastDate = new DateTime(date.Year, date.Month, 1);
|
|
lastDate = lastDate.AddMonths(1).AddDays(-1);
|
|
|
|
String buchungstext = "";
|
|
long? c2sOid = (long?)row[4];
|
|
if (c2sOid.HasValue)
|
|
{
|
|
var c2s = DAOFactory.GenericDAO.LoadByID<CostBearer2SupportConcept>(c2sOid.Value);
|
|
var c = c2s.SupportConcept.Customer;
|
|
buchungstext = String.Format("{0}, {1} {2:MM}/{2:yy}", c.Person.LastName, c.Person.FirstName, lastDate);
|
|
}
|
|
|
|
string konto = String.Format("{0}", row[5]).Trim(); // c2s.Notice als Debitor
|
|
sb.Append(BuildBuchungszeile(row[0], konto, "8100", lastDate, "", buchungstext)); // Betrag, Konto (Debitor), Gegenkonto (Erlöskonto), Belegdatum, Belegfeld 1, Buchungstext
|
|
}
|
|
|
|
return sb.ToString();
|
|
}
|
|
|
|
private static String GetMonatlicheRechnungenSql(DateTime date)
|
|
{
|
|
|
|
String sql = @"
|
|
select
|
|
sip.Claim,
|
|
c.DebitorNumber,
|
|
ib.InvoiceDate,
|
|
ib.invoicenumber,
|
|
c.CostCenter,
|
|
c2s.Oid,
|
|
ib.InvoiceId,
|
|
c2s.Notice AS 'Kostenstelle',
|
|
ib.`AccountingPeriodEnd`,
|
|
ib.`AccountingPeriodStart`
|
|
from
|
|
person p
|
|
inner join customer c on c.personoid = p.oid
|
|
inner join supportconcept sc on sc.customeroid = c.oid
|
|
inner join costbearer2supportconcept c2s on c2s.supportconceptoid = sc.oid
|
|
inner join invoicebase ib on ib.costbearer2supportconceptoid = c2s.oid
|
|
inner join serviceinvoice si on si.invoicebaseoid = ib.oid
|
|
inner join serviceinvoiceperiod sip on sip.serviceinvoiceoid = si.oid
|
|
WHERE ib.`AccountingPeriodEnd` >= ':Monat_Start' AND ib.`AccountingPeriodEnd` < ':Monat_End' and ib.IsActive = 1
|
|
order by ib.invoicenumber
|
|
";
|
|
|
|
return sql;
|
|
}
|
|
|
|
private static String GetMonatlicheBetraegeLvrSql(DateTime date)
|
|
{
|
|
// Achtung da Preise nur Verwaltung wird Preis von FLS geholt und auch nur FLS exportiert!
|
|
// Fehlkontakte sind berücksichtigt
|
|
String sql = @"
|
|
SELECT
|
|
sum(qry.Betrag) AS Betrag,
|
|
qry.DebitorNumber,
|
|
qry.CostCenter,
|
|
qry.Verwendung,
|
|
qry.Oid,
|
|
qry.Kostenstelle
|
|
FROM
|
|
(
|
|
(SELECT
|
|
IF(crpRateFactor.`CostRateValue` is null, (sr.`GeleisteteFLM` / 60) *
|
|
(SELECT crp.`CostRateValue` FROM `costrateperiod` crp WHERE crp.`ObjectTid` = 22 AND crp.`CostRateType` = 0 AND crp.`ObjectOid` = cb2sc.`CostBearerOid` AND (crp.`EndDate` is null or crp.`EndDate` > ':Monat_Start') order by IF(crp.`EndDate` is null, MAKEDATE(9999,365),crp.`EndDate`) LIMIT 1 ),
|
|
(sr.`GeleisteteFLM` / 60) *
|
|
(SELECT crp.`CostRateValue` FROM `costrateperiod` crp WHERE crp.`ObjectTid` = 22 AND crp.`CostRateType` = 0 AND crp.`ObjectOid` = cb2sc.`CostBearerOid` AND (crp.`EndDate` is null or crp.`EndDate` > ':Monat_Start') order by IF(crp.`EndDate` is null, MAKEDATE(9999,365),crp.`EndDate`) LIMIT 1 )
|
|
* ((100 + crpRateFactor.`CostRateValue`)/100)) AS 'Betrag',
|
|
c.DebitorNumber,
|
|
c.CostCenter,
|
|
CONCAT(p.`LastName`, ', ', p.`FirstName`) as 'Verwendung',
|
|
cb2sc.Oid,
|
|
cb2sc.Notice AS 'Kostenstelle'
|
|
FROM `supportconcept` sc
|
|
INNER JOIN `costbearer2supportconcept` cb2sc ON sc.`Oid` = cb2sc.`SupportConceptOid`
|
|
INNER JOIN `costbearer` cb ON cb2sc.`CostBearerOid` = cb.`Oid`
|
|
LEFT JOIN
|
|
(SELECT crp.`ObjectOid`, crp.`CostRateValue` FROM `costrateperiod` crp
|
|
WHERE crp.`ObjectTid` = 22 AND crp.`CostRateType` = 2 AND (crp.`EndDate` is null or crp.`EndDate` > NOW()))
|
|
AS crpRateFactor ON crpRateFactor.`ObjectOid` = cb.`Oid`
|
|
INNER JOIN `organisation` org ON org.`CostBearerOid` = cb.`Oid`
|
|
INNER JOIN `customer` c ON sc.`CustomerOid` = c.`Oid`
|
|
INNER JOIN `person` p on c.`PersonOid` = p.`Oid`
|
|
LEFT JOIN
|
|
(SELECT sr2.`CostBearer2SupportConceptOid`, SUM(sr2.`roundedduration` / IF(sr2.`GroupEmployeeCount` is null, 1, sr2.`GroupEmployeeCount`)) AS GeleisteteFLM FROM `servicerecord` sr2
|
|
INNER JOIN `servicedescription` sd ON sr2.`ServiceDescriptionOid` = sd.`Oid`
|
|
INNER JOIN `servicecategory` sc ON sd.`ServiceCategoryOid` = sc.`Oid`
|
|
WHERE sr2.`StartDate` >= ':Monat_Start' AND sr2.`StartDate` < ':Monat_End' AND sc.`Billable` = 1 and sd.Name <> 'Fehlkontakt' GROUP BY sr2.`CostBearer2SupportConceptOid`)
|
|
AS sr ON sr.`CostBearer2SupportConceptOid` = cb2sc.`Oid`
|
|
WHERE c.`IsActive` = 1 AND sc.`IsActive` <> 0 and (org.Name = 'LVR' OR org.Name = 'LWL')
|
|
and (sr.`GeleisteteFLM` is not null)
|
|
UNION
|
|
(SELECT
|
|
ROUND(0.8 * (sr.`GeleisteteFLM` / 60) *
|
|
(SELECT crp.`CostRateValue` FROM `costrateperiod` crp WHERE crp.`ObjectTid` = 22 AND crp.`CostRateType` = 0 AND crp.`ObjectOid` = cb2sc.`CostBearerOid` AND (crp.`EndDate` is null or crp.`EndDate` > ':Monat_Start') order by IF(crp.`EndDate` is null, MAKEDATE(9999,365),crp.`EndDate`) LIMIT 1), 2) AS 'Betrag',
|
|
c.DebitorNumber,
|
|
c.CostCenter,
|
|
CONCAT(p.`LastName`, ', ', p.`FirstName`) as 'Verwendung',
|
|
cb2sc.Oid,
|
|
cb2sc.Notice AS 'Kostenstelle'
|
|
FROM `supportconcept` sc
|
|
INNER JOIN `costbearer2supportconcept` cb2sc ON sc.`Oid` = cb2sc.`SupportConceptOid`
|
|
INNER JOIN `costbearer` cb ON cb2sc.`CostBearerOid` = cb.`Oid`
|
|
INNER JOIN `organisation` org ON org.`CostBearerOid` = cb.`Oid`
|
|
INNER JOIN `customer` c ON sc.`CustomerOid` = c.`Oid`
|
|
INNER JOIN `person` p on c.`PersonOid` = p.`Oid`
|
|
LEFT JOIN
|
|
(SELECT sr2.`CostBearer2SupportConceptOid`, SUM(sr2.`roundedduration` / IF(sr2.`GroupEmployeeCount` is null, 1, sr2.`GroupEmployeeCount`)) AS GeleisteteFLM FROM `servicerecord` sr2
|
|
INNER JOIN `servicedescription` sd ON sr2.`ServiceDescriptionOid` = sd.`Oid`
|
|
INNER JOIN `servicecategory` sc ON sd.`ServiceCategoryOid` = sc.`Oid`
|
|
WHERE sr2.`StartDate` >= ':Monat_Start' AND sr2.`StartDate` < ':Monat_End' AND sc.`Billable` = 1 and sd.Name = 'Fehlkontakt' GROUP BY sr2.`CostBearer2SupportConceptOid`)
|
|
AS sr ON sr.`CostBearer2SupportConceptOid` = cb2sc.`Oid`
|
|
WHERE c.`IsActive` = 1 AND sc.`IsActive` <> 0 and (org.Name = 'LVR' OR org.Name = 'LWL')
|
|
and (sr.`GeleisteteFLM` is not null)))
|
|
)qry
|
|
GROUP BY qry.OID
|
|
ORDER BY qry.Verwendung
|
|
";
|
|
|
|
return sql;
|
|
}
|
|
|
|
public static DataTable ExecuteQuery(String sql, DateTime dt)
|
|
{
|
|
var newsql = sql;
|
|
newsql = newsql.Replace(":Abrechnungsmonat", String.Format("{0:dd.MM.yyyy}", dt));
|
|
newsql = newsql.Replace(":Belegnr", String.Format("{0:yyMM}", dt));
|
|
newsql = newsql.Replace(":Monat_MM", String.Format("{0:MM}", dt));
|
|
newsql = newsql.Replace(":Monat_Start", String.Format("{0:yyyy-MM}-01", dt));
|
|
dt = dt.AddMonths(1);
|
|
newsql = newsql.Replace(":Monat_End", String.Format("{0:yyyy-MM}-01", dt));
|
|
|
|
return DAOFactory.AdoDAO.ExecuteQuery(newsql).Tables[0];
|
|
}
|
|
}
|
|
} |