|
|
| (3 dazwischenliegende Versionen von 2 Benutzern werden nicht angezeigt) |
| Zeile 1: |
Zeile 1: |
| <nowiki>using System;
| |
| using System.Collections.Generic;
| |
| using System.ComponentModel;
| |
| using System.Data;
| |
| using System.Drawing;
| |
| using System.Text;
| |
| using System.Windows.Forms;
| |
| using System.Xml;
| |
| using System.IO;
| |
|
| |
|
| using NHibernate;
| |
|
| |
| using model;
| |
|
| |
| namespace tool
| |
| {
| |
| public partial class Zahlungsimport : Form
| |
| {
| |
| public Zahlungsimport()
| |
| {
| |
| InitializeComponent();
| |
| }
| |
|
| |
| string bankAccount, kassaAccount, beitragsAccount;
| |
| XmlNamespaceManager xnsmgr;
| |
| StringBuilder fehlendeMitglieder;
| |
|
| |
| private void btnImport_Click(object sender, EventArgs e)
| |
| {
| |
| OpenFileDialog ofd = new OpenFileDialog();
| |
|
| |
| if (ofd.ShowDialog() == DialogResult.OK)
| |
| {
| |
|
| |
| fehlendeMitglieder = new StringBuilder();
| |
| string filename = ofd.FileName;
| |
|
| |
| XmlDocument xd = new XmlDocument();
| |
| xnsmgr = new XmlNamespaceManager(xd.NameTable);
| |
| xnsmgr.AddNamespace("act", "http://www.gnucash.org/XML/act");
| |
| xnsmgr.AddNamespace("gnc", "http://www.gnucash.org/XML/gnc");
| |
| xnsmgr.AddNamespace("trn", "http://www.gnucash.org/XML/trn");
| |
| xnsmgr.AddNamespace("split", "http://www.gnucash.org/XML/split");
| |
|
| |
|
| |
|
| |
| xd.Load(filename);
| |
|
| |
| beitragsAccount = xd.SelectSingleNode("//gnc:account[act:name='4000 Erträge aus Mitgliedsbeiträgen']/act:id", xnsmgr).InnerText;
| |
| bankAccount = xd.SelectSingleNode("//gnc:account[act:name='2810 Bank']/act:id", xnsmgr).InnerText;
| |
| kassaAccount = xd.SelectSingleNode("//gnc:account[act:name='2710 Hauptkassa']/act:id", xnsmgr).InnerText;
| |
|
| |
| /* XmlNodeList kassaPayments, bankPayments, einzugPayments, sonstigePayments;
| |
|
| |
| kassaPayments = xd.SelectNodes("//gnc:transaction[trn:splits/trn:split/split:account='"+kassaAccount+ "' and trn:splits/trn:split/split:account='"+beitragsAccount+ "']", xnsmgr);
| |
| bankPayments = xd.SelectNodes( "//gnc:transaction[trn:splits/trn:split/split:account='" + bankAccount + "' and trn:splits/trn:split/split:account='" + beitragsAccount + "' and not(contains(trn:description,'Einzug'))]", xnsmgr);
| |
| einzugPayments = xd.SelectNodes("//gnc:transaction[trn:splits/trn:split/split:account='" + bankAccount + "' and trn:splits/trn:split/split:account='" + beitragsAccount + "' and contains(trn:description,'Einzug')]", xnsmgr);
| |
| sonstigePayments = xd.SelectNodes("//gnc:transaction[not(trn:splits/trn:split/split:account='" + kassaAccount + "' or trn:splits/trn:split/split:account='" + bankAccount + "') and trn:splits/trn:split/split:account='" + beitragsAccount + "']", xnsmgr);
| |
| */
| |
|
| |
| DateTime cut = new DateTime(2007, 2, 14);
| |
|
| |
| using (ISession session = SessionFactoryHelper.SessionFactory.OpenSession())
| |
| {
| |
| List<Zahlung> zahlungen = new List<Zahlung>();
| |
| foreach (XmlNode transaction in xd.SelectNodes("//gnc:transaction[trn:splits/trn:split/split:account='" + beitragsAccount + "']", xnsmgr))
| |
| {
| |
| zahlungen.AddRange(ProcessTransaction(session, transaction));
| |
| }
| |
|
| |
| foreach (Zahlung z in zahlungen)
| |
| {
| |
| if (z.Datum > cut)
| |
| session.Save(z);
| |
| }
| |
|
| |
| if (fehlendeMitglieder.Length != 0)
| |
| {
| |
| MessageBox.Show(fehlendeMitglieder.ToString());
| |
| }
| |
|
| |
| session.Flush();
| |
| }
| |
|
| |
|
| |
| }
| |
| }
| |
|
| |
| private IEnumerable<Zahlung> ProcessTransaction(ISession session, XmlNode transaction)
| |
| {
| |
| Zahlungsart art=null;
| |
|
| |
| try
| |
| {
| |
| XmlNodeList splitList = transaction.SelectNodes("trn:splits/trn:split[not(split:account = '" + beitragsAccount + "')]", xnsmgr);
| |
| if (splitList.Count != 1)
| |
| throw new Exception("Es sind nur simple Transaktionen erlaubt!");
| |
|
| |
| XmlNode split = splitList[0];
| |
| string account = split.SelectSingleNode("split:account", xnsmgr).InnerText;
| |
| if (account == bankAccount)
| |
| {
| |
| if (transaction["trn:description"].InnerText.Contains("Einzug"))
| |
| return ProcessEinzug(session, transaction);
| |
| else
| |
| art = session.CreateQuery("from Zahlungsart z where z.Name = 'Überweisung'").UniqueResult<Zahlungsart>();
| |
| }
| |
| else if (account == kassaAccount)
| |
| {
| |
| art = session.CreateQuery("from Zahlungsart z where z.Name = 'Bar'").UniqueResult<Zahlungsart>();
| |
| }
| |
|
| |
| if (art == null)
| |
| throw new Exception("Konnte Transaktionstype nicht feststellen!");
| |
|
| |
| return ProcessSingleTransaction(session, transaction, art);
| |
| }
| |
| catch (Exception ex)
| |
| {
| |
| if (ex.Message.StartsWith("Mitglied ") && ex.Message.EndsWith(" nicht gefunden!"))
| |
| {
| |
| fehlendeMitglieder.AppendLine(ex.Message);
| |
| }
| |
| else
| |
| {
| |
| string error = ex.ToString() + Environment.NewLine + Environment.NewLine + transaction.OuterXml;
| |
| MessageBox.Show(error);
| |
| }
| |
| return new Zahlung[0];
| |
| }
| |
| }
| |
|
| |
| IEnumerable<Zahlung> ProcessEinzug(ISession session, XmlNode transaction)
| |
| {
| |
| List<Zahlung> zahlungen = new List<Zahlung>();
| |
|
| |
| Zahlungsart art = session.CreateQuery("from Zahlungsart z where z.Name = 'Einzug'").UniqueResult<Zahlungsart>();
| |
| DateTime datum = DateTime.Parse(transaction["trn:date-posted"].InnerText.Substring(0, 19), System.Globalization.CultureInfo.InvariantCulture);
| |
| string werts = transaction.SelectSingleNode("trn:splits/trn:split[split:account = '" + beitragsAccount + "']", xnsmgr)["split:value"].InnerText;
| |
| int wert = int.Parse(werts.Substring(0, werts.IndexOf('/'))) / int.Parse(werts.Substring(werts.IndexOf('/') + 1));
| |
| wert *= -1; //Ertragskonto hat negatives Vorzeichen im vergleich zum bestandskonto....
| |
|
| |
| string mitgliederString = transaction["trn:description"].InnerText;
| |
| mitgliederString = mitgliederString.Substring(0, mitgliederString.IndexOf(')'));
| |
| mitgliederString = mitgliederString.Substring(mitgliederString.IndexOf('(')+1);
| |
|
| |
| string[] mitgliedernamen = Array.ConvertAll<string, string>(mitgliederString.Split(','), delegate(string x) { return x.Trim(); } );
| |
|
| |
| if (mitgliedernamen.Length * 20 != wert)
| |
| throw new Exception("Anzahl der Mitglieder passt nicht zum Wert des Einzugs");
| |
|
| |
| StringBuilder missing = new StringBuilder();
| |
|
| |
| foreach (string mitgliedsname in mitgliedernamen)
| |
| {
| |
| Mitglied m = session.CreateQuery("from Mitglied m where m.Vorname+' '+m.Nachname = :name or m.Nachname+' '+m.Vorname = :name").SetParameter("name", mitgliedsname).UniqueResult<Mitglied>();
| |
|
| |
| if (m == null)
| |
| {
| |
| fehlendeMitglieder.AppendLine("Mitglied '" + mitgliedsname + "' nicht gefunden!");
| |
| continue;
| |
| }
| |
|
| |
| Zahlung z = new Zahlung();
| |
| z.Mitglied = m;
| |
| z.Art = art;
| |
| z.Wert = 20;
| |
| z.Datum = datum;
| |
| z.Kommentar = "Buchungsimport am " + DateTime.Today;
| |
|
| |
| zahlungen.Add(z);
| |
| }
| |
|
| |
| return zahlungen;
| |
| }
| |
|
| |
| IEnumerable<Zahlung> ProcessSingleTransaction(ISession session, XmlNode transaction, Zahlungsart art)
| |
| {
| |
| string name = transaction["trn:description"].InnerText.Replace("Mitgliedsbeitrag ", "");
| |
|
| |
| Mitglied m = session.CreateQuery("from Mitglied m where m.Vorname+' '+m.Nachname = :name or m.Nachname+' '+m.Vorname = :name").SetParameter("name", name).UniqueResult<Mitglied>();
| |
|
| |
| if (m == null)
| |
| throw new Exception("Mitglied '" + name + "' nicht gefunden!");
| |
|
| |
| string werts = transaction.SelectSingleNode("trn:splits/trn:split[split:account = '" + beitragsAccount + "']", xnsmgr)["split:value"].InnerText;
| |
| int wert = int.Parse(werts.Substring(0, werts.IndexOf('/'))) / int.Parse(werts.Substring(werts.IndexOf('/') + 1));
| |
|
| |
| Zahlung z = new Zahlung();
| |
| z.Mitglied = m;
| |
| z.Art = art;
| |
| z.Wert = wert*-1; //Ertragskonto hat negatives Vorzeichen im vergleich zum bestandskonto....
| |
| z.Datum = DateTime.Parse(transaction["trn:date-posted"].InnerText.Substring(0, 19), System.Globalization.CultureInfo.InvariantCulture);
| |
| z.Kommentar = "Buchungsimport am " + DateTime.Today;
| |
|
| |
| return new Zahlung[] { z };
| |
| }
| |
| }
| |
| }
| |
| </nowiki>
| |
