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>";
