function uf_imprimirresultados($as_codpai, $as_despai) { require_once "../shared/class_folder/sigesp_include.php"; $in = new sigesp_include(); $con = $in->uf_conectar(); require_once "../shared/class_folder/class_mensajes.php"; $io_msg = new class_mensajes(); require_once "../shared/class_folder/class_sql.php"; $io_sql = new class_sql($con); $ds = new class_datastore(); print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td width=60>Código</td>"; print "<td width=440>Descripción</td>"; print "</tr>"; $ls_sql = "SELECT codpai,despai FROM sigesp_pais" . " WHERE codpai like '" . $as_codpai . "'" . " AND despai like '" . $as_despai . "'"; $rs_pai = $io_sql->select($ls_sql); if ($row = $io_sql->fetch_row($rs_pai)) { $data = $io_sql->obtener_datos($rs_pai); $ds->data = $data; $li_rows = $ds->getRowCount("codpai"); for ($li_index = 1; $li_index <= $li_rows; $li_index++) { print "<tr class=celdas-blancas>"; $ls_codpai = $data["codpai"][$li_index]; $ls_despai = $data["despai"][$li_index]; print "<td><a href=\"javascript: aceptar('{$ls_codpai}','{$ls_despai}');\">" . $ls_codpai . "</a></td>"; print "<td>" . $ls_despai . "</td>"; print "</tr>"; } } else { $io_msg->message("No hay registros"); } print "</table>"; }
function uf_imprimirresultados($as_codpai, $as_codest, $as_desest) { require_once("..\shared\class_folder\sigesp_include.php"); $in=new sigesp_include(); $con=$in->uf_conectar(); require_once("..\shared\class_folder\class_mensajes.php"); $msg=new class_mensajes(); require_once("..\shared\class_folder\class_sql.php"); $SQL=new class_sql($con); $ds=new class_datastore(); print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td width=60>Código</td>"; print "<td width=440>Descripción</td>"; print "</tr>"; $ls_sql="SELECT codest,desest FROM sigesp_estados". " WHERE (codpai='".$as_codpai."')". " AND(codest like '".$as_codest."'". " AND desest like '".$as_desest."')"; $rs_est=$SQL->select($ls_sql); if($row=$SQL->fetch_row($rs_est)) { $data=$SQL->obtener_datos($rs_est); $ds->data=$data; $li_rows=$ds->getRowCount("codest"); for($li_index=1;$li_index<=$li_rows;$li_index++) { print "<tr class=celdas-blancas>"; $ls_codest=$data["codest"][$li_index]; $ls_desest=$data["desest"][$li_index]; print "<td><a href=\"javascript: aceptar('$ls_codest','$ls_desest');\">".$ls_codest."</a></td>"; print "<td>".$ls_desest."</td>"; print "</tr>"; } } print "</table>"; }
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, 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); // Insertar el número de página $li_total = $io_sql->num_rows($rs_proveedor); //print "REGISTROS ENCONTRADOS--->".$li_total; uf_print_cabecera($io_pdf); $data = $io_sql->obtener_datos($rs_proveedor); $la_documentos[0] = ""; for ($z = 1; $z <= $li_total; $z++) { //1 $io_pdf->transaction('start'); // Iniciamos la transacción $li_numpag = $io_pdf->ezPageCount; // Número de página $ls_codpro = $data["cod_pro"][$z]; $ls_nompro = $data["nompro"][$z]; $ls_rifpro = $data["rifpro"][$z]; $ls_ocei = $data["ocei_no_reg"][$z]; $ls_telpro = $data["telpro"][$z]; $ls_dirpro = $data["dirpro"][$z]; $ls_obspro = $data["obspro"][$z]; $ls_denesp = $io_report->uf_load_especialidadproveedor($ls_codpro, &$lb_valido);
$ls_codestpro3 = $io_funcion->uf_cerosizquierda($ls_codestpro3, 25); $ls_codestpro4 = $io_funcion->uf_cerosizquierda($ls_codestpro4, 25); $ls_codestpro5 = $io_funcion->uf_cerosizquierda($ls_codestpro5, 25); } $ls_cadena = ""; if ($li_estmodest == '2') { $ls_cadena = " AND codestpro4 = '" . $ls_codestpro4 . "' AND codestpro5 = '" . $ls_codestpro5 . "'"; } $ls_sql = "SELECT spg_cuenta,denominacion,sc_cuenta,status" . " FROM spg_cuentas" . " WHERE codemp = '" . $as_codemp . "'" . " AND spg_cuenta like '" . $ls_codestpro . "%'" . " AND denominacion like '%" . $ls_denestpro . "%'" . " AND sc_cuenta like '" . $ls_codscg . "%'" . " AND codestpro1 = '" . $ls_codestpro1 . "'" . " AND estcla = '" . $ls_estcla . "'" . " AND codestpro2 = '" . $ls_codestpro2 . "'" . " AND codestpro3 = '" . $ls_codestpro3 . "'" . $ls_cadena . "ORDER BY spg_cuenta\t "; $rs_data = $io_sql->select($ls_sql); if ($rs_data === false) { $io_msg->message($io_funcion->uf_convertirmsg($io_sql->message)); } else { $data = $rs_data; if ($row = $io_sql->fetch_row($rs_data)) { $data = $io_sql->obtener_datos($rs_data); $arrcols = array_keys($data); $totcol = count($arrcols); $io_ds->data = $data; $totrow = $io_ds->getRowCount("spg_cuenta"); if ($totrow > 0) { for ($z = 1; $z <= $totrow; $z++) { $cuenta = $data["spg_cuenta"][$z]; $denominacion = $data["denominacion"][$z]; $cuentascg = $data["sc_cuenta"][$z]; $status = $data["status"][$z]; if ($status == 'C') { $object[$z][1] = "<input name=chkcta" . $z . " type=checkbox id=chkcta" . $z . " value=1 class=sin-borde><input name=status" . $z . " type=hidden id=status" . $z . " value='" . $status . "'> "; $object[$z][4] = "<input type=text name=txtcuentascg" . $z . " value='" . $cuentascg . "' id=txtcuentascg" . $z . " class=sin-borde readonly style=text-align:center size=16 maxlength=25>"; } else { $object[$z][1] = "<input name=status" . $z . " type=hidden id=status" . $z . " value='" . $status . "'> ";
" ORDER BY codtipmodpre ASC "; $rs_fuente=$io_sql->select($ls_sql); $data=$rs_fuente; ?> <table width="500" border="0" align="center" cellpadding="1" cellspacing="1"> <tr> <td width="496" colspan="2" class="titulo-celda">Catálogo de Tipo de Modificaciones Presupuestarias </td> </tr> </table> <br> <form name="form1" method="post" action=""> <div align="center"> <?php if ($row=$io_sql->fetch_row($rs_fuente)) { $data=$io_sql->obtener_datos($rs_fuente); $io_dsfuente->data=$data; $totrow=$io_dsfuente->getRowCount("codtipmodpre"); print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td>Código</td>"; print "<td style=text-align:left>Denominación</td>"; print "<td style=text-align:left>Prefijo</td>"; print "</tr>"; for ($z=1;$z<=$totrow;$z++) { print "<tr class=celdas-blancas>"; $ls_codtipmodpre= $data["codtipmodpre"][$z]; $ls_dentipmodpre= $data["dentipmodpre"][$z]; $ls_pretipmodpre= $data["pretipmodpre"][$z]; $ls_contipmodpre= $data["contipmodpre"][$z];
$rs_proveedor = $io_report->uf_load_proveedores($ls_codemp, $li_orden, $ls_tipo, $ls_codprov1, $ls_codprov2, $ls_codesp, $lb_valido); if ($lb_valido) { 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(4.5, 2.5, 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(950, 50, 9, '', '', 1); // Insertar el número de página $li_total = $io_sql->num_rows($rs_proveedor); $data = $io_sql->obtener_datos($rs_proveedor); for ($z = 1; $z <= $li_total; $z++) { //1 $ls_codpro = $data["cod_pro"][$z]; $ls_nompro = $data["nompro"][$z]; $ls_rifpro = $data["rifpro"][$z]; $ls_dirpro = $data["dirpro"][$z]; $ls_telpro = $data["telpro"][$z]; $ls_especialidad = $io_report->uf_load_especialidadproveedor2($ls_codpro, &$lb_valido); $ls_nivel = $io_report->uf_load_niveldecontratacionporproveedor($ls_codpro, &$lb_valido); $ls_clas = $io_report->uf_load_niveldeclasificacionporproveedor($ls_codpro, &$lb_valido); $ld_moncapfin = number_format($data["monfincon"][$z], 2, ",", "."); //Capacidad Financiera. $la_data[$z] = array('codigo' => $ls_codpro, 'nombre' => $ls_nompro, 'rif' => $ls_rifpro, 'direccion' => $ls_dirpro, 'telefono' => $ls_telpro, 'especialidad' => $ls_especialidad, 'nivel' => $ls_nivel, 'calificacion' => $ls_clas, 'capacidad' => $ld_moncapfin); } //1
function uf_imprimirresultados($as_codper, $as_cedper, $as_nomper, $as_apeper) { require_once "../shared/class_folder/sigesp_include.php"; $in = new sigesp_include(); $con = $in->uf_conectar(); require_once "../shared/class_folder/class_mensajes.php"; $msg = new class_mensajes(); require_once "../shared/class_folder/class_sql.php"; $SQL = new class_sql($con); $ds = new class_datastore(); require_once "../shared/class_folder/class_funciones.php"; $fun = new class_funciones(); $emp = $_SESSION["la_empresa"]; $ls_codemp = $emp["codemp"]; print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td width=100>Código</td>"; print "<td width=100 align=center>Cédula</td>"; print "<td width=440>Nombre y Apellido</td>"; print "</tr>"; $ls_sql = "SELECT sno_personal.*, sno_profesion.despro, sigesp_pais.despai, sigesp_estados.desest, sigesp_municipio.denmun, sigesp_parroquia.denpar "; $ls_sql = $ls_sql . "FROM sno_personal, sno_profesion, sigesp_pais, sigesp_estados, sigesp_municipio, sigesp_parroquia "; $ls_sql = $ls_sql . "WHERE sno_personal.codemp='" . $ls_codemp . "'"; $ls_sql = $ls_sql . " AND sno_profesion.codemp = sno_personal.codemp "; $ls_sql = $ls_sql . " AND sno_profesion.codpro = sno_personal.codpro "; $ls_sql = $ls_sql . " AND sigesp_pais.codpai = sno_personal.codpai "; $ls_sql = $ls_sql . " AND sigesp_estados.codpai = sno_personal.codpai "; $ls_sql = $ls_sql . " AND sigesp_estados.codest = sno_personal.codest "; $ls_sql = $ls_sql . " AND sigesp_municipio.codpai = sno_personal.codpai "; $ls_sql = $ls_sql . " AND sigesp_municipio.codest = sno_personal.codest "; $ls_sql = $ls_sql . " AND sigesp_municipio.codmun = sno_personal.codmun "; $ls_sql = $ls_sql . " AND sigesp_parroquia.codpai = sno_personal.codpai "; $ls_sql = $ls_sql . " AND sigesp_parroquia.codest = sno_personal.codest "; $ls_sql = $ls_sql . " AND sigesp_parroquia.codmun = sno_personal.codmun "; $ls_sql = $ls_sql . " AND sigesp_parroquia.codpar = sno_personal.codpar "; $ls_sql = $ls_sql . " AND sno_personal.codper like '" . $as_codper . "' AND sno_personal.cedper like '" . $as_cedper . "'"; $ls_sql = $ls_sql . " AND sno_personal.nomper like '" . $as_nomper . "' AND sno_personal.apeper like '" . $as_apeper . "'"; $ls_sql = $ls_sql . " ORDER BY sno_personal.codper"; $rs_per = $SQL->select($ls_sql); if ($row = $SQL->fetch_row($rs_per)) { $data = $SQL->obtener_datos($rs_per); $ds->data = $data; $li_rows = $ds->getRowCount("codper"); for ($li_index = 1; $li_index <= $li_rows; $li_index++) { print "<tr class=celdas-blancas>"; $ls_codper = $data["codper"][$li_index]; $ls_cedper = $data["cedper"][$li_index]; $ls_nomper = $data["nomper"][$li_index]; $ls_apeper = $data["apeper"][$li_index]; $ls_dirper = $data["dirper"][$li_index]; $ld_fecnacper = $fun->uf_convertirfecmostrar($data["fecnacper"][$li_index]); $ls_edocivper = $data["edocivper"][$li_index]; $ls_telhabper = $data["telhabper"][$li_index]; $ls_telmovper = $data["telmovper"][$li_index]; $ls_sexper = $data["sexper"][$li_index]; $li_estaper = $data["estaper"][$li_index]; $li_estaper = str_replace(".", ",", $li_estaper); $li_estaper = uf_formatonumerico($li_estaper); $li_pesper = $data["pesper"][$li_index]; $li_pesper = str_replace(".", ",", $li_pesper); $li_pesper = uf_formatonumerico($li_pesper); $ls_codpro = $data["codpro"][$li_index]; $ls_nivacaper = $data["nivacaper"][$li_index]; $ls_codpai = $data["codpai"][$li_index]; $ls_codest = $data["codest"][$li_index]; $ls_codmun = $data["codmun"][$li_index]; $ls_codpar = $data["codpar"][$li_index]; $ls_catper = $data["catper"][$li_index]; $ls_cedbenper = $data["cedbenper"][$li_index]; $ls_numhijper = $data["numhijper"][$li_index]; $ls_obsper = $data["obsper"][$li_index]; $ls_contraper = $data["contraper"][$li_index]; $ls_tipvivper = $data["tipvivper"][$li_index]; $ls_tenvivper = $data["tenvivper"][$li_index]; $li_monpagvivper = $data["monpagvivper"][$li_index]; $li_monpagvivper = str_replace(".", ",", $li_monpagvivper); $li_monpagvivper = uf_formatonumerico($li_monpagvivper); $ls_cuecajahoper = $data["cuecajahoper"][$li_index]; $ls_cuelphper = $data["cuelphper"][$li_index]; $ls_cuefidper = $data["cuefidper"][$li_index]; $ls_cajahoper = $data["cajahoper"][$li_index]; $ld_fecingadmpubper = $fun->uf_convertirfecmostrar($data["fecingadmpubper"][$li_index]); $li_anoservpreper = $data["anoservpreper"][$li_index]; $ld_fecingper = $fun->uf_convertirfecmostrar($data["fecingper"][$li_index]); $ld_fecegrper = $fun->uf_convertirfecmostrar($data["fecegrper"][$li_index]); $ls_cauegrper = $data["cauegrper"][$li_index]; $ls_obsegrper = $data["obsegrper"][$li_index]; $ls_estper = $data["estper"][$li_index]; switch ($ls_estper) { case "0": $ls_estper = "PRE INGRESO"; break; case "1": $ls_estper = "ACTIVO"; break; case "2": $ls_estper = "NA"; break; case "3": $ls_estper = "EGRESADO"; break; } $ls_despro = $data["despro"][$li_index]; $ls_despai = $data["despai"][$li_index]; $ls_desest = $data["desest"][$li_index]; $ls_desmun = $data["denmun"][$li_index]; $ls_despar = $data["denpar"][$li_index]; print "<td><a href=\"javascript: aceptar('{$ls_codper}','{$ls_cedper}','{$ls_nomper}','{$ls_apeper}','{$ls_dirper}','{$ld_fecnacper}',"; print "'{$ls_edocivper}','{$ls_telhabper}','{$ls_telmovper}','{$ls_sexper}','{$li_estaper}','{$li_pesper}','{$ls_codpro}','{$ls_nivacaper}',"; print "'{$ls_codpai}','{$ls_codest}','{$ls_codmun}','{$ls_codpar}','{$ls_catper}','{$ls_cedbenper}','{$ls_numhijper}','{$ls_obsper}',"; print "'{$ls_contraper}','{$ls_tipvivper}','{$ls_tenvivper}','{$li_monpagvivper}','{$ls_cuecajahoper}','{$ls_cuelphper}','{$ls_cuefidper}',"; print "'{$ls_cajahoper}','{$ld_fecingadmpubper}','{$li_anoservpreper}','{$ld_fecingper}','{$ld_fecegrper}','{$ls_cauegrper}', "; print "'{$ls_obsegrper}','{$ls_despro}','{$ls_despai}','{$ls_desest}','{$ls_desmun}','{$ls_despar}','{$ls_estper}');\">" . $ls_codper . "</a></td>"; print "<td>" . $ls_cedper . "</td>"; print "<td>" . $ls_nomper . " " . $ls_apeper . "</td>"; print "</tr>"; } } print "</table>"; }
</tr> <tr> <td height="13" colspan="4"> </td> </tr> <tr> <td height="13" colspan="4"><div align="center"> <?php //Titulos de la tabla $title[1]="Codigo"; $title[2]="Fuente Financiamiento"; $title[3]="Asignación"; $ls_nombre="grid_disfuefin"; if ($ls_operacion == "") { $rs_load=$io_class_apertura->uf_spg_load_fuefin_estructura($ls_empresa,$ls_estpro1,$ls_estpro2,$ls_estpro3,$ls_estpro4,$ls_estpro5,$ls_estcla,$ls_cuentaplan); if($row=$io_sql->fetch_row($rs_load)) { $data=$io_sql->obtener_datos($rs_load); $ds_aper->data=$data; $li_num=$ds_aper->getRowCount("codfuefin"); $li_totnum=$li_num; for($i=1;$i<=$li_num;$i++) { $ls_codfuefin = $data["codfuefin"][$i]; $ls_denfuefin = $data["denfuefin"][$i]; $ld_monto =number_format($data["monto"][$i],2,",","."); $object[$i][1]="<input type=text name=txtCodfuefin".$i." value=$ls_codfuefin class=sin-borde readonly><input name=codfuefin".$i." type=hidden id=codfuefin value='$ls_codfuefin'>"; $object[$i][2]="<input type=text name=txtDenfuefin".$i." value='$ls_denfuefin' size=50 class=sin-borde readonly >"; $object[$i][3]="<input type=text name=txtMonto".$i." onBlur=uf_format(this,$i) onKeyPress='return keyRestrictgrid(event)' onKeyUp='ue_validarcomas_puntos(this)' value=$ld_monto class=sin-borde style=text-align:right onClick='calcular_porasignar()'>"; }//for //$io_class_grid->make_gridScroll($li_totnum,$title,$object,610,'DISTRIBUCION DE LA FUENTE DE FINANCIAMIENTO',$ls_nombre,245); $io_class_grid->make_gridScroll($li_totnum,$title,$object,550,'DISTRIBUCION DE LA FUENTE DE FINANCIAMIENTO',$ls_nombre,150);
</table> <div align="center"><br> <?php require_once "../../shared/class_folder/sigesp_include.php"; require_once "../../shared/class_folder/class_datastore.php"; require_once "../../shared/class_folder/class_sql.php"; $io_conect = new sigesp_include(); $con = $io_conect->uf_conectar(); $io_dsdeducciones = new class_datastore(); $io_sql = new class_sql($con); $arr = $_SESSION["la_empresa"]; $ls_sql = " SELECT a.*,b.denominacion " . " FROM sigesp_deducciones a,scg_cuentas b " . " WHERE a.sc_cuenta=b.sc_cuenta " . " ORDER BY a.codded ASC"; $rs_deduc = $io_sql->select($ls_sql); $data = $rs_deduc; if ($row = $io_sql->fetch_row($rs_deduc)) { $data = $io_sql->obtener_datos($rs_deduc); $arrcols = array_keys($data); $totcol = count($arrcols); $io_dsdeducciones->data = $data; $totrow = $io_dsdeducciones->getRowCount("codded"); print "<table width=600 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td>Código</td>"; print "<td>Denominación</td>"; print "<td>SCG</td>"; print "<td>Deducible</td>"; print "<td>Fórmula</td>"; print "</tr>"; for ($z = 1; $z <= $totrow; $z++) { print "<tr class=celdas-blancas>"; $codigo = $data["codded"][$z];
$arr = $_SESSION["la_empresa"]; $ls_sql = " SELECT codcla,dencla " . " FROM soc_clausulas " . " ORDER BY codcla ASC "; $rs_clausula = $io_sql->select($ls_sql); $data = $rs_clausula; ?> <table width="500" border="0" align="center" cellpadding="1" cellspacing="1"> <tr> <td width="496" colspan="2" class="titulo-celda">Catálogo de Clausulas</td> </tr> </table> <br> <form name="form1" method="post" action=""> <div align="center"> <?php if ($row = $io_sql->fetch_row($rs_clausula)) { $data = $io_sql->obtener_datos($rs_clausula); $arrcols = array_keys($data); $totcol = count($arrcols); $io_dsclausula->data = $data; $totrow = $io_dsclausula->getRowCount("codcla"); print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td>Código</td>"; print "<td>Denominación</td>"; print "</tr>"; for ($z = 1; $z <= $totrow; $z++) { print "<tr class=celdas-blancas>"; $codigo = $data["codcla"][$z]; $denominacion = $data["dencla"][$z]; print "<td><a href=\"javascript: aceptar('{$codigo}','{$denominacion}');\">" . $codigo . "</a></td>"; print "<td>" . $denominacion . "</td>";
$io_conect=new sigesp_include(); $conn=$io_conect->uf_conectar(); $io_msg=new class_mensajes(); $io_dstipodoc=new class_datastore(); $io_sql=new class_sql($conn); $arr=$_SESSION["la_empresa"]; $ls_sql=" SELECT codtipdoc,dentipdoc ". " FROM cxp_documento ". " WHERE estcon=1". " AND estpre=2". " ORDER BY codtipdoc ASC"; $rs_tipodoc=$io_sql->select($ls_sql); $data=$rs_tipodoc; if($row=$io_sql->fetch_row($rs_tipodoc)) { $data=$io_sql->obtener_datos($rs_tipodoc); $arrcols=array_keys($data); $totcol=count($arrcols); $io_dstipodoc->data=$data; $totrow=$io_dstipodoc->getRowCount("codtipdoc"); print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla>"; print "<tr class=titulo-celda>"; print "<td>Código</td>"; print "<td>Denominación</td>"; print "</tr>"; for($z=1;$z<=$totrow;$z++) { print "<tr class=celdas-blancas>"; $ls_codtipdoc =$data["codtipdoc"][$z]; $ls_dentipdoc =$data["dentipdoc"][$z]; print "<td style=text-align:center><a href=\"javascript: aceptar('$ls_codtipdoc','$ls_dentipdoc');\">".$ls_codtipdoc."</a></td>";
$li_totant=0; unset($la_data); unset($la_data_ctas); $ls_sql="SELECT a.spg_cuenta as spg_cuenta,a.denominacion as denspg,a.sc_cuenta as sc_cuenta,a.status status , b.denominacion as denscg FROM spg_cuentas a,scg_cuentas b WHERE a.codemp='".$ls_codemp."' AND a.codemp=b.codemp AND a.sc_cuenta=b.sc_cuenta AND CONCAT(a.codestpro1,a.codestpro2,a.codestpro3)='".$ls_codestpro1.$ls_codestpro2.$ls_codestpro3."' ".$ls_aux; $rs_data2=$io_sql2->select($ls_sql); if($rs_data2===false) { } else { $ds_ctas->data=$io_sql2->obtener_datos($rs_data2); } $li_totspg=$ds_ctas->getRowCount("spg_cuenta"); if($li_totspg>0) { uf_print_detalle($la_columna,$la_config,$la_data,$io_pdf); // Imprimimos el detalle } for($li_a=1;$li_a<=$li_totspg;$li_a++) { $ls_cuenta = $ds_ctas->getValue("spg_cuenta",$li_a); $ls_denominacion= $ds_ctas->getValue("denspg",$li_a); $ls_cuenta_scg = $ds_ctas->getValue("sc_cuenta",$li_a); $ls_status = $ds_ctas->getValue("status",$li_a); $ls_denscg = $ds_ctas->getValue("denscg",$li_a); if($ls_status=='C') {
print "<table width=564 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td>Código </td>"; print "<td>Denominación</td>"; print "</tr>"; if($ls_operacion=="BUSCAR") { $ls_sql="SELECT * FROM spg_unidadadministrativa". " WHERE codemp='".$ls_codemp."'". " AND coduniadm like '".$ls_codigo."'". " AND denuniadm like '".$ls_denominacion."'"; $rs_unidad=$io_sql->select($ls_sql); $data=$rs_unidad; if($row=$io_sql->fetch_row($rs_unidad)) { $data=$io_sql->obtener_datos($rs_unidad); $arrcols=array_keys($data); $totcol=count($arrcols); $ds->data=$data; $totrow=$ds->getRowCount("coduniadm"); $io_sql->free_result($rs_unidad); $io_sql->close(); for($z=1;$z<=$totrow;$z++) { print "<tr class=celdas-blancas>"; $ls_codigo=$data["coduniadm"][$z]; $ls_denominacion=$data["denuniadm"][$z]; print "<td align=center><a href=\"javascript: aceptar('$ls_codigo','$ls_denominacion');\">".$ls_codigo."</a></td>"; print "<td>".$ls_denominacion."</td>"; print "</tr>"; }
</form> <div align="center"> <?php print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td>Código</td>"; print "<td>Sistema</td>"; print "<td>Procede</td>"; print "<td>Numero Actual</td>"; print "</tr>"; if ($ls_operacion == "BUSCAR") { $ls_sql = " SELECT codsis,procede,id,prefijo,nro_inicial,nro_final,maxlen,nro_actual,estcompscg " . " FROM sigesp_ctrl_numero " . " WHERE id like '" . $ls_codigo . "' " . "group by codsis,procede,id,prefijo,nro_inicial,nro_final,maxlen,nro_actual,estcompscg " . "order by id asc"; $rs_ctrl_numero = $io_sql->select($ls_sql); $data = $rs_ctrl_numero; if ($row = $io_sql->fetch_row($rs_ctrl_numero)) { $data = $io_sql->obtener_datos($rs_ctrl_numero); $arrcols = array_keys($data); $totcol = count($arrcols); $io_dsprocedencia->data = $data; $totrow = $io_dsprocedencia->getRowCount("procede"); for ($z = 1; $z <= $totrow; $z++) { print "<tr class=celdas-blancas>"; $ls_codsis = $data["codsis"][$z]; $ls_procede = $data["procede"][$z]; $ls_codigo = $data["id"][$z]; $ls_prefijo = $data["prefijo"][$z]; $ls_numini = $data["nro_inicial"][$z]; $ls_numfin = $data["nro_final"][$z]; $ls_maxlen = $data["maxlen"][$z]; $ls_numact = $data["nro_actual"][$z]; $ls_estcompscg = $data["estcompscg"][$z];
$rs_beneficiario = $io_report->uf_select_beneficiario($li_orden, $ls_cedula1, $ls_cedula2, $lb_valido); 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 $io_pdf->ezSetCmMargins(3.8, 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); // Insertar el número de página $li_total = $io_sql->num_rows($rs_beneficiario); $data = $io_sql->obtener_datos($rs_beneficiario); for ($z = 1; $z <= $li_total; $z++) { //1 $ls_cedbene = $data["ced_bene"][$z]; $ls_nombene = $data["nombene"][$z]; $ls_apebene = $data["apebene"][$z]; $ls_cuenta = $data["sc_cuenta"][$z]; $la_data[$z] = array('cedula' => $ls_cedbene, 'nombre' => $ls_nombene, 'apellido' => $ls_apebene, 'cuenta' => $ls_cuenta); } //4 uf_print_cabecera_detalle($io_pdf); uf_print_detalle($la_data, $io_pdf); // Imprimimos el detalle if ($lb_valido) { $io_pdf->ezStopPageNumbers(1, 1); // Detenemos la impresión de los números de página
$ls_sql = " SELECT codcla,dencla,sc_cuenta " . " FROM cxp_clasificador_rd WHERE codcla<>'--'" . " ORDER BY codcla"; } else { $ls_sql = " SELECT codcla,dencla " . " FROM cxp_clasificador_rd WHERE codcla<>'--'" . " ORDER BY codcla"; } $rs_clas = $io_sql->select($ls_sql); $data = $rs_clas; ?> <table width="500" border="0" align="center" cellpadding="1" cellspacing="1"> <tr> <td width="496" colspan="2" class="titulo-celda">Catálogo Clasificación de Conceptos </td> </tr> </table> <div align="center"><br> <?php if ($row = $io_sql->fetch_row($rs_clas)) { $data = $io_sql->obtener_datos($rs_clas); $arrcols = array_keys($data); $totcol = count($arrcols); $io_dsclasi->data = $data; $totrow = $io_dsclasi->getRowCount("codcla"); print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td>Código</td>"; print "<td>Denominación</td>"; print "</tr>"; for ($z = 1; $z <= $totrow; $z++) { switch ($ls_clactacont) { case "1": print "<tr class=celdas-blancas>"; $codigo = $data["codcla"][$z]; $denominacion = $data["dencla"][$z];
</table> <br> <?php require_once "../shared/class_folder/sigesp_include.php"; require_once "../shared/class_folder/class_datastore.php"; require_once "../shared/class_folder/class_sql.php"; $io_conect = new sigesp_include(); $conn = $io_conect->uf_conectar(); $io_dspais = new class_datastore(); $io_sql = new class_sql($conn); $arr = $_SESSION["la_empresa"]; $ls_sql = " SELECT codpai,despai " . " FROM sigesp_pais " . " ORDER BY codpai ASC"; $rs_pais = $io_sql->select($ls_sql); $data = $rs_pais; if ($row = $io_sql->fetch_row($rs_pais)) { $data = $io_sql->obtener_datos($rs_pais); $arrcols = array_keys($data); $totcol = count($arrcols); $io_dspais->data = $data; $totrow = $io_dspais->getRowCount("codpai"); print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla>"; print "<tr class=titulo-celda>"; print "<td>Código</td>"; print "<td>Denominación</td>"; print "</tr>"; for ($z = 1; $z <= $totrow; $z++) { print "<tr class=celdas-blancas>"; $codigo = $data["codpai"][$z]; $denominacion = $data["despai"][$z]; print "<td><a href=\"javascript: aceptar('{$codigo}','{$denominacion}');\">" . $codigo . "</a></td>"; print "<td>" . $denominacion . "</td>";
{ $ls_codban="%%"; } $ls_codemp=$la_emp["codemp"]; $ls_sql="SELECT * ". "FROM rpc_beneficiario ". "WHERE codemp='".$ls_codemp."' AND ced_bene like '".$ls_cedbene."' AND ". " nombene like '".$ls_nombene."' AND apebene like '".$ls_apebene."' AND ". " codban like '".$ls_codban."' AND ced_bene<>'----------' ". "ORDER BY ced_bene ASC" ; $rs_bene=$io_sql->select($ls_sql); $data=$rs_bene; if ($row=$io_sql->fetch_row($rs_bene)) { $data=$io_sql->obtener_datos($rs_bene); $arrcols=array_keys($data); $totcol=count($arrcols); $io_dsbene->data=$data; $totrow=$io_dsbene->getRowCount("ced_bene"); for ($z=1;$z<=$totrow;$z++) { print "<tr class=celdas-blancas>"; $ls_cedbene=$data["ced_bene"][$z]; $ls_nombene=$data["nombene"][$z]; print "<td width=100 style=text-align:center><a href=\"javascript: aceptar('$ls_cedbene','$ls_nombene');\">".$ls_cedbene."</a></td>"; print "<td width=400 style=text-align:left>".$data["nombene"][$z]."</td>"; print "</tr>"; } } }
{ $ls_sql=$ls_sql." AND codestpro1='".$ls_estpro1."'"; if($ls_estpro2!="") { $ls_sql=$ls_sql." AND codestpro2='".$ls_estpro2."'"; } if($ls_estpro3!="") { $ls_sql=$ls_sql." AND codestpro3='".$ls_estpro3."'"; } } $rs_unidad=$SQL->select($ls_sql); $data=$rs_unidad; if($row=$SQL->fetch_row($rs_unidad)) { $data=$SQL->obtener_datos($rs_unidad); $arrcols=array_keys($data); $totcol=count($arrcols); $ds->data=$data; $totrow=$ds->getRowCount("coduniadm"); $SQL->free_result($rs_unidad); $SQL->close(); for($z=1;$z<=$totrow;$z++) { print "<tr class=celdas-blancas>"; $codigo=$data["coduniadm"][$z]; $denominacion=$data["denuniadm"][$z]; $estreq=$data["estemireq"][$z]; $codestpro1=$data["codestpro1"][$z]; $codestpro2=$data["codestpro2"][$z]; $codestpro3=$data["codestpro3"][$z];
f.action="sigespwindow_blank.php"; f.submit(); </script> <?php } } if ($ls_operacion=="CARGAR" ) { $la_empresa = $_SESSION["la_empresa"]; $ls_codemp = $la_empresa["codemp"]; $rs_load=$class_aper->uf_spg_load_cuentas_apertura($ls_codemp,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3); if($row=$SQL->fetch_row($rs_load)) { $data=$SQL->obtener_datos($rs_load); $ds_aper->data=$data; $li_num=$ds_aper->getRowCount("spg_cuenta"); $li_totnum=$li_num; for($i=1;$i<=$li_num;$i++) { $ls_cuenta=$data["spg_cuenta"][$i]; //$ls_cuenta=$data["status"][$i]; $ls_denominacion=$data["denominacion"][$i]; $ls_distribuir=$data["distribuir"][$i]; $ld_asignado=number_format($data["asignado"][$i],2,",","."); $ld_enero=number_format($data["enero"][$i],2,",","."); $ld_febrero=number_format($data["febrero"][$i],2,",","."); $ld_marzo=number_format($data["marzo"][$i],2,",","."); $ld_abril=number_format($data["abril"][$i],2,",","."); $ld_mayo=number_format($data["mayo"][$i],2,",",".");
if($ls_estmov!="-") { $ls_sql=$ls_sql." AND estmov='".$ls_estmov."'"; } $rs_mov=$SQL_mov->select($ls_sql); $data=$rs_mov; if(($rs_mov==false)&&($SQL_mov->message!="")) { $io_msg->message($io_function->uf_convertirmsg($SQL_mov->message)); } else { if($row=$SQL_mov->fetch_row($rs_mov)) { $data=$SQL_mov->obtener_datos($rs_mov); $arrcols=array_keys($data); $totcol=count($arrcols); $ds->data=$data; $totrow=$ds->getRowCount("numdoc"); for($z=1;$z<=$totrow;$z++) { $ls_documento=$data["numdoc"][$z]; $ls_codope =$data["codope"][$z]; $ls_fecha=$data["fecmov"][$z]; $ls_fecha=substr($ls_fecha,8,2)."/".substr($ls_fecha,5,2)."/".substr($ls_fecha,0,4); $ls_descripcion=$data["conmov"][$z]; $ldec_monto =$data["monto"][$z]; $ldec_monobjret=$data["monobjret"][$z]; $ldec_monret=$data["monret"][$z]; $ls_procedencia=$data["procede"][$z];
?> <form name="form1" method="post" action=""> <input name="txtprov" type="hidden" id="txtprov" value= "<?php print $ls_codprov; ?> "> </form> <table width="500" border="0" align="center" cellpadding="1" cellspacing="1"> <tr> <td width="496" height="15" colspan="2" class="titulo-celda">Catálogo de Socios por Proveedor</td> </tr> </table> <br> <?php if ($row = $io_sql->fetch_row($rs_socio)) { $data = $io_sql->obtener_datos($rs_socio); $arrcols = array_keys($data); $totcol = count($arrcols); $io_dssocio->data = $data; $totrow = $io_dssocio->getRowCount("cedsocio"); print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td>Cédula</td>"; print "<td>Nombre del Socio</td>"; print "</tr>"; for ($z = 1; $z <= $totrow; $z++) { print "<tr class=celdas-blancas>"; $cedula = $data["cedsocio"][$z]; $nombre = $data["nomsocio"][$z]; $apellido = $data["apesocio"][$z]; $direccion = $data["dirsocio"][$z];
//print $ls_cadena; $rs_datauni=$io_sql->select($ls_cadena); if($rs_datauni==false&&($io_sql->message!="")) { $io_msg->message("No hay registros"); } else { if($row=$io_sql->fetch_row($rs_datauni)) { print "<table width=600 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>"; print "<tr class=titulo-celda>"; print "<td><a href=javascript:ue_ordenar('u.coduni','BUSCAR');><font color=#FFFFFF>Código</font></a></td>"; print "<td><a href=javascript:ue_ordenar('u.nomuni','BUSCAR');><font color=#FFFFFF>Nombre</font></a></td>"; print "<td><a href=javascript:ue_ordenar('t.nomtun','BUSCAR');><font color=#FFFFFF>Tipo</font></a></td>"; $la_unidades=$io_sql->obtener_datos($rs_datauni); $io_data->data=$la_unidades; $totrow=$io_data->getRowCount("coduni"); for($z=1;$z<=$totrow;$z++) { print "<tr class=celdas-blancas>"; $coduni=$io_data->getValue("coduni",$z); $codtun=$io_data->getValue("codtun",$z); $nomtun=$io_data->getValue("nomtun",$z); $nomuni=$io_data->getValue("nomuni",$z); $desuni=$io_data->getValue("desuni",$z); print "<td><a href=\"javascript: aceptar('$coduni','$codtun','$nomtun','$nomuni','$desuni');\">".$coduni."</a></td>"; print "<td>".$nomuni."</td>"; print "<td>".$nomtun."</td>"; print "</tr>";
print "<td class='th2'>Solicitud</td>"; print "<td class='th3'>Emision</td>"; print "<td class='th4'>Concepto</td>"; print "<td class='th5'>Solicitado Bs.</td>"; print "<td class='th6'>Pagado Bs.</td>"; print "</tr>"; //print "</thead>"; //print "<tbody> "; //print "<tr><td colspan='6'>"; // print "<div class='innerb' style='height:200px;'>"; // print "<table class=tabletwo>"; $rs_pro = $io_sql->select($ls_sql); $data = $rs_pro; $totrow = 0; if ($row = $io_sql->fetch_row($rs_pro)) { $data = $io_sql->obtener_datos($rs_pro); $ds->data = $io_sql->obtener_datos($rs_pro); $_SESSION["data_aux"] = $ds->data; $arrcols = array_keys($data); $totcol = count($arrcols); $totrow = $ds->getRowCount("numsol"); for ($z = 1; $z <= $totrow; $z++) { $marcado = $data["marcado"][$z]; $codsol = $data["numsol"][$z]; $fecsol = $ldt_fecdes = $io_funciones->uf_convertirfecmostrar($data["fecemisol"][$z]); $consol = $data["consol"][$z]; $solic = number_format($data["monsol"][$z], 2, ',', '.'); $pagado = number_format($data["pagado"][$z], 2, ',', '.'); if ($solic > $pagado) { print "<tr class=celdas-blancas>"; print "<input class='td1' name=" . $z . " type=checkbox id=chk" . $z . " value=1 onClick='ue_evaluar_click(this.name)'><input name=posicion" . $z . " type='hidden' id=posicion" . $z . " value={$codsol}>";
$ls_sql=$ls_sql." AND Procede ='".$ls_procedencia."'"; } if(($ls_tipo=="P")&&($ls_provben!="")) { $ls_sql=$ls_sql." AND cod_pro like '".$ls_provben."'"; } elseif(($ls_tipo=="B")&&($ls_provben!="")) { $ls_sql=$ls_sql." AND ced_bene like'".$ls_provben."'"; } $rs_cta=$SQL_cmp->select($ls_sql); $data=$rs_cta; if($row=$SQL_cmp->fetch_row($rs_cta)) { $data=$SQL_cmp->obtener_datos($rs_cta); $arrcols=array_keys($data); $totcol=count($arrcols); $ds->data=$data; $totrow=$ds->getRowCount("comprobante"); for($z=1;$z<=$totrow;$z++) { $ls_comprobante=$data["comprobante"][$z]; $ls_descripcion=$data["descripcion"][$z]; $ls_procedencia=$data["procede"][$z]; print $ls_procedencia; $ls_fecha=$data["fecha"][$z]; $ls_fecha=substr($ls_fecha,8,2)."/".substr($ls_fecha,5,2)."/".substr($ls_fecha,0,4); $ls_prov=$data["cod_pro"][$z]; $ls_bene=$data["ced_bene"][$z]; print $ls_prov." ".$ls_bene;
{ $ls_fechahasta=$_POST["txtfechahasta"]; } else { $ls_fechahasta=$_GET["txtfechahasta"]; } $li_cont=0; $li_page=0; $arr_emp=$_SESSION["la_empresa"]; $ls_codemp=$arr_emp["CodEmp"]; $rs_recepcion=$io_report->uf_select_recepcion($ls_codemp,$ls_categoria,$ls_codigo1,$ls_codigo2,$ls_tipodoc1,$ls_tipodoc2,$ls_recibidas,$ls_anuladas,$ls_procesadas,$ls_fechadesde,$ls_fechahasta); $li_total=$io_sql->num_rows($rs_recepcion); $data=$io_sql->obtener_datos($rs_recepcion); $li_maxlines=51; $li_aux=$li_total/$li_maxlines; $li_total_page=ceil($li_aux); for ($z=1;$z<=$li_total;$z++) {//1 $ls_numrecdoc =$data["NumRecDoc"][$z]; $ls_denominacion=$data["DenConDoc"][$z]; $ls_codtipdoc =$data["CodTipDoc"][$z]; $ls_sql=" SELECT DenTipDoc ". " FROM cxp_documento ". " WHERE CodTipDoc='".$ls_codtipdoc."'"; $rs_recdoc=$io_sql2->select($ls_sql); if ($row=$io_sql2->fetch_row($rs_recdoc)) {//2
} else { $ls_codpais=""; } } print("Pais".$ls_codpais); $ls_sql="SELECT CodEst,DesEst FROM sigesp_estados where CodPai= '".$ls_codpais."' ORDER BY CodEst ASC"; $rs_estado=$io_sql->select($ls_sql); $data=$rs_estado; if($row=$io_sql->fetch_row($rs_estado)) { $data=$io_sql->obtener_datos($rs_estado); $arrcols=array_keys($data); $totcol=count($arrcols); $io_dsest->data=$data; $totrow=$io_dsest->getRowCount("CodEst"); print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla>"; print "<tr class=titulo-celda>"; print "<td>Código</td>"; print "<td>Denominación</td>"; print "</tr>"; for($z=1;$z<=$totrow;$z++) { print "<tr class=celdas-blancas>"; $codigo=$data["CodEst"][$z]; $denominacion=$data["DesEst"][$z]; print "<td><a href=\"javascript: aceptar('$codigo','$denominacion');\">".$codigo."</a></td>";
} $la_documentos[0] = ""; if ($li_total > 0) { for ($li_i = 1; $li_i <= $li_total; $li_i++) { $la_documentos[$li_i] = $_GET["coddoc" . $li_i]; } } $lb_valido = true; $la_empresa = $_SESSION["la_empresa"]; $ls_codemp = $la_empresa["codemp"]; $rs_data = $io_report->uf_select_proveedores($ls_codemp, $li_orden, $ls_codproben1, $ls_codproben2, $lb_valido); if ($lb_valido) { error_reporting(E_ALL); set_time_limit(1800); $li_total = $io_sql->num_rows($rs_data); $data = $io_sql->obtener_datos($rs_data); $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.8, 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(580, 50, 8, '', '', 1); // Insertar el número de página for ($z = 1; $z <= $li_total; $z++) { $ls_codpro = $data["cod_pro"][$z]; $ls_nompro = $data["nompro"][$z]; $ls_dirpro = $data["dirpro"][$z]; $ls_rifpro = $data["rifpro"][$z];
$_SESSION["cod_report"]=$ls_cod_report; $ls_cod_report=$_SESSION["cod_report"]; $lb_valido=$iscg_procesos->uf_select_reporte($ls_codemp,$ai_cuantos,$ls_cod_report); if(($lb_valido)&&($ai_cuantos<=0)) { if ($ls_cod_report=="0409") { $lb_valido = $iscg_procesos->uf_cargar_origen_y_aplic_fondos_txt($ls_codemp); if($lb_valido) { $msg->message("Los datos fueron cargados"); $rs_cta=$iscg_procesos->uf_select_scg_datastore( $ls_codemp, $ls_cod_report ); $SQL->num_rows($rs_cta); ///$msg->message($SQL->num_rows($rs_cta)); $data=$SQL->obtener_datos($rs_cta); $ds_proaf->data=$data; $li_num=$ds_proaf->getRowCount("cod_report"); for($i=1;$i<=$li_num;$i++) { $ls_status=$data["status"][$i]; if($ls_status=="C") { ?> <tr class="celdas-azules"> <td ><a href="javascript: aceptar('<?php print $ds_proaf->getValue("asignado",$i);?>','<?php print $ds_proaf->getValue("sc_cuenta",$i);?>','<?php print $i?>','<?php print $li_num?>','<?php print $ls_status ?>');"><?php print $ds_proaf->getValue("sc_cuenta",$i);?></a></td> <?php } elseif($ls_status=="S") { ?>
<form name="form1" method="post" action="" > <div align="center"> <?php require_once "../../shared/class_folder/sigesp_include.php"; require_once "../../shared/class_folder/class_datastore.php"; require_once "../../shared/class_folder/class_sql.php"; $io_in = new sigesp_include(); $con = $io_in->uf_conectar(); $io_ds = new class_datastore(); $io_sql = new class_sql($con); $arr = $_SESSION["la_empresa"]; $ls_sql = " SELECT * FROM soc_modalidadclausulas WHERE codtipmod <>'--' ORDER BY codtipmod ASC"; $rs_servicio = $io_sql->select($ls_sql); $data = $rs_servicio; if ($row = $io_sql->fetch_row($rs_servicio)) { $data = $io_sql->obtener_datos($rs_servicio); $arrcols = array_keys($data); $totcol = count($arrcols); $io_ds->data = $data; $totrow = $io_ds->getRowCount("codtipmod"); print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla>"; print "<tr class=titulo-celda>"; print "<td>Código </td>"; print "<td>Denominación</td>"; print "</tr>"; for ($z = 1; $z <= $totrow; $z++) { print "<tr class=celdas-blancas>"; $ls_codigo = $data["codtipmod"][$z]; $ls_denominacion = $data["denmodcla"][$z]; print "<td align=center><a href=\"javascript: aceptar('{$ls_codigo}','{$ls_denominacion}');\">" . $ls_codigo . "</a></td>"; print "<td align=left>" . $ls_denominacion . "</td>";