public function bukti($a)
{
$pdfku = new Cezpdf("A5", 'landscape');
//595.28,841.29
$pdfku->addInfo('Title', 'List Barang');
$pdfku->ezSetCmMargins("3", "3", "3", "3");
$barang = $this->barang->detail_peminjaman($a);
$pdfku->ezSetY(100);
$pdfku->ezSetDy(230);
//$pdfku->addJpegFromFile("icon.jpg",20,300,-1);
$pdfku->addText(120, $pdfku->y + 30, 18, "Bukti Peminjaman Inventaris Laboratorium");
$pdfku->addText(160, $pdfku->y + 10, 15, "Komputasi Berbasis Jaringan (KBJ)");
$cols_db = array('id_barang' => 'ID Barang', 'nama_barang' => 'Nama Barang');
$option_db = array('showHeadings' => 2, 'shaded' => 0, 'xPos' => 'center', 'xOrientation' => 'center', 'fontSize' => 12, 'cols' => array('id_barang' => array('justification' => 'center', 'width' => '120'), 'nama_barang' => array('justification' => 'center', 'width' => '120')));
$pdfku->ezTable($barang, $cols_db, '', $option_db);
$pdfku->addText(100, $pdfku->y - 40, 12, "Mengetahui ");
$pdfku->addText(90, $pdfku->y - 60, 12, "Administrator Lab");
$pdfku->addText(400, $pdfku->y - 60, 12, "Kepala Laboratorium");
$pdfku->addText(80, $pdfku->y - 130, 10, "__________________");
$pdfku->addText(400, $pdfku->y - 130, 10, "__________________");
$pdfku->ezStream();
}
if ($lb_valido) {
$la_comprobantes = split('-', $ls_comprobantes);
$la_datos = array_unique($la_comprobantes);
$li_totrow = count($la_datos);
sort($la_datos, SORT_STRING);
if ($li_totrow <= 0) {
print "<script language=JavaScript>";
print " alert('No hay nada que Reportar');";
print " close();";
print "</script>";
} else {
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf('LEGAL', 'landscape');
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
$io_pdf->ezSetCmMargins(1.7, 3, 3, 3);
$lb_valido = true;
for ($li_z = 0; $li_z < $li_totrow && $lb_valido; $li_z++) {
uf_print_encabezadopagina($ls_titulo, &$io_pdf);
$ls_numcom = $la_datos[$li_z];
$lb_valido = $io_report->uf_retencionesiva_proveedor($ls_numcom);
if ($lb_valido) {
$li_total = $io_report->DS->getRowCount("numcom");
for ($li_i = 1; $li_i <= $li_total; $li_i++) {
$ls_numcon = $io_report->DS->data["numcom"][$li_i];
$ls_codret = $io_report->DS->data["codret"][$li_i];
$ls_fecrep = $io_funciones->uf_convertirfecmostrar($io_report->DS->data["fecrep"][$li_i]);
$ls_perfiscal = $io_report->DS->data["perfiscal"][$li_i];
$ls_codsujret = $io_report->DS->data["codsujret"][$li_i];
$ls_nomsujret = $io_report->DS->data["nomsujret"][$li_i];
$ls_rif = $io_report->DS->data["rif"][$li_i];
print "<script language=JavaScript>";
print "alert('No hay nada que Reportar');";
print "close();";
print "</script>";
} else {
///////////////////////////////// SEGURIDAD ////////////////////////////////////////////////////
$ls_desc_event = "Generó un reporte de Relacion de Bienes Muebles Faltantes. Desde el activo " . $ls_coddesde . " hasta " . $ls_codhasta;
$io_fun_activos->uf_load_seguridad_reporte("SAF", "sigesp_saf_r_activo.php", $ls_desc_event);
//////////////////////////////// SEGURIDAD /////////////////////////////////////////////////////
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf('LEGAL', 'landscape');
// Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
// Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(3.5, 3, 3, 3);
// Configuración de los margenes en centímetros
$io_pdf->ezStartPageNumbers(940, 50, 10, '', '', 1);
// Insertar el número de página
uf_print_encabezado_pagina($ls_titulo, "", $ld_fecha, $io_pdf);
// Imprimimos el encabezado de la página
$li_totrow = $io_report->ds->getRowCount("cmpmov");
$i = 0;
for ($li_i = 1; $li_i <= $li_totrow; $li_i++) {
$io_pdf->transaction('start');
// Iniciamos la transacción
$li_numpag = $io_pdf->ezPageCount;
// Número de página
$ls_cmpmov = $io_report->ds->data["cmpmov"][$li_i];
$ls_coduniadm = $io_report->ds->data["coduniadm"][$li_i];
$ld_feccmp = $io_report->ds->data["feccmp"][$li_i];
<?php
header('Content-Type: application/json');
error_reporting(0);
require_once 'conexion.php';
require_once '../plugins/ezpdf/Cezpdf.php';
conectarse();
$pdf = new Cezpdf('a4');
$tmp = array('b' => 'Helvetica-Bold', 'i' => 'Courier-Oblique', 'bi' => 'Helvetica-BoldOblique', 'ib' => 'Helvetica-BoldOblique', 'bb' => 'Times-Roman');
$pdf->setFontFamily('Helvetica', $tmp);
$pdf->selectFont('fonts/Helvetica.afm');
$pdf->ezSetCmMargins(1.5, 1, 2, 3);
$pdf->addJpegFromFile("../img/o.jpg", 50, 750, 100);
$folio = trim($_GET['folio']);
$result = mysql_query("select folio,fecha,c.nombre_contacto,total,\n\tconcat(nombre,' ',e.apellido_paterno,' ',e.apellido_materno) as nombre \n\tfrom ventas v inner join clientes c on c.matricula = v.cliente \n\tinner join empleados e on e.matricula = v.empleado \n\twhere v.status = 'PAGADA' and folio = '" . $folio . "' ");
while ($datatmp = mysql_fetch_array($result)) {
$datos = $datatmp['nombre_contacto'];
$total = $datatmp['total'];
$emp = $datatmp['nombre'];
$data[] = array_merge($datatmp, array('folio'));
}
$options = array('shadeHeadingCol' => array(0.6, 0.6, 0.5), 'shadeCol' => array(0.9, 0.9, 0.9), 'xOrientation' => 'right', 'width' => 70, 'fontSize' => 8, 'xPos' => 480);
$titlef = array('folio' => '<b>Folio</b>');
$titles = array('fecha' => '<b>Fecha</b>');
$titlet = array('total' => '<b>Total</b>');
$pdf->ezText("\n", 10);
$pdf->ezTable($data, $titlef, '', $options);
$pdf->ezText("\n", 10);
$pdf->ezTable($data, $titles, '', $options);
$pdf->ezText("\n", 10);
$pdf->addText(50, 700, 12, "<b>Atendio: </b>\n");
$lb_valido=$io_report->uf_cargar_mayor_analitico($ld_fecdesde,$ld_fechasta,$ls_cuentadesde,$ls_cuentahasta,$ls_parm_orden);
}
if($lb_valido==false) // Existe alg�n error � no hay registros
{
print("<script language=JavaScript>");
print(" alert('No hay nada que Reportar');");
print(" close();");
print("</script>");
}
else // Imprimimos el reporte
{
error_reporting(E_ALL);
set_time_limit(3600);
$io_pdf=new Cezpdf('LETTER','portrait'); // Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(3.5,3,3,3); // Configuraci�n de los margenes en cent�metros
uf_print_encabezado_pagina($ls_titulo,$io_pdf); // Imprimimos el encabezado de la p�gina
$io_pdf->ezStartPageNumbers(550,50,10,'','',1);
$io_report->ds_analitico->group_noorder("sc_cuenta");
$li_tot=$io_report->ds_analitico->getRowCount("sc_cuenta");
$ld_totaldebe=0;
$ld_totalhaber=0;
$ld_totalsaldo=0;
$ld_saldo=0;
$ldec_mondeb=0;
$ldec_monhab=0;
$ld_montototaldebe=0;
$ld_montototalhaber=0;
for($i=1;$i<=$li_tot;$i++)
<?php
include 'class.ezpdf.php';
$pdf = new Cezpdf('LETTER');
$pdf->selectFont('fonts/Helvetica.afm');
$pdf->ezSetCmMargins(1, 1, 1.5, 1.5);
$conexion = mysql_connect("localhost", "root", "");
mysql_select_db("inventario", $conexion);
$queEmp = "SELECT * FROM acceso_sis where user = user order by user asc";
// agregar la tabla que vas a imprimir
$resEmp = mysql_query($queEmp, $conexion) or die(mysql_error());
$totEmp = mysql_num_rows($resEmp);
$ixx = 0;
while ($datatmp = mysql_fetch_assoc($resEmp)) {
$ixx = $ixx + 1;
$data[] = array_merge($datatmp, array('num' => $ixx));
}
// son todos los campos de la tabla-nombre de como se imprime
$titles = array('num' => '<b>N°</b>', 'user' => '<b>Codigo de Usuario</b>', 'pass' => '<b>Contraseña encriptada</b>');
$options = array('shadeCol' => array(3, 3, 3), 'xOrientation' => 'center', 'width' => 580);
$txttit = "<b>Pasteleria Elisua´s</b>\n";
$txttit .= "Reporte de Usuario \n";
$pdf->ezText($txttit, 12, array('justification' => 'center'));
$pdf->ezTable($data, $titles, '', $options);
$pdf->ezText("\n\n\n", 10);
$pdf->ezText("<b>Fecha:</b> " . date("d/m/Y"), 10);
$pdf->ezText("<b>Hora:</b> " . date("H:i:s") . "\n\n", 10);
$pdf->ezText("Pasteleria Elisua´s CopyRight 2015 \n");
$pdf->ezStream();
<?php
include 'class.ezpdf.php';
$pdf = new Cezpdf();
// Set margin dan font
$pdf->ezSetCmMargins(3, 3, 3, 3);
$pdf->selectFont('fonts/Courier.afm');
$all = $pdf->openObject();
// Tampilkan logo
//$pdf->setStrokeColor(0, 0, 0, 1);
//$pdf->addJpegFromFile('logo.jpg',20,800,69);
// Teks di tengah atas untuk judul header
$pdf->addText(30, 820, 16, '<b>KARTU HASIL STUDI</b>');
$pdf->addText(30, 800, 16, '<b>UNIVERSITAS ISLAM NEGERI SUNAN GUNUNG DJATI BANDUNG</b>');
// Garis atas untuk header
$pdf->line(10, 795, 578, 795);
// Garis bawah untuk footer
$pdf->line(10, 50, 578, 50);
// Teks kiri bawah
$pdf->addText(30, 34, 8, 'Dicetak tgl:' . date('d-m-Y, H:i:s'));
$pdf->closeObject();
// Tampilkan object di semua halaman
$pdf->addObject($all, 'all');
// Koneksi ke database dan tampilkan datanya
include "../../../config/koneksi.php";
// Query untuk merelasikan kedua tabel
$nima = $_POST['nim'];
$semestera = $_POST['semester'];
$tahuna = $_POST['tahun'];
$hts = substr($_POST['tahun'], 0, 4);
$ktr = $_POST['semester'];
$ls_codnomhas,$ls_codperdes,$ls_codperhas,$ls_subnomdes,$ls_subnomhas); // Cargar el DS con los datos de la cabecera del reporte
}
if($lb_valido==false) // Existe algún error ó no hay registros
{
print("<script language=JavaScript>");
print(" alert('No hay nada que Reportar');");
print(" close();");
print("</script>");
}
else // Imprimimos el reporte
{
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf=new Cezpdf('LETTER','portrait'); // Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(4,2.5,2.5,2.5); // Configuración de los margenes en centímetros
$io_encabezado=$io_pdf->openObject();
uf_print_encabezado_pagina($ls_titulo,$ls_desnom,$ls_periodo,&$io_encabezado,&$io_pdf); // Imprimimos el encabezado de la página
$io_pdf->ezStartPageNumbers(550,50,10,'','',1); // Insertar el número de página
$li_totrow=$io_report->DS->getRowCount("codban");
$li_total=0;
$li_nro=0;
$li_general=0;
for($li_i=1;(($li_i<=$li_totrow)&&($lb_valido));$li_i++)
{
$ls_codban=$io_report->DS->data["codban"][$li_i];
$ls_nomban=$io_report->DS->data["nomban"][$li_i];
$io_cabecera=$io_pdf->openObject(); // Creamos el objeto cabecera
uf_print_cabecera($ls_nomban,$io_cabecera,$io_pdf); // Imprimimos la cabecera del registro
//-------------------------------------------Buscamos las cuentas de ahorro---------------------------------------------
$ls_tipcueban="A"; // Buscamos las cuentas de ahorro
$la_procedencias = split('-', $ls_procedencias);
$la_comprobantes = split('-', $ls_comprobantes);
$la_datos = array_unique($la_comprobantes);
$li_totrow = count($la_datos);
sort($la_datos, SORT_STRING);
if ($li_totrow <= 0) {
print "<script language=JavaScript>";
print " alert('No hay nada que Reportar');";
print " close();";
print "</script>";
} else {
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf('LETTER', 'portrait');
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
$io_pdf->ezSetCmMargins(5.4, 4, 3, 3);
$lb_valido = true;
$ls_codigoant = "";
for ($li_z = 0; $li_z < $li_totrow && $lb_valido; $li_z++) {
uf_print_encabezado_pagina($ls_titulo, $ls_agente, $io_pdf);
$ls_numsol = $la_datos[$li_z];
$ls_procede = $la_procedencias[$li_z];
if ($ls_procede == "SCBBCH") {
$lb_valido = $io_report->uf_retencionesislr_scb($ls_numsol);
} else {
$lb_valido = $io_report->uf_retencionesislr_cxp($ls_numsol);
}
if ($lb_valido) {
$li_total = $io_report->DS->getRowCount("numdoc");
for ($li_i = 1; $li_i <= $li_total; $li_i++) {
$ls_tipproben = $io_report->DS->data["tipproben"][$li_i];
/* Monatsbericht mit ausgezogenen Mietern */
/* Monatsbericht mit ausgezogenen Mietern */
case "monatsbericht_m_a":
$b = new buchen();
$link = "?daten=buchen&option=konto";
$form = new formular();
$form->fieldset("Monatsbericht", 'monatsbericht');
$b->monatsbericht_mit_ausgezogenen();
$form->fieldset_ende();
break;
case "test":
ob_clean();
// ausgabepuffer leeren
//include_once ('pdfclass/class.ezpdf.php');
$pdf = new Cezpdf('a4', 'portrait');
$pdf->ezSetCmMargins(4.5, 2.5, 2.5, 2.5);
$berlus_schrift = 'pdfclass/fonts/Times-Roman.afm';
$text_schrift = 'pdfclass/fonts/Arial.afm';
$pdf->addJpegFromFile('includes/logos/hv_logo198_80.jpg', 450, 780, 100, 42);
$pdf->setLineStyle(0.5);
$pdf->selectFont($berlus_schrift);
$pdf->addText(42, 743, 6, "BERLUS HAUSVERWALTUNG - Fontanestr. 1 - 14193 Berlin");
$pdf->line(42, 750, 550, 750);
$seite = $pdf->ezGetCurrentPageNumber();
$alle_seiten = $pdf->ezPageCount;
$data55 = array(array('num' => 1, 'name' => 'gandalf', 'type' => 'wizard'), array('num' => 2, 'name' => 'bilbo', 'type' => 'hobbit', 'url' => 'http://www.ros.co.
nz/pdf/'), array('num' => 3, 'name' => 'frodo', 'type' => 'hobbit'), array('num' => 4, 'name' => 'saruman', 'type' => 'bad
dude', 'url' => 'http://sourceforge.net/projects/pdf-php'), array('num' => 5, 'name' => 'sauron', 'type' => 'really bad dude'));
$pdf->ezTable($data55);
// header('Content-type: application/pdf');
// header('Content-Disposition: attachment; filename="downloaded.pdf"');
$li_tamletpiecont=$io_report->DS->data["tamletpiecont"][$li_i];
if($li_tamletpiecont=="")
{
$li_tamletpiecont=$li_tamletcont;
}
$li_intlincont=$io_report->DS->data["intlincont"][$li_i];
$li_marinfcont=$io_report->DS->data["marinfcont"][$li_i];
$li_marsupcont=$io_report->DS->data["marsupcont"][$li_i];
$ls_titcont=$io_report->DS->data["titcont"][$li_i];
$ls_piepagcont=$io_report->DS->data["piepagcont"][$li_i];
$ls_ente=$_SESSION["la_empresa"]["nombre"];
$ld_fecha=date("d/m/Y");
$ls_dia_act=substr($ld_fecha,0,2);
$ls_mes_act=$io_fecha->uf_load_nombre_mes(substr($ld_fecha,3,2));
$ls_ano_act=substr($ld_fecha,6,4);
$io_pdf->ezSetCmMargins($li_marsupcont,$li_marinfcont,3,3); // Configuración de los margenes en centímetros
uf_print_encabezado_pagina($ls_titcont,$io_pdf); // Imprimimos el encabezado de la página
$lb_valido=$io_report->uf_select_contratos_personal($ls_nroregdes,$ls_nroreghas, $rs_data); // Obtenemos el detalle del reporte
if($lb_valido)
{
$li_s=0;
$li_totrow_det=$io_report->io_sql->num_rows($rs_data);
while ($row=$io_report->io_sql->fetch_row($rs_data))
{
$li_s=$li_s+1;
$ls_contenido="";
$ls_contenido=$ls_concont;
$ls_horario=trim ($row["horario"]);
$ls_funcion=trim ($row["funcion"]);
$ls_obs=trim ($row["observacion"]);
function dofreePDF()
{
global $mosConfig_live_site, $mosConfig_sitename, $mosConfig_offset;
global $mainframe, $database, $my;
$id = intval(mosGetParam($_REQUEST, 'id', 1));
$gid = $my->gid;
$now = _CURRENT_SERVER_TIME;
$nullDate = $database->getNullDate();
// query to check for state and access levels
$query = "SELECT a.*, cc.name AS category, s.name AS section, s.published AS sec_pub, cc.published AS cat_pub," . "\n s.access AS sec_access, cc.access AS cat_access, s.id AS sec_id, cc.id as cat_id" . "\n FROM #__content AS a" . "\n LEFT JOIN #__categories AS cc ON cc.id = a.catid" . "\n LEFT JOIN #__sections AS s ON s.id = cc.section AND s.scope = 'content'" . "\n WHERE a.id = " . (int) $id . "\n AND a.state = 1" . "\n AND a.access <= " . (int) $gid . "\n AND ( a.publish_up = " . $database->Quote($nullDate) . " OR a.publish_up <= " . $database->Quote($now) . " )" . "\n AND ( a.publish_down = " . $database->Quote($nullDate) . " OR a.publish_down >= " . $database->Quote($now) . " )";
$database->setQuery($query);
$row = NULL;
if ($database->loadObject($row)) {
/*
* check whether category is published
*/
if (!$row->cat_pub && $row->catid) {
mosNotAuth();
return;
}
/*
* check whether section is published
*/
if (!$row->sec_pub && $row->sectionid) {
mosNotAuth();
return;
}
/*
* check whether category access level allows access
*/
if ($row->cat_access > $gid && $row->catid) {
mosNotAuth();
return;
}
/*
* check whether section access level allows access
*/
if ($row->sec_access > $gid && $row->sectionid) {
mosNotAuth();
return;
}
include 'includes/class.ezpdf.php';
$params = new mosParameters($row->attribs);
$params->def('author', !$mainframe->getCfg('hideAuthor'));
$params->def('createdate', !$mainframe->getCfg('hideCreateDate'));
$params->def('modifydate', !$mainframe->getCfg('hideModifyDate'));
$row->fulltext = pdfCleaner($row->fulltext);
$row->introtext = pdfCleaner($row->introtext);
$pdf = new Cezpdf('a4', 'P');
//A4 Portrait
$pdf->ezSetCmMargins(2, 1.5, 1, 1);
$pdf->selectFont('./fonts/Helvetica.afm');
//choose font
$all = $pdf->openObject();
$pdf->saveState();
$pdf->setStrokeColor(0, 0, 0, 1);
// footer
$pdf->addText(250, 822, 6, $mosConfig_sitename);
$pdf->line(10, 40, 578, 40);
$pdf->line(10, 818, 578, 818);
$pdf->addText(30, 34, 6, $mosConfig_live_site);
$pdf->addText(250, 34, 6, _PDF_POWERED);
$pdf->addText(450, 34, 6, _PDF_GENERATED . ' ' . date('j F, Y, H:i', time() + $mosConfig_offset * 60 * 60));
$pdf->restoreState();
$pdf->closeObject();
$pdf->addObject($all, 'all');
$pdf->ezSetDy(30);
$txt1 = $row->title;
$pdf->ezText($txt1, 14);
$txt2 = AuthorDateLine($row, $params);
$pdf->ezText($txt2, 8);
$txt3 = $row->introtext . "\n" . $row->fulltext;
$pdf->ezText($txt3, 10);
$pdf->ezStream();
} else {
mosNotAuth();
return;
}
}
$lb_valido = uf_insert_seguridad($ls_titulo);
// Seguridad de Reporte
if ($lb_valido) {
$lb_valido = $io_report->uf_select_retenciones($ls_codded, $ls_coddedhas, $ls_tipded);
}
if ($lb_valido === false) {
print "<script language=JavaScript>";
print " alert('No hay nada que Reportar');";
print " close();";
print "</script>";
} else {
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf('LETTER', 'landscape');
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
$io_pdf->ezSetCmMargins(4.4, 3, 3, 3);
uf_print_encabezado_pagina($ls_titulo, $ld_fecdes, $ld_fechas, &$io_pdf);
$li_rowcargos = $io_report->DS->getRowCount("codded");
//print"s";
$io_report->DS->sortData("codded");
$lb_existe = false;
for ($li_j = 1; $li_j <= $li_rowcargos; $li_j++) {
$ls_codded = $io_report->DS->data["codded"][$li_j];
$ls_dended = $io_report->DS->data["dended"][$li_j];
$li_islr = $io_report->DS->data["islr"][$li_j];
$li_iva = $io_report->DS->data["iva"][$li_j];
$li_estretmun = $io_report->DS->data["estretmun"][$li_j];
$li_retaposol = $io_report->DS->data["retaposol"][$li_j];
$lb_valido = $io_report->uf_retencionesespecifico($ls_codded, $ls_coddedhas, $ls_tipproben, $ls_codprobenhas, $ls_codprobendes, $ld_fecdes, $ld_fechas, $ls_tipper);
$li_totbase = 0;
$li_totcargos = 0;
if ($lb_valido) {
$lb_valido = $io_report->uf_select_recepciones($ls_tipproben, $ls_codprobendes, $ls_codprobenhas, $ld_fecregdes, $ld_fecreghas, $ls_codtipdoc, $ls_registrada, $ls_anulada, $ls_procesada, $ls_orden);
// Cargar el DS con los datos del reporte
if ($lb_valido == false) {
print "<script language=JavaScript>";
print " alert('No hay nada que Reportar');";
print " close();";
print "</script>";
} else {
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf('LETTER', 'landscape');
// Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
// Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(4.1, 5, 3, 3);
// Configuración de los margenes en centímetros
$io_pdf->ezStartPageNumbers(770, 47, 8, '', '', 1);
// Insertar el número de página
$li_totrow = $io_report->DS->getRowCount("numrecdoc");
if ($ls_codprobendes != "") {
$ls_nomprobendes = $io_report->uf_select_proveedores($ls_tipproben, $ls_codprobendes);
}
if ($ls_codprobenhas != "") {
$ls_nomprobenhas = $io_report->uf_select_proveedores($ls_tipproben, $ls_codprobenhas);
}
$li_totaldoc = 0;
$li_totalcar = 0;
$li_totalded = 0;
$li_totbasimp = 0;
for ($li_i = 1; $li_i <= $li_totrow; $li_i++) {
<?php
include 'class.ezpdf.php';
$pdf = new Cezpdf();
// Atur margin
$pdf->ezSetCmMargins(2, 3, 3.3, 3);
// Header dan footer didefinisikan diantara openObject dan closeObject
$all = $pdf->openObject();
// Teks di tengah atas untuk judul header
$pdf->addText(240, 820, 16, '<b>Telkomsel Report</b>');
$pdf->addText(150, 800, 14, '<b>Mobile Advertising Customer Regional Bandung</b>');
// Garis atas untuk header
$pdf->line(10, 795, 578, 795);
$pdf->addText(150, 60, 14, '<b>Telkomsel PDF Report - by Firmansyah Wahyu</b>');
// Garis bawah untuk footer
$pdf->line(10, 50, 578, 50);
// Teks kiri bawah
$pdf->addText(30, 34, 8, 'Dicetak pada tanggal: ' . date('d-m-Y, H:i:s'));
$pdf->closeObject();
// Tampilkan object di semua halaman
$pdf->addObject($all, 'all');
// Koneksi ke database dan tampilkan datanya
mysql_connect("localhost", "root", "");
mysql_select_db("drasticdata");
$sql = mysql_query("SELECT * FROM country_map");
$i = 1;
while ($firman = mysql_fetch_array($sql)) {
$data[$i] = array('No' => $i, 'Code' => $firman[Code], 'Nama Kecamatan' => $firman[nama_kec], 'Luas Area' => $firman[Luas_Area], 'Jumlah Penduduk' => $firman[Jumlah_Penduduk], 'Kepadatan' => $firman[Kepadatan], 'Pelanggan MA' => $firman[Pelanggan_MA], 'Koordinat' => $firman[Coords]);
$i++;
}
/*
print "<script language=JavaScript>";
print " alert('No hay nada que Reportar');";
print " close();";
print "</script>";
} else {
///////////////////////////////// SEGURIDAD ////////////////////////////////////////////////////////
$ls_desc_event = " Generó el reporte de Comprobante de Entrega. ";
$io_fun_activos->uf_load_seguridad_reporte("SAF", "sigesp_saf_p_entrega.php", $ls_desc_event);
//////////////////////////////// SEGURIDAD /////////////////////////////////////////////////////////
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf('LETTER', 'landscape');
// Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
// Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(8.35, 5.5, 3, 3);
// Configuración de los margenes en centímetros
$ld_fecha = $io_report->ds->data["feccmp"][1];
$ld_fecha = $io_funciones->uf_convertirfecmostrar($ld_fecha);
uf_print_encabezado_pagina($ls_titulo, $ls_cmpent, $ld_fecha, $io_pdf);
// Imprimimos el encabezado de la página
$io_pdf->transaction('start');
// Iniciamos la transacción
$li_numpag = $io_pdf->ezPageCount;
// Número de página
$ls_cmpent = $io_report->ds->data["cmpent"][1];
$ld_fecent = $io_report->ds->data["fecent"][1];
$ls_nomres = $io_report->ds->data["nomres"][1];
$ls_nomrec = $io_report->ds->data["nomrec"][1];
$ls_nomdes = $io_report->ds->data["nomdes"][1];
$ls_codres = $io_report->ds->data["cedres"][1];
if ($lb_valido) {
$la_comprobantes = split('-', $ls_comprobantes);
$la_datos = array_unique($la_comprobantes);
$li_totrow = count($la_datos);
sort($la_datos, SORT_STRING);
if ($li_totrow <= 0) {
print "<script language=JavaScript>";
print " alert('No hay nada que Reportar');";
print " close();";
print "</script>";
} else {
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf("LETTER", "landscape");
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
$io_pdf->ezSetCmMargins(7, 4, 3, 3);
$io_pdf->ezStartPageNumbers(406, 30, 10, '', '', 1);
//Insertar el número de página.
$lb_valido = true;
for ($li_z = 0; $li_z < $li_totrow && $lb_valido; $li_z++) {
uf_print_encabezado_pagina($ls_titulo, $io_pdf);
$ls_numcom = $la_datos[$li_z];
$lb_valido = $io_report->uf_retencionesmunicipales_proveedor($ls_numcom, $ls_mes, $ls_anio);
if ($lb_valido) {
$li_total = $io_report->DS->getRowCount("numcom");
for ($li_i = 1; $li_i <= $li_total; $li_i++) {
$ls_numcon = $io_report->DS->data["numcom"][$li_i];
$ls_codret = $io_report->DS->data["codret"][$li_i];
$ls_fecrep = $io_funciones->uf_convertirfecmostrar($io_report->DS->data["fecrep"][$li_i]);
$ls_perfiscal = $io_report->DS->data["perfiscal"][$li_i];
$ls_codsujret = $io_report->DS->data["codsujret"][$li_i];
print "<script language=JavaScript>";
print "alert('No hay nada que Reportar');";
print "close();";
print "</script>";
} else {
///////////////////////////////// SEGURIDAD ////////////////////////////////////////////////////
$ls_desc_event = "Generó un reporte de Incorporaciones y Desincorporaciones de Bienes Muebles por Departamento";
$io_fun_activos->uf_load_seguridad_reporte("SAF", "sigesp_saf_r_activo.php", $ls_desc_event);
//////////////////////////////// SEGURIDAD /////////////////////////////////////////////////////
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf('LETTER', 'portrait');
// Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
// Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(3.6, 4.8, 3, 3);
// Configuración de los margenes en centímetros
$io_pdf->ezStartPageNumbers(570, 47, 8, '', '', 1);
// Insertar el número de página
uf_print_encabezado_pagina($ls_titulo, $ls_fecha, $io_pdf);
// Imprimimos el encabezado de la página
$j = 0;
$la_data_c = "";
$li_totrow_c = $io_report->ds->getRowCount("cod_pro");
for ($li_j = 1; $li_j <= $li_totrow_c; $li_j++) {
$io_pdf->transaction('start');
// Iniciamos la transacción
$li_numpag = $io_pdf->ezPageCount;
// Número de página
$li_cod_pro = $io_report->ds->data["cod_pro"][$li_j];
$li_nompro = $io_report->ds->data["nompro"][$li_j];
function acta($argumento)
{
$fecha_doc = $argumento["fecha_doc"];
$usuarioAutorizaNomb = $argumento["usuarioAutorizaNomb"];
//rint ($query);
$pdf = new Cezpdf("LETTER", "portrait");
//LETTER = Carta,portrait = vertical
$year = date("Y");
$day = date("d");
$month = date("m");
$a = array("left" => 0);
$b = array("justification" => "center");
$d = array("justification" => "left", "leading" => 8);
$c = array("left" => 0, "leading" => 12);
//leading = espaciado
$e = array("left" => 0, "leading" => 15);
//leading = espaciado
$pdf->ezSetCmMargins(4, 3, 4, 2);
//top,botton,left,right
/* Se establece la fuente que se utilizara para el texto. */
$pdf->selectFont("../include/pdf/fonts/Times-Roman.afm");
$pdf->ezText("ACTA DE RECUPERACION DE RADICADOS \n\n", 15, $b);
//$pdf->ezText($this->query." : \n" ,12,$d);
$txtformat = "Radicados recuperados a {$fecha_doc} y autorizados por {$usuarioAutorizaNomb} \n\n ";
$pdf->ezText($txtformat, 12, $c);
$this->conexion->getResult($this->query);
$data = array();
$columna = array();
$contador = 0;
while ($this->conexion->cursor->next_record() != 0) {
$radicado = $this->conexion->cursor->f('radi_nume_radi');
$columna[$contador++] = $radicado;
if ($contador == 4) {
$contador = 0;
$data = array_merge($data, array(array('-1-' => $columna[0], '-2-' => $columna[1], '-3-' => $columna[2], '-4-' => $columna[3])));
array_splice($columna, 0);
}
//$data= array_merge ($data,array (array('Número'=>$rucConsecutivo."-".$rucYear,'Usuario'=>$nombre,'Defensor Público'=>$nombreDefensor)));
}
if ($contador != 0) {
$data = array_merge($data, array(array('-1-' => $columna[0], '-2-' => $columna[1], '-3-' => $columna[2], '-4-' => $columna[3])));
}
$pdf->ezTable($data);
$pdf->ezStream();
}
if ($lb_valido) {
$lb_valido = $io_report->uf_arc_cabecera($ls_coddes, $ls_codhas, $ls_tipo);
// Cargar el DS con los datos de la cabecera del reporte
}
if ($lb_valido == false) {
print "<script language=JavaScript>";
print " alert('No hay nada que Reportar');";
print " close();";
print "</script>";
} else {
error_reporting(E_ALL);
$io_pdf = new Cezpdf('LETTER', 'landscape');
// Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
// Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(11.7, 4, 1, 2);
// Configuración de los margenes en centímetros
uf_print_encabezado_pagina($io_pdf);
// Imprimimos el encabezado de la página
$li_totrow = $io_report->DS->getRowCount("tipproben");
for ($li_i = 1; $li_i <= $li_totrow && $lb_valido; $li_i++) {
$li_total_pagado = 0;
$li_total_retencion = 0;
$li_total_impuesto = 0;
$ls_tipproben = $io_report->DS->data["tipproben"][$li_i];
$ls_nompro = $io_report->DS->data["nompro"][$li_i];
$ls_nacpro = $io_report->DS->data["nacpro"][$li_i];
$ls_rifpro = $io_report->DS->data["rifpro"][$li_i];
$ls_nitpro = $io_report->DS->data["nitpro"][$li_i];
$ls_dirpro = $io_report->DS->data["dirpro"][$li_i];
$ls_telpro = $io_report->DS->data["telpro"][$li_i];
$ls_mesletras = $io_fecha->uf_load_nombre_mes($ls_mes);
$ls_periodo = "MES: " . $ls_mesletras . " AÑO" . $ls_agno . "";
//--------------------------------------------------------------------------------------------------------------------------------
$ld_monto = 0;
$ld_impuesto = 0;
$ld_sumcom = 0;
$ld_baseimp = 0;
$arremp = $_SESSION["la_empresa"];
$ls_codemp = $arremp["codemp"];
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf('LEGAL', 'landscape');
// Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
// Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(3.5, 3, 2.5, 2.5);
// Configuracin de los margenes en centmetros
uf_print_titulo(&$io_pdf);
$io_pdf->ezStartPageNumbers(970, 40, 10, '', '', 1);
// Insertar el nmero de pgina
$lb_valido = $io_report->uf_select_report_libcompra($as_fechadesde, $as_fechahasta, &$rs_resultado);
uf_print_encabezado_pagina($ls_titulo, $ls_mesletras, $ls_agno, &$io_pdf);
uf_print_cabecera(&$io_pdf);
$ldec_totimp8 = 0;
//Variable de tipo acumulador que almacenara el monto total de los impuestos a 8%.
$ldec_totimp9 = 0;
//Variable de tipo acumulador que almacenara el monto total de los impuestos a 14%.
$ldec_totimp25 = 0;
//Variable de tipo acumulador que almacenara el monto total de los impuestos a 25%.
$ldec_totbasimp8 = 0;
$ldec_totbasimp9 = 0;
$ls_codestpro2h,$ls_codestpro3h,
$ls_codestpro4h,$ls_codestpro5h);
if($lb_valido==false) // Existe algún error ó no hay registros
{
print("<script language=JavaScript>");
print(" alert('No hay nada que Reportar');");
print(" close();");
print("</script>");
}
else // Imprimimos el reporte
{
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf=new Cezpdf('LEGAL','landscape'); // Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(2,3,3,3); // Configuración de los margenes en centímetros(para el rectangulo)
uf_print_encabezado_pagina($ls_titulo,$io_pdf); // Imprimimos el encabezado de la página
$io_pdf->ezStartPageNumbers(980,40,10,'','',1); // Insertar el número de página
$li_tot=$io_report->dts_cab->getRowCount("programatica");
for($li_i=1;$li_i<=$li_tot;$li_i++)
{
$io_pdf->transaction('start'); // Iniciamos la transacción
$thisPageNum=$io_pdf->ezPageCount;
$ls_programatica=$io_report->dts_cab->data["programatica"][$li_i];
$ls_codestpro1=substr($ls_programatica,0,20);
$ls_denestpro1="";
$lb_valido=$io_report->uf_spg_reporte_select_denestpro1($ls_codestpro1,$ls_denestpro1);
if($lb_valido)
{
$ls_denestpro1=$ls_denestpro1;
}
if ($lb_valido) {
$lb_valido = $io_report->uf_select_solicitud_tipodocumento($ls_numsol);
// Cargar el DS con los datos del reporte
if ($lb_valido == false) {
print "<script language=JavaScript>";
print " alert('No hay nada que Reportar');";
print " close();";
print "</script>";
} else {
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf('LETTER', 'portrait');
// Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
// Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(4, 2.5, 3, 3);
// Configuración de los margenes en centímetros
$li_totrow = $io_report->DS->getRowCount("numsol");
if ($li_totrow > 1) {
for ($li_i = 1; $li_i <= $li_totrow; $li_i++) {
$ls_denominacion = $io_report->DS->data["dentipdoc"][$li_i];
$ds_dentipdoc->insertRow("dentipsol", $ls_denominacion);
}
$ds_dentipdoc->group("dentipsol");
$li_fila = $ds_dentipdoc->getRowCount("dentipsol");
for ($li_i = 1; $li_i <= $li_fila; $li_i++) {
$ls_denominacion = $ds_dentipdoc->getValue("dentipsol", $li_i);
if ($ls_denominacion != "") {
if ($li_i == 1) {
$ls_dentipdoc = $ls_denominacion;
} else {
print(" close();");
print("</script>");
}
else // Imprimimos el reporte
{
$ls_descripcion="Generó el Reporte de Orden de Compra";
$lb_valido=$io_fun_soc->uf_load_seguridad_reporte("SOC","sigesp_soc_p_registro_orden_compra.php",$ls_descripcion);
if($lb_valido)
{
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf=new Cezpdf('LETTER','portrait'); // Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
if ($ls_estcondat=='B')
{
$io_pdf->ezSetCmMargins(9,7,3.3,3); // Configuración de los margenes en centímetros
}
elseif($ls_estcondat=='S')
{
$io_pdf->ezSetCmMargins(9,6.7,3.3,3); // Configuración de los margenes en centímetros
}
$io_pdf->ezStartPageNumbers(588,760,8,'','',1);
if ($row=$io_sql->fetch_row($rs_data))
{
$ls_numordcom = $row["numordcom"];
$ls_estcondat = $row["estcondat"];
$ls_coduniadm = $row["coduniadm"];
$ls_denuniadm = $row["denuniadm"];
$ls_codfuefin = $row["codfuefin"];
$ls_denfuefin = $row["denfuefin"];
$ls_diaplacom = $row["diaplacom"];
if ($lb_valido) {
$lb_valido = $io_report->uf_select_solicitud($ls_numsol);
// Cargar el DS con los datos del reporte
if ($lb_valido == false) {
print "<script language=JavaScript>";
print " alert('No hay nada que Reportar');";
print " close();";
print "</script>";
} else {
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf('LETTER', 'portrait');
// Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
// Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(2, 11, 3, 2);
// Configuracion de los margenes en centimetros
$li_totrow = $io_report->DS->getRowCount("numsol");
for ($li_i = 1; $li_i <= $li_totrow; $li_i++) {
$ls_numsol = $io_report->DS->data["numsol"][$li_i];
$ls_codpro = $io_report->DS->data["cod_pro"][$li_i];
$ls_rifpro = $io_report->DS->data["rifpro"][$li_i];
$ls_cedbene = $io_report->DS->data["ced_bene"][$li_i];
$ls_denfuefin = $io_report->DS->data["denfuefin"][$li_i];
$ls_nomproben = $io_report->DS->data["nombre"][$li_i];
$ld_fecemisol = $io_report->DS->data["fecemisol"][$li_i];
$ls_consol = $io_report->DS->data["consol"][$li_i];
$ls_obssol = $io_report->DS->data["obssol"][$li_i];
$li_monsol = $io_report->DS->data["monsol"][$li_i];
$numalet->setNumero($li_monsol);
$ls_monto = $numalet->letra();
print "</div>";
?>
<script language='JavaScript'>
var win = top.printLogPrint ? top : opener.top;
win.printLogPrint(window);
</script>
</div>
</body>
</html>
<?php
exit;
} else {
//print letterhead to pdf
$pdf = new Cezpdf();
$pdf->selectFont('Times-Bold');
$pdf->ezSetCmMargins(3, 1, 1, 1);
$pdf->ezText($physician_name, 12);
$pdf->ezText($practice_address, 12);
$pdf->ezText($practice_city . ', ' . $practice_state . ' ' . $practice_zip, 12);
$pdf->ezText($practice_phone . ' (' . xl('Voice') . ')', 12);
$pdf->ezText($practice_phone . ' (' . xl('Fax') . ')', 12);
$pdf->ezText('', 12);
$pdf->ezText(date("l, F jS, Y"), 12);
$pdf->ezText('', 12);
$pdf->selectFont('Helvetica');
$pdf->ezText($content, 10);
$pdf->selectFont('Times-Bold');
$pdf->ezText('', 12);
$pdf->ezText('', 12);
if ($_GET['signer'] == 'patient') {
$pdf->ezText("__________________________________________________________________________________", 12);
$ls_estclades,$ls_estclahas);
if($lb_valido==false) // Existe algún error ó no hay registros
{
print("<script language=JavaScript>");
print(" alert('No hay nada que Reportar');");
print(" close();");
print("</script>");
}
else // Imprimimos el reporte
{
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf=new Cezpdf('LEGAL','landscape'); // Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(5.5,3,3,3); // Configuración de los margenes en centímetros
uf_print_encabezado_pagina($ls_titulo,$ls_titulo1,$io_pdf); // Imprimimos el encabezado de la página
$io_pdf->ezStartPageNumbers(980,40,10,'','',1); // Insertar el número de página
$li_total=$row=$io_report->SQL->num_rows($rs_data);
$li=0;
while($row=$io_report->SQL->fetch_row($rs_data))
{
$li=$li+1;
$ld_total_asignado=0;
$ld_total_aumento=0;
$ld_total_disminucion=0;
$ld_total_monto_actualizado=0;
$ld_total_compromiso=0;
$ld_total_precompromiso=0;
$ld_total_compromiso=0;
$ld_total_saldo_comprometer=0;
function saldenliste_mv_pdf($monat, $jahr)
{
ob_clean();
// ausgabepuffer leeren
/* PDF AUSGABE */
//include_once ('pdfclass/class.ezpdf.php');
$pdf = new Cezpdf('a4', 'portrait');
$pdf->selectFont('Helvetica.afm');
$pdf->ezSetCmMargins(4.5, 0, 0, 0);
/* Kopfzeile */
$pdf->addJpegFromFile('includes/logos/logo_hv_sw.jpg', 220, 750, 175, 100);
$pdf->setLineStyle(0.5);
$pdf->addText(86, 743, 6, "BERLUS HAUSVERWALTUNG * Fontanestr. 1 * 14193 Berlin * Inhaber Wolfgang Wehrheim * Telefon: 89784477 * Fax: 89784479 * Email: info@berlus.de");
$pdf->line(42, 750, 550, 750);
/* Footer */
$pdf->line(42, 50, 550, 50);
$pdf->addText(170, 42, 6, "BERLUS HAUSVERWALTUNG * Fontanestr. 1 * 14193 Berlin * Inhaber Wolfgang Wehrheim");
$pdf->addText(150, 35, 6, "Bankverbindung: Dresdner Bank Berlin * BLZ: 100 800 00 * Konto-Nr.: 05 804 000 00 * Steuernummer: 24/582/61188");
$pdf->addInfo('Title', "Saldenliste {$objekt_name} {$monatname} {$jahr}");
$pdf->addInfo('Author', $_SESSION[username]);
$pdf->ezStartPageNumbers(550, 755, 7, '', "Seite {PAGENUM} von {TOTALPAGENUM}");
// echo "Monatsbericht Mieter - Monatsbericht Kostenkonten<br>";
// echo "<h3>Aktuelle Mieterstatistik mit ausgezogene Mieter<br></h3>";
$s = new statistik();
$jahr = $_REQUEST[jahr];
if (empty($jahr)) {
$jahr = date("Y");
} else {
if (strlen($jahr) < 4) {
$jahr = date("Y");
}
}
// $jahr_monat = date("Y-m");
// $jahr = date("Y");
$monat = $_REQUEST[monat];
if (empty($monat)) {
$monat = date("m");
} else {
if (strlen($monat) < 2) {
$monat = '0' . $monat;
}
}
// $monat = '04';
$jahr_monat = $jahr . '-' . $monat;
// $jahr_vormonat = mktime(0, 0, 0, date("m")-1, date("d"), date("Y"));
// $jahr_vormonat = date("Y-m",$jahr_vormonat);
$bg = new berlussimo_global();
$link = "?daten=mietvertrag_raus&mietvertrag_raus=saldenliste";
$bg->objekt_auswahl_liste($link);
$bg->monate_jahres_links($jahr, $link);
if (isset($_SESSION['objekt_id'])) {
$objekt_id = $_SESSION['objekt_id'];
$einheit_info = new einheit();
$o = new objekt();
$objekt_name = $o->get_objekt_name($objekt_id);
$monatname = monat2name($monat);
$pdf->addText(70, 755, 10, "Saldenliste {$objekt_name} {$monatname} {$jahr}");
$pdf->ezSetDy(25);
$pdf->ezSetCmMargins(3, 3, 3, 3);
$text_options = array(left => 0, justification => 'left');
$pdf->ezText("<b>Einheit</b>", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(left => 100, justification => 'left');
$pdf->ezText("<b>Mieter</b>", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(left => 270, justification => 'left');
$pdf->ezText("<b>Einzug</b>", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(left => 320, justification => 'left');
$pdf->ezText("<b>Auszug</b>", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(right => 0, justification => 'right');
$pdf->ezText("<b>SALDO EUR</b>", 8, $text_options);
/* Aktuell bzw. gewünschten Monat berechnen */
$ob = new objekt();
$einheiten_array = $ob->einheiten_objekt_arr($objekt_id);
// $einheiten_array = $s->vermietete_monat_jahr($jahr_monat,$objekt_id, '');
/*
* echo "<pre>";
* print_r($einheiten_array);
* echo "<h1> EINHEITEN: $anzahl_aktuell</h1>";
* $mv_array = $einheit_info->get_mietvertrag_ids('7');
* print_r($mv_array);
*/
$summe_sv = 0;
$summe_mieten = 0;
$summe_umlagen = 0;
$summe_akt_gsoll = 0;
$summe_g_zahlungen = 0;
$summe_saldo_neu = 0;
$anzahl_aktuell = count($einheiten_array);
$miete = new miete();
$zeilen_pro_seite = 60;
$aktuelle_zeile = 0;
for ($i = 0; $i < $anzahl_aktuell; $i++) {
$mv_array = $einheit_info->get_mietvertraege_bis("" . $einheiten_array[$i]['EINHEIT_ID'] . "", $jahr, $monat);
$mv_anzahl = count($mv_array);
if (is_array($mv_array)) {
for ($b = 0; $b < $mv_anzahl; $b++) {
$mv_id = $mv_array[$b]['MIETVERTRAG_ID'];
$mk = new mietkonto();
$mieter_ids = $mk->get_personen_ids_mietvertrag($mv_id);
for ($a = 0; $a < count($mieter_ids); $a++) {
$mieter_daten_arr[] = $mk->get_person_infos($mieter_ids[$a][PERSON_MIETVERTRAG_PERSON_ID]);
}
// $miete->mietkonto_berechnung_monatsgenau($mv_id, $jahr, $monat);
$end_saldoo = $miete->saldo_berechnen_monatsgenau($mv_id, $monat, $jahr);
$zeile = $zeile + 1;
$einheit_kurzname = $einheiten_array[$i]['EINHEIT_KURZNAME'];
$vn = RTRIM(LTRIM($mieter_daten_arr['0']['0']['PERSON_VORNAME']));
$nn = RTRIM(LTRIM($mieter_daten_arr['0']['0']['PERSON_NACHNAME']));
$akt_gesamt_soll = $miete->saldo_vormonat_stand + $miete->sollmiete_warm;
$this->get_mietvertrag_infos_aktuell($mv_id);
$l_tag_akt_monat = letzter_tag_im_monat($monat, $jahr);
$l_datum = "{$jahr}-{$monat}-{$l_tag_akt_monat}";
if ($this->mietvertrag_bis == '0000-00-00' or $this->mietvertrag_bis > $l_datum) {
$mv_bis = 'aktuell';
} else {
$mv_bis = date_mysql2german($this->mietvertrag_bis);
}
$mv_von = date_mysql2german($this->mietvertrag_von);
$end_saldoo = nummer_punkt2komma($end_saldoo);
if ($mv_bis == 'aktuell') {
// echo "$zeile. $einheit_kurzname $nn $vn SALDO NEU: $end_saldoo <br>";
$pdf->ezSetCmMargins(3, 3, 3, 3);
$text_options = array(left => 0, justification => 'left');
$pdf->ezText("{$einheit_kurzname}", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(left => 100, justification => 'left');
$pdf->ezText("{$nn} {$vn}", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(left => 270, justification => 'left');
$pdf->ezText("{$mv_von}", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(left => 320, justification => 'left');
$pdf->ezText("", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(right => 0, justification => 'right');
$pdf->ezText("{$end_saldoo}", 8, $text_options);
$aktuelle_zeile++;
} else {
// echo "<b>$zeile. $einheit_kurzname $nn $vn SALDO NEU: $end_saldoo € BEENDET AM :$mv_bis €</b><br>";
$pdf->ezSetCmMargins(3, 3, 3, 3);
$text_options = array(left => 0, justification => 'left');
$pdf->ezText("{$einheit_kurzname}", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(left => 100, justification => 'left');
$pdf->ezText("{$nn} {$vn}", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(left => 270, justification => 'left');
$pdf->ezText("{$mv_von}", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(left => 320, justification => 'left');
$pdf->ezText("{$mv_bis}", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(right => 0, justification => 'right');
$pdf->ezText("{$end_saldoo}", 8, $text_options);
$aktuelle_zeile++;
}
if ($zeilen_pro_seite == $aktuelle_zeile) {
$pdf->ezNewPage();
/* Kopfzeile */
$pdf->addJpegFromFile('includes/logos/logo_hv_sw.jpg', 220, 750, 175, 100);
$pdf->setLineStyle(0.5);
$pdf->addText(86, 743, 6, "BERLUS HAUSVERWALTUNG * Fontanestr. 1 * 14193 Berlin * Inhaber Wolfgang Wehrheim * Telefon: 89784477 * Fax: 89784479 * Email: info@berlus.de");
$pdf->line(42, 750, 550, 750);
/* Footer */
$pdf->line(42, 50, 550, 50);
$pdf->addText(170, 42, 6, "BERLUS HAUSVERWALTUNG * Fontanestr. 1 * 14193 Berlin * Inhaber Wolfgang Wehrheim");
$pdf->addText(150, 35, 6, "Bankverbindung: Dresdner Bank Berlin * BLZ: 100 800 00 * Konto-Nr.: 05 804 000 00 * Steuernummer: 24/582/61188");
$pdf->addInfo('Title', "Saldenliste {$objekt_name} {$monatname} {$jahr}");
$pdf->addText(70, 755, 10, "Saldenliste {$objekt_name} {$monatname} {$jahr}");
$pdf->ezStartPageNumbers(550, 755, 7, '', "Seite {PAGENUM} von {TOTALPAGENUM}");
/* Überschriftzeile */
$pdf->ezSetDy(-18);
$pdf->ezSetCmMargins(3, 3, 3, 3);
$text_options = array(left => 0, justification => 'left');
$pdf->ezText("<b>Einheit</b>", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(left => 100, justification => 'left');
$pdf->ezText("<b>Mieter</b>", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(left => 270, justification => 'left');
$pdf->ezText("<b>Einzug</b>", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(left => 320, justification => 'left');
$pdf->ezText("<b>Auszug</b>", 8, $text_options);
$pdf->ezSetDy(9);
$text_options = array(right => 0, justification => 'right');
$pdf->ezText("<b>SALDO EUR</b>", 8, $text_options);
$aktuelle_zeile = 0;
}
unset($mieter_daten_arr);
unset($nn);
unset($vn);
}
// end if is_array mv_ids
}
}
// hinweis_ausgeben("Saldenliste mit Vormieter für $objekt_name wurde erstellt<br>");
ob_clean();
// ausgabepuffer leeren
$pdf->ezStopPageNumbers();
$pdf->ezStream();
/* Falls kein Objekt ausgewählt */
} else {
echo "Objekt auswählen";
}
}
$ls_subnomdes,$ls_subnomhas,$ls_orden); // Cargar el DS con los datos de la cabecera del reporte
}
if(($lb_valido==false) || ($io_report->rs_data->RecordCount()==0)) // Existe algún error ó no hay registros
{
print("<script language=JavaScript>");
print(" alert('No hay nada que Reportar');");
print(" close();");
print("</script>");
}
else // Imprimimos el reporte
{
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf=new Cezpdf('LETTER','portrait'); // Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(3,1,1,2); // Configuración de los margenes en centímetros
uf_print_encabezado_pagina($ls_titulo,$ls_desnom,$ls_periodo,$io_pdf); // Imprimimos el encabezado de la página
$li_totrow=$io_report->rs_data->RecordCount();
$li_i=1;
while((!$io_report->rs_data->EOF)&&($lb_valido))
{
$li_toting=0;
$li_totded=0;
$ls_codper=$io_report->rs_data->fields["codper"];
$ls_cedper=$io_report->rs_data->fields["cedper"];
$ls_nomper=$io_report->rs_data->fields["apeper"].", ".$io_report->rs_data->fields["nomper"];
$ls_descar=$io_report->rs_data->fields["descar"];
$ls_codcueban=$io_report->rs_data->fields["codcueban"];
$li_total=$io_report->rs_data->fields["total"];
$ls_unidad=$io_report->rs_data->fields["minorguniadm"].$io_report->rs_data->fields["ofiuniadm"].
$io_report->rs_data->fields["uniuniadm"].$io_report->rs_data->fields["depuniadm"].
if ($lb_valido) {
$lb_valido = $io_report->uf_select_solicitud($ls_numsol);
// Cargar el DS con los datos del reporte
if ($lb_valido == false) {
print "<script language=JavaScript>";
print " alert('No hay nada que Reportar');";
print " close();";
print "</script>";
} else {
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf('LETTER', 'portrait');
// Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
// Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(9, 5, 3, 3);
// Configuración de los margenes en centímetros
$li_totrow = $io_report->DS->getRowCount("numsol");
for ($li_i = 1; $li_i <= $li_totrow; $li_i++) {
$ls_numsol = $io_report->DS->data["numsol"][$li_i];
$ls_tipproben = $io_report->DS->data["tipproben"][$li_i];
$ls_codpro = $io_report->DS->data["cod_pro"][$li_i];
$ls_cedbene = $io_report->DS->data["ced_bene"][$li_i];
if ($ls_tipproben == 'P') {
$ls_rifproben = $io_report->DS->data["rifpro"][$li_i];
} elseif ($ls_tipproben == 'B') {
$ls_rifproben = $ls_cedbene;
}
$ls_nombre = $io_report->DS->data["nombre"][$li_i];
$ls_dirproben = $io_report->DS->data["dirproben"][$li_i];
$ls_consol = $io_report->DS->data["consol"][$li_i];
