//$io_pdf->selectFont('../../shared/ezpdf/fonts/Symbol.afm');
//$io_pdf->selectFont('../../shared/ezpdf/fonts/Times-Italic.afm');
//$io_pdf->selectFont('../../shared/ezpdf/fonts/Times-Roman.afm');
//$io_pdf->selectFont('../../shared/ezpdf/fonts/Courier.afm');
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
$io_pdf->set_margenes(0,55,0,0);
$io_pdf->ezStartPageNumbers(570,30,10,'','',1); // Insertar el n�mero de p�gina
for ($i=1;$i<=$li_total;$i++)
{
$ls_numdoc=$class_report->ds_voucher1->getValue("numdoc",$i);
$ls_chevau=$class_report->ds_voucher1->getValue("chevau",$i);
$ls_codope='CH';
$data = $class_report->uf_cargar_chq_voucher($ls_numdoc,$ls_chevau,$ls_codban,$ls_ctaban,$ls_codope);
$lb_valido = $class_report->uf_actualizar_status_impreso($ls_numdoc,$ls_chevau,$ls_codban,$ls_ctaban,$ls_codope);
$class_report->SQL->begin_transaction();
if (!$lb_valido)
{
print "Error al actualizar";
$class_report->is_msg_error;
$class_report->SQL->rollback();
$li_totfec = count($arr_fecmov);
//Descompongo la cadena de operaciones en un arreglo tomando como separación el '-'
$arr_operaciones = split("-",$ls_operaciones);
$li_totdoc = count($arr_operaciones);
$class_report->uf_buscar_cheques_vouchers($arr_documentos,$arr_fecmov,$arr_operaciones,$ls_codban,$ls_ctaban);
$li_total = $class_report->ds_voucher1->getRowCount("numdoc");
if ($li_total>0)
{
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf=new class_pdf('LETTER','portrait'); // Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
$io_pdf->set_margenes(0,55,0,0);
$io_pdf->ezStartPageNumbers(550,50,10,'','',1); // Insertar el número de página
for ($i=1;$i<=$li_total;$i++)
{
$ls_numdoc=$class_report->ds_voucher1->getValue("numdoc",$i);
$ls_chevau=$class_report->ds_voucher1->getValue("chevau",$i);
$ls_codope='CH';
$data=$class_report->uf_cargar_chq_voucher($ls_numdoc,$ls_chevau,$ls_codban,$ls_ctaban,$ls_codope);
$class_report->SQL->begin_transaction();
$lb_valido=$class_report->uf_actualizar_status_impreso($ls_numdoc,$ls_chevau,$ls_codban,$ls_ctaban,$ls_codope);
if(!$lb_valido)
{
print "Error al actualizar";
$class_report->is_msg_error;
$io_funciones=new class_funciones();
require_once("../class_folder/class_funciones_soc.php");
$io_fun_compra = new class_funciones_soc();
$ls_tiporeporte=$io_fun_compra->uf_obtenervalor_get("tiporeporte",1);
$ls_bolivares="Bs.";
if($ls_tiporeporte==1)
{
require_once("sigesp_soc_class_reportbsf.php");
$io_class_report=new sigesp_soc_class_reportbsf();
$ls_bolivares="Bs.F.";
}
error_reporting(E_ALL);
set_time_limit(3000);
$io_pdf=new class_pdf('LETTER','landscape'); // Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
$io_pdf->ezStartPageNumbers(730,20,7,'','',1); // Insertar el número de página
$io_pdf->ezSetCmMargins(3.7,5,1,4); // Configuración de los margenes en centímetros
$ls_tipsolcot=$_GET["tipsolcot"];
$ls_numanacot=$_GET["numanacot"];
$ld_fecha=$_GET["fecha"];
$ls_observacion=$_GET["observacion"];
$lb_valido=uf_insert_seguridad();
if($lb_valido)
{
uf_print_encabezado_pagina($ls_numanacot,$ls_observacion,$ld_fecha,$io_pdf);
$lb_valido=$io_class_report->uf_cargar_cotizaciones($ls_numanacot, $la_cotizaciones);
if($lb_valido)
{
uf_print_proveedores($la_cotizaciones,$io_pdf);
$lb_valido=$io_class_report->uf_select_items($ls_numanacot,$ls_tipsolcot,$la_items);
if($lb_valido)
$li_totfec = count($arr_fecmov);
//Descompongo la cadena de operaciones en un arreglo tomando como separación el '-'
$arr_operaciones = split("-",$ls_operaciones);
$li_totdoc = count($arr_operaciones);
$class_report->uf_buscar_cheques_vouchers($arr_documentos,$arr_fecmov,$arr_operaciones,$ls_codban,$ls_ctaban);
$li_total = $class_report->ds_voucher1->getRowCount("numdoc");
if ($li_total>0)
{
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf=new class_pdf('LETTER','portrait'); // Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
$io_pdf->set_margenes(0,60,0,0);
$io_pdf->ezStartPageNumbers(590,23.5,7,'','',1); // Insertar el número de página
for ($i=1;$i<=$li_total;$i++)
{
$ls_numdoc=$class_report->ds_voucher1->getValue("numdoc",$i);
$ls_chevau=$class_report->ds_voucher1->getValue("chevau",$i);
$ls_codope='CH';
$data=$class_report->uf_cargar_chq_voucher($ls_numdoc,$ls_chevau,$ls_codban,$ls_ctaban,$ls_codope);
$class_report->SQL->begin_transaction();
$lb_valido=$class_report->uf_actualizar_status_impreso($ls_numdoc,$ls_chevau,$ls_codban,$ls_ctaban,$ls_codope);
if (!$lb_valido)
{
print "Error al actualizar";
$class_report->is_msg_error;
$class_report->SQL->rollback();
$li_totfec = count($arr_fecmov);
//Descompongo la cadena de operaciones en un arreglo tomando como separación el '-'
$arr_operaciones = split("-",$ls_operaciones);
$li_totdoc = count($arr_operaciones);
$class_report->uf_buscar_cheques_vouchers($arr_documentos,$arr_fecmov,$arr_operaciones,$ls_codban,$ls_ctaban);
$li_total = $class_report->ds_voucher1->getRowCount("numdoc");
if ($li_total>0)
{
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf=new class_pdf('LETTER','portrait'); // Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
$io_pdf->set_margenes(0,0,$x_pos,0);
$io_pdf->ezStartPageNumbers(560,45,8,'','',1); // Insertar el número de página
for ($i=1;$i<=$li_total;$i++)
{
$ls_numdoc=$class_report->ds_voucher1->getValue("numdoc",$i);
$ls_chevau=$class_report->ds_voucher1->getValue("chevau",$i);
$ls_codope='CH';
$data=$class_report->uf_cargar_chq_voucher($ls_numdoc,$ls_chevau,$ls_codban,$ls_ctaban,$ls_codope);
$class_report->SQL->begin_transaction();
$lb_valido=$class_report->uf_actualizar_status_impreso($ls_numdoc,$ls_chevau,$ls_codban,$ls_ctaban,$ls_codope);
if(!$lb_valido)
{
print "Error al actualizar";
$class_report->is_msg_error;
$ld_fecmov=$_GET["fecmov"];
$ls_chevau="";
$hidnumero=$ls_numdoc;
$la_data_compret=array('numdocres'=>$ls_numdocres,'fecdocres'=>$ls_fecdocres,'nrocontrol'=>$ls_nrocontrol,'monto'=>$ldec_monto,'desope'=>$ls_desope,'nrocontrol'=>$ls_nrocontrol);
$class_report->uf_generar_cmpret_ordendepagodirecta($ls_codemp,$ls_numdoc,$ls_codban,$ls_ctaban,$ls_tipodestino,$ls_codpro,$ls_cedben,$ld_fecmov,$la_data_compret);
$li_valini=0;
$li_valfin=15;
$ls_const =15;
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new class_pdf("LEGAL","landscape");
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
$io_pdf->ezSetCmMargins(3.5,3,3,3);
$io_pdf->ezStartPageNumbers(950,50,10,'','',1);
$lb_valido=$io_report->uf_select_ret_iva_cab($ls_codemp,$ls_numdoc);
if($lb_valido==false)
{
print("<script language=JavaScript>");
print(" alert('No hay nada que Reportar');");
print("close();");
print("</script>");
}
else
{
$li_totrow=$io_report->ds_ret->getRowCount("numcom");
for($i=1;$i<=$li_totrow;$i++)