$pdf->SetWidths(array(15, 20, 30, 25, 25, 25, 25, 15, 15, 15, 15, 30));
$pdf->Fuente("", 9);
$pdf->SetAligns(array("R", "R", "", "", "", "", "", "R", "R", "R", "R", "L", "R"));
$TTotalBs = 0;
foreach ($opt as $o) {
$pac = $paciente->MostrarRegistro($o['CodPaciente']);
$pac = array_shift($pac);
$prod1 = $producto->MostrarRegistro($o['CodProducto1']);
$prod1 = array_shift($prod1);
$prod2 = $producto->MostrarRegistro($o['CodProducto2']);
$prod2 = array_shift($prod2);
$prod3 = $producto->MostrarRegistro($o['CodProducto3']);
$prod3 = array_shift($prod3);
$prod4 = $producto->MostrarRegistro($o['CodProducto4']);
$prod4 = array_shift($prod4);
$prodtipo = $productotipo->MostrarRegistro($o['CodProductoTipo']);
$prodtipo = array_shift($prodtipo);
$TotalBs = number_format($o['TotalBs'], 2, ".", "");
$ACuentaBs = number_format($o['ACuentaBs'], 2, ".", "");
$ACuentaSus = number_format($o['ACuentaSus'], 2, ".", "");
$SaldoBs = number_format($o['SaldoBs'], 2, ".", "");
$DescuentoBs = number_format($o['DescuentoBs'], 2, ".", "");
$CobrarBs = number_format($o['CobrarBs'], 2, ".", "");
$TTotalBs += $TotalBs;
$TACuentaBs += $ACuentaBs;
$TACuentaSus += $ACuentaSus;
$TSaldoBs += $SaldoBs;
$TDescuentoBs += $DescuentoBs;
$TCobrarBs += $CobrarBs;
$datos = array($o['NumeroBoleta'], fecha2Str($o['FechaEmitido']) . " " . $o['HoraEmitido'], utf8_decode(mb_strtoupper($pac['Paterno'] . " " . $pac['Materno'] . " " . $pac['Nombres'], "utf8")), utf8_decode(mb_strtoupper($prod1['Nombre'] . " - " . $o['Detalle1'], "utf8")), utf8_decode(mb_strtoupper($prod2['Nombre'] . " - " . $o['Detalle2'], "utf8")), utf8_decode(mb_strtoupper($prod3['Nombre'] . " - " . $o['Detalle3'], "utf8")), utf8_decode(mb_strtoupper($prod4['Nombre'] . " - " . $o['Detalle4'], "utf8")), $TotalBs, $ACuentaBs, $ACuentaSus, $SaldoBs, utf8_decode(mb_strtoupper($o['Observaciones'], "utf8")));
$pdf->Row($datos);
