![]() |
AW: Delphi und XRechnung
Hab gerade noch die Version 2.3.1 versucht - die funktioniert. Was fehlt bei der V. 3?
Hartmut |
AW: Delphi und XRechnung
|
AW: Delphi und XRechnung
Hallo Sven,
ja, da war ich wohl zu übereifrig mit der aktuellen Version 3...aber kein Problem, zum Testen genügt ja die V. 2.3.1. Sollte es dann zur Umsetzung kommen, muss ich es ja eh bei Dir lizensieren, da gewerblich genutzt. Hartmut |
AW: Delphi und XRechnung
Liste der Anhänge anzeigen (Anzahl: 2)
Guten Tag!
Ich arbeite gerade mit der xRechnung Demo und habe den „Zuschlag fuer Kommuikation“ und „Nachlass 2 ohne Angabe von Basisbetrag und Nachlassprozente“ deaktiviert (auskommentiert) Dann hab ich folgende Einträge vorgenommen, bzw. angepasst: if cbAllowanceCharges.Checked then begin inv.LineAmount := inv.LineAmount; inv.AllowanceTotalAmount := 5.00 + 5.00; inv.ChargeTotalAmount := 0; inv.TaxAmountSubtotals[1].TaxableAmount := inv.TaxAmountSubtotals[1].TaxableAmount - 5.00 - 5.00; inv.TaxAmountSubtotals[1].TaxAmount := inv.TaxAmountSubtotals[1].TaxAmount - 0.95 - 0.95; inv.TaxAmountTotal := inv.TaxAmountTotal - 0.95 - 0.95; inv.TaxExclusiveAmount := inv.TaxExclusiveAmount - inv.AllowanceTotalAmount + inv.ChargeTotalAmount; inv.TaxInclusiveAmount := inv.TaxInclusiveAmount - 5.00 - 0.95 - 5.00 - 0.95; inv.PayableAmount := inv.TaxInclusiveAmount; end; ich erhalte dann aber folgende Fehlermeldung: Pos Code Adj. Grad Text val-sch.1.1 BR-CO-10 error [BR-CO-10]-Sum of Invoice line net amount (BT-106) = Σ Invoice line net amount (BT-131). Pfad: /ubl:Invoice/cac:LegalMonetaryTotal[1] val-sch.1.2 BR-CO-11 error [BR-CO-11]-Sum of allowances on document level (BT-107) = Σ Document level allowance amount (BT-92). Pfad: /ubl:Invoice/cac:LegalMonetaryTotal[1] Welche Variablen müssen noch bearbeitet werden? Zur Übersicht habe ich mir die Inhalte der Variablen vor der Änderung der Variablen bei „if cbAllowanceCharges.Checked then“ per Showmessage (siehe Anhang Summen 001) anzeigen lassen und danach (siehe Anhang Summen 002). Diese Werte stimmen soweit. |
AW: Delphi und XRechnung
Aus der Kalten würde ich sagen, der ganze Block muss dann auch weg, wenn keine Nachlässe drin sind
Code:
if cbAllowanceCharges.Checked then
begin inv.LineAmount := inv.LineAmount; inv.AllowanceTotalAmount := 5.00 + 5.00; inv.ChargeTotalAmount := 0; inv.TaxAmountSubtotals[1].TaxableAmount := inv.TaxAmountSubtotals[1].TaxableAmount - 5.00 - 5.00; inv.TaxAmountSubtotals[1].TaxAmount := inv.TaxAmountSubtotals[1].TaxAmount - 0.95 - 0.95; inv.TaxAmountTotal := inv.TaxAmountTotal - 0.95 - 0.95; inv.TaxExclusiveAmount := inv.TaxExclusiveAmount - inv.AllowanceTotalAmount + inv.ChargeTotalAmount; inv.TaxInclusiveAmount := inv.TaxInclusiveAmount - 5.00 - 0.95 - 5.00 - 0.95; inv.PayableAmount := inv.TaxInclusiveAmount; end; |
AW: Delphi und XRechnung
Danke für die schnelle Antwort. Es sind schon Rabatte vorhanden. Die sind so in der Demo.Zwei Artikel werden gebucht.
Einer ohne Rabatt with inv.InvoiceLines.AddInvoiceLine do begin ID := '001'; //Positionsnummer //Note : String; //Hinweis Name := 'Kurzinfo Artikel 1'; //Kurztext Description := 'Langtext Artikel'+#13#10+'Zeile 2'+#13#10+'Zeile 3'; //Laengere Beschreibung Quantity := 2; //Menge UnitCode := TInvoiceUnitCodeHelper.MapUnitOfMeasure('Stk',suc) ; //Mengeneinheit //TODO Artikelnummer Kaeufer SellersItemIdentification := 'A0815'; //Artikelnummer TaxPercent := 7.0; //MwSt TaxCategory := TInvoiceDutyTaxFeeCategoryCode.idtfcc_S_StandardRa te; PriceAmount := 50; //Einzelpreis //TODO Preiseinheiten BaseQuantity := 0; //Preiseinheit BaseQuantityUnitCode := TInvoiceUnitCode.iuc_None; //Preiseinheit Mengeneinheit LineAmount := 100; end; Einer mit Rabatt with inv.InvoiceLines.AddInvoiceLine do begin ID := '002'; //Positionsnummer //Note : String; //Hinweis Name := 'Kurzinfo Artikel 2'; //Kurztext Description := 'Langtext Artikel 2'+#13#10+'Zeile 2'+#13#10+'Zeile 3'; //Laengere Beschreibung Quantity := 1; //Menge UnitCode := TInvoiceUnitCodeHelper.MapUnitOfMeasure('Stk',suc) ; //Mengeneinheit //TODO Artikelnummer Kaeufer SellersItemIdentification := 'A0816'; //Artikelnummer TaxPercent := 19.0; //MwSt TaxCategory := TInvoiceDutyTaxFeeCategoryCode.idtfcc_S_StandardRa te; PriceAmount := 100; //Einzelpreis BaseQuantity := 0; //Preiseinheit BaseQuantityUnitCode := TInvoiceUnitCode.iuc_None; //Preiseinheit Mengeneinheit LineAmount := 100; //Nachlass zur Position if cbAllowanceCharges.Checked then with AllowanceCharges.AddAllowanceCharge do begin ChargeIndicator := false; ReasonCodeAllowance := TInvoiceAllowanceOrChargeIdentCode.iacic_Discount; BaseAmount := 50.00; MultiplierFactorNumeric := 10; //10 Prozent auf 50 EUR Amount := 5.00; //Nicht erforderlich TaxPercent := 19.0; //Nicht erforderlich TaxCategory := TInvoiceDutyTaxFeeCategoryCode.idtfcc_S_StandardRa te; LineAmount := LineAmount - Amount; end; end; Ich glaube jetzt kommt auch noch ein zweiter Rabatt if cbAllowanceCharges.Checked then //Nachlaesse generieren begin with inv.AllowanceCharges.AddAllowanceCharge do begin //Haeufig genutzte Gruende //41 Bonus for works ahead of schedule - Bonus fuer fruehzeitig erfuellte Aufgaben //42 Other bonus - sonstiger Bonus //60 Manufacturer’s consumer discount - Verbrauchernachlass des Herstellers //62 Due to military status - Wegen militaerischem Status //63 Due to work accident - Wegen Arbeitsunfall //64 Special agreement - Sondervereinbarung //65 Production error discount - Nachlass wegen Produktionsmangel //66 New outlet discount - Nachlass fuer neue Vertriebsstelle //67 Sample discount - Musternachlass //68 End of range discount - Nachlass fuer Auslaufsortiment //70 Incoterm discount - Incoterm Nachlass //71 Point of sales threshold allowance - Freibetrag fuer Umsaetze zum Verkaufszeitpunkt //88 Material surcharge/deduction - Materialzuschlag/-Nachlass //95 Discount - Nachlass //100 Special rebate - Sonderarbatt //102 Fixed long term - Feste Laufzeit //103 Temporary - Vorlaeufig //104 Standard - Regulaer ChargeIndicator := false; ReasonCodeAllowance := TInvoiceAllowanceOrChargeIdentCode.iacic_Discount; Reason := 'Nachlass 1'; BaseAmount := 50.00; MultiplierFactorNumeric := 10; //10 Prozent auf 50 EUR Amount := 5.00; TaxPercent := 19.0; TaxCategory := TInvoiceDutyTaxFeeCategoryCode.idtfcc_S_StandardRa te; end; end; Ich sehe im Moment nur noch Buchstaben. |
AW: Delphi und XRechnung
wenn irgendwo etwas über AddAllowanceCharge eingetragen wird, zur Position oder generell zum Dokument, dann
muss dass in der Endsumme wieder abgezogen werden, sowohl im Netto also auch mit der MwSt. Deswegen ist in der Demo für jeden Rabatt explizit der einzelne Betrag mit 5.00 EUR aufgeführt, ebenso wie die MWst mit 0,95. So kann man es nachvollziehen. |
AW: Delphi und XRechnung
So wollte/will ich es auch machen. Deshalb habe ich mir ja die Werte mit PrintScreens angezeigt. (siehe Anlagen weiter oben)
"Summen 01.jpg" die Eintraege ohne Rabatte und dann "Summen 02.jpg" die Eintrage nach Abzug von den 2 mal 5 EUR Rabatten und den 2 mal 0,95 EUR MwSt Minderung. Die Endbetraege nach der Subtraktion sind auch stimmig. inv.PayableAmount 226 ohne Abzüge und inv.PayableAmount 214,1 nach Abzügen (100,00 + 7 Mwst und 90 + 17,1 Mwst) |
AW: Delphi und XRechnung
Liste der Anhänge anzeigen (Anzahl: 1)
Ich nutze die Demo XRechnung for Delphi v2.3.1
In der Demo sind die Zuschläge (1 EUR) und eine Nachlassbuchung (5,00 EUR) deaktiviert. Es bleiben ein „Nachlass 2 ohne Angabe von Basisbetrag und Nachlassprozente“ und ein „Nachlass (Rabatt) zur Position“ aktiviert. In der Demo werden als erstes die Nettobeträge der Rechnung und die MwSt-Beträge ohne Rabatte berechnet. Im weiteren verlauf werden die Nettobeträge und die MwSt-Beträge der Rabatte/Nachlässe „berechnet“. Das sind immer 5,00 EUR Rabatt und 0,95 EUR MwSt und wie unten in Variable eingetragen. Die Demo kann eine Anzeige im HTML-Format generieren und man sieht dann 200 EUR Rechnungsbetrag 10 EUR Nachlass/Rabatt und entsprechend die MwSt und den Rechnungs/Zahlbetrag. Die Werte von denen ich glaube, dass sie zu „Nachlass (Rabatt) zur Position“ gehören habe ich rot markiert. if cbAllowanceCharges.Checked then begin inv.LineAmount := inv.LineAmount - 5.00; inv.AllowanceTotalAmount := 5.00; inv.ChargeTotalAmount := 0; inv.TaxAmountSubtotals[1].TaxableAmount := inv.TaxAmountSubtotals[1].TaxableAmount - 5.00 - 5.00; inv.TaxAmountSubtotals[1].TaxAmount := inv.TaxAmountSubtotals[1].TaxAmount - 0.95 - 0.95; inv.TaxAmountTotal := inv.TaxAmountTotal - 0.95 - 0.95; inv.TaxExclusiveAmount := inv.TaxExclusiveAmount - inv.AllowanceTotalAmount + inv.ChargeTotalAmount - 5.00; inv.TaxInclusiveAmount := inv.TaxInclusiveAmount - 5.00 - 0.95 - 5.00 - 0.95; inv.PayableAmount := inv.TaxInclusiveAmount; end; Wenn ich den „Nachlass (Rabatt) zur Position“ deaktiviere und die Rot markierten Werte für die Korrekturbuchung lösche, also einfach einen „Nachlass 2 ohne Angabe von Basisbetrag und Nachlassprozente“ verbuchen möchte, bekomme ich eine Fehlermeldung: Siehe Anhang Die gleiche Fehlermeldung kommt, wenn ich versuche einen „Nachlass (Rabatt) zur Position“ zu buchen und nur die roten Werte stehen lasse. Lasse ich alle werte (rot und schwarz) wie oben stehen, und buche gleichzeitig „Nachlass 2 ohne Angabe von Basisbetrag und Nachlassprozente“ und einen „Nachlass (Rabatt) zur Position“ habe ich keine Fehlermeldung. Hat jemand eine Idee was die Fehlermeldung zu bedeuten hat und ob vielleicht meine Zuordnung der Werte falsch ist? |
AW: Delphi und XRechnung
Also wenn ich alles richtig verstanden habe, was Sie da machen, müsste es so aussehen
if cbAllowanceCharges.Checked then begin inv.LineAmount := inv.LineAmount; inv.AllowanceTotalAmount := 5.00; inv.ChargeTotalAmount := 0; inv.TaxAmountSubtotals[1].TaxableAmount := inv.TaxAmountSubtotals[1].TaxableAmount - 5.00; inv.TaxAmountSubtotals[1].TaxAmount := inv.TaxAmountSubtotals[1].TaxAmount - 0.95; inv.TaxAmountTotal := inv.TaxAmountTotal - 0.95; inv.TaxExclusiveAmount := inv.TaxExclusiveAmount - inv.AllowanceTotalAmount + inv.ChargeTotalAmount; inv.TaxInclusiveAmount := inv.TaxInclusiveAmount - 5.00 - 0.95; inv.PayableAmount := inv.TaxInclusiveAmount; end; |
AW: Delphi und XRechnung
Guten Morgen!
Ja und ganau das ist das Problem. Hier die Kopie aus der Demo: if cbAllowanceCharges.Checked then begin inv.LineAmount := inv.LineAmount; // - 5.00; inv.AllowanceTotalAmount := 5.00; inv.ChargeTotalAmount := 0; inv.TaxAmountSubtotals[1].TaxableAmount := inv.TaxAmountSubtotals[1].TaxableAmount - 5.00; // - 5.00; inv.TaxAmountSubtotals[1].TaxAmount := inv.TaxAmountSubtotals[1].TaxAmount - 0.95; // - 0.95; inv.TaxAmountTotal := inv.TaxAmountTotal - 0.95; // - 0.95; inv.TaxExclusiveAmount := inv.TaxExclusiveAmount - inv.AllowanceTotalAmount + inv.ChargeTotalAmount; // - 5.00; // zum Nachlass inv.TaxInclusiveAmount := inv.TaxInclusiveAmount - 5.00 - 0.95; // - 5.00 - 0.95; inv.PayableAmount := inv.TaxInclusiveAmount; end; Dann hab ich die Fehlermeldung. Wenn ich die Werte, die in die Variablen geschrieben werden mit ShowMessage ansehe stehen dort die richtigen Werte. An der Demo wurde auch so weit nichts geändert. Hier mal die ShowMessage: ShowMessage ('Summen 002'+ #13#13 + 'inv.LineAmount: ' + FloatToStr(inv.LineAmount, FormatSettings) + #13#13 + 'inv.AllowanceTotalAmount: ' + FloatToStr(inv.AllowanceTotalAmount, FormatSettings) + ' Abzuege' + #13#13 + 'inv.ChargeTotalAmount: ' + FloatToStr(inv.ChargeTotalAmount, FormatSettings) + ' Zuschlaege' + #13#13 + '---------------------' + #13#13 + 'inv.TaxAmountSubtotals[0].TaxableAmount: ' + FloatToStr(inv.TaxAmountSubtotals[0].TaxableAmount, FormatSettings) + #13#13 + 'inv.TaxAmountSubtotals[0].TaxAmount: ' + FloatToStr(inv.TaxAmountSubtotals[0].TaxAmount, FormatSettings) + #13#13 + '---------------------' + #13#13 + 'inv.TaxAmountSubtotals[1].TaxableAmount: ' + FloatToStr(inv.TaxAmountSubtotals[1].TaxableAmount, FormatSettings) + #13#13 + 'inv.TaxAmountSubtotals[1].TaxAmount: ' + FloatToStr(inv.TaxAmountSubtotals[1].TaxAmount, FormatSettings) + #13#13 + '---------------------' + #13#13 + 'inv.TaxAmountTotal: ' + FloatToStr(inv.TaxAmountTotal, FormatSettings) + #13#13 + 'inv.TaxExclusiveAmount: ' + FloatToStr(inv.TaxExclusiveAmount, FormatSettings) + #13#13 + 'inv.TaxInclusiveAmount: ' + FloatToStr(inv.TaxInclusiveAmount, FormatSettings) + #13#13 + 'inv.PayableAmount: ' + FloatToStr(inv.PayableAmount, FormatSettings)); Ich kann gern die Demo, wie ich sie verwende zur Verfügung stellen, wenn es hilft Licht ins Dunkle zu bringen. |
AW: Delphi und XRechnung
Ist es möglich, das das Prüfprogram das Problem ist?
Kann man die xml-Datei noch irgendwohin senden zum Prüfen? Ich werde mal suchen. Zunächst werde ich mal die Werte von 5 € und dazugehöriger MwSt für eine Rabattart ändern. |
AW: Delphi und XRechnung
Es wird immer verwirrender:
ich hab zwei Rabatte eingeschaltet //Nachlass zur Position MultiplierFactorNumeric := 10; //10 Prozent auf 50 EUR Amount := 5.00; // MultiplierFactorNumeric := 16; //16 Prozent auf 50 EUR // Amount := 8.00; 'Nachlass 2 ohne Angabe von Basisbetrag und Nachlassprozente. MultiplierFactorNumeric := 0; Amount := 5.00; TaxPercent := 19.0; Und im Variablenblock für beide Rabatte folgendes eingetragen if cbAllowanceCharges.Checked then begin inv.LineAmount := inv.LineAmount - 5.00; inv.AllowanceTotalAmount := 5.00; inv.ChargeTotalAmount := 0; inv.TaxAmountSubtotals[1].TaxableAmount := inv.TaxAmountSubtotals[1].TaxableAmount - 5.00 - 5.00; inv.TaxAmountSubtotals[1].TaxAmount := inv.TaxAmountSubtotals[1].TaxAmount - 0.95 - 0.95; inv.TaxAmountTotal := inv.TaxAmountTotal - 0.95 - 0.95; inv.TaxExclusiveAmount := inv.TaxExclusiveAmount - inv.AllowanceTotalAmount + inv.ChargeTotalAmount - 5.00; inv.TaxInclusiveAmount := inv.TaxInclusiveAmount - 5.00 - 0.95 - 5.00 - 0.95; inv.PayableAmount := inv.TaxInclusiveAmount; end; Keine Fehlermeldung, das Prüfprogramm akzeptiert die xml-Datei Dann Werte bei Nachlass zur Position geändert: //Nachlass zur Position // MultiplierFactorNumeric := 10; //10 Prozent auf 50 EUR // Amount := 5.00; MultiplierFactorNumeric := 16; //16 Prozent auf 50 EUR Amount := 8.00; und bei if cbAllowanceCharges.Checked then begin inv.LineAmount := inv.LineAmount - 5.00; inv.AllowanceTotalAmount := 8.00; inv.ChargeTotalAmount := 0; inv.TaxAmountSubtotals[1].TaxableAmount := inv.TaxAmountSubtotals[1].TaxableAmount - 8.00 - 5.00; inv.TaxAmountSubtotals[1].TaxAmount := inv.TaxAmountSubtotals[1].TaxAmount - 1.52 - 0.95; inv.TaxAmountTotal := inv.TaxAmountTotal - 1.52 - 0.95; inv.TaxExclusiveAmount := inv.TaxExclusiveAmount - inv.AllowanceTotalAmount + inv.ChargeTotalAmount - 5.00; inv.TaxInclusiveAmount := inv.TaxInclusiveAmount - 8.00 - 1.52 - 5.00 - 0.95; inv.PayableAmount := inv.TaxInclusiveAmount; end; Fehlermeldung, das Prüfprogramm akzeptiert die xml-Datei nicht Nochma wie gesagt, wenn ich nur eine der beiden oben im ersten Test genutzen Rabatte freischalte erhalte ich jeweils eine Fehlermeldung. Beide zusammen wie obengezeigt geht (????) |
AW: Delphi und XRechnung
wie gesagt, siehe PN, so kann ich hier nicht erkennen, was da wie gerechnet wird.
|
AW: Delphi und XRechnung
Hi Zusammen,
mal eine generelle Frage zu dem Thema XRechnung und ZUGFeRD. Welches Forum nutzt Ihr um an Antworten bezüglich ZUGFeRD zu kommen? Habe mir die Spezifikationen von 2.1.1 und 2.2.0 heruntergeladen, auch hier vieles unklar. Wir sind eine kleiner Mittelständler und haben eine ERP Lösung in D7 noch am laufen. Da wir auch Rechnungen an Behörden, Schulen, etc. schreiben, dachte ich das ZUGFeRD mit dem Profil XRechnung zu nehmen, bin mir aber echt nicht sicher, ob es das dann auch ist. Ohne den B2G Sektor würde uns vermutlich das Profil Basis reichen. In der aktuellen Spezifikation 2.2.0 gibt es nur Files über FAKTUR-X. In der Version 2.1.1 gibt es sage und schreibe 6 pdf files und keines davon hilft irgendwie weiter. Ich muss wissen, welche Pflichtfelder es gibt, damit ich unsere Anwendung schon mal ändern kann, wie Leitweg ID, falls peppol im Spiel ist. Wer bringt mir Licht ins Dunkel? Danke schon mal. Klaus |
AW: Delphi und XRechnung
Factur-X = Zugferd = PDF mit angehängter XRechnung
Alles exakt dasselbe, heißt nur anders. |
AW: Delphi und XRechnung
Vielleicht mal ein Link auf den anderen Artikel, bevor sich hier Fragen wiederholen
![]() |
AW: Delphi und XRechnung
Guten Tag sh17,
ich bin Neu in diesem Forum, da ich jetzt wahrscheinlich mit der e Rechnung konfrontierte werde und mir die Infos zusammensuchen muss. Ich habe dein Beispiel heruntergeladen und bei Start diese Fehlermeldung erhalten [dcc32 Fataler Fehler] XRechnungUnit1.pas(27): F2613 Unit 'Winapi.WebView2' nicht gefunden. Da ich hier Neuland betrete weis ich nicht was noch fehlt oder wie eingebunden werden muss. Für eine Hilfestellung wäre ich dankbar. Gruss |
AW: Delphi und XRechnung
Zitat:
|
AW: Delphi und XRechnung
Zitat:
|
AW: Delphi und XRechnung
Hallo Sven
Vielen Dank -es hat jetzt geklappt. |
AW: Delphi und XRechnung
Bei mir funktioniert das ohne {DEFINE USE_EDGE_BROWSER} gut.
Wenn ich das unter Delphi12 auf einem W10 Rechner einschalte wird zwar in dem Testprogramm von Landrix weiterhin eine xml erzeugt, aber keine Validierung, keine HMTL und auch kein PDF. Auch wenn ich eine andere xml laden und anzeigen will passiert nichts mehr. Das steht dann unten im Log: C:\XRechnung-for-Delphi-master\Samples\Win32\Debug> pushd C:\XRechnung-for-Delphi-master\Samples\Win32\Debug\ C:\XRechnung-for-Delphi-master\Samples\Win32\Debug>C:\XRechnung-for-Delphi-master\Distribution\java\bin\java.exe -classpath C:\XRechnung-for-Delphi-master\Distribution\validator\libs -jar C:\XRechnung-for-Delphi-master\Distribution\validator\validationtool-1.5.0-standalone.jar -s C:\XRechnung-for-Delphi-master\Distribution\validator-configuration30x\scenarios.xml - r C:\XRechnung-for-Delphi-master\Distribution\validator-configuration30x -h C:\XRechnung-for-Delphi-master\Samples\Win32\Debug\XRechnung-UBL.xml KoSIT Validator version 1.5.0 Loading scenarios from file:///C:/XRechnung-for-Delphi-master/Distribution/validator-configuration30x/scenarios.xml Using repository file:///C:/XRechnung-for-Delphi-master/Distribution/validator-configuration30x/ Loaded "Validator Configuration XRechnung 3.0.2" by Coordination Office for IT Standards (KoSIT) from 2024-06-20 The following scenarios are available: * EN16931 XRechnung (UBL Invoice) * EN16931 XRechnung Extension (UBL Invoice) * EN16931 XRechnung (UBL CreditNote) * EN16931 XRechnung (CII) * EN16931 XRechnung Extension (CII) * EN16931 (UBL Invoice) * EN16931 (UBL CreditNote) * EN16931 (CII) Processing of 1 objects started Processing of 1 objects completed in 594ms Results: ---------------------------------------------------------------------------------------------------------------- |File |Schema |Schematron|Acceptance|Error/Description | |/C:/XRechnung-for- Delphi-master/Samples/Win32/Debug/XRech...| Y | Y |ACCEPTABLE| | |g-UBL.xml | | | | | ---------------------------------------------- ------------------------------------------------------------------ Acceptable: 1 Rejected: 0 ############################## # Validation successful! # ############################## |
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:16 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz