ChristopherusHaus/Export/SimbaExporter - erster Wurf
This commit is contained in:
@@ -5,39 +5,36 @@ using System.IO;
|
||||
using System.Text;
|
||||
using BeWo.Data.Access;
|
||||
using BeWo.Data.Entities;
|
||||
using BeWo.Report.ReportObjects;
|
||||
using BeWo.Service.DCEntityMapper;
|
||||
using BS.Shared.DataContracts;
|
||||
using DevExpress.XtraPrinting;
|
||||
using DevExpress.XtraReports.UI;
|
||||
|
||||
namespace Bewo.ChristopherusHaus.Export
|
||||
namespace ChristopherusHausFamilienhilfe.Export
|
||||
{
|
||||
public class FibuExport
|
||||
{
|
||||
//List<FileAttachmentDC> liste = new List<FileAttachmentDC>();
|
||||
public static QueryDC CreateQuery(QueryDC query)
|
||||
{
|
||||
DateTime dt = DateTime.Now;
|
||||
DateTime.TryParse(query.Parameter[0].Value.ToString(), out dt);
|
||||
|
||||
var table = ExecuteQuery(GetMonatlicheBetraegeLvrLwlSql(dt), dt);
|
||||
|
||||
query.FileName = String.Format("BUCH_BO_{0:yyyyMM}.scs", dt);
|
||||
query.QueryResult = GetAbrechnungenString(dt);
|
||||
query.QueryResult = GetAbrechnungenString(dt, table);
|
||||
//query.Attachments = CreateInvoiceFiles(table);
|
||||
return query;
|
||||
}
|
||||
|
||||
public static string CreateExportString(string[] pHeaderCaption, string[][] pContent)
|
||||
{
|
||||
if (pHeaderCaption != null && pHeaderCaption.Length > 1 && pHeaderCaption[0].Contains("Fibu"))
|
||||
{
|
||||
DateTime dt = DateTime.Now;
|
||||
DateTime.TryParse(pHeaderCaption[1], out dt);
|
||||
return GetAbrechnungenString(dt);
|
||||
}
|
||||
return null;
|
||||
}
|
||||
|
||||
public static String GetAbrechnungenString(DateTime dt)
|
||||
public static String GetAbrechnungenString(DateTime dt, DataTable table)
|
||||
{
|
||||
StringBuilder sb = new StringBuilder();
|
||||
sb.AppendLine("\"MND\";500");
|
||||
sb.AppendLine(String.Format("\"BZR\";{0:yyyyMM}", dt));
|
||||
|
||||
var s = GetMonatlicheRechnungenString(dt);
|
||||
sb.AppendLine(String.Format("\"BZR\";{0:MMyyyy}", dt));
|
||||
var s = GetMonatlicheBetraegeString(dt, table);
|
||||
if (!String.IsNullOrWhiteSpace(s))
|
||||
{
|
||||
sb.Append(s);
|
||||
@@ -46,10 +43,11 @@ namespace Bewo.ChristopherusHaus.Export
|
||||
return sb.ToString();
|
||||
}
|
||||
|
||||
public static String GetMonatlicheRechnungenString(DateTime date)
|
||||
public static String GetMonatlicheBetraegeString(DateTime date, DataTable dt)
|
||||
{
|
||||
var dt = ExecuteQuery(GetMonatlicheRechnungenSql(date), date);
|
||||
/* 'BCH', sip.Claim, '8106' as 'Gegenkonto', ib.invoicenumber, ib.InvoiceDate, org.DebitorNumber, '3170', org.Name, p.FirstName, p.LastName*/
|
||||
/*'BCH', sum(qry.Betrag) AS Betrag, '8017' as 'Gegenkonto', qry.DebitorNumber, qry.CostCenter, org.Name, qry.Verwendung, qry.Oid*/
|
||||
|
||||
StringBuilder sb = new StringBuilder();
|
||||
foreach (DataRow row in dt.Rows)
|
||||
{
|
||||
@@ -57,59 +55,118 @@ namespace Bewo.ChristopherusHaus.Export
|
||||
{
|
||||
sb.AppendLine();
|
||||
}
|
||||
DateTime lastDate = new DateTime(date.Year, date.Month, 1);
|
||||
lastDate = lastDate.AddMonths(1).AddDays(-1);
|
||||
string orgaName = "";
|
||||
if (row[5] != null)
|
||||
{
|
||||
orgaName = row[5].ToString();
|
||||
}
|
||||
sb.Append(String.Format("\"{0}\"", row[0]));
|
||||
sb.Append(";");
|
||||
sb.Append(String.Format("{0:0.00}", row[1]));
|
||||
sb.Append(";;;");
|
||||
sb.Append(String.Format("{0}", row[2]));
|
||||
string gKonto = GetErlöskonto(orgaName);
|
||||
sb.Append(String.Format("{0}", gKonto)); //Gegenkonto
|
||||
sb.Append(";");
|
||||
sb.Append(String.Format("{0}", row[3]));
|
||||
sb.Append(String.Format("{0:ddMMyyyy}", lastDate)); // Belegnummer???
|
||||
sb.Append(";;");
|
||||
sb.Append(String.Format("{0:ddMMyyyy}", row[4]));
|
||||
sb.Append(String.Format("{0:ddMMyyyy}", lastDate)); //Simba nimmt nur Buchungen an, ReDatum = Abrechnungszeitraum
|
||||
sb.Append(";;");
|
||||
sb.Append(String.Format("{0}", row[5]));
|
||||
sb.Append(String.Format("{0}", row[3])); // Debitornummer Kostenträger
|
||||
sb.Append(";");
|
||||
sb.Append(String.Format("{0}", row[6]));
|
||||
sb.Append(String.Format("{0}", row[4])); // Kostenstelle Klient (TEAM)
|
||||
sb.Append(";;;");
|
||||
sb.Append(String.Format("\"ISB {0}, {1} {2}\"", row[7], row[8], row[9]));
|
||||
sb.Append(String.Format("\"ABW {0}, {1} {2}\"", row[7], row[8], row[9]));
|
||||
sb.Append(";\"EUR\";;;;;;;;;;");
|
||||
sb.Append(String.Format("{0}", row[3]));
|
||||
sb.Append(";;;;");
|
||||
sb.Append(String.Format("\"Rechnung {0}.pdf\"", row[3]));
|
||||
sb.Append(";;;;;"); // bei SPFH kommt hier noch der Beleg als PDF
|
||||
}
|
||||
|
||||
return sb.ToString();
|
||||
}
|
||||
}
|
||||
|
||||
private static String GetMonatlicheRechnungenSql(DateTime date)
|
||||
private static string GetErlöskonto(string orgaName)
|
||||
{
|
||||
String sql = @"
|
||||
select
|
||||
'BCH',
|
||||
sip.Claim,
|
||||
'8106' as 'Gegenkonto',
|
||||
ib.invoicenumber,
|
||||
ib.InvoiceDate,
|
||||
org.DebitorNumber,
|
||||
'3170',
|
||||
org.Name,
|
||||
p.FirstName,
|
||||
p.LastName
|
||||
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 costbearer cb on c2s.costbeareroid = cb.oid
|
||||
inner join organisation org on org.costbeareroid = cb.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
|
||||
";
|
||||
if (orgaName == "LWL")
|
||||
{
|
||||
return "8000";
|
||||
}
|
||||
else if (orgaName == "LVR")
|
||||
{
|
||||
return "8001";
|
||||
}
|
||||
else
|
||||
{
|
||||
return "8017";
|
||||
}
|
||||
}
|
||||
|
||||
return sql;
|
||||
private static String GetMonatlicheBetraegeLvrLwlSql(DateTime date)
|
||||
{
|
||||
String sql = @"
|
||||
SELECT
|
||||
'BCH',
|
||||
sum(qry.Betrag) AS Betrag,
|
||||
'8017' as 'Gegenkonto',
|
||||
qry.DebitorNumber,
|
||||
qry.CostCenter,
|
||||
org.Name,
|
||||
qry.Verwendung,
|
||||
qry.Oid
|
||||
FROM
|
||||
(
|
||||
(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',
|
||||
org.DebitorNumber,
|
||||
c.CostCenter,
|
||||
CONCAT(org.Name,', ', p.`LastName`, ', ', p.`FirstName`) as 'Verwendung',
|
||||
cb2sc.Oid
|
||||
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` = 1
|
||||
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 )) AS 'Betrag',
|
||||
org.DebitorNumber,
|
||||
c.CostCenter,
|
||||
CONCAT(org.Name,', ', p.`LastName`, ', ', p.`FirstName`) as 'Verwendung',
|
||||
cb2sc.Oid
|
||||
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` = 1
|
||||
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)
|
||||
|
||||
Reference in New Issue
Block a user