340 lines
12 KiB
C#
340 lines
12 KiB
C#
using System;
|
|
using System.Collections.Generic;
|
|
using System.Data;
|
|
using System.IO;
|
|
using System.Text;
|
|
using System.Text.RegularExpressions;
|
|
using BeWo.Data.Access;
|
|
using BeWo.Report.ReportObjects;
|
|
using BS.Shared.DataContracts;
|
|
|
|
namespace SehtMuenster.Export
|
|
{
|
|
public class AddisonExporter
|
|
{
|
|
|
|
public static QueryDC CreateQuery(QueryDC query)
|
|
{
|
|
DateTime dt = DateTime.Now;
|
|
DateTime.TryParse(query.Parameter[0].Value.ToString(), out dt);
|
|
|
|
query.FileName = String.Format("BWP Buchungsdaten {0:yyyyMM}.csv", dt);
|
|
query.QueryResult = GetAbrechnungenString(dt);
|
|
|
|
return query;
|
|
}
|
|
|
|
public static string CreateExportString(string[] pHeaderCaption, string[][] pContent)
|
|
{
|
|
if (pHeaderCaption != null && pHeaderCaption.Length > 1 && pHeaderCaption[0].Contains("Addison"))
|
|
{
|
|
DateTime dt = DateTime.Now;
|
|
|
|
DateTime.TryParse(pHeaderCaption[1], out dt);
|
|
|
|
return GetAbrechnungenString(dt);
|
|
|
|
}
|
|
|
|
|
|
return null;
|
|
}
|
|
public static String GetAbrechnungenString(DateTime date)
|
|
{
|
|
StringBuilder sb = new StringBuilder();
|
|
|
|
sb.AppendLine("Betrag;Gegenkonto;Belegnummer;Datum;Debitor;Text");
|
|
|
|
|
|
var s = GetLwlBuchungsdatenString(date);
|
|
if (!String.IsNullOrWhiteSpace(s))
|
|
{
|
|
sb.Append(s);
|
|
}
|
|
//if (sb.Length > 0)
|
|
// sb.AppendLine();
|
|
|
|
//s = GetSelbstzahlerString(date);
|
|
//if (!String.IsNullOrWhiteSpace(s))
|
|
//{
|
|
// sb.Append(s);
|
|
//}
|
|
|
|
|
|
return sb.ToString();
|
|
}
|
|
|
|
public static String GetAbschlagszahlungenString(DateTime date)
|
|
{
|
|
var dt = ExecuteQuery(GetAbschlagszahlungenSql(date), date);
|
|
|
|
StringBuilder sb = new StringBuilder();
|
|
foreach (DataRow row in dt.Rows)
|
|
{
|
|
var betrag = row[0];
|
|
|
|
if (sb.Length > 0)
|
|
{
|
|
sb.AppendLine();
|
|
}
|
|
|
|
sb.Append(String.Format("{0:0.00}", row[0])); // Betrag
|
|
sb.Append(";");
|
|
sb.Append("8520");
|
|
sb.Append(";");
|
|
sb.Append(String.Format("{0}", row[1])); // Belegnummer
|
|
sb.Append(";");
|
|
|
|
DateTime lastDate = new DateTime(date.Year, date.Month, 1);
|
|
lastDate = lastDate.AddMonths(1).AddDays(-1);
|
|
sb.Append(String.Format("{0:dd.MM.yyyy}", lastDate)); // Datum
|
|
sb.Append(";");
|
|
|
|
sb.Append(String.Format("{0:dd.MM}", lastDate));
|
|
sb.Append(";"); // Datum
|
|
|
|
sb.Append("8000"); // Konto
|
|
sb.Append(";");
|
|
|
|
}
|
|
//F,0,050,,BEWO,DA,02012016,012016,iBelegNr2,Belegnr2,220001,,,,-888.88, "Name AZ Abschlagszahlung LVR 01/2016",,,EUR,,,,,,,,,,,R,,,
|
|
//G,0,4473,,,888.88,"Name AZ Abschlagszahlung LVR 05/2016",
|
|
|
|
return sb.ToString();
|
|
}
|
|
|
|
public static String GetLwlBuchungsdatenString(DateTime date)
|
|
{
|
|
var dt = ExecuteQuery(GetLwlBuchungsdatenSql(date), date);
|
|
|
|
StringBuilder sb = new StringBuilder();
|
|
int minBelegnummer = Int32.MaxValue;
|
|
foreach (DataRow row in dt.Rows)
|
|
{
|
|
int belegnr = (int)row[1];
|
|
|
|
if (belegnr < minBelegnummer)
|
|
{
|
|
minBelegnummer = belegnr;
|
|
}
|
|
}
|
|
|
|
|
|
foreach (DataRow row in dt.Rows)
|
|
{
|
|
if (sb.Length > 0)
|
|
{
|
|
sb.AppendLine();
|
|
}
|
|
|
|
sb.Append(String.Format("{0:0.00}", row[0])); // Betrag
|
|
sb.Append(";");
|
|
sb.Append("8520");
|
|
sb.Append(";");
|
|
sb.Append(String.Format("{0}", minBelegnummer++)); // Belegnummer
|
|
sb.Append(";");
|
|
|
|
DateTime lastDate = new DateTime(date.Year, date.Month, 1);
|
|
lastDate = lastDate.AddMonths(1).AddDays(-1);
|
|
sb.Append(String.Format("{0:dd.MM.yyyy}", lastDate)); // Datum
|
|
sb.Append(";");
|
|
|
|
sb.Append(String.Format("{0}", row[2])); // Debitor
|
|
sb.Append(";");
|
|
|
|
sb.Append(String.Format("{0}", row[3])); // Text
|
|
sb.Append(";");
|
|
|
|
|
|
}
|
|
return sb.ToString();
|
|
}
|
|
|
|
private static String GetDebitorenSql(DateTime date)
|
|
{
|
|
|
|
String sql = @"
|
|
SELECT
|
|
distinct
|
|
p.`FirstName`,
|
|
p.`LastName`,
|
|
c.DebitorNumber,
|
|
cb2sc.CustomerRefenrenceNumber,
|
|
a.Street,
|
|
a.PostalCode,
|
|
a.Town
|
|
FROM `customer` c
|
|
INNER JOIN `person` p ON p.`Oid` = c.`PersonOid`
|
|
INNER JOIN supportconcept sc on sc.CustomerOID = c.Oid
|
|
INNER JOIN costbearer2supportconcept cb2sc on cb2sc.SupportConceptOID = sc.Oid
|
|
LEFT JOIN Address a on p.addressOid = a.oid
|
|
WHERE c.isactive=1
|
|
order by p.`LastName`, p.FirstName
|
|
";
|
|
return sql;
|
|
}
|
|
|
|
private static String GetMonatlicheRechnungenSql(DateTime date)
|
|
{
|
|
String sql = @"
|
|
select
|
|
ib.InvoiceDate,
|
|
c.DebitorNumber,
|
|
c.CostCenter,
|
|
sip.Claim,
|
|
CONCAT(p.LastName, ', ', p.FirstName),
|
|
ib.invoicenumber,
|
|
(select t.name from team t inner join team2customer t2c on t2c.teamoid = t.oid where t2c.customeroid = c.Oid limit 1)
|
|
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 GetAbschlagszahlungenSql(DateTime date)
|
|
{
|
|
String sql = @"
|
|
SELECT
|
|
'F',
|
|
'0',
|
|
'005',
|
|
null,
|
|
'BEWO',
|
|
'DA',
|
|
':Abrechnungsmonat',
|
|
':Periode',
|
|
GetNextBelegnr(0),
|
|
GetNextBelegnr(1),
|
|
c.DebitorNumber,
|
|
null,
|
|
null,
|
|
null,
|
|
REPLACE(-1 * ROUND(at.`GesamtBetrag`, 2), ',', '.') as 'Abschlagszahlungen',
|
|
CONCAT(p.`LastName`, ', ', p.`FirstName`, ' ', IF(cb2sc.CustomerRefenrenceNumber is null, '', cb2sc.CustomerRefenrenceNumber), ' Abschlagszahlung :PeriodeSlash ', org.Name) as 'Verwendung',
|
|
null,
|
|
null,
|
|
'EUR',
|
|
null,
|
|
null,
|
|
null,
|
|
null,
|
|
null,
|
|
null,
|
|
null,
|
|
null,
|
|
null,
|
|
null,
|
|
'R',
|
|
null,
|
|
null,
|
|
'G',
|
|
'0',
|
|
'xxxx',
|
|
null,
|
|
null,
|
|
REPLACE(ROUND(at.`GesamtBetrag`, 2), ',', '.') as 'Abschlagszahlungen2',
|
|
CONCAT(p.`LastName`, ', ', p.`FirstName`, ' ', IF(cb2sc.CustomerRefenrenceNumber is null, '', cb2sc.CustomerRefenrenceNumber), ' Abschlagszahlung :PeriodeSlash ', org.Name) as 'Verwendung2',
|
|
null
|
|
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 at2.`CostBearer2SupportConceptOid`, SUM(at2.`Amount`) AS GesamtBetrag FROM `accountingtransaction` at2
|
|
WHERE at2.`BookingDate` >= ':Monat_Start' AND at2.`BookingDate` < ':Monat_End' GROUP BY at2.`CostBearer2SupportConceptOid`)
|
|
AS at ON at.`CostBearer2SupportConceptOid` = cb2sc.`Oid`
|
|
WHERE c.`IsActive` = 1 AND sc.`IsActive` = 1
|
|
and (at.`GesamtBetrag` is not null)
|
|
ORDER BY p.`LastName`, p.`FirstName`, cb2sc.`ApprovedStartDate`
|
|
";
|
|
return sql;
|
|
}
|
|
|
|
private static String GetLwlBuchungsdatenSql(DateTime date)
|
|
{
|
|
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',
|
|
GetNextBelegnr(1),
|
|
c.DebitorNumber,
|
|
CONCAT(p.`LastName`, ', ', p.`FirstName`, ' ', IF(cb2sc.CustomerRefenrenceNumber is null, '', cb2sc.CustomerRefenrenceNumber)) as 'Text'
|
|
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) and org.Name = 'LWL'
|
|
ORDER BY p.`LastName`, p.`FirstName`
|
|
";
|
|
|
|
return sql;
|
|
}
|
|
|
|
public static DataTable ExecuteQuery(String sql, DateTime dt)
|
|
{
|
|
var newsql = sql;
|
|
newsql = newsql.Replace(":PeriodeSlash", String.Format("{0:MM/yyyy}", dt));
|
|
newsql = newsql.Replace(":Periode", String.Format("{0:yyyyMM}", dt));
|
|
newsql = newsql.Replace(":Abrechnungsmonat", String.Format("{0:ddMMyyyy}", 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];
|
|
}
|
|
|
|
|
|
|
|
|
|
//Buchung Abrechnung Stundenzettel
|
|
//F,0,050,, BEWO, DA,01012016,012016, iBelegNr1, Belegnr1,220001,,,,999.99, "Name AZ Abrechnung 01/2016 LVR",,, EUR,,,,,,,,,,, R,,,
|
|
//G,0,1695,,,-999.99,"Name AZ Abrechnung 01/2016 LVR",
|
|
|
|
|
|
|
|
//Buchung Abschlagszahlung
|
|
//F,0,050,, BEWO, DA,02012016,012016, iBelegNr2, Belegnr2,220001,,,,-888.88, "Name AZ Abschlagszahlung LVR 01/2016",,, EUR,,,,,,,,,,, R,,,
|
|
//G,0,4473,,,888.88,"Name AZ Abschlagszahlung LVR 05/2016",
|
|
|
|
|
|
//Buchung Abrechnung LVR / Selbstzahler
|
|
//F,0,050,, BEWO, DA,01022016,022016, iBelegNr3, Belegnr3,220001,,,,900.00, "Name AZ Abrechnung LVR + SZ 02/2016",,, EUR,,,,,,,,,,, R,,,
|
|
//G,0,1695,,,-800.00,"Name AZ Abrechnung 05/2016 LVR",
|
|
//G,0,1695,,,-100.00,"Name AZ Abrechnung 05/2016 SZ",
|
|
|
|
|
|
|
|
//schwarz = konstant
|
|
//rot = variabel
|
|
|
|
|
|
}
|
|
} |