$pdf->Rect(112, 206, 40, 6, "F");
$pdf->Ln(25.2);
$pdf->Cell(102);
$pdf->Cell(0, 0, "$2.000.- (dos mil)");
}
else {
$pdf->Ln(25.2);
}
$pdf->SetFont("Arial", "B", 8);
$pdf->Ln(11.8);
$pdf->Cell(20);
$texto = $row2["SA_OBSERVACIONES"];
$pdf->WordWrap($texto, 176);
$texto = explode("\n", $texto);
for ($i=0; $i<count($texto); $i++) {
if ($i > 1)
break;
$str = trim($texto[$i]);
$pdf->Cell(1);
$pdf->Cell(0, 0, $str);
$pdf->Ln(4.2);
}
$pdf->SetY(235.4);
$pdf->SetX(76);
$pdf->Cell(44, 0, $row2["SA_LUGARSUSCRIPCION"]);
$pdf->Cell(-2);
$pdf->Cell(0, 0, "La cuota se calculará mensualmente de acuerdo a la cantidad de trabajadores y a la masa salarial bruta del período de cobertura.");
$pdf->SetFont("Arial", "B", 9);
$pdf->Ln(59.8);
$pdf->Cell(56);
$pdf->Cell(120, 0, $row2["PR_MAIL"]);
// Muestro el texto de arriba de las firmas..
$pdf->SetFont("Arial", "", 9);
$pdf->Ln(4);
$texto = explode("\n", "Por medio de la presente ".$row2["RAZON_SOCIAL"]." autoriza a Provincia ART S.A. a entregar a Provincia Seguros S.A. la información sobre la nómina (datos de Empleados, Masa Salarial, C.U.I.L., Nombre, etc.) e información complementaria que a criterio de la aseguradora permita tener un conocimiento de la actividad y del comportamiento del riesgo inherente a la cobertura.");
for ($i=0; $i<count($texto); $i++) {
$str = trim($texto[$i]);
$pdf->WordWrap($str, 188);
$pdf->Write(4, $str);
$pdf->Ln(2);
}
$pdf->SetX(8);
$pdf->SetY(250);
$pdf->Cell(120, 0, "Buenos Aires, ".date("d")." de ".GetMonthName(date("m"))." de ".date("Y"));
updateFechaImpresion((isset($idFormulario)?$idFormulario:0));
}
else {
$pdf->AddPage();
$pdf->SetTextColor(255, 0, 0);
$pdf->SetFont("Arial", "B", 14);
$pdf->Cell(170, 0, $rowCabecera["DOMICDESTINATARIO"]);
$pdf->Ln(149);
$pdf->Cell(-2);
$pdf->Cell(9, 0, $rowPeriodos["PER_MES"], 0, 0, "C");
$pdf->Cell(-0.4);
$pdf->Cell(11, 0, $rowPeriodos["PER_ANO"], 0, 0, "C");
$pdf->SetFont("Arial", "B", 14);
$pdf->Cell(10);
$pdf->Cell(85, 0, $rowPeriodos["TOTALFORMATEADO"], 0, 0, "C");
$pdf->SetY(196.4);
$texto = strtoupper(numerosALetras(str_replace(",", ".", $rowPeriodos["TOTAL"]), 2, true));
$pdf->WordWrap($texto, 145);
$texto = explode("\n", $texto);
for ($i=0; $i<count($texto); $i++) {
$str = trim($texto[$i]);
$pdf->Cell(116);
$pdf->Cell(0, 0, $str);
$pdf->Ln(5);
}
}
$pdf->Output("EC_Formulario_817.pdf", "I");
// ******* FIN - Armado del reporte.. *******
}
catch (Exception $e) {
echo "<script type='text/javascript'>alert(unescape('".rawurlencode($e->getMessage())."'));</script>";
$row["QUIEBRA"] = $row["QUIEBRA"]." (".$row["PERQUIEBRA"].")";
// Traigo los registros del detalle para saber cuantas hojas voy a generar..
$params = array(":contrato" => $_REQUEST["id"]);
$sql = getSqlDetalle($row, $sqlFilas);
$stmt = DBExecSql($conn, $sql, $params);
// ******* INICIO - Armado del reporte.. *******
$pdf = new FPDI("L", "mm", array(228, 280));
$pdf->setSourceFile($_SERVER["DOCUMENT_ROOT"]."/modules/estado_cuenta/templates/estado_cuenta.pdf");
$pdf->SetFont("Arial", "", 7);
$textoLeyendaFinal = getLeyendaFinal($_REQUEST["id"]);
$pdf->WordWrap($textoLeyendaFinal, 196);
$textoLeyendaFinal = explode("\n", $textoLeyendaFinal);
$fila = 1;
$pagina = 1;
while ($rowDetalle = DBGetQuery($stmt, 1, false)) {
if ($fila == 1)
setDatosEstaticos($pdf, $row, $pagina, $entidad, $vendedor, $ejecutivo, $estudio, $gestor);
// Muestro el detalle..
$pdf->SetFont("Arial", "", 7);
$pdf->SetX(0);
$pdf->SetY(75.4 + ($fila * 4));
$pdf->Cell(0.2);
$pdf->Cell(13, 0, $rowDetalle["PERIODO"]);
$pdf->Cell(190, 0, setNumeroSolicitud($row2["CUITSUSCRIPCION"], $row2["FO_FORMULARIO"]), 0, 0, "C");
$params = array(":idsolicitud" => $row2["SA_ID"]);
$sql =
"SELECT *
FROM afi.arp_riesgo_pcp
WHERE rp_fechabaja IS NULL
AND rp_idsolicitud = :idsolicitud";
$stmt = DBExecSql($conn, $sql, $params);
$rowRiesgo = DBGetQuery($stmt, 1, false);
$pdf->Ln(15);
$pdf->Cell(30);
$texto = $rowRiesgo["RP_DESCRIPCION"];
$pdf->WordWrap($texto, 168);
$texto = explode("\n", $texto);
for ($i=0; $i<count($texto); $i++) {
if ($i > 1)
break;
$str = trim($texto[$i]);
$pdf->Cell(2);
$pdf->Cell(0, 0, $str);
$pdf->Ln(4.8);
}
$pdf->SetY(51);
if ($rowRiesgo["RP_ELECTRICO"] == "S") {
$pdf->Cell(103.4);
