array("bez"=>"Kauf-/Mietvertrag geprüft", "abkuerzung"=>"K"), "check_fuehrerschein" => array("bez"=>"Kopie Ausweis erhalten", "abkuerzung"=>"F"), "check_gehalt" => array("bez"=>"Kopie Gehaltsnachweise erhalten", "abkuerzung"=>"G"), "check_bestellung" => array("bez"=>"Bestellung des Fahrzeuges geklärt", "abkuerzung"=>"B"), "check_zert" => array("bez"=>"Fahrzeugzertifikat liegt vor", "abkuerzung"=>"Z"), "check_versicherung" => array("bez"=>"Versicherung abgeschlossen", "abkuerzung"=>"V"), "check_vertragskopie" => array("bez"=>"Kopie des unterzeichneten Vertrages zum Kunden", "abkuerzung"=>"K"), "check_versicherung_weiter" => array("bez"=>"Versicherung weiterberechnet", "abkuerzung"=>"Vw"), "check_eingangsrechnung" => array("bez"=>"Eingangsrechnung bezahlt", "abkuerzung"=>"E"), "check_vertriebsrechnung" => array("bez"=>"Vertrieb von Elektroroller weiterberechnet", "abkuerzung"=>"VEw"), "check_mobilitaet" => array("bez"=>"Mobilitätsgarantie", "abkuerzung"=>"Mo"), ); $glob_schadenstatus = array( # Stufen noch anpassen!!! 0 => array("bez"=>"NEU - unbearbeitet"), 1 => array("bez"=>"in Bearbeitung"), 2 => array("bez"=>"erledigt"), ); $glob_schadenstatus_last = array_pop(array_keys($glob_schadenstatus)); $glob_vorlaeufig = array( 0 => "Vertragskunden", 1 => "Angebote angefordert", 2 => "abgelehnt", 3 => "sonstige", 4 => "ausgelaufen", 5 => "Joey's", 6 => "MusterFlotte", ); $glob_vertragscat = array( 1 => array("bez"=>"laufende Verträge"), 0 => array("bez"=>"vorläufige Verträge"), -1 => array("bez"=>"Vertragsarchiv"), ); $mandant_salt[5] = "fdlö3i3ß?39_JOEYS58§"; $mandant_salt[6] = "dk3lg2e7?_328MUST3R$"; $rechte = array(); if ($_SERVER["REMOTE_USER"]=="KrickelD" || $_SERVER["REMOTE_USER"]=="efp_mirko" || $_SERVER["REMOTE_USER"]=="efpmirko" || $_SERVER["REMOTE_USER"]=="efp_britta" || $_SERVER["REMOTE_USER"]=="efp_holger" || $_SERVER["REMOTE_USER"]=="efp_bianca") $rechte["admin"] = 1; $glob_title = "Elektro Fuhrpark GmbH & Co. KG"; $bezmonat = array(1=>"Januar", "Februar", "März", "April", "Mai", "Juni", "Juli", "August", "September", "Oktober", "November", "Dezember"); $bezcat = array( 0 => array( "bez" => "Startseite", "inmenu" => true, "instart" => false, "startart" => 1, ), 1 => array( "bez" => "Kategorien/ Artikel", "inmenu" => false, "instart" => true, "startart" => 2, ), 2 => array( "bez" => "Medienverwaltung", "inmenu" => false, "instart" => true, "startart" => 3, ), 3 => array( "bez" => "Kundenstamm", "inmenu" => true, "instart" => true, "startart" => 6, "spacer" => true, ), 4 => array( "bez" => "Mietgegenstände", "inmenu" => true, "instart" => true, "startart" => 9, ), 5 => array( "bez" => "Vertragswesen", "inmenu" => true, "instart" => true, "startart" => 11, ), 6 => array( "bez" => "Händlerverzeichnis", "inmenu" => true, "instart" => true, "startart" => 12, ), 7 => array( "bez" => "Reporting", "inmenu" => true, "instart" => true, "adminerf" => true, "startart" => 14, ), 8 => array( "bez" => "SEPA", "inmenu" => true, "instart" => true, "startart" => 15, ), /* 9 => array( "bez" => "Kalkulation", "inmenu" => true, "instart" => true, "startart" => 17, ), */ 10 => array( "bez" => "Dokumente", "inmenu" => true, "instart" => true, "startart" => 18, ), ); $bezart = array( 1 => array( "bez" => "Startseite", "file" => "start.php", ), 2 => array( "bez" => "Menüstruktur", "file" => "cat_list.php", ), 3 => array( "bez" => "Mediacenter", "file" => "media.php", ), 4 => array( "bez" => "Kategorie", "file" => "cat_details.php", ), 5 => array( "bez" => "Artikel", "file" => "art.php", "loadeditor" => true, ), 6 => array( "bez" => "Kunden", "file" => "kunden.php", ), 7 => array( "bez" => "Kundendaten", "file" => "kunden_details.php", ), 8 => array( "bez" => "Vertragsdaten", "file" => "vertrag_details.php", ), 9 => array( "bez" => "Fahrzeuge", "file" => "fahrzeuge.php", ), 10 => array( "bez" => "Fahrzeugdetails", "file" => "fahrzeuge_details.php", ), 11 => array( "bez" => "Verträge", "file" => "vertrag.php", ), 12 => array( "bez" => "Händler", "file" => "haendler.php", ), 13 => array( "bez" => "Händlerdetails", "file" => "haendler_details.php", ), 14 => array( "bez" => "Reporting", "file" => "reporting.php", ), 15 => array( "bez" => "DTA-Download", "file" => "dta.php", ), 16 => array( "bez" => "Händler-Abgleich", "file" => "haendler_abgleich.php", ), 17 => array( "bez" => "Kalkulation", "file" => "kalkulation.php", ), 18 => array( "bez" => "Dokumentenverwaltung", "file" => "dokument.php", ), 19 => array( "bez" => "DB-Korrektur", "file" => "admin_korrektur.php", ), 20 => array( "bez" => "dta-Generator", "file" => "admin_dtagen.php", ), ); $farben = array( 0 => array("bez"=>"Weiß", "icon"=>"col_we.png"), # INTERN 1 => array("bez"=>"Blau", "icon"=>"col_bl.png"), 2 => array("bez"=>"Rot", "icon"=>"col_ro.png"), 3 => array("bez"=>"Silber", "icon"=>"col_gr.png"), 4 => array("bez"=>"Weiß", "icon"=>"col_we.png"), 5 => array("bez"=>"Rot/Schwarz", "icon"=>"col_ro-sw.png"), 6 => array("bez"=>"Weiß/Schwarz", "icon"=>"col_we-sw.png"), 7 => array("bez"=>"Schwarz/Grau", "icon"=>"col_sw-gr.png"), 8 => array("bez"=>"Grün/Weiß", "icon"=>"col_gr-we.png"), 9 => array("bez"=>"Gelb/Schwarz", "icon"=>"col_ge-sw.png"), 10 => array("bez"=>"Schwarz", "icon"=>"col_sw.png"), 11 => array("bez"=>"Beige", "icon"=>"col_be.png"), 12 => array("bez"=>"Minze", "icon"=>"col_mi.png"), 13 => array("bez"=>"Gelb", "icon"=>"col_ge.png"), ); $modell = array( 3 => array( "bez" => "Novum S 3000", "modellbuchbar" => true, # privatkunden "gewerbebuchbar" => false, # gewerbekunden "leistung" => 3000, "pic" => "images/mod_novum.jpg", "subcat" => 10, "beschr" => "Ein echt starker Elektroroller mit allem, was dazugehört. In modernem Design mit verschiedenen Farbkombinationen, starken Motoren und einem guten Preis-/Leistungsverhältnis ist der emco NOVUM eine echte Alternative zu Motorrollern dieser Klasse.", "beschrlang" => "

Ein starker Auftritt. 3.000 Watt Elektromotor.

Die Fahrleistungen in Sachen Beschleunigung und Endgeschwindigkeit lassen sich - dank starkem 3.000 Watt Elektromotor - problemlos mit denen benzingetriebener Modelle vergleichen. Ganz im Gegensatz zu den Kosten. Hier ist der emco NOVUM einfach unschlagbar günstig - durch die geringen Fahrtkosten und den minimalen Wartungsaufwand. Tanken Sie einfachan jeder 230 Volt Steckdose und profitieren Sie von der Mobilitätsgarantie.

An der umfangreichen Ausstattung fehlt wirklich nichts. Beleuchtung in LED- bzw. Xenon-Optik, großes Cockpit mit allen wichtigen Anzeigen und Funktionen sowie einer Bremsanlage mit zwei hydraulischen Doppelkolben-Scheibenbremsen für noch mehr Sicherheit. Probieren Sie den emco NOVUM einfach mal aus und machen Sie eine Probefahrt. Fragen Sie Ihren Fachhändler.", "link" => "http://www.emco-elektroroller.de/elektroroller/emco-novum.html", "features" => array( 0 => array( "bez" => "Ein Kraftpaket", "beschr" => "Der 3.000 Watt Elektromotor für dynamische Fahrleistungen", ), 1 => array( "bez" => "Leistungsstarke Doppelkolben-Scheibenbremse", "beschr" => "für optimale Verzögerung und mehr Sicherheit", ), 2 => array( "bez" => "Große Heckleuchten", "beschr" => "in hochwertiger LED Optik", ), 3 => array( "bez" => "Großer abschließbarer Stauraum", "beschr" => "für Helm, Wertsachen oder Utensilien unter der Sitzbank", ), 4 => array( "bez" => "Beleuchtetes großes Cockpit", "beschr" => "mit Geschwindigkeitsanzeige, Batterieanzeige und Kontrollleuchten sowie integrierten Schaltern für Lichtanlage, Blinker und Hupe", ), 5 => array( "bez" => "Markante Erscheinung", "beschr" => "mit zwei Scheinwerfern in Xenon-Optik für Fern und Abblendlicht", ), ), "farben" => array(1=>5,6,7), 1 => array( "akkutyp" => "Blei", "akkuspannung" => 48, "akkuleistung" => 40, "uvp" => 2799, # 2799, # BRUTTO "restwert" => array(array(1=>800,600,500,400)), "buchbar" => true, ), 2 => array( "akkutyp" => "Lithium-Ionen", "akkuspannung" => 48, "akkuleistung" => 40, "uvp" => 3549, "restwert" => array(array(1=>1200,800,700,500)), "buchbar" => false, # <-- NICHT mehr bestellbar, Mail Britta 28.06. ), 3 => array( "akkutyp" => "Lithium-Ionen", "akkuspannung" => 48, "akkuleistung" => 60, "uvp" => 4799, # 4799, "restwert" => array(array(1=>1600,1200,1000,800)), "buchbar" => true, ), 4 => array( "akkutyp" => "Lithium-Ionen", "akkuspannung" => 60, "akkuleistung" => 60, "uvp" => 5999, # 5999, "restwert" => array(array(1=>1600,1200,1000,800)), "buchbar" => true, "sonderleistung" => 5000, "sonderbez" => "Novum 77 S 5000", # Novum 77 "sonderbezhinweis" => "5000 W, Zulassung: 82 kmh", ), ), 2 => array( "bez" => "Novette Twin", "modellbuchbar" => false, "leistung" => 1600, "pic" => "images/mod_novette.jpg", "subcat" => 9, "beschr" => "Das kleine und wendige Modell NOVETTE TWIN ist der ideale Begleiter für die Stadt, zur Arbeit oder für den Schulweg. Es hat eine Umfangreiche Ausstattung, vom Top-Case mit Rückenlehne bis zur Diebstahl-Warnanlage alles inklusive.", "beschrlang" => "

Günstige und zuverlässige Begleiter. Tag für Tag.

Bei einer Probefahrt können Sie die beiden Modelle erleben. Mit Führerscheinklasse A1 und M ab 16 Jahren oder den Führerscheinklassen 1a, 1, 2, 3, A, B oder C ab 18 Jahren können Sie direkt loslegen. Ein Mofa-Kit (ab 15 Jahren) ist auch möglich. Fragen Sie Ihren Fachhändler.", "link" => "http://www.emco-elektroroller.de/elektroroller/emco-novette-novette-twin.html", "features" => array( 0 => array( "bez" => "Das Herzstück", "beschr" => "Der Elektromotor mit 1.600 Watt (Vorder- und Hinterradantrieb)", ), 1 => array( "bez" => "Praktisches Detail", "beschr" => "Der stabile Haken für Helme oder Taschen", ), 2 => array( "bez" => "Abschließbarer Stauraum", "beschr" => "für Helm, Wertsachen oder das Ladegerät", ), 3 => array( "bez" => "Stabiler Gepäckträger", "beschr" => "und große Beleuchtungseinheit", ), 4 => array( "bez" => "Beleuchtetes Cockpit", "beschr" => "mit Tachometer, Kilometerzähler, Batterieanzeige und Kontrollleuchten für Blinker und Fernlicht", ), ), "farben" => array(1=>1,2,3,4), 1 => array( "akkutyp" => "Blei", "akkuspannung" => 48, "akkuleistung" => 40, "uvp" => 2099, "restwert" => array(array(1=>750,500,400,300)), "buchbar" => false, ), 2 => array( "akkutyp" => "Lithium-Ionen", "akkuspannung" => 48, "akkuleistung" => 40, "uvp" => 2999, "restwert" => array(array(1=>900,600,500,400)), "buchbar" => false, ), ), /* 4 => array( "bez" => "Novum 77", 1 => array( "leistung" => 3000, "akku" => "Blei 60V, 60Ah", "uvp" => 5599, ), ), */ 5 => array( "bez" => "Novax S 4000", "modellbuchbar" => true, "leistung" => 4000, "pic" => "images/mod_novax.jpg", "subcat" => 11, "beschr" => "Dank der modernen Silikon- oder Lithium-Ionen-Akkus hält diese Kraft auch lange vor. Technisch ist alles an Bord, was das Fahren sicher und komfortabel macht. Doppelkolben- Scheibenbremsen, hochwertige Federung und ein großes beleuchtetes Cockpit mit allem, was dazu gehört. Die große, moderne Verkleidung überzeugt als Wetter- und Windschutz und integriert Blinker, Fern- und Abblendlicht in fünf großen Klarglasmodulen.", "beschrlang" => "

Ist das noch ein Roller? Oder schon fast ein Bike?

Das gelungene Design des emco NOVAX ist eine ästhetische Mischung aus beidem. Dank der großen 14“ Räder fährt sich der emco NOVAX auch ganz anders als ein klassischer Roller.

Die vielen Vorteile der emco Elektroroller aber vereint auch dieses Modell. 2 Jahre Herstellergarantie, eMobility, Service-CardPlus mit vielen Vorteilen beim Einkauf und Elektro-Tanken. Die umfangreiche Serienausstattung mit viel Stauraum, großen Beleuchtungseinheiten und dem stärksten Elektromotor von emco. Satte 4.000 Watt sorgen für hervorragende Fahrleistungen auch mit Sozius oder bei Bergauf-Fahrten. Damit haben Sie immer genügend Durchzugskraft.

Die außergewöhnliche Optik des emco NOVAX ist eigenständig und sorgt für einen souveränen Auftritt. Probieren Sie ein neues Fahrgefühl. Bei unserem Fachhändler in Ihrer Nähe.", "link" => "http://www.emco-elektroroller.de/elektroroller/emco-novax.html", "features" => array( 0 => array( "bez" => "Das Power-Paket", "beschr" => "Extreme Steigungen. Fahrten zu zweit. Mit dem ultrastarken 4000 Watt Elektromotor überhaupt kein Problem", ), 1 => array( "bez" => "Leistungsstarke hydraulische Doppelkolben-Bremsanlage", "beschr" => "vorne und hinten für optimale Verzögerungswerte und noch mehr Sicherheit", ), 2 => array( "bez" => "Großer abschließbarer Stauraum", "beschr" => "für Helm, Wertsachen oder Utensilien unter der Sitzbank", ), 3 => array( "bez" => "Großes Leuchtenband", "beschr" => "im Frontbereich für besseres Sehen und Gesehen werden", ), 4 => array( "bez" => "Farbig beleuchtetes Cockpit", "beschr" => "mit Geschwindigkeitsanzeige, Batterieanzeige und Kontrollleuchten sowie integrierten Funktionsschaltern", ), 5 => array( "bez" => "Zwei praktische Staufächer", "beschr" => "am Fußraum – für alles, was man schnell mal weglegen möchte", ), ), "farben" => array(1=>8,9,2), 1 => array( "akkutyp" => "Blei", "akkuspannung" => 48, "akkuleistung" => 40, "uvp" => 3199, # 3199, "restwert" => array(array(1=>1000,800,700,500)), "buchbar" => true, ), 2 => array( "akkutyp" => "Lithium-Ionen", "akkuspannung" => 48, "akkuleistung" => 40, "uvp" => 4199, "restwert" => array(array(1=>1400,1000,800,600)), "buchbar" => false, ), 3 => array( "akkutyp" => "Lithium-Ionen", "akkuspannung" => 48, "akkuleistung" => 60, "uvp" => 4999, # 4999, "restwert" => array(array(1=>1800,1400,1100,900)), "buchbar" => true, ), ), 1 => array( "bez" => "Novi C 1500", "modellbuchbar" => true, "gewerbebuchbar" => true, "leistung" => 1500, "pic" => "images/mod_novi.jpg", "pic_gew" => "images/mod_novi_gew.jpg", "subcat" => 8, "beschr" => "Eleganter Elektroroller für den Stadtverkehr. Das klassische Modell ist in 3 Farbvarianten erhältlich und serienmäßig mit einer Lithium-Ionen Batterie ausgestattet. Sehr praktisch ist die herausnehmbare Batterie, die ganz bequem auch in der Wohnung geladen werden kann. Mit seinen gerade einmal 89 kg (ohne Batterie nur 75 kg) ist er besonders leicht in der Handhabung.", "beschrlang" => "

Der klassische City-Roller

Mit 1500 Watt und einer Reichweite von ca. 60 km beweist sich der neue emco NOVI als klassischer City-Roller. Besonders praktisch ist die herausnehmbare Batterie, die das Gesamtgewicht bei Entnahme auf 75 kg reduziert. Somit kann der praktische emco NOVI auch einfach auf dem Rollerträger am Wohnmobil mitgenommen werden. Selbstverständlich tanken Sie einfach an jeder 230 Volt Steckdose und profitieren von der emoc Mobilitätsgarantie.", "link" => "http://www.emco-elektroroller.de/elektroroller/emco-novi.html", "features" => array( 0 => array( "bez" => "Herausnehmbare Batterie", "beschr" => "Die Lithium-Ionen Batterie lässt sich einfach herausnehmen und kann so auch in der Wohnung geladen werden", ), 1 => array( "bez" => "Leistungsstarke Scheibenbremse", "beschr" => "für optimale Verzögerung und mehr Sicherheit", ), 2 => array( "bez" => "Große Heckleuchten", "beschr" => "in hochwertiger LED-Optik", ), 3 => array( "bez" => "Abschließbarer Stauraum", "beschr" => "für Wertsachen oder Utensilien unter der Sitzbank", ), 4 => array( "bez" => "Beleuchtetes großes Cockpit", "beschr" => "mit Geschwindigkeitsanzeige, Batterieanzeige und Kontrollleuchten sowie integrierten Schaltern für Lichtanlage, Blinker und Hupe", ), 5 => array( "bez" => "Elegantes Design", "beschr" => "für einen klassischen City-Roller", ), ), "farben" => array(1=>3,10,1,11), 1 => array( "akkutyp" => "Lithium-Ionen", "akkuspannung" => 48, "akkuleistung" => 28, "uvp" => 3449, # 3499 # 3449, "restwert" => array(array(1=>1250,950,850,650)), # für schlussrate, restwert wird unten errechnet (-50 pro jahr) "buchbar" => true, ), 2 => array( "akkutyp" => "Lithium-Ionen", "akkuspannung" => 48, "akkuleistung" => 56, "uvp" => 4339, # 4339, "restwert" => array(array(1=>1500,1100,1000,800)), "buchbar" => true, ), ), 6 => array( "bez" => "Novantic C 2000", "modellbuchbar" => true, "leistung" => 2000, "pic" => "images/mod_novantic.jpg", "subcat" => 19, "beschr" => "Der neue emco NOVANTIC ist wie der emco NOVI mit einen Wechselakku ausgestattet und kann somit problemlos auch in der Wohnung geladen werden. Die Lithium-Ionen Batterie schafft eine Reichweite bis 50 km, mit einem zweiten Wechselakku kann die Reichweite sogar auf 100 km erhöht werden.", "beschrlang" => "

Eleganter e-Roller mit Wechselakku

Der NOVANTIC ist ausgestattet mit einem 2000 Watt Elektromotor, 2,7 PS und hat ein Gewicht von 92 kg mit einer Batterie. Vorne besitzt er eine hydraulische Scheibenbremse und hinten eine Trommelbremse. Das farbig beleuchtete Cockpit zeigt die Geschwindigkeit an und bietet zudem noch eine Batterieanzeige, Kontrollleuchten und integrierte Funktionsschalter. Der elegante Elektroroller ist in 3 Farben erhältlich (weiss, schwarz und blau) und wird serienmäßig mit Topcase und Wetterschutzscheibe geliefert.", "link" => "http://www.emco-elektroroller.de/elektroroller/novantic.html", "features" => array( 0 => array( "bez" => "Stauraum", "beschr" => "hier mit Wechselakku-Doppelpack und Schnellladegerät", ), 1 => array( "bez" => "Power", "beschr" => "Herausnehmbare Lithium-Ionen Batterie, auch zum Laden in der Wohnung geeignet", ), 2 => array( "bez" => "Topcase", "beschr" => "ist inklusive", ), 3 => array( "bez" => "Wetterschutzscheibe", "beschr" => "serienmäßige Ausstattung", ), 4 => array( "bez" => "Stabiler Gepäckträger", "beschr" => "und große Beleuchtungseinheit", ), 5 => array( "bez" => "Beleuchtetes Cockpit", "beschr" => "mit Geschwindigkeitsanzeige, Batterieanzeige und Kontrollleuchten sowie integrierten Schalter für Lichtanlage, Blinker und Hupe", ), ), "farben" => array(1=>10,4,1), 1 => array( "akkutyp" => "Lithium-Ionen", "akkuspannung" => 48, "akkuleistung" => 28, "uvp" => 3549, # 3549, "restwert" => array(array(1=>1250,950,850,650)), "buchbar" => true, ), 2 => array( "akkutyp" => "Lithium-Ionen", "akkuspannung" => 48, "akkuleistung" => 56, "uvp" => 4439, # 4439, "restwert" => array(array(1=>1500,1100,1000,800)), "buchbar" => true, ), ), 7 => array( "bez" => "Nova R 2000", "modellbuchbar" => true, "leistung" => 2000, "pic" => "images/mod_nova.jpg", "subcat" => 20, "beschr" => "Der nostalgische Elektroroller emco NOVA erinnert an die ehrwürdigen Rollermodelle der 60er Jahre. Retrostyle Freunden geht bei diesem Elektroroller das Herz auf. Bewusst wurden Elemente in gebürstetem Aluminium am Lenkrad verwendet. Aber auch der verchromte Gepäckträger, sowie die verchromten Spiegel fügen sich stilvoll ins Gesamtbild ein.", "beschrlang" => "

Stylischer Retro-Roller

Der nostalgische Elektroroller emco NOVA erinnert an die ehrwürdigen Rollermodelle der 60er Jahre. Retrostyle Freunden geht bei diesem Elektroroller das Herz auf. Bewusst wurden Elemente in gebürstetem Aluminium am Lenkrad verwendet. Aber auch der verchromte Gepäckträger, sowie die verchromten Spiegel fügen sich stilvoll ins Gesamtbild ein.

Der NOVA bietet seinem Fahrer und der Begleitperson überdurchschnittlich viel Platz. Der geräumige Fußraum ist ausreichend für Gepäck, das problemlos am Taschenhacken befestigt werden kann. Das Raumangebot, die Sitzbank sowie der breite Lenker tragen zu einem sehr entspannten Fahrgefü̈hl bei. Dadurch eignet sich der NOVA auch für große Fahrer ohne Einschränkungen. ", "link" => "http://www.emco-elektroroller.de/elektroroller/nova.html", "features" => array( 0 => array( "bez" => "Stauraum", "beschr" => "hier mit Wechselakku-Doppelpack und Schnellladegerät", ), 1 => array( "bez" => "Power", "beschr" => "Herausnehmbare Lithium-Ionen Batterie, auch zum Laden in der Wohnung geeignet", ), 2 => array( "bez" => "Topcase", "beschr" => "ist inklusive", ), 3 => array( "bez" => "Wetterschutzscheibe", "beschr" => "serienmäßige Ausstattung", ), 4 => array( "bez" => "Stabiler Gepäckträger", "beschr" => "und große Beleuchtungseinheit", ), 5 => array( "bez" => "Beleuchtetes Cockpit", "beschr" => "mit Geschwindigkeitsanzeige, Batterieanzeige und Kontrollleuchten sowie integrierten Schalter für Lichtanlage, Blinker und Hupe", ), ), "farben" => array(1=>12), 1 => array( "akkutyp" => "Lithium-Ionen", "akkuspannung" => 48, "akkuleistung" => 28, "uvp" => 3649, # 3649, "restwert" => array(array(1=>1250,950,850,650)), "buchbar" => true, ), 2 => array( "akkutyp" => "Lithium-Ionen", "akkuspannung" => 48, "akkuleistung" => 56, "uvp" => 4539, # 4539, "restwert" => array(array(1=>1500,1100,1000,800)), "buchbar" => true, ), ), ); function modell_gewerbeconfig($farbzusatz=false) { global $modell; $modell[1][1]["uvp"] = 2388.66; #2169; unset($modell[1][2]); if (!$farbzusatz) { $modell[1]["farben"] = array(1=>0, 13); } else { $modell[1]["farben"][] = 0; $modell[1]["farben"][] = 13; } } $sonderausstattung = array( 1 => array( "bez" => "Zusatzbatterie 48V / 28Ah", "preis" => 550, # NETTO ), 2 => array( "bez" => "Schnellladegerät 1000 Watt", "preis" => 290.20, #246, ), 3 => array( "bez" => "Heckträger fix", "preis" => 329, #272, ), 4 => array( "bez" => "Auflage Pizzaträger für Pizzabox", "preis" => 77, #62, "need" => array(3), ), 5 => array( "bez" => "Klappmechanismus für DeWalt Werkzeugkoffer hinten", "preis" => 252, #126, ), 6 => array( "bez" => "Postkorb hinten", "preis" => 189, #145, ), 7 => array( "bez" => "Träger vorne", "preis" => 546, #404, ), 8 => array( "bez" => "Verstärkte Federn vorne mit Einbau", "preis" => 84, ), 9 => array( "bez" => "Klappmechanismus für DeWalt Werkzeugkoffer vorne", "preis" => 294, #157, ), 10 => array( "bez" => "Postkorb doppelt vorne", "preis" => 322, #263, ), 11 => array( "bez" => "Ständersystem klappbar, li/re", "preis" => 294, #236, ), 12 => array( "bez" => "Umbaukosten inkl. Sitzbankverkürzung ohne Seitenständersystem", "preis" => 336, ), 13 => array( "bez" => "Umbaukosten inkl. Sitzbankverkürzung mit Seitenständersystem", "preis" => 404, ), 14 => array( "bez" => "Umbaukosten Träger vorne", "preis" => 245, #135, ), 15 => array( "bez" => "Pizza-Box", "preis" => 420, ), 16 => array( "bez" => "Sonderlackierung", "preis" => 450, ), ); # EINSTIEG: privat ODER gewerbekunde OK # --> versicherung u/ü abhängig : zahlen von britta OK # FRACHT IMMER plus 65 brutto OK # Servicepauschale als NETTO OK # Marge: # Gewerbe 200 bei Händlerauswahl, 600 über Händlerlogin # Privat Prozentfeld # Kunden löschen: 1042 und 1030 # Auswahl Sonderzubehör bei Gewerbe OK # Buttons: # 1. Unverbindliches Angebot ausdrucken (nichts speichern) OK # 2. Vertrag anfordern (wie früher) OK # Gewerbe nur Leasing, keine Garantieverlängerung OK # Restwert zwar kalkulieren, im Angebot erwähnen, OK # NICHT im Vertrag nennen -> separates Schreiben # (Entwurf Britta) foreach ($modell as $id => $val) { foreach ($val as $id2 => $val2) { if (is_numeric($id2)) { if ($id==3 && $id2==4) { # Novum77 $modell[$id][$id2]["versicherung"] = array( # NUR DIESES einzeln ausweisen 0 => array(1=>300,300,300,300), # über 23 1 => array(1=>300,300,300,300), # unter 23 ); } else { $modell[$id][$id2]["versicherung"] = array( # NUR DIESES einzeln ausweisen 0 => array(1=>215,215,215,215), # über 23 1 => array(1=>95,95,95,95), # unter 23 ); } $modell[$id][$id2]["vollkasko"] = array(1=>80.5,80.5,80.5,80.5); # mit versteuern! $modell[$id][$id2]["service"] = ($id==4 && $id2==1 ? array(56,95,110,125) : array(1=>47,81,96,111)); if ($val2["restwert"][0]) { $counter = 0; # for ($i=1; $i<=5; $i+=2) { for ($i=1; $i<=5; $i++) { # $modell[$id][$id2]["restwert"][$i] = array(1=>$val2["restwert"][0][1]-(++$counter*50),$val2["restwert"][0][2]-($counter*50),$val2["restwert"][0][3]-($counter*50),$val2["restwert"][0][4]-($counter*50)); $modell[$id][$id2]["restwert"][$i] = array(1=>$val2["restwert"][0][1]-(++$counter*25),$val2["restwert"][0][2]-($counter*25),$val2["restwert"][0][3]-($counter*25),$val2["restwert"][0][4]-($counter*25)); } } } } } $vertragsart = array( 1 => array("bez"=>"Ratenkauf"), 2 => array("bez"=>"Leasing"), ); $sparte = array( 1 => array("bez"=>"emco Elektroroller", "gruppe"=>"sind die Elektrofahrzeuge mit den Fahrzeug-IDs", "ggst"=>"der/den Elektroroller", "kennung"=>"Fahrzeug-ID"), 2 => array("bez"=>"Pedelec", "gruppe"=>"sind die Pedelecs mit den Rahmennummern", "ggst"=>"das Pedelec", "kennung"=>"Rahmennummer"), 3 => array("bez"=>"Auto", "gruppe"=>"ist das Fahrzeug mit der Fahrgestellnummer", "ggst"=>"das Auto", "kennung"=>"Fahrgestellnummer"), 4 => array("bez"=>"Roller", "gruppe"=>"ist der Roller mit der Fahrgestellnummer", "ggst"=>"der/den Roller", "kennung"=>"Fahrzeug-ID"), 5 => array("bez"=>"Batterien", "gruppe"=>"ist die Batterie mit der Kennzeichnung", "ggst"=>"die Batterie", "kennung"=>"Kennzeichnung"), 6 => array("bez"=>"Sonstiges", "gruppe"=>"ist das Objekt mit der Bezeichnung/Kennzeichnung", "ggst"=>"das Objekt", "kennung"=>"Objekt"), ); $rabatt = array( 1 => array( "code" => "emco2458452014233569", "bez" => "emco Mitarbeiter-Rabatt", "rabatt" => 600, ), 2 => array( "code" => "dimos", "bez" => "Rabatt Marc Oliver Stecher", "rabatt" => 200, ) ); $anzahlung = array(500=>"500 Euro", 250=>"250 Euro", 0=>"keine"); $zinssatz_calc = 8.99; # interner zinssatz, welcher den kunden berechnet wird - wird auf die gesamtkosten aufgeschlagen $zinssatz_markt = 2.00; # fiktiver marktzins, mit welchem die zusatzleistungen ungefähr im vorfeld über die laufzeit verzinst werden function link_archive($path, $file, $bez) { global $glob_path_archiv; $href = $glob_path_archiv.$path.$file; return "".htmlspecialchars($bez).""; #
".htmlspecialchars($href)." } function archive_list($key, $val) { if ($_POST["archive_add___".$key]) { # $id = intval($_POST["archive_add_file"]); $ids = array(); if (count($_POST["archive_add_file"])>0) { foreach ($_POST["archive_add_file"] as $id) $ids[] = intval($id); # $resultu = mysql_query("UPDATE efp_archive SET link_".$key."=".$val.", zuord=1 WHERE archive_id=".$id." AND NOT zuord AND NOT deleted"); # echo $queryu = "UPDATE efp_archive SET link_typ='".$key."', link_id=".$val.", zuord=1 WHERE archive_id=".$id." AND NOT zuord AND NOT deleted"; $queryu = "UPDATE efp_archive SET link_typ='".$key."', link_id=".$val.", zuord=1 WHERE archive_id IN (".implode(",", $ids).") AND NOT zuord AND NOT deleted"; $resultu = mysql_query($queryu); if (mysql_affected_rows()>0) messagebox((count($ids)!=1 ? "Die Dokumente wurden" : "Das Dokument wurde")." erfolgreich archiviert und angehängt!", "g"); else messagebox("Das Dokument konnte nicht angehängt werden!"); } else messagebox("Bitte wählen Sie ein Dokument aus, welches angehängt werden soll!"); } echo ""; $header = false; $notzuord = array(); # $resultd = mysql_query("SELECT archive_id, path, file, filebez, erstelltam, zuord FROM efp_archive WHERE (link_".$key."=".intval($val)." OR NOT zuord) AND NOT deleted ORDER BY erstelltam DESC, archive_id"); $resultd = mysql_query("SELECT archive_id, path, file, filebez, erstelltam, zuord FROM efp_archive WHERE (link_typ='".$key."' AND link_id=".$val." OR NOT zuord) AND NOT deleted ORDER BY erstelltam DESC, archive_id"); while ($rowd = mysql_fetch_assoc($resultd)) { if (!$rowd["zuord"]) { $notzuord[] = $rowd; } else { if (!$header) { echo ""; $header = true; } echo ""; echo ""; echo ""; echo ""; echo ""; } } if (count($notzuord)>0) { echo ""; echo ""; echo ""; echo ""; #echo ""; echo ""; echo ""; } echo "
BeschriftungErstelldatumDetails
".link_archive($rowd["path"], $rowd["file"], $rowd["filebez"])."".date("d.m.Y H:i", strtotime($rowd["erstelltam"]))."[Details]
 
Dokument anhängen: "; echo "Dokument(e) anhängen"; echo ""; echo "
Mehrfachauswahl mit gedrückter Strg-Taste oder Rahmen"; echo ""; echo "
"; } function link_rechner($data, $key="") { $unser = unserialize($data); if (empty($key)) $temp = $unser; else $temp = $unser[$key]; $link = ""; foreach ($temp as $key => $val) { $link.= "&".$key."=".urlencode($val); if ($key=="r") { # rabatt if (!empty($temp["rc"])) $link.= "&rabatt=".urlencode($temp["rc"]); else $link.= "&rabatt=haendler"; } } return $link; } /* function arraynormalize($multiarr) { $return = array(); foreach ($multiarr as $key => $val) { if (!is_array($val)) { $return[$key] = $val; } } foreach ($multiarr["check"]["einzeldata"] as $key => $val) { $return[$key] = $val; } return $return; } */ function load_platzhalter($arr) { $temp = arraynormalize($arr); $temp[] = "___Zusatzplatzhalter___"; $temp["vn"] = abs($temp["vnr"]); $temp["verkaufspreis_mwst"] = $temp["verkaufspreis_brutto"]-$temp["verkaufspreis"]; $temp["gesamtkosten"] = $temp["rate"]*$temp["laufzeit"]; $temp["mandat_nr"] = "Efp".$temp["vn"]; return $temp; } function arraynormalize($ary) { $lst = array(); foreach ($ary as $key => $val) { # $v = $ary[$k]; if (is_scalar($val)) { $lst[$key] = $val; # echo $key."\n"; } elseif (is_array($val)) { $lst = array_merge($lst, arraynormalize($val)); } } return $lst; } function pdfgen($vnr, $zufall, $mietgegenstand, $data, $pfad="", $pdftyp="vertrag") { global $sparte, $glob_mwst; $pfadpdf = $pfad; if ($pdftyp=="angebot") { $pfadpdf.= "angebot"; } elseif ($pdftyp=="platzhalter") { $pfadpdf.= "platzhalter"; } else { $pfadpdf.= (empty($data["vdatum"]) ? date("Y-m") : $data["vdatum"]); } if (!file_exists($pfadpdf)) mkdir($pfadpdf); if ($data["pdf_ohnebank"]) { $data["v_bank"] = ""; $data["v_kto"] = ""; $data["v_blz"] = ""; $data["v_inh"] = ""; } if ($data["k_vorsteuerabzug"]) { $data["summe"] = ($data["summe"]/ (100+$data["k_mwstsatz"]) )*100; $data["p"] = ($data["p"]/ (100+$data["k_mwstsatz"]) )*100; } $check = $data["check"]["einzeldata"]; $je = $data["v_anz"]>1 ? "je " : ""; if ($pdftyp!="vertrag_word") { $pdf = new FPDF_dK(); $pdf->AliasNbPages(); $pdf->setFooterText("Seite [seite]".(!empty($data["h_firma"]) ? " | ".$data["h_firma"].(!empty($data["h_telefon"]) ? " | ".$data["h_telefon"] : "") : "")); $pdf->setPath($pfad); $pdf->SetMargins(20, 30, 20); $pdf->SetAutoPageBreak(true, 15); $pdf->AddPage(); } if ($pdftyp=="platzhalter") { # $pdf->box(var_export($temp,true)); # $temp = arraynormalize($data); $pdf->SetFont("Arial", "", 10); $pdf->SetLineWidth(0.1); $pdf->SetAligns(array("L", "L")); $pdf->SetWidths(array(60,110)); $pdf->Row(array("Platzhalter", "Wert aus Rechenkern")); $pdf->Ln(3); $temp = load_platzhalter($data); foreach ($temp as $key => $val) { # $pdf->box(str_pad("#".$key."#", 50, " ", STR_PAD_RIGHT).$val."\n"); $pdf->Row(array(utf8_decode("#".$key."#"), utf8_decode($val))); } } elseif ($pdftyp=="vertrag_word") { # NEUE ALS WORD-DOKUMENT $phpdocx = new phpdocx("vorlage_".($data["art"]==2 ? "mietvertrag" : "kaufvertrag")."_2014-04.docx"); # $temp = arraynormalize($data); $temp = load_platzhalter($data); foreach ($temp as $key => $val) { $phpdocx->assign("#".$key."#", $val); } $wordfile = $pfadpdf."/".$vnr."_".$zufall.".docx"; $phpdocx->save($wordfile); $file = fopen($wordfile.".txt", "a+"); fwrite($file, date("d.m.Y H:i:s")."\n\ndata:\n".var_export($data, true)); fclose($file); header("Location: ".$wordfile); } elseif ($pdftyp=="vertrag") { # ---------------- ALTES PDF ---------------- $pdf->setAlign("C"); $pdf->box(($data["art"]==2 ? "Miet" : "Kauf")."vertrag #".$vnr."\n\n", true, 20); $pdf->box("zwischen\n\nFirma EFP Elektro Fuhrpark Service GmbH & Co. KG\nFürstenring 2, 49835 Wietmarschen, USt-ID Nr. DE281903605\nIBAN: DE55 2674 0044 0583 4718 00, BIC: COBADEFFXXX\n- nachstehend \"".($data["art"]==2 ? "Vermieterin" : "Verkäuferin")."\" genannt -\n\nund\n\n"); $pdf->box(($data["v_gewerbekunde"] ? $data["v_firma"].", " : "").$data["v_vorname"]." ".$data["v_name"]."\n".$data["v_str"]." ".$data["v_hnr"].", ".$data["v_plz"]." ".$data["v_ort"].(!empty($data["v_handy"]) || !empty($data["v_telefon"]) ? "\nTel. ".(!empty($data["v_handy"]) ? $data["v_handy"] : $data["v_telefon"]) : "").(!empty($data["v_ustid"]) ? ", USt-ID Nr. ".$data["v_ustid"] : "").(!empty($data["v_kto_sepa"]) || !empty($data["v_blz_sepa"]) ? "\nIBAN ".$data["v_kto_sepa"].", BIC ".$data["v_blz_sepa"] : ""), true); $pdf->box("- nachstehend \"".($data["art"]==2 ? "Mieter" : "Käufer")."\" genannt -"); $pdf->setAlign(); if ($data["art"]==2) { # Mietvertrag # $pdf->box(var_export($data,true)); $pdf->para("Gegenstand des Vertrages"); $pdf->absatz(); $pdf->box("Die Vermieterin befasst sich mit dem Vertrieb von Elektrofahrzeugen der emco electroroller GmbH Lingen in Lingen (Ems)."); $pdf->absatz(); $pdf->box("Sie vermietet mit diesem Vertrag an den dies annehmenden Mieter die Elektrofahrzeuge:\n"); $pdf->box(($data["v_anz"]>1 ? $data["v_anz"]." x " : "").$mietgegenstand.($data["g"] ? "\ninkl. Verlängerung der Gewährleistung um ".$data["g"]." Jahr".($data["g"]!=1 ? "e" : "") : ""), true); # $pdf->absatz(); # $pdf->box("Gegenstand des Vertrages ".$sparte[$data["sparte"]]["gruppe"].": "); $pdf->box(" ".($data["v_anz"]<=2 ? (count($data["f_fids"])>0 ? implode(", ", $data["f_fids"]) : ".........................") : "\n- siehe Anlage 1 -"), true); if ($data["check"]["einzeldata"]["sonderausstattung_auswahl"]) { $pdf->box("\nSonderausstattung: ".$data["check"]["einzeldata"]["sonderausstattung_auswahl"], true); } if ($data["sparte"]==1 && !$data["pdf_ohneversicherung"]) { $pdf->para("Versicherungsschutz"); $pdf->absatz(); $pdf->box("Die Vermieterin hat die Deutsche Finanz Partner AG in 49835 Wietmarschen, Fürstenring 2 beauftragt, für die Kaufgegenstände eine Haftpflichtversicherung gesetzlichem Umfang abzuschließen. Bezüglich der Auswahl und Abwicklung der Versicherungen handelt die Deutsche Finanz Partner AG dabei im eigenen Namen und auf eigene Rechnung. Die Prämie für diese Versicherung pro Jahr ca. 80,00 Euro inkl. Versicherungssteuer und ist unter Berücksichtigung von Beitragsschwankungen von -20,00 Euro bis +10,00 Euro mit der monatlichen Rate abgegolten, die Selbstbeteiligung zahlt der Mieter im Schadenfall selbst. Bei Beitragsschwankungen unter oder über der angegebenen Toleranz, wird eine Gutschrift oder eine separate Nachzahlung dem Mieter in Rechnung gestellt."); $a_versicherung = $pdf->Verweis(); } $pdf->para("Mietzins"); $pdf->absatz(); $pdf->box("Auf den gesamten Mietzins zahlt der Mieter vorab vor Inbesitznahme des Mietgegenstands eine Anzahlung in Höhe von "); $pdf->box($je.number_format($data["a"],2,",",".")." €", true); $pdf->box(" inkl. MwSt. des Gesamtmietzinsbetrages."); $a_mietzins = $pdf->Verweis(); $pdf->absatz(); $tempsumme = $data["p"]*$data["l"]; $tempvers = $data["check"]["einzeldata"]["versicherung_brutto"]; $tempdiff = $tempsumme - $tempvers; $pdf->box("Der Mieter zahlt den berechnenden Gesamtpreis, unter Berücksichtigung der Anzahlung, in Höhe von ".zahl($tempdiff)." inkl. MwSt. zzgl. der Nebenkosten in Form von Versicherungsbeiträgen auf die Vertragslaufzeit in Höhe von ".zahl($tempvers)." inkl. Versicherungssteuer, so dass Gesamtkosten in Höhe von ".zahl($tempsumme)." inkl. MwSt. entstehen."); $pdf->absatz(); $pdf->box("Im Übrigen zahlt der Mieter für die Nutzung der Mietgegenstände einen monatlichen Mietzins in Höhe von ".$je); # $pdf->box($je.number_format($data["p"],2,",",".")." €", true); $pdf->box("\nNetto ".zahl($data["check"]["einzeldata"]["ratenetto"])); $pdf->box("\n".$glob_mwst." % MwSt ".zahl($data["check"]["einzeldata"]["ratemwst"])); $pdf->box("\nBrutto ".zahl($data["check"]["einzeldata"]["ratebrutto"])); $pdf->box("\nVersicherung (inkl. Versicherungssteuer) ".zahl($data["check"]["einzeldata"]["versicherungsrate_brutto"])); $pdf->box("\nGesamtrate pro Monat ".zahl($data["check"]["einzeldata"]["rate"])); $pdf->box("\nder jeweils am 1. eines Monats im Voraus zur Zahlung fällig ist."); # if (!$data["pdf_nettorate"]) $pdf->box("Alle Preisangaben verstehen sich einschließlich Mehrwertsteuer, "); # $pdf->box("Mietzins netto: ".$je.number_format(!$data["pdf_nettorate"] ? ($data["p"]/119)*100 : $data["p"],2,",",".")." €"); # $a_mietzins = $pdf->Verweis(); if ($data["sparte"]==1) { $pdf->absatz(); $pdf->box("Die jährliche Fahrleistung beträgt "); $pdf->box((($data["f"]==6 && !$data["manuell"]) || $data["f"]==0 ? "unbegrenzte" : $je."< ".number_format($data["f"]*1000,0,",","."))." Kilometer", true); $pdf->box(". Für jeden weiteren Kilometer zahlt der Mieter am Ende der Mietzeit eine Gebühr von 0,08 €. Für jeden Kilometer den der Mieter weniger fährt, bekommt der Mieter am Ende der Mietzeit eine Erstattung von 0,05 € pro Kilometer."); } $pdf->absatz(); $pdf->box("Alle Zahlungen werden durch die Vermieterin im Wege des Abbuchungsauftrages vom dem Konto des Mieters bei der:\n"); $pdf->box("Bank: ".$data["v_bank"]."\nBLZ: ".$data["v_blz"]."\nKontonummer: ".$data["v_kto"]."\nKontoinhaber: ".$data["v_inh"]."\nIBAN: ".$data["v_iban"]."\nBIC: ".$data["v_bic"], true); $pdf->Text(120, $pdf->GetY()+4.5, "Unterschrift: ........................................"); $pdf->box("\neingezogen."); $pdf->para("Dauer des Mietverhältnisses"); $pdf->absatz(); $pdf->box("Das Mietverhältnis beginnt im Zeitpunkt der Übergabe der Mietgegenstände. Er wird fest für die Dauer von "); $pdf->box($je.$data["l"], true); $pdf->box(" Monaten abgeschlossen und endet, ohne dass es einer Kündigung bedarf, mit Ablauf der Mietzeit. Beginn und Ende der Mietzeit werden in einem gesonderten Schreiben mitgeteilt."); # if ($data["v_lvon"]!="0000-00-00") $pdf->box("Laufzeit: ".datum($data["v_lvon"])." - ".datum($data["v_lbis"]), true); $pdf->absatz(); $pdf->box("Der Mieter ist berechtigt, unter Anrechnung des Mietzinses das Eigentum an den Mietgegenständen ganz oder teilweise zu erwerben, wenn er diese Absicht der Vermieterin drei Monate vor Ende der Mietzeit schriftlich mitteilt."); # $pdf->box($data["s"] ? $je.number_format($data["s"],2,",",".")." €" : "-", true); # $pdf->box(" an die Vermieterin überweist. Dann geht das Eigentum an den Mietgegenständen insoweit auf die Mieterin im Zeitpunkt der Beendigung der Mietzeit über. Die Vermieterin händigt dem Mieter zu diesem Zeitpunkt die Zertifikate für die Vertragsgegenstände aus."); $pdf->absatz(); $pdf->box("Wenn der Mieter von diesem Recht keinen Gebrauch macht, hat er die Mietgegenstände in mangelfreiem Zustand spätestens am letzten Tage der vertraglich vereinbarten Mietzeit an die Vermieterin zurückzugeben. Sofern die Vermieterin Mängel an dem Mietgegenstand feststellt, wird sie diese durch einen vereidigten Sachverständigen bestätigen lassen. Soweit eine solche Bestätigung erfolgt, trägt der Mieter die Kosten des Sachverständigen und die Aufwendungen, die zur Beseitigung der Mängel erforderlich sind."); $pdf->para("Außerordentliche Kündigung des Mietvertrages"); $pdf->absatz(); $pdf->box("Kommt der Mieter mit der Zahlung einer Monatsmiete ganz oder teilweise länger als zwei Wochen in Verzug, ist die Vermieterin zur außerordentlichen Kündigung dieses Vertrages berechtigt. Die Kündigung erfolgt schriftlich."); $pdf->absatz(); $pdf->box("In diesem Falle ist der Mieter verpflichtet, unverzüglich alle Mietgegenstände der Vermieterin herauszugeben."); $pdf->para("Kosten und Gefahrtragung"); $pdf->absatz(); $pdf->box("Alle Kosten, die im Zuge der Nutzung der Mietsache entstehen, trägt der Mieter."); if ($data["sparte"]!=1 || !$data["pdf_ohneversicherung"]) { $pdf->absatz(); $pdf->box("Die Vermieterin hat allerdings für die Mietgegenstände auf eigene Kosten eine Haftpflichtversicherung und einen Vollschutz ".($data["gewerbekunde"] ? 500 : 300)." Euro SB im gesetzlichem Umfang abgeschlossen. Die Prämie für diese Versicherung ist mit dem Mietzins abgegolten, die Selbstbeteiligung zahlt der Mieter im Schadensfall separat. Den Versicherungsbeitrag entnehmen Sie ".$a_versicherung."."); } $pdf->absatz(); $pdf->box("Für alle Schäden, die über die bei sorgfältiger Nutzung der Mietgegenstände entstehenden normalen Abnutzungserscheinungen hinausgehen, hat der Mieter auf seine Kosten aufzukommen. Ebenso trägt er alle Betriebskosten, die im Zusammenhang mit der Nutzung der Mietgegenstände entstehen."); if ($data["sparte"]==1) { $pdf->absatz(); $pdf->box("Der Mieter ist verpflichtet, alle 3.000 km oder bei Unterschreiten einmal jährlich eine Wartung der Mietgegenstände durchführen zu lassen, und zwar durch den Vermieter, der diese Wartungsarbeiten von ihm zu beauftragenden Servicehändler überlässt. Die Kosten der Wartung trägt die Vermieterin."); } $pdf->para("Übergabe der Mietgegenstände"); $pdf->absatz(); $pdf->box("Die Vermieterin ist verpflichtet, die Mietgegenstände dem Mieter innerhalb einer Woche nach Eingang der Vorabzahlung auf den Mietzins gemäß ".$a_mietzins." des Vertrages und des ersten Mietzinsbetrages zu übergeben, zur Nutzung auf eigenes Risiko und eigene Gefahr."); $pdf->para("Untermiete"); $pdf->absatz(); $pdf->box("Der Mieter ist berechtigt, nach schriftlicher Information der Vermieterin die Mietgegenstände unter zu vermieten. Der Vermieterin sind Name und Anschrift der/des Untermieter/s mitzuteilen. Alle Verpflichtungen, die der Mieter nach diesem Vertrag zu erfüllen hat, hat dieser auch dem Untermieter aufzuerlegen. Dies erfasst insbesondere auch die Verpflichtung, die Mietgegenstände an den Mieter oder auf dessen Aufforderung, direkt an die Commerz Real herauszugeben, sollte dieser Mietvertrag nach § 10 und damit auch der Untervermietvertrag aufgrund einer vorzeitigen Beendigung des Mietkaufvertrages mit der Commerz Real enden. Weiterhin hat der Mieter sicherzustellen, dass die Laufzeit der Untermietverträge die Laufzeit dieses Mietvertrages nicht überschreitet."); $pdf->absatz(); $pdf->box("Der Mieter tritt seine Ansprüche gegen den Vermieter insoweit, als er den Vermietern verpflichtet ist, an diesen ab, der die Abtretung annimmt."); $pdf->para("Aufrechnung/Zurückbehaltung"); $pdf->absatz(); $pdf->box("Der Mieter ist gegenüber Ansprüchen der Vermieterin aus diesem Vertrage nur berechtigt, mit rechtskräftig festgestellten oder von der Vermieterin anerkannten Gegenansprüchen aufzurechnen. Ein etwa bestehendes Zurückbehaltungsrecht kann ebenfalls nur für Ansprüche, wie vorstehend genannt, geltend gemacht werden."); $pdf->para("Werksgarantie"); $pdf->absatz(); $pdf->box("Der dem Mieter übergebenen Mietgegenstände sind neuwertig. Für sie besteht eine Werksgarantie. Die Vermieterin tritt alle Ansprüche aus dieser Werksgarantie des Mieters zur Geltendmachung im eigenen Namen und für eigene Rechnung ab. Der Mieter nimmt die Abtretung an. Der Vermieter haftet für derartige Garantieverpflichtungen nur dann, wenn der Mieter aus der Werksgarantie gegenüber dem Hersteller seine Ansprüche nicht durchsetzten kann."); if ($data["g"]) { $pdf->absatz(); $pdf->box("Verlängerung der Gewährleistung auf Fahrzeug und Batterie (Herstellergarantie: 2 Jahre) um ".($data["g"]==1 ? $data["g"]." weiteres Jahr" : "weitere ".$data["g"]." Jahre").", auf insgesamt ".(2+$data["g"])." Jahre erweiterte Garantie durch Vermieterin."); } $pdf->para("Abtretung"); $pdf->absatz(); $pdf->box("Vermieterin und Mieter sind sich darüber einig, dass die Vermieterin sich bei der Commerz Real Mobilienleasing GmbH, Mercedesstr. 6, 40470 Düsseldorf (nachstehend „Commerz Real“ genannt) im Wege des Mietkaufs refinanziert und zu diesem Zwecke die Mietgegenstände auf die Commerz Real im Rahmen eines Sale- and Mietkaufbackvertrages überträgt. Die Vermieterin kann aufgrund dessen das zivilrechtliche Eigentum an den Mietgegenständen erst dann auf den Mieter gemäß § 3 Ziffer 2 dieses Vertrages übertragen, wenn die Vermieterin sämtliche Verpflichtungen aus ihrem Vertrag mit der Commerz Real erfüllt hat und das zivilrechtliche Eigentum an den Mietgegenständen auf die Vermieterin übergegangen ist. Die Bedingungen dieses Mietvertrages dürfen den Bedingungen des Mietkaufs mit der Commerz Real nicht widersprechen, insbesondere darf die Laufzeit dieses Mietvertrages der Laufzeit des Mietkaufvertrages mit der Commerz Real nicht überschreiten. Im Falle einer vorzeitigen Beendigung des Mietkaufvertrages mit der Commerz Real, ist die Vermieterin verpflichtet, die Mietgegenstände an die Commerz Real herauszugeben. In diesem Fall endet daher dieser Mietvertrag (abweichend von § 3) und der Mieter ist verpflichtet, die Mietgegenstände an die Vermieterin oder auf dessen Aufforderung, direkt an die Commerz Real herauszugeben."); $pdf->para("Schlussbestimmungen"); $pdf->absatz(); $pdf->box("Änderungen oder Ergänzungen dieses Vertrages bedürfen zu ihrer Wirksamkeit der Schriftform. Dies gilt auch für eine Vereinbarung, mit der das Formerfordernis abbedungen wird."); $pdf->absatz(); $pdf->box("Für den Fall, dass eine Bestimmung dieses Vertrages rechtsunwirksam oder undurchführbar sein soll, berührt dies die Wirksamkeit des Vertrages insgesamt nicht. An die Stelle der unwirksamen Bestimmungen tritt die gesetzliche Regelung."); $pdf->absatz(); $pdf->box("Gerichtsstand und Erfüllungsort ist, soweit eine Vereinbarung möglich ist, Lingen (Ems)."); if (!empty($data["v_bemerkung"])) { $pdf->absatz(); $pdf->box("Zusatzbemerkungen:\n".$data["v_bemerkung"]); } $pdf->box("\n\n\n\nVermieterin", true); $pdf->box("\nWietmarschen, den .................... ............................................"); $pdf->box("\n\nMieter", true); $pdf->box("\n......................., den .................... ............................................"); if ($data["pdf_unterschrifthersteller"]) { $pdf->box("\n\nHersteller"); $pdf->box("\n......................., den .................... ............................................"); } } elseif ($data["art"]==1) { # Kaufvertrag # $pdf->box(var_export($data,true)); $pdf->para("Gegenstand des Vertrages/Kaufpreis"); $pdf->absatz(); $pdf->box("Die Verkäuferin befasst sich mit dem Vertrieb von Elektrofahrzeugen der emco electroroller GmbH Lingen in Lingen (Ems)."); $pdf->absatz(); $pdf->box("Sie verkauft mit diesem Vertrag an den dies annehmenden Käufer ".$sparte[$data["sparte"]]["ggst"]."\n"); $pdf->box(($data["v_anz"]>1 ? $data["v_anz"]." x " : "").$mietgegenstand."\n".$sparte[$data["sparte"]]["kennung"]." ".($data["v_anz"]<=2 ? (count($data["f_fids"])>0 ? implode(", ", $data["f_fids"]) : "................................................................") : "..... - siehe Anlage 1 - ....."), true); $pdf->box("\nzum Kaufpreis von\n"); $gessumme = 99999; # $data["summe"] + $data["a"] + $data["s"]; $text = $je.number_format($gessumme,2,",",".")." €"; if (!$data["pdf_ohneversicherung"]) { if ($data["sparte"]==1) $text.= " inkl. Wartungsarbeiten"; elseif ($data["sparte"]==2) $text.= " inkl. Wartungsarbeiten und Zubehör"; } if ($data["g"]) { $text.= "\n".(!$data["pdf_ohneversicherung"] ? "und" : "inkl.")." Verlängerung der Gewährleistung um ".$data["g"]." Jahr".($data["g"]!=1 ? "e" : ""); } if ($check["sonderausstattung_auswahl"]) { $text.= "\nSonderausstattung: ".$check["sonderausstattung_auswahl"]; } $pdf->box($text, true); $pdf->box("\n".(!$data["pdf_nettorate"] ? "Alle Preisangaben verstehen sich einschließlich Mehrwertsteuer, " : "")."Kaufpreis netto: ".$je.number_format(!$data["pdf_nettorate"] ? ($gessumme/(100+$glob_mwst))*100 : $gessumme,2,",",".")." €"); if ($data["sparte"]==1 && !$data["pdf_ohneversicherung"]) { $pdf->para("Versicherungsschutz"); $pdf->absatz(); $pdf->box("Die Verkäuferin hat für die Kaufgegenstände auf eigene Kosten eine Haftpflichtversicherung und Kaskoversicherung VK 500 Euro SB in gesetzlichem Umfang abgeschlossen. Die Prämie für diese Versicherung beträgt pro Jahr 100 Euro inkl. Versicherungssteuer und ist mit der monatlichen Rate abgegolten, die Selbstbeteiligung zahlt der Käufer im Schadensfall selbst."); } $pdf->para("Zahlung des Kaufpreises"); $pdf->absatz(); $pdf->box("Der Käufer zahlt auf den nach § 1 zu berechnenden Kaufpreis in Höhe von "); $pdf->box($je.number_format(!$data["pdf_nettorate"] ? ($gessumme/(100+$glob_mwst))*100 : $gessumme,2,",",".")." €", true); $pdf->absatz(); $pdf->box("Eine Anzahlung in Höhe von "); $pdf->box($je.number_format($data["a"],2,",",".")." €", true); $pdf->box(" wird mit den Monatsraten verrechnet, diese wird mit der ersten Rate eingezogen."); $pdf->absatz(); $pdf->box("Eine Schlussrate in Höhe von "); $pdf->box($je.number_format($data["s"],2,",",".")." €", true); $pdf->box(" wird mit der letzten Rate eingezogen."); $pdf->absatz(); $pdf->box("Im Übrigen wird dem Käufer nachgelassen, den Restkaufpreis in "); $pdf->box($je.$data["l"], true); $pdf->box(" gleich hohen Monatsraten á "); $pdf->box($je.number_format($data["p"],2,",",".")." €", true); $pdf->box(" zu zahlen, wobei die erste Ratenzahlung vor Übergabe der Fahrzeuge zu leisten ist, die weiteren Raten sind jeweils am 1. eines Monats im Voraus zur Zahlung fällig. "); if (!$data["pdf_nettorate"]) $pdf->box("Alle Preisangaben verstehen sich einschließlich Mehrwertsteuer, "); $pdf->box("Rate netto: ".$je.number_format($check["ratenetto"],2,",",".")." €"); $pdf->absatz(); $pdf->box("Alle Zahlungen werden durch die Vermieterin im Wege des Abbuchungsauftrages vom dem Konto des Käufers bei der:\n"); $pdf->box("Bank: ".$data["v_bank"]."\nBLZ: ".$data["v_blz"]."\nKontonummer: ".$data["v_kto"]."\nKontoinhaber: ".$data["v_inh"], true); $pdf->Text(120, $pdf->GetY()+4.5, "Unterschrift: ........................................"); $pdf->box("\neingezogen."); $pdf->absatz(); $pdf->box("Kommt der Käufer mit einer Ratenzahlung ganz oder teilweise länger als einen Monat in Verzug, ist der dann geschuldete Betrag in einer Summe fällig und vom Zeitpunkt des Verzuges an mit 8% Punkten über Basiszins zu verzinsen."); $pdf->para("Übergabe und Eigentumsvorbehalt"); $pdf->absatz(); $pdf->box("Der Kaufgegenstand, wie er in § 1 beschrieben ist, wird spätestens einen Monat nach Zahlung der ersten Kaufpreisrate dem Käufer übergeben."); $pdf->absatz(); $pdf->box("Der genannte Kaufgegenstand bleibt bis zur vollständigen Zahlung des Gesamtkaufpreises sowie sämtlicher sonstiger Forderungen des Verkäufers aus diesem Vertrag Eigentum des Verkäufers."); $pdf->absatz(); $pdf->box("Der Käufer ist bis zur vollständigen Kaufpreiszahlung nur mit ausdrücklicher und schriftlicher Zustimmung des Verkäufers berechtigt, über den Kaufgegenstand ganz oder teilweise zu verfügen insbesondere den Kaufgegenstand weiter zu verkaufen. Nur mit ausdrücklicher, schriftlicher Zustimmung des Verkäufers ist der Käufer berechtigt, über den Kaufgegenstand ganz oder teilweise zu verfügen und den Besitz im Zuge des Weiterverkaufes an einen Dritten mit der Maßgabe zu übertragen, dass er mit seinem Vertragspartner ebenfalls einen Eigentumsvorbehalt vereinbart."); $pdf->absatz(); $pdf->box("Im Zeitpunkt des Weiterverkaufs wird der in § 1 vereinbarte Kaufpreis vorzeitig fällig, wenn der Kaufpreis aus dem Weiterverkauf für den Käufer fällig ist. Der Käufer verpflichtet sich, Abschriften des Vertrages über den Weiterverkauf unverzüglich an den Verkäufer auszuhändigen."); $pdf->absatz(); $pdf->box("Der Käufer tritt hiermit alle Ansprüche aus dem Weiterverkauf, sei es auf Kaufpreiszahlung, sei es auf Herausgabe des Kaufgegenstandes aufgrund des Eigentumsvorbehaltes, den er im Rahmen des Weiterverkaufes zu vereinbaren hat, an den Verkäufer ab, der die Abtretung annimmt."); $pdf->absatz(); $pdf->box("Der Verkäufer wird diese Abtretung gegenüber dem Vertragspartner des Käufers nur offenlegen, wenn der Käufer seinen Verpflichtungen aus diesem Vertrage ganz oder teilweise nicht nachkommen sollte."); $pdf->para("Gewährleistung"); $pdf->absatz(); $pdf->box("Der Verkäufer leistet Gewähr für die Beschaffenheit der Kaufgegenstände nach Maßgabe der Werksgarantie. Er tritt sämtliche Ansprüche aus dieser Werksgarantie an den Käufer ab, der die Abtretung annimmt. Der Käufer ist damit berechtigt und verpflichtet, derartige Garantieansprüche unmittelbar gegen den Hersteller zu richten. Nur soweit Ansprüche gegen den Hersteller nicht durchsetzbar sind, tritt die Haftung des Verkäufers ein."); if ($data["sparte"]==1) { $pdf->absatz(); $pdf->box("Um die Werksgarantie in Anspruch zu nehmen, ist der Käufer verpflichtet, selbstständig alle 3.000 km oder bei Unterschreiten, einmal jährlich eine Wartung durchführen zu lassen.\nDer Käufer entscheidet selbst, welcher Servicehändler die Wartungsarbeiten durchführt und trägt hierfür auch die Kosten. Eine Haftung seitens des Verkäufers wird nicht gewährleistet."); } $pdf->para("Rückgabepflicht des Käufers"); $pdf->absatz(); $pdf->box("Für den Fall, dass der Käufer seinen Zahlungsverpflichtungen gem. § 2 dieses Vertrages nicht nachkommt und der dann bestehende Kaufpreisanspruch zur Zahlung fällig wird, ist der Käufer verpflichtet, den Kaufgegenstand unverzüglich an den Verkäufer zurückzugeben."); $pdf->absatz(); $pdf->box("Im Falle der Rückgabe aufgrund des Eigentumsvorbehaltes kommt eine Rückzahlung der geleisteten Anzahlung und der Kaufpreisrate nicht in Betracht, weil diese Beträge der Nutzungsentschädigung für die Nutzung des Anspruchs entsprechen.\nDem Käufer ist es allerdings gestattet, den Nachweis zu führen, dass die Nutzungsentschädigung geringer als der bis dahin geleistete Kaufpreis ist. Wenn dieser Nachweis geführt wird, ist die Verkäuferin zur Erstattung verpflichtet."); $pdf->para("Eigentumsübergang"); $pdf->absatz(); $pdf->box("Mit Erfüllung aller Ansprüche des Verkäufers aus diesem Vertrage durch den Käufer geht das Eigentum an dem in § 1 umschriebenen Kaufgegenstand auf den Käufer über."); $pdf->absatz(); $pdf->box("Mit Eigentumsübergang händigt die Verkäuferin dem Käufer die Zertifikate für die Kaufgegenstände aus."); # $pdf->para("Abtretung"); # $pdf->absatz(); # $pdf->box("Vermieterin und Mieter sind sich darüber einig, dass die Vermieterin sich bei der Commerz Real Mobilienleasing GmbH, Mercedesstr. 6, 40470 Düsseldorf (nachstehend 'Commerz Real' genannt) im Wege des Mietkaufs refinanziert und zu diesem Zwecke die Mietgegenstände auf die Commerz Real im Rahmen eines Sale- and Mietkaufbackvertrages überträgt. Die Vermieterin kann aufgrund dessen das zivilrechtliche Eigentum an den Mietgegenständen erst dann auf den Mieter gemäß § 3 Ziffer 2 dieses Vertrages übertragen, wenn die Vermieterin sämtliche Verpflichtungen aus ihrem Vertrag mit der Commerz Real erfüllt hat und das zivilrechtliche Eigentum an den Mietgegenständen auf die Vermieterin übergegangen ist. Die Bedingungen dieses Mietvertrages dürfen den Bedingungen des Mietkaufs mit der Commerz Real nicht widersprechen, insbesondere darf die Laufzeit dieses Mietvertrages der Laufzeit des Mietkaufvertrages mit der Commerz Real nicht überschreiten. Im Falle einer vorzeitigen Beendigung des Mietkaufvertrages mit der Commerz Real, ist die Vermieterin verpflichtet, die Mietgegenstände an die Commerz Real herauszugeben. In diesem Fall endet daher dieser Mietvertrag (abweichend von § 3) und der Mieter ist verpflichtet, die Mietgegenstände an die Vermieterin oder auf dessen Aufforderung, direkt an die Commerz Real herauszugeben."); $pdf->para("Schlussbestimmungen"); $pdf->absatz(); $pdf->box("Änderungen oder Ergänzungen dieses Vertrages bedürfen zu ihrer Wirksamkeit der Schriftform. Dies gilt auch für eine Vereinbarung, mit der das Formerfordernis abbedungen wird."); $pdf->absatz(); $pdf->box("Für den Fall, dass eine Bestimmung dieses Vertrages rechtsunwirksam oder undurchführbar sein soll, berührt dies die Wirksamkeit des Vertrages insgesamt nicht. An die Stelle der unwirksamen Bestimmungen tritt die gesetzliche Regelung."); $pdf->absatz(); $pdf->box("Gerichtsstand und Erfüllungsort ist, soweit eine Vereinbarung möglich ist, Lingen (Ems)."); if (!empty($data["v_bemerkung"])) { $pdf->absatz(); $pdf->box("Zusatzbemerkungen:\n".$data["v_bemerkung"]); } $pdf->box("\n\n\n\nVerkäuferin", true); $pdf->box("\nWietmarschen, den .................... ............................................"); $pdf->box("\n\nKäufer", true); $pdf->box("\n......................., den .................... ............................................"); if ($data["pdf_unterschrifthersteller"]) { $pdf->box("\n\nHersteller"); $pdf->box("\n......................., den .................... ............................................"); } } if ($data["v_anz"]>2) { $pdf->AddPage(); $pdf->para("Anlage 1 - Auflistung ".$sparte[$data["sparte"]]["kennung"], false); #$pdf->SetXY(10, ($y=40)); $pdf->box("\n\n\n"); for ($a=1; $a<=$data["v_anz"]; $a++) { # $pdf->SetXY(30, $y+=8); $temp = @array_shift($data["f_fids"]); # $pdf->MultiCell(150, 5, $a.". : ".(!empty($temp) ? $temp : ".........................................................................................................................."), 0, 'C'); $pdf->box("\n".$a.".: ".(!empty($temp) ? $temp : "..........................................................................................................................")."\n"); } } } elseif($pdftyp=="tilgung") { # TILGUNGSPLAN global $bezmonat, $zinssatz_calc; $pdf->setAlign("C"); $pdf->box("Tilgungsplan\n\n", true, 14); $pdf->setAlign(); $vondat = ($data["v_lvon"]!="0000-00-00" ? $data["v_lvon"] : date("Y-m-d")); $temprest = $data["check"]["einzeldata"]["gesamtkosten_netto"] + $data["check"]["einzeldata"]["vollschutzsumme_netto"] + $data["check"]["einzeldata"]["servicesumme_netto"]; $pdf->box("Kaufpreis am ".date("d.m.Y", strtotime($vondat)).": ".zahl($temprest)."\n "); $w = array(10,15,15,20,15,15,15,20,15,20,20); $a = array("R","C","L","R","R","R","R","R","R","R","R"); $pdf->Ln(6); $pdf->SetFillColor(220); $pdf->Cell($w[0], 7, "Per", 0, 0, $a[0], true); $pdf->Cell($w[1], 7, "Jahr", 0, 0, $a[1], true); $pdf->Cell($w[2], 7, "Monat", 0, 0, $a[2], true); $pdf->Cell($w[3], 7, "Tilgung", 0, 0, $a[3], true); $pdf->Cell($w[4], 7, "Wartung", 0, 0, $a[4], true); $pdf->Cell($w[5], 7, "VSchutz", 0, 0, $a[5], true); $pdf->Cell($w[6], 7, "Zins", 0, 0, $a[6], true); $pdf->Cell($w[7], 7, "Rate exkl.", 0, 0, $a[7], true); $pdf->Cell($w[8], 7, "MWSt.", 0, 0, $a[8], true); $pdf->Cell($w[9], 7, "Rate inkl.", 0, 0, $a[9], true); $pdf->Cell($w[10], 7, "Restwert", 0, 0, $a[10], true); $pdf->SetFillColor(); $pdf->SetFont("Arial", "", 9); for ($i=1; $i<=$data["l"]; $i++) { $tempdat = strtotime($vondat." +".($i-1)."month"); $tempzins = round(($temprest-$data["check"]["einzeldata"]["ratenetto"])*($zinssatz_calc/100)/12, 2); $pdf->Ln($i==1 ? 8 : 6); $pdf->Cell($w[0], 7, $i, 0, 0, $a[0]); $pdf->Cell($w[1], 7, date("Y", $tempdat), 0, 0, $a[1]); $pdf->Cell($w[2], 7, utf8_decode($bezmonat[date("n", $tempdat)]), 0, 0, $a[2]); $pdf->Cell($w[3], 7, pdfzahl($data["check"]["einzeldata"]["ratenetto"] - $data["check"]["einzeldata"]["SERVICE_netto"] - $data["check"]["einzeldata"]["VOLLSCHUTZ_netto"] - $tempzins), 0, 0, $a[3]); $pdf->Cell($w[4], 7, pdfzahl($data["check"]["einzeldata"]["SERVICE_netto"]), 0, 0, $a[4]); $pdf->Cell($w[5], 7, pdfzahl($data["check"]["einzeldata"]["VOLLSCHUTZ_netto"]), 0, 0, $a[5]); $pdf->Cell($w[6], 7, pdfzahl($tempzins), 0, 0, $a[6]); $pdf->Cell($w[7], 7, pdfzahl($data["check"]["einzeldata"]["ratenetto"]), 0, 0, $a[7]); $pdf->Cell($w[8], 7, pdfzahl($data["check"]["einzeldata"]["ratemwst"]), 0, 0, $a[8]); $pdf->Cell($w[9], 7, pdfzahl($data["check"]["einzeldata"]["ratebrutto"]), 0, 0, $a[9]); $temprest = $temprest - $data["check"]["einzeldata"]["ratenetto"] + $tempzins; $pdf->Cell($w[10], 7, pdfzahl($temprest), 0, 0, $a[10]); } } else { # ANGEBOT #### $pdf->box(var_export($data, true)); $pdf->setAlign("C"); $pdf->box(($data["art"]==2 ? "Miet" : "Kauf")."angebot\n\n", true, 20); $pdf->setAlign(); # $pdf->box(($data["v_gewerbekunde"] ? $data["v_firma"].", " : "").$data["v_vorname"]." ".$data["v_name"]."\n".$data["v_str"]." ".$data["v_hnr"].", ".$data["v_plz"]." ".$data["v_ort"].(!empty($data["v_handy"]) || !empty($data["v_telefon"]) ? "\nTel. ".(!empty($data["v_handy"]) ? $data["v_handy"] : $data["v_telefon"]) : "").(!empty($data["v_ustid"]) ? ", USt-ID Nr. ".$data["v_ustid"] : ""), true)."\n\n"; $pdf->box("Vertragsart: ".($data["art"]==2 ? "Leasing" : "Ratenzahlung").", Laufzeit ".$data["l"]." Monate".($data["f"]>0 && $data["f"]<6 ? ", max. Laufleistung <".($data["f"]*1000)." km p.a." : "").", Stand ".date("d.m.Y").", ".($data["gewerbekunde"] ? "Gewerbe" : "Privat")."kunde"); $pdf->box("\n\nGerne unterbreiten wir Ihnen folgendes Angebot:\n "); $pdf->SetFont("Arial", "", 10); $w = array(105,15,25,25); $a = array("L","R","R","R"); $pdf->Ln(6); $pdf->SetFillColor(220); $pdf->Cell($w[0], 7, "Bezeichnung", 0, 0, $a[0], true); $pdf->Cell($w[1], 7, "Anz", 0, 0, $a[1], true); $pdf->Cell($w[2], 7, ($data["gewerbekunde"] ? "Netto" : "Brutto"), 0, 0, $a[2], true); $pdf->Cell($w[3], 7, "Gesamt", 0, 0, $a[3], true); $pdf->SetFillColor(); $pdf->Ln(8); $pdf->Cell($w[0], 7, utf8_decode($mietgegenstand), 0, 0, $a[0]); $pdf->Cell($w[1], 7, $data["v_anz"], 0, 0, $a[1]); $pdf->Cell($w[2], 7, pdfzahl($data["check"]["einzeldata"]["verkaufspreis_brutto"]), 0, 0, $a[2]); $pdf->Cell($w[3], 7, pdfzahl($data["check"]["einzeldata"]["verkaufspreis_brutto"]*$data["v_anz"]), 0, 0, $a[3]); if ($data["check"]["einzeldata"]["rabatt"]>0) { $pdf->Ln(6); $pdf->Cell($w[0], 7, utf8_decode("Händlerrabatt"), 0, 0, $a[0]); $pdf->Cell($w[1], 7, "", 0, 0, $a[1]); # $data["v_anz"] $pdf->Cell($w[2], 7, pdfzahl(brutto($data["check"]["einzeldata"]["rabatt"]*-1)), 0, 0, $a[2]); $pdf->Cell($w[3], 7, pdfzahl(brutto($data["check"]["einzeldata"]["rabatt"]*$data["v_anz"]*-1)), 0, 0, $a[3]); } if ($data["a"]>0) { $pdf->Ln(6); $pdf->Cell($w[0], 7, "Anzahlung", 0, 0, $a[0]); $pdf->Cell($w[1], 7, "", 0, 0, $a[1]); $pdf->Cell($w[2], 7, pdfzahl($data["a"]*-1), 0, 0, $a[2]); $pdf->Cell($w[3], 7, pdfzahl($data["v_anz"]*$data["a"]*-1), 0, 0, $a[3]); } if ($data["check"]["einzeldata"]["restwert"]>0) { $pdf->Ln(6); $pdf->Cell($w[0], 7, "Restwert", 0, 0, $a[0]); $pdf->Cell($w[1], 7, "", 0, 0, $a[1]); $pdf->Cell($w[2], 7, pdfzahl(brutto($data["check"]["einzeldata"]["restwert"]*-1)), 0, 0, $a[2]); $pdf->Cell($w[3], 7, pdfzahl(brutto($data["v_anz"]*$data["check"]["einzeldata"]["restwert"]*-1)), 0, 0, $a[3]); } if ($data["sparte"]==1 && !$data["pdf_ohneversicherung"] && $data["check"]["einzeldata"]["vollschutzsumme_netto"]>0) { $pdf->Ln(6); $pdf->Cell($w[0], 7, "Vollschutz (".($data["gewerbekunde"] ? 500 : 300)." ".chr(128)." SB)", 0, 0, $a[0]); $pdf->Cell($w[1], 7, "", 0, 0, $a[1]); $pdf->Cell($w[2], 7, pdfzahl($data["check"]["einzeldata"][$data["gewerbekunde"] ? "vollschutzsumme_netto" : "vollschutzsumme_brutto"]), 0, 0, $a[2]); $pdf->Cell($w[3], 7, pdfzahl($data["v_anz"]*$data["check"]["einzeldata"][$data["gewerbekunde"] ? "vollschutzsumme_netto" : "vollschutzsumme_brutto"]), 0, 0, $a[3]); } if ($data["check"]["einzeldata"]["servicesumme_brutto"]>0) { $pdf->Ln(6); $pdf->Cell($w[0], 7, "Servicepauschale", 0, 0, $a[0]); $pdf->Cell($w[1], 7, "", 0, 0, $a[1]); $pdf->Cell($w[2], 7, pdfzahl($data["check"]["einzeldata"]["servicesumme_brutto"]), 0, 0, $a[2]); $pdf->Cell($w[3], 7, pdfzahl($data["v_anz"]*$data["check"]["einzeldata"]["servicesumme_brutto"]), 0, 0, $a[3]); } if ($data["g"]) { $pdf->Ln(6); $pdf->Cell($w[0], 7, utf8_decode("Gewährleistung: Verlängerung um ".$data["g"]." Jahr".($data["g"]!=1 ? "e" : "")." auf insg. ".(2+$data["g"])." Jahre"), 0, 0, $a[0]); $pdf->Cell($w[1], 7, "", 0, 0, $a[1]); $pdf->Cell($w[2], 7, pdfzahl($data["check"]["einzeldata"]["garantieverlsumme_brutto"]), 0, 0, $a[2]); $pdf->Cell($w[3], 7, pdfzahl($data["v_anz"]*$data["check"]["einzeldata"]["garantieverlsumme_brutto"]), 0, 0, $a[3]); } /* lieber nicht anzeigen if ($data["check"]["einzeldata"]["fracht_brutto"]>0) { $pdf->Ln(6); $pdf->Cell($w[0], 7, utf8_decode("Fracht"), 0, 0, $a[0]); $pdf->Cell($w[1], 7, "", 0, 0, $a[1]); $pdf->Cell($w[2], 7, pdfzahl($data["check"]["einzeldata"][$data["gewerbekunde"] ? "fracht" : "fracht_brutto"]), 0, 0, $a[2]); $pdf->Cell($w[3], 7, pdfzahl($data["v_anz"]*$data["check"]["einzeldata"][$data["gewerbekunde"] ? "fracht" : "fracht_brutto"]), 0, 0, $a[3]); } */ if ($data["x"]>0) { $pdf->Ln(6); $pdf->Cell($w[0], 7, utf8_decode("Sonderzubehör".(!empty($data["xb"]) ? ": ".$data["xb"] : "")), 0, 0, $a[0]); $pdf->Cell($w[1], 7, "", 0, 0, $a[1]); $pdf->Cell($w[2], 7, pdfzahl($data["check"]["einzeldata"][$data["gewerbekunde"] ? "zubehoer" : "zubehoer_brutto"]), 0, 0, $a[2]); $pdf->Cell($w[3], 7, pdfzahl($data["check"]["einzeldata"][$data["gewerbekunde"] ? "zubehoer" : "zubehoer_brutto"]), 0, 0, $a[3]); } if (!empty($data["check"]["einzeldata"]["sonderausstattung_auswahl"])) { # $pdf->box("Sonderausstattung:\n".$data["check"]["einzeldata"]["sonderausstattung_auswahl"]); $pdf->Ln(6); # $pdf->Cell($w[0], 7, utf8_decode("Sonderausstattung: ".$data["check"]["einzeldata"]["sonderausstattung_auswahl"]), 0, 0, $a[0]); $altx = $pdf->GetX(); $pdf->SetX($altx+$w[0]+$w[1]+$w[2]); $pdf->Cell($w[3], 7, pdfzahl($data["check"]["einzeldata"][$data["gewerbekunde"] ? "sonderausstattung" : "sonderausstattung_brutto"]), 0, 0, $a[3]); $pdf->SetX($altx); $pdf->MultiCell($w[0], 7, utf8_decode("Sonderausstattung: ".$data["check"]["einzeldata"]["sonderausstattung_auswahl"]), 0 ,$a[0]); # $pdf->Ln(0); # $pdf->Cell($w[0], 7, "", 1, 0, $a[0]); # $pdf->Cell($w[1], 7, "", 1, 0, $a[1]); # $pdf->Cell($w[2], 7, "", 1, 0, $a[2]); # $pdf->Cell($w[3], 7, pdfzahl($data["check"]["einzeldata"]["sonderausstattung_brutto"]), 1, 0, $a[3]); } if ($data["v_anz"]==1) { $w = array(0=>145,2=>25); $a = array(0=>"L",2=>"R"); } else { $w = array(0=>120,1=>25,2=>25); $a = array(0=>"L",1=>"R",2=>"R"); } $pdf->Ln(14); $pdf->SetFillColor(220); $pdf->Cell($w[0], 7, "Monatliche Rate", 0, 0, $a[0], true); if ($data["v_anz"]>1) $pdf->Cell($w[1], 7, "Einzel", 0, 0, $a[1], true); $pdf->Cell($w[2], 7, "Gesamt", 0, 0, $a[2], true); $pdf->SetFillColor(); # $pdf->box("Monatliche Rate", true); $pdf->Ln(8); $pdf->SetFont("Arial", ""); $pdf->Cell($w[0], 7, "Netto", 0, 0, $a[0]); if ($data["v_anz"]>1) $pdf->Cell($w[1], 7, pdfzahl($data["check"]["einzeldata"]["ratenetto"]/$data["v_anz"]), 0, 0, $a[1]); $pdf->Cell($w[2], 7, pdfzahl($data["check"]["einzeldata"]["ratenetto"]), 0, 0, $a[2]); $pdf->Ln(6); $pdf->Cell($w[0], 7, $glob_mwst." % MWSt", 0, 0, $a[0]); if ($data["v_anz"]>1) $pdf->Cell($w[1], 7, pdfzahl($data["check"]["einzeldata"]["ratemwst"]/$data["v_anz"]), 0, 0, $a[1]); $pdf->Cell($w[2], 7, pdfzahl($data["check"]["einzeldata"]["ratemwst"]), 0, 0, $a[2]); $pdf->Ln(6); $pdf->Cell($w[0], 7, "Brutto", 0, 0, $a[0]); if ($data["v_anz"]>1) $pdf->Cell($w[1], 7, pdfzahl($data["check"]["einzeldata"]["ratebrutto"]/$data["v_anz"]), 0, 0, $a[1]); $pdf->Cell($w[2], 7, pdfzahl($data["check"]["einzeldata"]["ratebrutto"]), 0, 0, $a[2]); if ($data["check"]["einzeldata"]["versicherungsrate_brutto"]>0) { $pdf->Ln(6); $pdf->Cell($w[0], 7, "Versicherung (inkl. Versicherungssteuer)", 0, 0, $a[0]); if ($data["v_anz"]>1) $pdf->Cell($w[1], 7, pdfzahl($data["check"]["einzeldata"]["versicherungsrate_brutto"]/$data["v_anz"]), 0, 0, $a[1]); $pdf->Cell($w[2], 7, pdfzahl($data["check"]["einzeldata"]["versicherungsrate_brutto"]), 0, 0, $a[2]); } $pdf->Ln(7); $pdf->SetFont("Arial", "B"); $pdf->Cell($w[0], 7, "Rate pro Monat", 0, 0, $a[0]); if ($data["v_anz"]>1) $pdf->Cell($w[1], 7, pdfzahl($data["check"]["einzeldata"]["rate"]), 0, 0, $a[1]); $pdf->Cell($w[2], 7, pdfzahl($data["check"]["einzeldata"]["rate"]*$data["v_anz"]), 0, 0, $a[2]); $pdf->SetFont("Arial", ""); # $pdf->Ln(30); $pdf->AddPage(); $pdf->box("Verbindliche Vertragsannahme\n\n", true, 20); $pdf->box("Sofern Ihnen dieses Angebot zusagt, können Sie uns gerne die verbindliche Annahme durch Ihre Unterschrift bestätigen. Um Ihre Bonität zu prüfen, benötigen wir mit dieser unterschriebenen Vertragsannahme die folgenden Unterlagen:\n\n- Kopie des Personalausweises,\n- die letzten drei Gehaltsnachweise und\n- Kontoauszüge des letzten vollen Monats\n\nNach erfolgreicher Prüfung Ihrer Bonität bereiten wir alle Vertragsunterlagen für Sie vor."); $pdf->box("\n\n\n\nVerbindliche Annahme dieses Angebots:\n\n_________________________________________________________________\nOrt, Datum, Unterschrift\n\n\n\n"); $pdf->box("Name ___________________________________________________\n\n"); $pdf->box("Vorname _________________________________________________\n\n"); $pdf->box("Straße u. Hausnummer _____________________________________\n\n"); $pdf->box("PLZ u. Ort _______________________________________________\n\n"); $pdf->box("Telefonnummer ___________________________________________\n\n"); $pdf->box("E-Mail ___________________________________________________"); $pdf->box("\n\n\nper Fax an 05925 99 80 7-23"); # $pdf->box(var_export($data, true)); } /* # ALTER VERTRAG # TEXTE ÜBER WORDDOKUMENT GELEGT $pdf = new FPDI(); $pdf->SetAutoPageBreak(true, 10); $pagecount = $pdf->setSourceFile($pfad."vorlage_".($data["art"]==1 ? "kauf" : "miet")."vertrag.pdf"); for ($aktseite = 1; $aktseite <= $pagecount; $aktseite++) { $tplidx = $pdf->ImportPage($aktseite); $s = $pdf->getTemplatesize($tplidx); $pdf->AddPage('P', array($s['w'], $s['h'])); $pdf->useTemplate($tplidx); $je = $data["v_anz"]>1 ? "je " : ""; $pdf->SetFont("arial", "", 7); $pdf->SetXY(20,275.5); $pdf->MultiCell(170, 8, "vorl. VNr: ".$vnr.(!empty($data["h_firma"]) ? ", ".$data["h_firma"].(!empty($data["h_telefon"]) ? ", ".$data["h_telefon"] : "") : ""), 0, 'R'); $pdf->SetFont("arial", "B", 11); if ($aktseite==1 && $data["art"]==1) { # 1: Ratenkauf 2: Leasing/Miete $pdf->SetXY(10,85); $pdf->MultiCell(190, 8, ($data["v_gewerbekunde"] ? $data["v_firma"].", " : "").$data["v_vorname"]." ".$data["v_name"]."\n".$data["v_str"]." ".$data["v_hnr"].", ".$data["v_plz"]." ".$data["v_ort"], 0, 'C'); if (!empty($data["v_handy"]) || !empty($data["v_telefon"])) { $pdf->SetXY(103,103); $pdf->MultiCell(50, 8, (!empty($data["v_handy"]) ? $data["v_handy"] : $data["v_telefon"]), 0, 'L'); } $pdf->SetXY(10,159); $pdf->MultiCell(190, 8, ($data["v_anz"]>1 ? $data["v_anz"]." x " : "").utf8_decode($mietgegenstand."\n".$sparte[$data["sparte"]]["kennung"]." ".($data["v_anz"]<=2 ? (count($data["f_fids"])>0 ? implode(", ", $data["f_fids"]) : "................................................................") : "..... - siehe Anlage 1 - .....")), 0, 'C'); $pdf->SetY($data["g"] ? 181 : 183); $gessumme = $data["summe"] + $data["a"] + $data["s"]; $text = $je.number_format($gessumme,2,",",".")." ".chr(128); if (!$data["pdf_ohneversicherung"]) { if ($data["sparte"]==1) $text.= utf8_decode(" inkl. vertraglicher Serviceleistungen"); elseif ($data["sparte"]==2) $text.= utf8_decode(" inkl. vertraglicher Serviceleistungen und Zubehör"); } if ($data["g"]) { $text.= "\n".utf8_decode((!$data["pdf_ohneversicherung"] ? "und" : "inkl.")." Verlängerung der Gewährleistung um ".$data["g"]." Jahr".($data["g"]!=1 ? "e" : "")); } $pdf->MultiCell(190, 5, $text, 0, 'C'); $pdf->SetXY(158, 216); $pdf->MultiCell(50, 5, $je.number_format($gessumme,2,",",".")." ".chr(128), 0, 'L'); if ($data["pdf_nettorate"]) { $pdf->Line(36,195,138,195); } $pdf->SetFont("arial", "", 10); $pdf->SetXY(168, 192); $pdf->MultiCell(40, 5, $je.number_format(!$data["pdf_nettorate"] ? ($gessumme/119)*100 : $gessumme,2,",",".")." ".chr(128), 0, 'L'); $pdf->SetFont("arial", "B", 11); $pdf->SetXY(78, 227); $pdf->MultiCell(50, 5, $je.number_format($data["a"],2,",",".")." ".chr(128), 0, 'C'); $pdf->SetXY(79, 243); $pdf->MultiCell(50, 5, $je.number_format($data["s"],2,",",".")." ".chr(128), 0, 'C'); $pdf->SetXY(151, 254); $pdf->MultiCell(50, 5, $je.$data["l"], 0, 'L'); if ($data["v_lvon"]!="0000-00-00") { $pdf->SetXY(70, 270.5); $pdf->MultiCell(150, 5, "Laufzeit: ".datum($data["v_lvon"])." - ".datum($data["v_lbis"]), 0, 'L'); } $pdf->SetXY(52, 259); $pdf->MultiCell(50, 5, $je.number_format($data["p"],2,",",".")." ".chr(128), 0, 'C'); } elseif ($aktseite==2 && $data["art"]==1) { $pdf->SetXY(65, 43); $pdf->MultiCell(50, 9.5, $data["v_bank"]."\n".$data["v_blz"]."\n".$data["v_kto"]."\n".$data["v_inh"], 0, 'L'); if ($data["sparte"]!=1 || $data["pdf_ohneversicherung"]) { $pdf->SetFillColor(255,255,255); $pdf->Rect(20,131,170,25,"F"); $pdf->SetXY(10,141); $pdf->MultiCell(190, 8, utf8_decode("- entfällt -"), 0, 'C'); } } elseif ($aktseite==4 && $data["art"]==1 && !empty($data["v_bemerkung"])) { $pdf->SetFont("arial", "B", 11); $pdf->SetXY(30, 230); $pdf->MultiCell(150, 5, "Zusatzbemerkungen:\n".$data["v_bemerkung"], 0, 'L'); } elseif ($aktseite==1 && $data["art"]==2) { $pdf->SetY(92); $pdf->MultiCell(190, 8, ($data["v_gewerbekunde"] ? $data["v_firma"].", " : "").$data["v_vorname"]." ".$data["v_name"]."\n".$data["v_str"]." ".$data["v_hnr"].", ".$data["v_plz"]." ".$data["v_ort"], 0, 'C'); $pdf->SetY($data["g"] ? 170 : 172); $text = ($data["v_anz"]>1 ? $data["v_anz"]." x " : "").utf8_decode($mietgegenstand); if ($data["g"]) { $text.= "\n".utf8_decode("inkl. Verlängerung der Gewährleistung um ".$data["g"]." Jahr".($data["g"]!=1 ? "e" : "")); } $pdf->MultiCell(190, 5, $text, 0, 'C'); $pdf->SetXY(138, 188); $pdf->MultiCell(50, 5, ($data["v_anz"]<=2 ? (count($data["f_fids"])>0 ? implode(", ", $data["f_fids"]) : "") : "- siehe Anlage 1 -"), 0, 'L'); $pdf->SetXY(80, 234.5); $pdf->MultiCell(50, 5, $je.number_format($data["a"],2,",",".")." ".chr(128), 0, 'C'); $pdf->SetXY(38, 261); $pdf->MultiCell(50, 5, $je.number_format($data["p"],2,",",".")." ".chr(128), 0, 'C'); $pdf->SetFont("arial", "", 10); $pdf->SetXY(160, 270); if ($data["pdf_nettorate"]) { $pdf->Line(28,273,130,273); } $pdf->MultiCell(40, 5, $je.number_format(!$data["pdf_nettorate"] ? ($data["p"]/119)*100 : $data["p"],2,",",".")." ".chr(128), 0, 'L'); $pdf->SetFont("arial", "B", 11); } elseif ($aktseite==2 && $data["art"]==2) { $pdf->SetXY(66.5, 43); $pdf->MultiCell(50, 5, ($data["f"]==6 && !$data["manuell"]) || $data["f"]==0 ? "unbegrenzte" : $je."< ".number_format($data["f"]*1000,0,",",".")." km", 0, 'C'); $pdf->SetXY(91, 95.5); $pdf->MultiCell(50, 9, $data["v_bank"]."\n".$data["v_blz"]."\n".$data["v_kto"]."\n".$data["v_inh"], 0, 'L'); $pdf->SetXY(48, 197.5); $pdf->MultiCell(20, 5, $je.$data["l"], 0, 'C'); if ($data["v_lvon"]!="0000-00-00") { $pdf->SetXY(130, 206.5); $pdf->MultiCell(80, 5, "Laufzeit:\n".datum($data["v_lvon"])." - ".datum($data["v_lbis"]), 0, 'L'); } $pdf->SetXY(10, 251); $pdf->MultiCell(37, 5, $data["s"] ? $je.number_format($data["s"],2,",",".")." ".chr(128) : "-", 0, 'R'); } elseif ($aktseite==3 && $data["art"]==2) { if ($data["pdf_ohneversicherung"]) { $pdf->SetFillColor(255,255,255); $pdf->Rect(20,206,170,25,"F"); $pdf->SetXY(10,216); $pdf->MultiCell(190, 8, utf8_decode("- entfällt -"), 0, 'C'); } } elseif ($aktseite==5 && $data["art"]==2) { if (!empty($data["v_bemerkung"])) { $pdf->SetFont("arial", "B", 11); $pdf->SetXY(20, 216); $pdf->MultiCell(170, 5, "Zusatzbemerkungen:\n".$data["v_bemerkung"], 0, 'C'); } if ($data["pdf_unterschrifthersteller"]) { $pdf->SetFont("arial", "", 10); $pdf->SetXY(20, 248); $pdf->MultiCell(170, 5, "......................................", 0, 'R'); $pdf->SetFont("arial", "", 7.5); $pdf->SetXY(20, 252); $pdf->MultiCell(170, 5, "(Hersteller)", 0, 'R'); } } # $y = 10; # foreach ($data as $key => $val) { # $pdf->Text(3, $y+=4, $key); # $pdf->Text(35, $y, $val); # } } if ($data["v_anz"]>2) { $pdf->AddPage('P', array($s['w'], $s['h'])); $pdf->SetFont("arial", "B", 11); $pdf->SetXY(10, 20); $pdf->MultiCell(190, 5, "Anlage 1\n\nAuflistung ".$sparte[$data["sparte"]]["kennung"], 0, 'C'); $pdf->SetXY(10, ($y=40)); for ($a=1; $a<=$data["v_anz"]; $a++) { $pdf->SetXY(30, $y+=8); $temp = @array_shift($data["f_fids"]); $pdf->MultiCell(150, 5, $a.". : ".(!empty($temp) ? $temp : ".........................................................................................................................."), 0, 'C'); } } */ if ($pdftyp!="vertrag_word") { $pdffile = $pfadpdf."/".($pdftyp=="angebot" ? "ang" : ($pdftyp=="tilgung" ? $vnr."_til" : ($pdftyp=="platzhalter" ? "ph" : $vnr)))."_".$zufall.".pdf"; $file = fopen($pdffile.".txt", "a+"); fwrite($file, date("d.m.Y H:i:s")."\n\ndata:\n".var_export($data, true)); fclose($file); $pdf->Output($pdffile, "F"); if (file_exists($pdffile)) { return true; } else { return false; } $pdf->Output($pdffile); } else { return true; } } function get_kundeninfo($knr, $return=false) { global $glob_vorlaeufig; if (($knr = intval($knr))) { $result = mysql_query("SELECT firma, gewerbe, name, vorname, str, hnr, plz, ort, vorlaeufig FROM efp_kunde WHERE knr=".$knr." AND NOT deleted"); if (mysql_num_rows($result)>0) { $row = mysql_fetch_assoc($result); $text = "#".$knr." | ".$glob_vorlaeufig[$row["vorlaeufig"]]." | ".($row["gewerbe"] ? "Gewerbekunde ".htmlspecialchars($row["firma"]) : "Privatkunde ")." | ".htmlspecialchars($row["name"].", ".$row["vorname"])." | ".htmlspecialchars($row["str"]." ".$row["hnr"].", ".$row["plz"]." ".$row["ort"]); if ($return) return array("text"=>$text); else echo "
".$text."
"; } else { if ($return) return array("text"=>"- Kundennummer unbekannt -", "error"=>1); } } } function get_haendler($hid=0) { $return = array(); $result = mysql_query("SELECT hid, firma, telefon, email, plz, ort FROM efp_haendler WHERE NOT deleted ".($hid ? " AND hid=".intval($hid) : "")." ORDER BY firma, plz, ort"); if (mysql_num_rows($result)>0) { while ($row = mysql_fetch_assoc($result)) $return[$row["hid"]] = $row; } if ($hid) return $return[$hid]; else return $return; } function check_rabatt($code) { global $rabatt; foreach ($rabatt as $key => $val) { if ($val["code"]==$code) return $key; } return false; } function ratenzahlung_v2($data, $fullreturn=false) { # m Modell # t Typ # c Farbe global $zinssatz_calc, $glob_system, $vertragsart, $sparte, $modell, $sonderausstattung, $glob_mwst; $r = array(); $counter = 0; $fahrleistung = range(1,6); $service = array(1=>47,81,96,111); $garantie = array(1=>134.45,235.29); # 160,280 brutto $sonderausw = array(); # if ($data["k_mwstsatz"]>0) { if ($data["k_mwstsatz"]!=null) { $glob_mwst = intval($data["k_mwstsatz"]); } $r["MWStSatz"] = $glob_mwst; $r["vertragsart"] = (!key_exists($data["art"], $vertragsart) ? 1 : intval($data["art"])); # 1 = ratenkauf $r["anzahl"] = ($data["v_anz"]<1 || $data["v_anz"]>500 ? 1 : intval($data["v_anz"])); $r["sparte"] = (!key_exists($data["sparte"], $sparte) ? 1 : intval($data["sparte"])); # 1 = emco-roller $r["ersatzfahrzeug"] = $r["anzahl"]>=10 && $r["sparte"]==1 ? 1 : 0; $r["gewerbekunde"] = ($data["gewerbekunde"] ? true : false); if ($r["gewerbekunde"]) { modell_gewerbeconfig(); } $r["modell"] = (key_exists($data["m"], $modell) ? intval($data["m"]) : 3); $r["typ"] = (key_exists($data["t"], $modell[$r["modell"]]) ? intval($data["t"]) : 1); $farbausw = $modell[$r["modell"]]["farben"]; $r["farbe"] = (!in_array($data["c"], $farbausw) ? array_shift($farbausw) : intval($data["c"])); $r["verkaufspreis_brutto"] = $modell[$r["modell"]][$r["typ"]]["uvp"]; if ($r["sparte"]!=1 || $data["admincalc"] && $data["s_p"]) { $r["verkaufspreis_brutto"] = intval($data["s_p"]); } $r["verkaufspreis"] = netto($r["verkaufspreis_brutto"]); # NETTO, steht brutto in $modell $maxmonate = $r["gewerbekunde"] ? 30 : 48; $r["laufzeit"] = ($data["l"]<1 || $data["l"]>$maxmonate ? $maxmonate : intval($data["l"])); $r["laufzeitjahre"] = ceil($r["laufzeit"]/12); $r["anzahlung"] = ($data["a"]<1 ? 0 : netto(intval($data["a"]))); # 100 NETTO, wird brutto übergeben $r["fahrleistung"] = (!in_array($data["f"], $fahrleistung) ? 6 : intval($data["f"])); # nur bei LEASING if ($r["vertragsart"]==2) { $r["restwert_tabelle"] = netto($modell[$r["modell"]][$r["typ"]]["restwert"][$r["fahrleistung"]][$r["laufzeitjahre"]]); $r["restwert"] = $r["restwert_tabelle"]; } else { $r["restwert"] = ($data["s"]<1 ? 0 : netto(intval($data["s"]))); # NETTO, auch schlussrate, wird brutto übergeben } if ($data["admincalc"] && $data["rw"]!="") { $r["restwert"] = toZahl($data["rw"]); } $r["rabatt"] = ($data["r"]<0 ? 0 : netto(intval($data["r"]))); # 10 NETTO, wird brutto übergeben $r["zubehoer"] = ($data["x"]<1 ? 0 : ($r["gewerbekunde"] ? intval($data["x"]) : netto(intval($data["x"])))); # NETTO, wird brutto übergeben $r["zubehoer_brutto"] = brutto($r["zubehoer"]); # NETTO, wird brutto übergeben $r["zubehoer_bez"] = $data["xb"]; $r["fracht"] = 0; if ($r["sparte"]==1) { # || $r["sparte"]==2 $r["fracht"] = 54.62; # NETTO if ($r["sparte"]==1 && $r["vertragsart"]==2) $r["fracht"] = $r["fracht"]*2; # bei leasing doppelte fracht } if ($data["kalk_fracht"]!="") { $r["fracht"] = toZahl($data["kalk_fracht"]); } $r["fracht_brutto"] = brutto($r["fracht"]); $r["anmeldung"] = 0; # NETTO $r["sonderausstattung"] = 0; $r["sonderausstattung_auswahl"] = "keine Sonderausstattung"; $r["sonderausstattung_id_key"] = ""; $r["sonderausstattung_id_anz"] = ""; if ($data["sa"]) { $temp = ""; $sa = @explode(",", $data["sa"]); $saa = @explode(",", $data["saa"]); foreach ($sa as $sakey => $key) { if (key_exists($key, $sonderausstattung)) { # PRÜFUNG, ob erforderliche teile ebenfalls angewählt! $tempanz = intval($saa[$sakey]); if ($tempanz>0) { $sonderausw[$key] = $tempanz; $temp.= ", ".$tempanz."x ".$sonderausstattung[$key]["bez"]; $r["sonderausstattung"]+= $tempanz * $sonderausstattung[$key]["preis"]; } } } $r["sonderausstattung_auswahl"] = substr($temp,2); $r["sonderausstattung_id_key"] = implode(",", array_keys($sonderausw)); $r["sonderausstattung_id_anz"] = implode(",", $sonderausw); } $r["sonderausstattung_brutto"] = brutto($r["sonderausstattung"]); if ($r["sparte"]==1) { $r["versicherung"] = 105.04; if ($r["gewerbekunde"]) { $r["vollschutz"] = 250; } else { $r["vollschutz"] = 100; } if ($r["modell"]==3 && $r["typ"]==4) { # Novum 77 $r["versicherung"] = 252; $r["anmeldung"] = 67.22; $r["vollschutz"] = 0; # raus 21.05.2015 } } if ($data["kalk_versicherung"]!="") { $r["versicherung"] = toZahl($data["kalk_versicherung"]); } if ($data["kalk_vollschutz"]!="") { $r["vollschutz"] = toZahl($data["kalk_vollschutz"]); } $r["marge"] = 0; # NETTO if ($data["ms"]) { $r["marge_satz"] = $data["ms"]; $r["marge"] = round(( ($r["verkaufspreis"]-$r["rabatt"]+$r["zubehoer"] )/100)*$r["marge_satz"],2); } $r["provision"] = 0; # NETTO if ($r["gewerbekunde"]) { $r["provision"] = 504.20; } $r["marge_dfp"] = 0; if ($r["sparte"]!=1) { $r["marge_dfp"] = 42; } $r["_".$counter++] = "----- BERECHNUNG ------"; $r["_".$counter++] = "verkaufspreis - anzahlung + fracht - rabatt + zubehoer + marge + anmeldung + provision + marge_dfp"; $r["_".$counter++] = $r["verkaufspreis"]." - ".$r["anzahlung"]." + ".$r["fracht"]." - ".$r["rabatt"]." + ".$r["zubehoer"]." + ".$r["marge"]." + ".$r["anmeldung"]." + ".$r["provision"]." + ".$r["marge_dfp"]; $temp = $r["verkaufspreis"] - $r["anzahlung"] + $r["fracht"] - $r["rabatt"] + $r["zubehoer"] + $r["marge"] + $r["anmeldung"] + $r["provision"] + $r["marge_dfp"]; $r["_".$counter++] = $temp; $r["garantieverl"] = ($data["g"]<1 || $data["g"]>2 ? 0 : intval($data["g"])); $r["garantieverlsumme_netto"] = 0; if (key_exists($r["garantieverl"], $garantie)) { $r["garantieverlsumme_netto"]+= $garantie[$r["garantieverl"]]; } $r["garantieverlsumme_brutto"] = brutto($r["garantieverlsumme_netto"]); $temp+= $r["garantieverlsumme_netto"]; $r["gesamtkosten_netto"] = $temp; $r["KOSTEN_netto"] = calc_zins($zinssatz_calc, $r["laufzeit"], $temp, $r["restwert"]*-1, 1); $temp = 0; if ($r["sparte"]==1) { for ($i=1; $i<=$r["laufzeitjahre"]; $i++) { $temp+= $r["vollschutz"]; } } $r["vollschutzsumme_netto"] = $temp; $r["vollschutzsumme_brutto"] = brutto($temp); $r["VOLLSCHUTZ_netto"] = calc_zins($zinssatz_calc, $r["laufzeit"], $temp, 0, 1); $temp = 0; if ($r["sparte"]==1 && !$r["gewerbekunde"]) { # nur Roller und Privatbereich for ($i=1; $i<=$r["laufzeitjahre"]; $i++) { $temp+= $service[$i]; } } if ($data["kalk_service"]!="") { $temp = toZahl($data["kalk_service"]); } $r["servicesumme_netto"] = $temp; $r["servicesumme_brutto"] = brutto($temp); $r["SERVICE_netto"] = calc_zins($zinssatz_calc, $r["laufzeit"], $temp, 0, 1); if ($r["sonderausstattung"]) { $r["_".$counter++] = "zzgl. Sonderausstattung ".$r["sonderausstattung"]." (".$r["sonderausstattung_auswahl"].")"; $r["SONDERAUSSTATTUNG_netto"] = calc_zins($zinssatz_calc, $r["laufzeit"], $r["sonderausstattung"], 0, 1); } if ($r["ersatzfahrzeug"]>0) { $r["ersatzsumme"] = 2348.32 + $r["fracht"] + ($r["versicherung"]*$r["laufzeitjahre"]); $r["ersatzanteil"] = calc_zins($zinssatz_calc, $r["laufzeit"], $r["ersatzsumme"], 0, 1); $r["ersatzanteil_profahrzeug"] = round($r["ersatzanteil"]/$r["anzahl"],2); $r["ersatzanteil_profahrzeug_inkl"] = $r["ersatzanteil_profahrzeug"] + $r["VOLLSCHUTZ_netto"] + $r["SERVICE_netto"]; } $r["ratenetto_profahrzeug"] = $r["KOSTEN_netto"] + $r["VOLLSCHUTZ_netto"] + $r["SERVICE_netto"] + $r["ersatzanteil_profahrzeug_inkl"]; $r["_".$counter++] = $r["anzahl"]." x ".$r["ratenetto_profahrzeug"]." + ".$r["SONDERAUSSTATTUNG_netto"]; $r["ratenetto"] = ($r["anzahl"] * $r["ratenetto_profahrzeug"]) + $r["SONDERAUSSTATTUNG_netto"]; # alle Posten, die vorsteuerabzugsberechtigt sind # $temp = calc_zins($zinssatz_calc, $r["laufzeit"], $r["ratenetto"], $r["restwert"], 1); # vorsteuerabzugsberechtigt $r["versicherung_netto"] = $r["anzahl"] * ($r["versicherung"]*$r["laufzeitjahre"]); $r["versicherung_brutto"] = brutto($r["versicherung_netto"]); $r["versicherungsrate_brutto"] = calc_zins($zinssatz_calc, $r["laufzeit"], $r["versicherung_brutto"], 0, 1); $r["ratemwst"] = round($r["ratenetto"]*($glob_mwst/100), 2); $r["ratebrutto"] = $r["ratenetto"] + $r["ratemwst"]; $r["rate"] = $r["ratebrutto"] + $r["versicherungsrate_brutto"]; $r["rate"] = round($r["rate"]/$r["anzahl"],2); $r["zusatzsumme"] = $r["gewerbekunde"] ? $r["vollschutzsumme_netto"] + $r["versicherungsrate_brutto"]*$r["laufzeit"] : $r["vollschutzsumme_brutto"] + $r["versicherungsrate_brutto"]*$r["laufzeit"] + $r["servicesumme_brutto"]; # $r["vollschutzsumme_brutto"]+$r["servicesumme_brutto"]+$r["versicherung_brutto"]; if ($r["verkaufspreis"]<=0) { $r["rate"] = $r["ratebrutto"] = $r["zusatzsumme"] = $r["versicherungsrate_brutto"] = 0; } $return = array( "gewerbe" => $r["gewerbekunde"] ? true : false, "rate" => $r["rate"], "ratef" => number_format($r["rate"],2,",","."), "ratebrutto" => zahl($r["ratebrutto"])." brutto zzgl.
".zahl($r["versicherungsrate_brutto"])." Versicherung", "ratenetto" => zahl($r["ratenetto"]), "zusatz" => $r["zusatzsumme"], "zusatzf" => number_format($r["zusatzsumme"],2,",","."), "stand" => date("d.m.Y H:i:s"), "data" => $data, "einzeldata" => ($fullreturn || $data["admincalc"] ? $r : array()), ); if ($r["gewerbekunde"]) { } if ($glob_system=="test" || $fullreturn || $_SESSION["admin_frontend"]) { $return["debug"] = $r; } # $r = array("rate"=>$rate, "ratef"=>number_format($rate,2,",","."), "ratenetto"=>$ratenetto, "ratenettof"=>number_format($ratenetto,2,",","."), "summe"=>$summe, "summef"=>number_format($summe,2,",","."), "uvp"=>$akthaendlerpreis, "zusatz"=>array_sum($aktzusatzkosteneinzeln), "zusatzf"=>number_format(array_sum($aktzusatzkosteneinzeln),2,",","."), "data"=>array("art"=>$aktart, "l"=>$aktlaufzeitmonate,"a"=>$aktanzahlung,"m"=>$aktmodell,"t"=>$akttyp,"r"=>$aktrabatt,"s"=>$aktschlussrate,"f"=>$aktfahrleistung,"g"=>$aktgarantieverl,"u"=>$aktueber23, "c"=>$aktcolor, "x"=>$aktextrasumme, "ms"=>$aktmargesatz, "mb"=>$aktmargebetrag, "z"=>($glob_system=="test" || $returndebug ? $zusatzsumme : array())), "stand"=>date("d.m.Y H:i:s"), "rest"=>$restwert, "debug"=>($glob_system=="test" || $returndebug ? $echo : ""), "einzeldata"=>($glob_system=="test" || $returndebug) ? $t : array()); return $return; } /* # function ratenzahlung($art=1, $l=4,$a=500,$m=2,$t=1,$r=0,$s=0,$f=6,$g=0,$u=0,$c=0,$x=0,$s_preis=0, $returndefault=false, $returndebug=false) { function ratenzahlung($data, $returndefault=false, $returndebug=false, $sparte=1) { global $vertragsart, $modell, $zinssatz_calc, $zinssatz_markt, $glob_system; if (isset($data["sparte"])) $sparte = intval($data["sparte"]); $gewerbekunde = ($data["gewerbekunde"] ? true : false); # ALTE zuweisung über einzeln übergebene variablen # $aktart = intval($art); if (!key_exists($aktart, $vertragsart)) $aktart=1; # $aktlaufzeit = intval($l); if ($aktlaufzeit<1 || $aktlaufzeit>4) $aktlaufzeit = 4; # $aktanzahlung = (isset($a) ? intval($a) : -1); if ($aktanzahlung<0) $aktanzahlung = 500; elseif ($aktanzahlung>3000) $aktanzahlung = 3000; # $aktmodell = intval($m); if (!key_exists($aktmodell, $modell)) $aktmodell = 2; # array_shift(array_keys($modell)); # $akttyp = intval($t); if (!key_exists($akttyp, $modell[$aktmodell])) $akttyp = 1; # $aktrabatt = intval($r); if ($aktrabatt<0 || $aktrabatt>5000) $aktrabatt = 5000; # $rabatt["emco"]["rabatt"]; # $aktschlussrate = intval($s); if ($aktschlussrate<0) $aktschlussrate = 0; elseif ($aktschlussrate>750) $aktschlussrate = 750; # $aktfahrleistung = intval($f); if (!in_array($f, array(1,2,3,4,5,6))) $aktfahrleistung = 6; # unberenzt # $aktgarantieverl = intval($g); if ($g<0 || $g>2) $aktgarantieverl = 0; # if ($aktlaufzeit-2>$aktgarantieverl) $aktgarantieverl = $aktlaufzeit-2; # $aktueber23 = intval($u); if ($aktueber23<0 || $aktueber23>1) $aktueber23 = 0; # $farbausw = $modell[$aktmodell]["farben"]; # $aktcolor = intval($c); if (!in_array($aktcolor, $farbausw)) $aktcolor = array_shift($farbausw); # $aktextrasumme = intval($x); if ($aktextrasumme<0) $aktextrasumme = 0; $aktart = intval($data["art"]); if (!key_exists($aktart, $vertragsart)) $aktart=1; # if ($data["admincalc"]) { # default-wert setzen if (intval($data["l"])<=0) $data["l"] = 12; $aktlaufzeitmonate = intval($data["l"]); $aktlaufzeit = ceil($aktlaufzeitmonate/12); # } else { # $aktlaufzeit = intval($data["l"]); if ($aktlaufzeit<1 || $aktlaufzeit>4) $aktlaufzeit = 4; # $aktlaufzeitmonate = $aktlaufzeit*12; # } $aktanzahlung = (isset($data["a"]) ? intval($data["a"]) : -1); if ($aktanzahlung<0) $aktanzahlung = ($sparte==1 ? 500 : 0); elseif ($aktanzahlung>3000) $aktanzahlung = 3000; $aktrabatt = intval($data["r"]); if ($aktrabatt<0 || $aktrabatt>5000) $aktrabatt = 5000; # $rabatt["emco"]["rabatt"]; $aktschlussrate = intval($data["s"]); if ($aktschlussrate<0) $aktschlussrate = 0; elseif ($aktschlussrate>750) $aktschlussrate = 750; $aktfahrleistung = intval($data["f"]); if (!in_array($aktfahrleistung, array(1,2,3,4,5,6))) $aktfahrleistung = 6; # unberenzt $aktextrasumme = intval($data["x"]); if ($aktextrasumme<0) $aktextrasumme = 0; $aktrestwert = intval($data["rw"]); if ($aktrestwert>5000) $aktrestwert = 5000; $aktfrachtkosten = 65; if ($sparte==1) { $aktmodell = intval($data["m"]); if (!key_exists($aktmodell, $modell)) $aktmodell = 3; # array_shift(array_keys($modell)); $akttyp = intval($data["t"]); if (!key_exists($akttyp, $modell[$aktmodell])) $akttyp = 1; $aktgarantieverl = intval($data["g"]); if ($aktgarantieverl<0 || $aktgarantieverl>2) $aktgarantieverl = 0; # if ($aktlaufzeit-2>$aktgarantieverl) $aktgarantieverl = $aktlaufzeit-2; $aktueber23 = intval($data["u"]); if ($aktueber23<0 || $aktueber23>1) $aktueber23 = 0; $farbausw = $modell[$aktmodell]["farben"]; $aktcolor = intval($data["c"]); if (!in_array($aktcolor, $farbausw)) $aktcolor = array_shift($farbausw); $restwert = 0; if (!$data["rw"]) { if ($aktfahrleistung<6) { $restwert = $modell[$aktmodell][$akttyp]["restwert"][$aktfahrleistung][$aktlaufzeit]; $restwert-= 50; } } else { $restwert = $aktrestwert; } # $aktzusatzkosten = calc_zusatzkosten($aktmodell, $akttyp, $aktlaufzeit, $aktueber23); $aktzusatzkosteneinzeln = calc_zusatzkosten($aktmodell, $akttyp, $aktlaufzeit, $aktueber23); $aktgarantieverlwert = ($aktgarantieverl==1 ? 160 : ($aktgarantieverl==2 ? 280 : 0)); $akthaendlerpreis = $modell[$aktmodell][$akttyp]["uvp"]; } else { $restwert = $aktrestwert; $s_preis = intval($data["s_p"]); # für sparten>1 --> nur kalkulation $akthaendlerpreis = $s_preis; $aktfrachtkosten = 0; } # $akthaendlerpreis = $modell[$aktmodell][$akttyp]["uvp"]; if ($data["admincalc"]) { $returndebug = true; $restwert = $aktrestwert; $akthaendlerpreis = intval($data["einkauf"]); if (!empty($data["ac_zusatz"])) { $aktzusatzkosten = intval($data["ac_zusatz"]); } } if ($data["ms"]) { $aktmargesatz = $data["ms"]; $aktmargebetrag = round(($akthaendlerpreis/100)*$aktmargesatz,2); } $echo = "Kunde ".($gewerbekunde ? "Gewerbe" : "Privat")."
"; $echo.= "Art ".$aktart." (".$vertragsart[$aktart]["bez"].")
"; $echo.= "Laufzeit ".$aktlaufzeit." (".($aktlaufzeitmonate).")
"; $echo.= "Anzahlung ".$aktanzahlung."
"; $echo.= "Modell ".$aktmodell."
"; $echo.= "Typ ".$akttyp."
"; # $echo.= "Zusatzkosten ".$aktzusatzkosten."
"; $echo.= "Zusatzkosten Versicherung ".$aktzusatzkosteneinzeln["versicherung"]."
"; $echo.= "Zusatzkosten Vollkasko ".$aktzusatzkosteneinzeln["vollkasko"]."
"; $echo.= "Zusatzkosten Service ".$aktzusatzkosteneinzeln["service"]."
"; # $echo.= "Zinssatz ".$zinssatz_calc."
"; $echo.= "Rabatt ".$aktrabatt."
"; $echo.= "Sonderzubehör ".$aktextrasumme."
"; $echo.= "Schlussrate ".$aktschlussrate."
"; $echo.= "Fahrleistung ".($aktfahrleistung==6 ? "unbegrenzt" : $aktfahrleistung."000")."
"; $echo.= "Garantieverl ".$aktgarantieverl.($aktgarantieverl ? " (".$aktgarantieverlwert.")" : "")."
"; $echo.= "Über23 ".($aktueber23 ? "ja, nur darüber" : "nein, ALLE")."
"; $echo.= "Restwert ".$restwert."
"; $echo.= "UVP ".$akthaendlerpreis."
"; $echo.= "Marge ".$aktmargesatz." (".$aktmargebetrag.")
"; $echo.= "Spartenpreis ".$s_preis."
"; $echo.= "Frachtkosten ".$aktfrachtkosten."

"; if (!$returndefault) { if ($sparte==1) { $ratensumme = $akthaendlerpreis + $aktmargebetrag - $aktrabatt - $aktanzahlung - $aktschlussrate + $aktgarantieverlwert - $restwert + $aktextrasumme; if ($data["admincalc"] && !empty($data["ac_zusatz"])) { $ratensumme+= $aktzusatzkosten; } else { for ($i=1; $i<=$aktlaufzeit; $i++) { $zwerg = calc_zusatzkosten($aktmodell, $akttyp, $aktlaufzeit, $aktueber23, $i); $echo.= "Zusatzkosten Versicherung Jahr ".$i." - ".$zwerg["versicherung"]."
"; $zusatzsumme["versicherung"]+= $zwerg["versicherung"]; $echo.= "Zusatzkosten Vollkasko Jahr ".$i." - ".$zwerg["vollkasko"]."
"; $zusatzsumme["vollkasko"]+= $zwerg["vollkasko"]; $echo.= "Zusatzkosten Service Jahr ".$i." - ".$zwerg["service"]."

"; $zusatzsumme["service"]+= $zwerg["service"]; $ratensumme+= array_sum($zwerg); } $echo.= "Zusatzsumme Versicherung+VK ".($zusatzsumme["versicherung"]+$zusatzsumme["vollkasko"])."
"; $echo.= "Zusatzsumme Service ".$zusatzsumme["service"]."
"; $t["rollernetto"] = netto($akthaendlerpreis); $t["garantienetto"] = netto($aktgarantieverlwert); $t["zubehoernetto"] = netto($aktextrasumme); # X $t["frachtnetto"] = netto($aktfrachtkosten); # X $t["rabattnetto"] = netto($aktrabatt); # X $t["verkaufnetto"] = $t["rollernetto"]+$t["garantienetto"]+$t["zubehoernetto"]+$t["frachtnetto"]-$t["rabattnetto"]; # X $t["verkaufbrutto"] = brutto($t["verkaufnetto"]); $t["versicherunginkl"] = $zusatzsumme["versicherung"]+$zusatzsumme["vollkasko"]; $t["wartungnetto"] = netto($zusatzsumme["service"]); $t["zinssatzeffektiv"] = $zinssatz_calc; $t["zinsenverkauf"] = round(($t["verkaufnetto"] * $zinssatz_calc)/100, 2); $t["zinsenwartung"] = round(($t["wartungnetto"] * $zinssatz_calc)/100, 2); $t["zinsenversicherung"] = round(($t["versicherunginkl"] * $zinssatz_calc)/100, 2); $t["zinsenzubehoer"] = round(($t["zubehoernetto"] * $zinssatz_calc)/100, 2); # X $t["zinsenfracht"] = round(($t["frachtnetto"] * $zinssatz_calc)/100, 2); # X $t["zinsengesamt"] = $t["zinsenverkauf"]+$t["zinsenwartung"]+$t["zinsenversicherung"]+$t["zinsenzubehoer"]+$t["zinsenfracht"]; # X $t["gesamtkosten"] = $t["verkaufbrutto"]+$t["versicherunginkl"]+$t["wartungnetto"]+$t["zinsengesamt"]; $t["mtl_abschlag"] = round(($t["verkaufnetto"]-$aktrestwert)/$aktlaufzeitmonate, 2); $t["mtl_wartung"] = round($t["wartungnetto"]/$aktlaufzeitmonate, 2); $t["mtl_zubehoer"] = round($t["zubehoernetto"]/$aktlaufzeitmonate, 2); # X $t["mtl_fracht"] = round($t["frachtnetto"]/$aktlaufzeitmonate, 2); # X $t["mtl_zinsen"] = round($t["zinsengesamt"]/$aktlaufzeitmonate, 2); $t["mtl_abzuganzahlung"] = round($aktanzahlung/$aktlaufzeitmonate, 2); $t["mtl_ratenetto_exkl"] = $t["mtl_abschlag"]+$t["mtl_wartung"]+$t["mtl_zubehoer"]+$t["mtl_fracht"]+$t["mtl_zinsen"]-$t["mtl_abzuganzahlung"]; # X $t["mtl_ratenetto_exkl_mwst"] = mwst($t["mtl_ratenetto_exkl"]); $t["mtl_ratebrutto_exkl"] = $t["mtl_ratenetto_exkl"]+$t["mtl_ratenetto_exkl_mwst"]; $t["mtl_versicherung"] = round($t["versicherunginkl"]/$aktlaufzeitmonate, 2); $t["mtl_ratebrutto_inkl"] = $t["mtl_ratebrutto_exkl"]+$t["mtl_versicherung"]; $t["mtl_ratenetto_inkl"] = $t["mtl_ratebrutto_inkl"]-$t["mtl_ratenetto_exkl_mwst"]; $echo.= ""; foreach ($t as $key => $val) { $echo.= ""; } $echo.= "
".$key."".$val."
"; $ratensumme = $t["mtl_ratebrutto_inkl"]*$aktlaufzeitmonate; # $zwerg = calc_zusatzkosten($aktmodell, $akttyp, $aktlaufzeit, $aktueber23, 1); # $echo.= "Zusatz ".$zwerg." Jahr 1
"; # $ratensumme+= $zwerg; # # $zusatzsumme = $zwerg; # if ($aktlaufzeit>1) { # for ($i=2; $i<=$aktlaufzeit; $i++) { # # $wert = calc_zusatzkosten($aktmodell, $akttyp, $aktlaufzeit, $aktueber23, $i); # # ABZINSEN RAUS # # $zwerg = $wert/pow(1+($zinssatz_markt/100),$i-1); # $zwerg = $wert; # # $ratensumme+= $zwerg; # $zusatzsumme+= $zwerg; # # $echo.= "Zusatz ".$wert." - ".$zwerg." Jahr ".$i."
"; # } # } # # $zusatzsumme = round($zusatzsumme,2); # $echo.= "Zusatzsumme ".$zusatzsumme."

"; } } else { $ratensumme = $s_preis + $aktzusatzkosten - $aktrabatt - $aktanzahlung - $aktschlussrate - $restwert + $aktextrasumme; } if ($sparte==1) { $rate = $t["mtl_ratebrutto_inkl"]; $ratenetto = $t["mtl_ratenetto_inkl"]; } else { $rate = calc_zins($zinssatz_calc, $aktlaufzeitmonate, $ratensumme); $ratenetto = netto($rate); } $echo.= "Ratensumme ".$ratensumme."
"; if ($aktschlussrate>0) { # $rate+= (($zinssatz_calc/12)/100)*$aktschlussrate; $echo.= "inkl. Schlussrate ".$rate."
"; } if ($rate<=0) { $rate = $ratenetto = "?"; } $echo.= "RATE ".$rate."

"; $echo.= "UVP ".$akthaendlerpreis."
"; $summe = $aktlaufzeitmonate*$rate; $echo.= ($aktlaufzeitmonate)." x ".$rate." = ".$summe; # $return = array("rate"=>$rate, "ratef"=>number_format($rate,2,",","."), "ratenetto"=>$ratenetto, "ratenettof"=>number_format($ratenetto,2,",","."), "summe"=>$summe, "summef"=>number_format($summe,2,",","."), "uvp"=>$akthaendlerpreis, "zusatz"=>$aktzusatzkosten, "zusatzf"=>number_format($aktzusatzkosten,2,",","."), "data"=>array("art"=>$aktart, "l"=>$aktlaufzeitmonate,"a"=>$aktanzahlung,"m"=>$aktmodell,"t"=>$akttyp,"r"=>$aktrabatt,"s"=>$aktschlussrate,"f"=>$aktfahrleistung,"g"=>$aktgarantieverl,"u"=>$aktueber23, "c"=>$aktcolor, "x"=>$aktextrasumme, "ms"=>$aktmargesatz, "mb"=>$aktmargebetrag, "z"=>($glob_system=="test" || $returndebug ? $zusatzsumme : 0)), "stand"=>date("d.m.Y H:i:s"), "rest"=>($aktrestwert>0 ? $restwert : ($glob_system=="test" || $returndebug ? ($aktfahrleistung==6 ? $restwert+150 : $restwert+100) : 0)), "debug"=>($glob_system=="test" || $returndebug ? $echo : "")); # $return = array("rate"=>$rate, "ratef"=>number_format($rate,2,",","."), "ratenetto"=>$ratenetto, "ratenettof"=>number_format($ratenetto,2,",","."), "summe"=>$summe, "summef"=>number_format($summe,2,",","."), "uvp"=>$akthaendlerpreis, "zusatz"=>$aktzusatzkosten, "zusatzf"=>number_format($aktzusatzkosten,2,",","."), "data"=>array("art"=>$aktart, "l"=>$aktlaufzeitmonate,"a"=>$aktanzahlung,"m"=>$aktmodell,"t"=>$akttyp,"r"=>$aktrabatt,"s"=>$aktschlussrate,"f"=>$aktfahrleistung,"g"=>$aktgarantieverl,"u"=>$aktueber23, "c"=>$aktcolor, "x"=>$aktextrasumme, "ms"=>$aktmargesatz, "mb"=>$aktmargebetrag, "z"=>($glob_system=="test" || $returndebug ? $zusatzsumme : 0)), "stand"=>date("d.m.Y H:i:s"), "rest"=>$restwert, "debug"=>($glob_system=="test" || $returndebug ? $echo : "")); $return = array("rate"=>$rate, "ratef"=>number_format($rate,2,",","."), "ratenetto"=>$ratenetto, "ratenettof"=>number_format($ratenetto,2,",","."), "summe"=>$summe, "summef"=>number_format($summe,2,",","."), "uvp"=>$akthaendlerpreis, "zusatz"=>array_sum($aktzusatzkosteneinzeln), "zusatzf"=>number_format(array_sum($aktzusatzkosteneinzeln),2,",","."), "data"=>array("art"=>$aktart, "l"=>$aktlaufzeitmonate,"a"=>$aktanzahlung,"m"=>$aktmodell,"t"=>$akttyp,"r"=>$aktrabatt,"s"=>$aktschlussrate,"f"=>$aktfahrleistung,"g"=>$aktgarantieverl,"u"=>$aktueber23, "c"=>$aktcolor, "x"=>$aktextrasumme, "ms"=>$aktmargesatz, "mb"=>$aktmargebetrag, "z"=>($glob_system=="test" || $returndebug ? $zusatzsumme : array())), "stand"=>date("d.m.Y H:i:s"), "rest"=>$restwert, "debug"=>($glob_system=="test" || $returndebug ? $echo : ""), "einzeldata"=>($glob_system=="test" || $returndebug) ? $t : array()); } else { $return = array($aktart, $aktlaufzeitmonate, $aktanzahlung, $aktmodell, $akttyp, $aktrabatt, $aktschlussrate, $aktfahrleistung, $aktgarantieverl, $aktueber23, $aktcolor, $aktextrasumme, $restwert, $akthaendlerpreis); } return $return; } */ function netto($zahl) { global $glob_mwst; return round(($zahl/(100+$glob_mwst))*100, 2); } function brutto($zahl) { global $glob_mwst; return round($zahl*(1+($glob_mwst/100)), 2); } function mwst($zahl) { global $glob_mwst; return round($zahl*($glob_mwst/100), 2); } function recalc_ertrag($vnr, $dbupdate=false) { global $modell; $resulte = mysql_query("SELECT v.*, SUM(f.ansch_preis) sumek FROM efp_vertrag v, efp_fahrzeug f WHERE v.vnr=f.vnr AND f.aktiv AND v.vnr=".$vnr." GROUP BY v.vnr"); $rowe = mysql_fetch_assoc($resulte); # $temprest = $modell[$rowe["modell_id"]][$rowe["typ_id"]]["restwert"][$rowe["fahrleistung"]][ceil($rowe["laufzeit"]/12)]; $temprest = $rowe["restwert"]; $ertrag = calc_ertrag($rowe["summe"], $rowe["anzahl"], $rowe["anzahlung"], $rowe["schlussrate"], $rowe["zusatzsumme"], $rowe["sumek"], $temprest, $rowe["margebetrag"]); if ($dbupdate) { $resultuv = mysql_query("UPDATE efp_vertrag SET ertrag=".doubleval($ertrag)." WHERE vnr=".intval($vnr)); } return $ertrag; } function calc_ertrag($summe, $anz, $anzahlung=0, $schlussrate=0, $zusatzsumme=0, $einkaufspreis=0, $restwert=0, $margebetrag=0) { #print_ar(func_get_args()); return doubleval(round($summe*$anz + $anzahlung*$anz + $schlussrate*$anz - $zusatzsumme*$anz - $einkaufspreis + $restwert*$anz - $margebetrag , 2)); } function calc_zusatzkosten($aktmodell, $akttyp, $aktlaufzeit, $ueber23, $jahr=0, $einzeln=true) { global $modell, $aktzusatzkosteneinzeln; $aktzusatzkosten = 0; $aktzusatzkosteneinzeln = array(); if ($jahr==0) { # alle jahre, ALTE BERECHNUNG for ($i=1; $i<=$aktlaufzeit; $i++) { $aktzusatzkosten+= $modell[$aktmodell][$akttyp]["versicherung"][$ueber23][$i]; $aktzusatzkosteneinzeln["versicherung"]+= $modell[$aktmodell][$akttyp]["versicherung"][$ueber23][$i]; $aktzusatzkosten+= $modell[$aktmodell][$akttyp]["vollkasko"][$i]; $aktzusatzkosteneinzeln["vollkasko"]+= $modell[$aktmodell][$akttyp]["vollkasko"][$i]; $aktzusatzkosten+= $modell[$aktmodell][$akttyp]["service"][$i]; $aktzusatzkosteneinzeln["service"]+= $modell[$aktmodell][$akttyp]["service"][$i]; } } else { $aktzusatzkosten+= $modell[$aktmodell][$akttyp]["versicherung"][$ueber23][$jahr]; $aktzusatzkosteneinzeln["versicherung"]+= $modell[$aktmodell][$akttyp]["versicherung"][$ueber23][$jahr]; $aktzusatzkosten+= $modell[$aktmodell][$akttyp]["vollkasko"][$jahr]; $aktzusatzkosteneinzeln["vollkasko"]+= $modell[$aktmodell][$akttyp]["vollkasko"][$jahr]; $aktzusatzkosten+= $modell[$aktmodell][$akttyp]["service"][$jahr]; $aktzusatzkosteneinzeln["service"]+= $modell[$aktmodell][$akttyp]["service"][$jahr]; } if ($einzeln) { return $aktzusatzkosteneinzeln; } else{ return $aktzusatzkosten; } } function calc_zins($Rate, $Nper, $Pv, $Fv=0, $myType=0) { /* $Rate Zinssatz p.a. $Nper Perioden in Monaten $Pv Anschaffungswert $Fv Restwert am Ende $myType 1=vorschüssig, 0=nachschüssig */ $gd_i = $Rate/12; $gd_i100 = $gd_i/100; $gd_i1 = $gd_i100+1; $gd_ipow = 1/pow( $gd_i1, $Nper ); $gd_p0 = -$Pv-$Fv*$gd_ipow; $gd_p100 = $gd_p0*$gd_i100; $nachschuss = $gd_p100/(1-$gd_ipow); return round($nachschuss/(1+$gd_i100*$myType),2)*-1; } function pathgen($cat_id ,$pathfinder=false) { global $glob_bezcat; $href = $link = ""; $temp = array_reverse(pathgen_get($cat_id)); $href = "index.php?cat_id=".$temp[0]; $link = "".htmlspecialchars($glob_bezcat[$temp[0]]["cat_bez"]).""; if ($temp[2]) { $href.= "&subcat_id=".$temp[2]; $link.= " » ".htmlspecialchars($glob_bezcat[$temp[1]]["cat_bez"])." » ".htmlspecialchars($glob_bezcat[$temp[2]]["cat_bez"]).""; } elseif ($temp[1]) { $href.= "&subcat_id=".$temp[1]; $link.= " » ".htmlspecialchars($glob_bezcat[$temp[1]]["cat_bez"]).""; } return (!$pathfinder ? $href : $link); } function pathgen_get($cat_id, $path=array()) { global $glob_bezcat; $path[] = $cat_id; if ($glob_bezcat[$cat_id]["cat_subzu"]) { $path = pathgen_get($glob_bezcat[$cat_id]["cat_subzu"], $path); } return $path; } function menu_read($cat_id=0) { global $glob_menu, $glob_bezcat, $glob_title; $glob_menu = $glob_bezcat = $altsub = $prev = array(); $alttiefe = 1; $glob_bezcat[0] = array("cat_bez"=>$glob_title, "cat_online"=>1, "cat_startid"=>-1); # damit es das erste element ist $result = mysql_query("SELECT c.cat_id, c.cat_bez, c.cat_tiefe, c.cat_pos, c.cat_subzu, c.cat_online, c.cat_startid, c.link_header, c.link_topmenu, c.link_menu, c.link_footer, COUNT(x.rel_id) anzart FROM cms_cat c LEFT JOIN cms_art_cat x ON c.cat_id=x.cat_id AND NOT x.rel_deleted WHERE NOT c.cat_deleted ".($cat_id>0 ? "AND c.cat_id=".intval($cat_id) : "")." GROUP BY c.cat_id ORDER BY c.cat_pos"); if (mysql_num_rows($result)>0) { while ($row = mysql_fetch_assoc($result)) { if ($row["cat_tiefe"]==1) unset($prev[2]); #!=$alttiefe) unset($prev); $glob_bezcat[$row["cat_id"]] = $row; $glob_bezcat[$row["cat_subzu"]]["sub"][] = $row["cat_id"]; if ($prev[$row["cat_tiefe"]]) { $glob_bezcat[$row["cat_id"]]["prev"] = $prev[$row["cat_tiefe"]]; $glob_bezcat[$prev[$row["cat_tiefe"]]]["next"] = $row["cat_id"]; } if ($row["cat_tiefe"]==1) { $glob_menu[$row["cat_id"]] = $row; $glob_bezcat[$row["cat_id"]]["path"] = array(); } elseif ($row["cat_tiefe"]>1) { $glob_bezcat[$row["cat_id"]]["path"][] = $row["cat_subzu"]; if ($row["cat_tiefe"]==2) { $glob_menu[$row["cat_subzu"]]["sub"][$row["cat_id"]] = $row; } elseif ($row["cat_tiefe"]==3) { $glob_menu[$altsub[$row["cat_tiefe"]-1]]["sub"][$row["cat_subzu"]]["sub"][$row["cat_id"]] = $row; $glob_bezcat[$row["cat_id"]]["path"][] = $glob_bezcat[$row["cat_subzu"]]["path"][0]; } } $altsub[$row["cat_tiefe"]] = $row["cat_subzu"]; $prev[$row["cat_tiefe"]] = $row["cat_id"]; $alttiefe = $row["cat_tiefe"]; } } } function menu_children($id) { global $glob_bezcat; $data = array(); if (count($glob_bezcat[$id]["sub"])>0) { foreach ($glob_bezcat[$id]["sub"] as $id2) { $data[] = $id2; $data = array_merge($data, menu_children($id2)); } } return $data; } function messagebox($msg, $col="r") { if (!empty($msg)) { echo "
".$msg."
"; } } function print_ar($arr) { if (is_array($arr) || is_object($arr)) { echo "
";
			print_r($arr);
			echo "
"; } else { echo "_____".htmlspecialchars($arr)."_____"; } } function farbwechsel ($col="") { global $bgclass; return !empty($col) ? "zeile_".$col : ($bgclass=="zeile_1" ? $bgclass = "zeile_2" : $bgclass = "zeile_1"); } function datum ($dat, $punktinstrich=false, $mituhrzeit=false) { if ($dat=="0000-00-00 00:00:00" || $dat=="0000-00-00") return "-"; else { if (!$punktinstrich) { if (strlen($dat)>7) { return implode(".", array_reverse(explode("-", substr($dat,0,10)))).($mituhrzeit ? substr($dat,10) : ""); } else { return substr($dat,5,2)."/".substr($dat,0,4); } } else { $temp = explode(".", $dat); if (@checkdate($temp[1],$temp[0],$temp[2])) { return date("Y-m-d", mktime(0,0,0,$temp[1],$temp[0],$temp[2])); } else return false; } } } function zahl($zahl, $nachkomma=2, $miteuro=true) { return number_format($zahl, $nachkomma, ",", ".").($miteuro ? " €" : ""); } function pdfzahl($zahl) { return str_replace("€", chr(128), zahl($zahl)); } function toZahl($wert) { return doubleval(str_replace(",", ".", str_replace(".", "", $wert))); } function check_email($mail) { if (!empty($mail)) { if (eregi("^[0-9a-z]([-_.]?[0-9a-z])*@[0-9a-z]([-.]?[0-9a-z])*\\.[a-z]{2,4}$", $mail)) return true; else return false; } else return false; } function cron_log($job, $affected, $output) { $result = mysql_query("INSERT INTO efp_cronjob (cron_id, cronbez, datum, ausgabe, affected) VALUES (NULL, '".mysql_real_escape_string($job)."', NOW(), '".mysql_real_escape_string($output)."', ".intval($affected).") "); } ?>