Files
BeWoPlaner/ReportImp/Alloheim/Export/SAPExporter.cs

493 lines
21 KiB
C#

using System;
using System.Collections.Generic;
using System.Data;
using System.IO;
using System.Linq;
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 Alloheim.Export
{
public class SAPExporter
{
public static QueryDC CreateQuery(QueryDC query)
{
DateTime dt = DateTime.Now;
DateTime.TryParse(query.Parameter[0].Value.ToString(), out dt);
if (query.Title == "SAP Export Stammdaten")
{
query.FileName = String.Format("1192_{0:yyyyMMdd}_{0:hhmmss}_DEBSB.TXT", DateTime.Now);
query.QueryResult = GetDebitorenString(dt);
}
else
{
query.FileName = String.Format("1192_{0:yyyyMMdd}_{0:hhmmss}_FIBU.TXT", DateTime.Now);
query.QueryResult = GetAbrechnungenString(dt);
}
return query;
}
public static String GetDebitorenString(DateTime date)
{
var dt = ExecuteQuery(GetDebitorenSql(date), date);
StringBuilder sb = new StringBuilder();
foreach (DataRow row in dt.Rows)
{
if (sb.Length > 0)
{
sb.AppendLine();
}
for (int i = 0; i < row.ItemArray.Length; i++)
{
if (i > 0)
{
sb.Append("\t");
}
var item = row[i];
if (i == 15 && item != null)
{
var oid = (long)row[i];
var p = DAOFactory.GenericDAO.LoadByID<Person>(oid);
string telefon = null;
var contact = p.Contacts.FirstOrDefault(c => c.Type == ContactType.business_MobilePhone);
contact = p.Contacts.FirstOrDefault(c => c.Type == ContactType.business_Phone);
if (contact != null)
{
telefon = contact.Value;
}
sb.Append(telefon);
}
else if (i == 2 && item != null)
{
var sex = row[i].ToString();
if(sex == "0")
{
sb.Append("Herr");
}
else
{
sb.Append("Frau");
}
}
else
{
sb.Append(item);
}
}
}
return sb.ToString();
}
public static String GetAbrechnungenString(DateTime date)
{
StringBuilder sb = new StringBuilder();
var s = GetMonatlicheBetraegeString(date);
if (!String.IsNullOrWhiteSpace(s))
{
sb.Append(s);
}
s = GetMonatlicheRechnungenString(date);
if (!String.IsNullOrWhiteSpace(s))
{
if (sb.Length > 0)
{
sb.AppendLine();
}
sb.Append(s);
}
return sb.ToString();
}
public static String GetMonatlicheBetraegeString(DateTime date)
{
// alle Angaben aus SupportOID=71294 31.01.2023
// Buchungskreis Belegart Buchungsdatum Belegdatum Währungs-schlüssel Referenzbeleg-nummer Belegkopftext Kontoart Buchungs-schlüssel
// Kontonummer Betrag Umsatzsteuer-kennzeichen Soll-/Haben-Kennzeichen Zuordnungsnummer Positionstext
var sql = GetMonatlicheBetraegeSql(date);
var dt = ExecuteQuery(sql, date);
int counter = 0;
StringBuilder sb = new StringBuilder();
foreach (DataRow row in dt.Rows)
{
if (sb.Length > 0)
{
sb.AppendLine();
}
/*
sum(qry.Betrag),
qry.DebitorNumber,
qry.CostCenter,
qry.Verwendung,
qry.DebitorLVR,
qry.Oid
*/
DateTime lastDate = new DateTime(date.Year, date.Month, 1);
lastDate = lastDate.AddMonths(1).AddDays(-1);
counter += 1;
sb.Append("1192\t"); // Buchungskreis 1192
sb.Append("DR\t"); // Beleg DR für Rechnung / DG für Gutschrift
sb.Append(String.Format("{0:ddMMyyyy} \t", lastDate));
sb.Append(String.Format("{0:ddMMyyyy} \t", lastDate));
sb.Append("EUR\t");
if (counter < 10)
{
sb.Append(String.Format("1192{0:yyyy}{0:MM}00{1} \t", lastDate, counter));// Profitcenter + Rechnungs - Nr.VN, genau 11 Stellen
}
else if (counter < 100)
{
sb.Append(String.Format("1192{0:yyyy}{0:MM}0{1} \t", lastDate, counter));// Profitcenter + Rechnungs - Nr.VN, genau 11 Stellen
}
else
{
sb.Append(String.Format("1192{0:yyyy}{0:MM}{1} \t", lastDate, counter));// Profitcenter + Rechnungs - Nr.VN, genau 11 Stellen
}
sb.Append("1192\t"); // Belegkopftext 1192
sb.Append("D\t"); // D = Debitorenposition / zweite Zeile: S = Sachkontenposition
sb.Append("01\t"); // Kontoart D: S=01 H=11 / zweite Zeile: Kontoart S: S=40 H=50
sb.Append(String.Format("1192{0}\t", row[4])); //DebitorNumber LVR/ zweite Zeile: Sachkonto SAP
sb.Append(String.Format("{0:0.00}\t", row[0])); //Betrag
sb.Append("00\t"); // Umsatzsteuerschlüssel
sb.Append("S\t"); // zweite Zeile: S
sb.Append(String.Format("1192{0}\t", row[1])); // Debitorennummer Bewohner
sb.Append(String.Format("1192{0} {1:MM}/{1:yyyy}:{2}\t", row[1], lastDate, row[3])); // Buchungstext: Bew.Nr., Abr.-Zeitraum, Nachname, Vorname
sb.AppendLine();
// zweite Linie - Rechnungspostionen
sb.Append("1192\t"); // Buchungskreis 1192
sb.Append("DR\t"); // Beleg DR für Rechnung / DG für Gutschrift
sb.Append(String.Format("{0:ddMMyyyy} \t", lastDate));
sb.Append(String.Format("{0:ddMMyyyy} \t", lastDate));
sb.Append("EUR\t");
if (counter < 10)
{
sb.Append(String.Format("1192{0:yyyy}{0:MM}00{1} \t", lastDate, counter));// Profitcenter + Rechnungs - Nr.VN, genau 11 Stellen
}
else if (counter < 100)
{
sb.Append(String.Format("1192{0:yyyy}{0:MM}0{1} \t", lastDate, counter));// Profitcenter + Rechnungs - Nr.VN, genau 11 Stellen
}
else
{
sb.Append(String.Format("1192{0:yyyy}{0:MM}{1} \t", lastDate, counter));// Profitcenter + Rechnungs - Nr.VN, genau 11 Stellen
}
sb.Append("1192\t"); // Belegkopftext 1192
sb.Append("S\t"); // S = Sachkontenposition
sb.Append("50\t"); // Kontoart Kontoart S: S=40 H=50
sb.Append("409600\t"); // zweite Zeile: Sachkonto SAP
sb.Append(String.Format("{0:0.00}\t", row[0])); //Betrag
sb.Append("00\t"); // Umsatzsteuerschlüssel
sb.Append("H\t");
sb.Append(String.Format("1192{0}\t", row[1])); // Debitorennummer Bewohner
sb.Append(String.Format("1192{0}:{1:MM}/{1:yyyy}:{2}\t", row[1], lastDate, row[3])); // Buchungstext: Bew.Nr., Abr.-Zeitraum, Nachname, Vorname
}
return sb.ToString();
}
private static String GetMonatlicheBetraegeSql(DateTime date)
{
String sql = @"
SELECT
sum(qry.Betrag),
qry.DebitorNumber,
qry.CostCenter,
qry.Verwendung,
qry.DebitorLvr,
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',
c.DebitorNumber,
c.CostCenter,
CONCAT(p.`LastName`, ', ', p.`FirstName`) as 'Verwendung',
org.DebitorNumber AS DebitorLvr,
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 sc.Name <> 'Assistenzleistungen' 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',
c.DebitorNumber,
c.CostCenter,
CONCAT(p.`LastName`, ', ', p.`FirstName`) as 'Verwendung',
org.DebitorNumber AS DebitorLvr,
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 String GetMonatlicheRechnungenString(DateTime date)
{
var sql = GetMonatlicheRechnungenSql(date);
/*
sip.Claim,
ib.InvoiceNumber,
c.DebitorNumber,
ib.InvoiceDate,
org.Name AS 'VerwendungOrg',
CONCAT(p.`LastName`, ', ', p.`FirstName`) as 'VerwendungPerson',
org.DebitorNumber,
-- ii.ItemDescription,
-- Round(ii.AmountTotal, 2) AS 'Betrag',
c.CostCenter,
ib.Oid,
ib.AccountingPeriodEnd
*/
// alle Angaben aus SupportOID=71294 31.01.2023
// Buchungskreis Belegart Buchungsdatum Belegdatum Währungs-schlüssel Referenzbeleg-nummer Belegkopftext Kontoart Buchungs-schlüssel
// Kontonummer Betrag Umsatzsteuer-kennzeichen Soll-/Haben-Kennzeichen Zuordnungsnummer Positionstext
Dictionary<string, string> key2Value = new Dictionary<string, string>();
var dt = ExecuteQuery(sql, date);
StringBuilder sb = new StringBuilder();
foreach (DataRow row in dt.Rows)
{
bool storno = false;
if (sb.Length > 0)
{
sb.AppendLine();
}
// Dictionary wird nicht gebraucht, weil derzeit alle Buchungen auf ein Sachkonto gehen
//string key = String.Format("{0}_{1}", row[2], row[1]); //Dictionary, damit erste Zeile nur einmal geschrieben wird
//if (!key2Value.ContainsKey(key))
//{
//key2Value.Add(key, key);
String betrag = String.Format("{0:0.00}", row[0]); // Betrag
if (betrag.Contains("-")) // Storno
{
betrag = betrag.Replace("-", "");
storno = true;
}
// Erste Linie - Rechnung
sb.Append("1192\t"); // Buchungskreis 1192
if (storno)
{
sb.Append("DG\t"); // DG für Gutschrift
}
else
{
sb.Append("DR\t"); // Beleg DR für Rechnung / DG für Gutschrift
}
sb.Append(String.Format("{0:ddMMyyyy}\t", row[3]));
sb.Append(String.Format("{0:ddMMyyyy}\t", row[3]));
sb.Append("EUR\t");
sb.Append(String.Format("{0}\t", row[1])); // Rechnungs - Nr.VN (Profitcenter ist in Rechnungsnr. enthalten)
sb.Append("1192\t"); // Belegkopftext 1192
sb.Append("D\t"); // D = Debitorenposition / zweite Zeile: S = Sachkontenposition
if (storno)
{
sb.Append("11\t"); // Kontoart D: S=01 H=11 / zweite Zeile: Kontoart S: S=40 H=50
}
else
{
sb.Append("01\t"); // Kontoart D: S=01 H=11 / zweite Zeile: Kontoart S: S=40 H=50
}
sb.Append(String.Format("1192{0}\t", row[6])); //DebitorNumber Kostenträger / zweite Zeile: Sachkonto SAP
sb.Append(String.Format("{0:0.00}\t", betrag)); //Betrag
sb.Append("00\t"); // Umsatzsteuerschlüssel
if (storno)
{
sb.Append("H\t");
}
else
{
sb.Append("S\t");
}
sb.Append(String.Format("1192{0}\t", row[2])); // Debitorennummer Bewohner
sb.Append(String.Format("1192{0}:{1:MM}/{1:yyyy}:{2}\t", row[2], row[3], row[5])); // Buchungstext: Bew.Nr., Abr.-Zeitraum, Nachname, Vorname
sb.AppendLine();
//}
// zweite Linie - Rechnungspostionen
sb.Append("1192\t"); // Buchungskreis 1192
if (storno)
{
sb.Append("DG\t"); // DG für Gutschrift
}
else
{
sb.Append("DR\t"); // Beleg DR für Rechnung / DG für Gutschrift
}
sb.Append(String.Format("{0:ddMMyyyy} \t", row[3]));
sb.Append(String.Format("{0:ddMMyyyy} \t", row[3]));
sb.Append("EUR\t");
sb.Append(String.Format("{0}\t", row[1])); // Rechnungs - Nr.VN (Profitcenter ist in Rechnungsnr. enthalten)
sb.Append("1192\t"); // Belegkopftext 1192
sb.Append("S\t"); // S = Sachkontenposition
if (storno)
{
sb.Append("40\t");
}
else
{
sb.Append("50\t"); // Kontoart Kontoart S: S=40 H=50
}
sb.Append("409600\t"); // zweite Zeile: Sachkonto SAP
sb.Append(String.Format("{0:0.00}\t", betrag)); //Betrag
sb.Append("00\t"); // Umsatzsteuerschlüssel
if (storno)
{
sb.Append("S\t");
}
else
{
sb.Append("H\t");
}
sb.Append(String.Format("1192{0}\t", row[2])); // Debitorennummer Bewohner
sb.Append(String.Format("1192{0}:{1:MM}/{1:yyyy}:{2}\t", row[2], row[3], row[5])); // Buchungstext: Bew.Nr., Abr.-Zeitraum, Nachname, Vorname
}
return sb.ToString();
}
private static String GetMonatlicheRechnungenSql(DateTime date)
{
String sql = @"
SELECT
sip.Claim,
ib.InvoiceNumber,
c.DebitorNumber,
ib.InvoiceDate,
org.Name AS 'VerwendungOrg',
CONCAT(p.`LastName`, ', ', p.`FirstName`) as 'VerwendungPerson',
org.DebitorNumber,
-- ii.ItemDescription,
-- Round(ii.AmountTotal, 2) AS 'Betrag',
c.CostCenter,
ib.Oid,
ib.AccountingPeriodEnd
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`
INNER JOIN invoicebase ib on ib.costbearer2supportconceptoid = cb2sc.oid
inner join serviceinvoice si on si.invoicebaseoid = ib.oid
inner join serviceinvoiceperiod sip on sip.serviceinvoiceoid = si.oid
-- inner join invoiceitem ii on ii.serviceinvoiceperiodoid = sip.oid
WHERE ib.`AccountingPeriodEnd` >= ':Monat_Start' AND ib.`AccountingPeriodEnd` < ':Monat_End' and ib.IsActive = 1
ORDER BY p.`LastName`, p.`FirstName`, cb2sc.`ApprovedStartDate`
";
return sql;
}
private static String GetDebitorenSql(DateTime date)
{
String sql = @"
SELECT
distinct
CONCAT('1192', c.DebitorNumber),
null,
p.Sex,
CONCAT(p.`LastName`, ' ', p.`FirstName`),
CONCAT(p.`LastName`, ' ', p.`FirstName`),
null,
null,
null,
a.Street,
null,
a.Town,
a.PostalCode,
null,
null,
'D',
p.oid,
null,
null,
null,
null,
null,
null,
null,
null,
null,
null,
null,
'1192'
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 AND c.Insts >= ':Monat_Start' AND c.Insts < ':Monat_End'
order by p.`LastName`, p.FirstName
";
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];
}
}
}