function ma2_pdf($id){ $return=""; $db=new datenbank(); $query="select * from rechnungen,mahnungen where rechnungen.renr=mahnungen.renr and mahnungen.manr='$id'"; $result=$db->query($query); $rechnung=$db->get_object($result); $result_kunde=$db->query("select * from kunden where kdnr=$rechnung->kunde"); $kunde=$db->get_object($result_kunde); $pdf=new pdf('P', 'mm', 'A4'); $pdf->Open(); $pdf->AddPage(); $pdf->empfaenger($kunde->firma, $kunde->strasse." ".$kunde->hausnummer, $kunde->plz." ".$kunde->ort, $rechnung->manr, $rechnung->datum); $pdf->SetFont('Arial','B',12); $pdf->Cell(80,5,"Mahnung"); $pdf->Ln(10); $pdf->SetFont("Arial", "", 10); $pdf->Write(5, "Sehr geehrte Damen und Herren,\nleider konnte ich noch keinen Zahlungseingang zur Rechnung $rechnung->renr feststellen. Hier die Auflistung der aufgrund dieser Rechnung unbezahlten Posten::\n\n"); $query="select posten.datum as Datum, posten.kommentar as Beschreibung, posten.anzahl as Anzahl, produkte.name as Artikel, produkte.preis as Preis, (produkte.preis*posten.anzahl) as Summe from posten, produkte where posten.rechnung='$rechnung->renr' and produkte.id=posten.produkt"; $result=$db->query($query); $header=array("Datum", "Beschreibung", "Anzahl", "Artikel", "Preis", "Summe"); while($data[]=$db->get_row($result)) { } $gammel=array_pop($data); $pdf->table($header, $data); $pdf->Ln(); $result=$db->query("SELECT Sum( posten.anzahl * produkte.preis ) AS Gesamt, Sum( posten.anzahl * produkte.preis * mwst.satz / 100 ) AS MWST, mwst.satz FROM posten, produkte, mwst WHERE produkte.id = posten.produkt AND mwst.id = produkte.mwst AND posten.rechnung = '$rechnung->renr' AND produkte.id!='3' AND produkte.id!='4' GROUP BY mwst.satz"); $betrag=$db->get_object($result); $result=$db->query("SELECT Sum( posten.anzahl * produkte.preis ) AS Gesamt, Sum( posten.anzahl * produkte.preis * mwst.satz / 100 ) AS MWST, mwst.satz FROM posten, produkte, mwst WHERE produkte.id = posten.produkt AND mwst.id = produkte.mwst AND posten.rechnung = '$rechnung->renr' AND produkte.id ='3' GROUP BY mwst.satz"); $betrag2=$db->get_object($result); $result=$db->query("SELECT Sum( posten.anzahl * produkte.preis ) AS Gesamt, Sum( posten.anzahl * produkte.preis * mwst.satz / 100 ) AS MWST, mwst.satz FROM posten, produkte, mwst WHERE produkte.id = posten.produkt AND mwst.id = produkte.mwst AND posten.rechnung = '$rechnung->renr' AND produkte.id ='4' GROUP BY mwst.satz"); $betrag3=$db->get_object($result); $pdf->Cell(100,5,"", 0, 0, 'L'); $pdf->Cell(35,5,"Gesamt:",0,0,'L'); $pdf->Cell(20,5,number_format(($betrag->Gesamt+$betrag2->Gesamt+$betrag3->Gesamt),2,",",".").EURO, 0, 1, 'R'); $pdf->Cell(100,5,"", 0, 0, 'L'); $pdf->Cell(35,5,"Mehrwertsteuer (".number_format($betrag->satz)."%):", 0, 0, 'L'); $pdf->Cell(20,5,number_format($betrag->MWST,2,",",".").EURO, 0, 1, 'R'); $pdf->Ln(); $pdf->Cell(100,5,"", 0, 0, 'L'); $pdf->Cell(35,5,"Mahnbetrag:", 0, 0, 'L'); $pdf->Cell(20,5,number_format($betrag2->Gesamt+$betrag->Gesamt+$betrag3->Gesamt+$betrag->MWST,2,",",".").EURO, 0, 1, 'R'); $pdf->Ln(); $pdf->Write(5, "Bitte überweisen Sie den oben genannten Betrag bis spätestens zum $rechnung->faellig auf das unten aufgeführte Konto.\nÜber eine weitere Zusammenarbeit mit Ihnen würde ich mich sehr freuen und verbleibe mit freundlichen Grüßen\n"); $pdf->Ln(15); $pdf->Write(5, $GLOBALS["conf"]["rechnung"]["adresse"]["name"]); $pdf->Image($GLOBALS["conf"]["rechnung"]["unterschrift"],25,$pdf->GetY()-10,50); $this->output=0; $pdf->Output(); return $return; }
if (!checkdate(substr($db_datausu, 5, 2), substr($db_datausu, 8, 2), substr($db_datausu, 0, 4))) { echo "Data para Cálculo Inválida. <br><br>"; echo "Data deverá ser superior a : " . date('Y-m-d', db_getsession("DB_datausu")); exit; } if (mktime(0, 0, 0, substr($db_datausu, 5, 2), substr($db_datausu, 8, 2), substr($db_datausu, 0, 4)) < mktime(0, 0, 0, date('m', db_getsession("DB_datausu")), date('d', db_getsession("DB_datausu")), date('Y', db_getsession("DB_datausu")))) { echo "Data no permitida para cálculo. <br><br>"; echo "Data deverá ser superior a : " . date('Y-m-d', db_getsession("DB_datausu")); exit; } $DB_DATACALC = mktime(0, 0, 0, substr($db_datausu, 5, 2), substr($db_datausu, 8, 2), substr($db_datausu, 0, 4)); } else { $DB_DATACALC = db_getsession("DB_datausu"); } $pdf = new pdf(); $pdf->Open(); $pdf->AliasNbPages(); $head2 = ""; $head4 = "Relatório do Total dos Débitos Sintético"; $linha = 60; $TPagina = 40; if (isset($matric)) { $result = debitos_tipos_matricula($matric); $chave = $matric; $sql = "select * from proprietario where j01_matric = {$matric} limit 1"; $result1 = db_query($sql); db_fieldsmemory($result1, 0); $nome = $z01_nome; $ender = $tipopri . ' ' . $nomepri . ', ' . $j39_numero . ' ' . $j39_compl; $outros1 = 'REF. ANTER.'; $outros2 = $j40_refant;