ownSoft/BeWoPlaner
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

ChristopherusHaus/Export/SimbaExporter - erster Wurf

Browse Source
This commit is contained in:
Alexandra
2024-09-09 16:38:12 +02:00
parent 487ea125ed
commit 06161d4f60
1 changed files with 113 additions and 56 deletions
Download Patch File Download Diff File Expand all files Collapse all files

169
ReportImp/ChristopherusHaus/Export/SimbaExporter.cs
View File

@@ -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)