355 lines
15 KiB
C#
355 lines
15 KiB
C#
using System;
|
|
using System.Collections.Generic;
|
|
using System.Data;
|
|
using System.IO;
|
|
using System.Linq;
|
|
using System.Text;
|
|
using BeWo.Data;
|
|
using BeWo.Data.Access;
|
|
using BeWo.Data.Entities;
|
|
using BeWo.Report.ReportObjects;
|
|
using BeWo.Service.DCEntityMapper;
|
|
using BeWo.Service.Invoicing;
|
|
using BeWo.Service.Plugins;
|
|
using BS.Shared;
|
|
using BS.Shared.Core;
|
|
using BS.Shared.DataContracts;
|
|
using BS.Shared.DataContracts.Compact;
|
|
using BS.Shared.Extensions;
|
|
using ProfEggersStiftung.Invoicing;
|
|
|
|
namespace ProfEggersStiftung.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("Betrag;Konto;Gegenkonto;Belegdatum;Rechnungsnummer;Buchungstext;Kostenstelle");
|
|
|
|
sb.AppendLine("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;EU-Steuersatz;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;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");
|
|
|
|
|
|
var s = GetMonatlicheBetraegeString(date, false);
|
|
if (!String.IsNullOrWhiteSpace(s))
|
|
{
|
|
sb.Append(s);
|
|
}
|
|
|
|
s = GetMonatlicheBetraegeString(date, true);
|
|
if (!String.IsNullOrWhiteSpace(s))
|
|
{
|
|
if (sb.Length > 0)
|
|
sb.AppendLine();
|
|
|
|
sb.Append(s);
|
|
}
|
|
|
|
return sb.ToString();
|
|
}
|
|
|
|
public static String GetMonatlicheRechnungenString(DateTime date)
|
|
{
|
|
var sql = GetMonatlicheRechnungenSql(date);
|
|
|
|
/*
|
|
sip.Claim,
|
|
c.DebitorNumber,
|
|
ib.InvoiceDate,
|
|
ib.invoicenumber,
|
|
c.CostCenter,
|
|
c2s.Oid,
|
|
ib.InvoiceId
|
|
*/
|
|
|
|
//"Datum;Konto;Gegenkonto;Buchungstext;Belegfeld1;Umsatz Soll"
|
|
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);
|
|
|
|
sb.Append(String.Format("{0:ddMM}", lastDate));
|
|
sb.Append(";");
|
|
sb.Append(String.Format("{0}", row[1]));
|
|
sb.Append(";");
|
|
sb.Append("4004"); // Erlöskonto
|
|
sb.Append(";");
|
|
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}", c.Person.LastName, c.Person.FirstName);
|
|
}
|
|
|
|
sb.Append(buchungstext);
|
|
sb.Append(";");
|
|
sb.Append(String.Format("{0}", row[3]));
|
|
sb.Append(";");
|
|
sb.Append(String.Format("{0:0.00}", row[0]));
|
|
}
|
|
|
|
return sb.ToString();
|
|
}
|
|
|
|
public static String GetMonatlicheBetraegeString(DateTime date, bool lvrOrLwl)
|
|
{
|
|
var sql = GetMonatlicheBetraegeSql(date, lvrOrLwl);
|
|
|
|
/*
|
|
betrag
|
|
c.DebitorNumber,
|
|
c.CostCenter,
|
|
CONCAT(p.`LastName`, ', ', p.`FirstName`) as 'Verwendung',
|
|
cb2sc.Oid
|
|
*/
|
|
|
|
//"Datum;Konto;Gegenkonto;Buchungstext;Belegfeld1;Umsatz Soll"
|
|
var dt = ExecuteQuery(sql, date);
|
|
|
|
StringBuilder sb = new StringBuilder();
|
|
foreach (DataRow row in dt.Rows)
|
|
{
|
|
String temp = String.Format("{0} {1:MMyy}", row[3], date);
|
|
if (temp.Contains("Brilo"))
|
|
{
|
|
int test = 0;
|
|
}
|
|
long oid = (long)row[4];
|
|
decimal betrag = CalculateBillableAmountInTimeSpan(oid, date, date.AddMonths(1));
|
|
//if (row[0] != null)
|
|
//{
|
|
// Decimal.TryParse(row[0].ToString(), out betrag);
|
|
//}
|
|
|
|
if (betrag > 0)
|
|
{
|
|
if (sb.Length > 0)
|
|
{
|
|
sb.AppendLine();
|
|
}
|
|
|
|
//0: Betrag
|
|
//1: Konto
|
|
//2: Gegenkonto
|
|
//3: Belegdatum
|
|
//4: Belegfeld 1
|
|
//5: Buchungstext
|
|
//6: Kostenstelle
|
|
|
|
DateTime lastDate = new DateTime(date.Year, date.Month, 1);
|
|
lastDate = lastDate.AddMonths(1).AddDays(-1);
|
|
|
|
String konto = "";
|
|
if (row[1] != null)
|
|
{
|
|
konto = String.Format("{0}", row[1]);
|
|
}
|
|
else
|
|
{
|
|
int test = 0;
|
|
}
|
|
|
|
String gegenkonto = lvrOrLwl ? "4003" : "4004";
|
|
String belegdatum = String.Format("{0:ddMM}", lastDate);
|
|
String belegfeld = String.Format("{0:ddMM}", lastDate);
|
|
String buchungstext = String.Format("{0} {1:MMyy}", row[3], date);
|
|
String kostenstelle = "";
|
|
if (row[2] != null)
|
|
{
|
|
kostenstelle = row[2].ToString();
|
|
}
|
|
|
|
|
|
sb.Append(String.Format(
|
|
"{0:0.00};S;EUR;;;;{1};{2};;{3};{4};;;{5};;;;;;;;;;;;;;;;;;;;;;;{6};;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;0;;;;;;",
|
|
betrag, konto, gegenkonto, belegdatum, belegfeld, buchungstext, kostenstelle));
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
return sb.ToString();
|
|
}
|
|
|
|
private static decimal CalculateBillableAmountInTimeSpan(long c2sOid, DateTime start, DateTime end)
|
|
{
|
|
|
|
var factory = new CustomInvoiceFactory();
|
|
|
|
Dictionary<CompactSupportConceptDC, List<ServiceRecordDC>> dict = new Dictionary<CompactSupportConceptDC, List<ServiceRecordDC>>();
|
|
|
|
var cs = DAOFactory.GenericDAO.LoadByID<CostBearer2SupportConcept>(c2sOid);
|
|
var relCs = MapperFactory.SupportConceptCostBearerRelDC_CostBearer2SupportConcept.MapToNewDC(cs);
|
|
|
|
CompactSupportConceptDC sc = CreateCompactSupportConcept(relCs);
|
|
|
|
var allRecords = cs.ServiceRecords.MapToNewDCs();
|
|
allRecords = allRecords.Where(r => r.Start.Value.Date >= start && r.Start < end).ToList();
|
|
dict.Add(sc, allRecords);
|
|
|
|
var creator = factory.CreateInvoiceCreator(null, null, dict);
|
|
|
|
DateTimeSpan span = new DateTimeSpan();
|
|
span.StartDate = start;
|
|
span.EndDate = start.AddMonths(1).AddDays(-1);
|
|
|
|
var invoices = creator.GenerateServiceInvoices(cs.CostBearer.Oid.Value, span, dict);
|
|
|
|
if (invoices != null && invoices.Count == 1)
|
|
{
|
|
return invoices[0].ClaimSum ?? 0;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
private static CompactSupportConceptDC CreateCompactSupportConcept(SupportConceptCostBearerRelDC c2s)
|
|
{
|
|
var dc = new CompactSupportConceptDC();
|
|
dc.SupportConceptOid = c2s.SupportConcept.SupportConceptOid;
|
|
dc.CostBearerRelOids = new List<long>();
|
|
dc.CostBearerRelOids.Add(c2s.CostBearer2SupportConceptOid.Value);
|
|
dc.IsApproved = true;
|
|
|
|
return dc;
|
|
}
|
|
|
|
private static Dictionary<long, decimal> CreateHourlyRateDict(List<long> catOids, DateTime date)
|
|
{
|
|
Dictionary<long, decimal> dict = new Dictionary<long, decimal>();
|
|
|
|
foreach (var oid in catOids)
|
|
{
|
|
var cat = DAOFactory.GenericDAO.LoadByID<ServiceCategory>(oid);
|
|
|
|
var crps = MapperFactory.CostRatePeriodDC_CostRatePeriod.MapToNewDCs(cat.CostRatePeriods);
|
|
|
|
var cp = crps.GetCostRatePeriodForDate(CostRatePeriodType.AmountOfMoney, date);
|
|
|
|
if (cp != null && cp.CostRateValue.HasValue)
|
|
{
|
|
dict.Add(oid, cp.CostRateValue.Value);
|
|
}
|
|
}
|
|
|
|
return dict;
|
|
}
|
|
|
|
private static String GetMonatlicheRechnungenSql(DateTime date)
|
|
{
|
|
|
|
String sql = @"
|
|
select
|
|
sip.Claim,
|
|
c.DebitorNumber,
|
|
ib.InvoiceDate,
|
|
ib.invoicenumber,
|
|
c.CostCenter,
|
|
c2s.Oid,
|
|
ib.InvoiceId
|
|
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 GetMonatlicheBetraegeSql(DateTime date, bool lvrOrLwl)
|
|
{
|
|
String sql = @"
|
|
SELECT
|
|
IF(crpRateFactor.`CostRateValue` is null, ROUND((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 )),
|
|
ROUND(ROUND((sr.`GeleisteteFLM` / 60), 2) * (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), 2)) AS 'Betrag',
|
|
c.DebitorNumber,
|
|
c.CostCenter,
|
|
CONCAT(p.`LastName`, ', ', p.`FirstName`) as 'Verwendung',
|
|
cb2sc.Oid,
|
|
org.Name
|
|
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 GROUP BY sr2.`CostBearer2SupportConceptOid`)
|
|
AS sr ON sr.`CostBearer2SupportConceptOid` = cb2sc.`Oid`
|
|
WHERE c.`IsActive` = 1 AND sc.`IsActive` = 1
|
|
and (sr.`GeleisteteFLM` is not null)
|
|
%LVRORLWL%
|
|
ORDER BY p.`LastName`, p.`FirstName`, cb2sc.`ApprovedStartDate`
|
|
";
|
|
string lol = "";
|
|
if (lvrOrLwl)
|
|
{
|
|
lol = "and (org.Name = 'LVR' OR org.Name = 'LWL')";
|
|
}
|
|
else
|
|
{
|
|
lol = "and (org.Name <> 'LVR' and org.Name <> 'LWL')";
|
|
}
|
|
sql = sql.Replace("%LVRORLWL%", lol);
|
|
|
|
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];
|
|
}
|
|
|
|
|
|
}
|
|
} |