}
                    // Fin del if que busca si hay link de archivo para mostrar o no el doc anexo
                }
            }
            // Fin del For que recorre la matriz de los anexos de cada radicado perteneciente al expediente
        }
        $rs->MoveNext();
    }
}
// Fin del While que Recorre los documentos de un expediente.
if ($usuaPermExpediente and $verradPermisos == "Full" or $dependencia == '999') {
}
$arrAnexoAsociado = $expediente->expedienteAnexoAsociado($verrad);
if (is_array($arrAnexoAsociado)) {
    include_once "{$ruta_raiz}/include/tx/Radicacion.php";
    $rad = new Radicacion($db);
    foreach ($arrAnexoAsociado as $clave => $datosAnexoAsociado) {
        if ($datosAnexoAsociado['radPadre'] != "" && $datosAnexoAsociado['radPadre'] != $verrad && $datosAnexoAsociado['anexo'] == $verrad) {
            $arrDatosRad = $rad->getDatosRad($datosAnexoAsociado['radPadre']);
            if ($arrDatosRad['ruta'] != "") {
                if (substr($datosAnexoAsociado['radPadre'], 0, 4) == '2007') {
                    $rut = "bodega2007/";
                } elseif (substr($datosAnexoAsociado['radPadre'], 0, 4) == '2008') {
                    $rut = "bodega2008/";
                } else {
                    $rut = "bodega/";
                }
                $rutaRadicado = "<a href='" . $rut . $arrDatosRad['ruta'] . "' >" . $datosAnexoAsociado['radPadre'] . "</a>";
            } else {
                $rutaRadicado = $datosAnexoAsociado['radPadre'];
            }
Exemple #2
0
     $documento_us3 = 0;
 }
 /**  En esta linea si la dependencia es 999 ke es la dep. de salida envia el radicado a una
  *	 carpeta con el codigo de los dos primeros digitos de la dependencia
  */
 $carp_codi = $ent;
 $carp_per = 0;
 if (!$radi_usua_actu) {
     $radi_usua_actu = 1;
 }
 if ($coddepe == 999) {
     $carp_codi = substr($dependencia, 0, 2);
     $carp_per = 1;
     $radi_usua_actu = 1;
 }
 $rad = new Radicacion($db);
 $rad->radiTipoDeri = $tpRadicado;
 $rad->radiCuentai = "'{$cuentai}'";
 $rad->eespCodi = $documento_us3;
 $rad->mrecCodi = $med;
 $rad->radiFechOfic = $fecha_gen_docF;
 $fecha_gen_doc_YMD = substr($fecha_gen_doc, 6, 4) . "-" . substr($fecha_gen_doc, 3, 2) . "-" . substr($fecha_gen_doc, 0, 2);
 $rad->radiFechOfic = $fecha_gen_doc_YMD;
 if (!$radicadopadre) {
     $radicadopadre = null;
 }
 $rad->radiNumeDeri = $radicadopadre;
 $rad->radiPais = "'{$pais}'";
 $rad->descAnex = $ane;
 $rad->raAsun = $asu;
 $rad->radiDepeRadi = $dependencia;
Exemple #3
0
     $archUpdate = substr($archivoFinal, strpos($archivoFinal, strrchr($archivoFinal, "/")) + 1, strlen($archivoFinal) - strpos($archivoFinal, strrchr($archivoFinal, "/")) + 1);
     //Almacena el path de archivo a producirse luego de la combinacion y que ha de actualizarce en la tabla de radicados
     $archUpdateRad = substr_replace($archivoFinal, "", 0, strpos($archivoFinal, "{$carpetaBodega}") + strlen("{$carpetaBodega}"));
 }
 //****************************************************************************************************
 $db->conn->BeginTrans();
 $tipo_docto = $anex->get_sgd_tpr_codigo();
 if (!$tipo_docto) {
     $tipo_docto = 0;
 }
 if ($sec and $vp == "n") {
     if ($generar_numero != "no" and $radicar_a == "si") {
         if (!$tpradic) {
             $tpradic = 'null';
         }
         $rad = new Radicacion($db);
         $hist = new Historico($db);
         $rad->radiTipoDeri = 0;
         $rad->radiCuentai = "''";
         $rad->eespCodi = $espcodi;
         $rad->mrecCodi = "null";
         $rad->radiFechOfic = $sqlFechaHoy;
         $rad->radiNumeDeri = trim($verrad);
         $rad->descAnex = $desc_anexos;
         $rad->radiPais = "{$pais}";
         $rad->raAsun = $AnexDescripcion;
         if ($tpradic != 2) {
             if ($entidad_depsal != 0) {
                 $rad->radiDepeActu = $entidad_depsal;
                 $rad->radiUsuaActu = 1;
             } else {
function Ciudadano_show($nivelus, $tpRemDes, $whereFlds)
{
    global $db2;
    global $db3;
    global $sRADICADOErr;
    global $sFileName;
    global $styles;
    global $ruta_raiz;
    $sWhere = "";
    $sOrder = "";
    $sSQL = "";
    $db = new ConnectionHandler($ruta_raiz);
    if ($tpRemDes == 1) {
        $tpRemDesNombre = "Por Ciudadano";
    }
    if ($tpRemDes == 2) {
        $tpRemDesNombre = "Por Otras Empresas";
    }
    if ($tpRemDes == 3) {
        $tpRemDesNombre = "Por Entidad";
    }
    if ($tpRemDes == 4) {
        $tpRemDesNombre = "Por Funcionario";
    }
    if ($tpRemDes == 9) {
        $tpRemDesNombre = "";
        $whereTrd = "   ";
    } else {
        $whereTrd = " and dir.sgd_trd_codigo = {$whereFlds}  ";
    }
    if ($indiVinculo == 2) {
        $sFormTitle = "Expedientes encontrados {$tpRemDesNombre}";
    } else {
        $sFormTitle = "Radicados encontrados {$tpRemDesNombre}";
    }
    $HasParam = false;
    $iCounter = 0;
    $iPage = 0;
    $bEof = false;
    $iSort = '';
    $iSorted = '';
    $iTmpI = 0;
    $iTmpJ = 0;
    $sCountSQL = '';
    $sDirection = '';
    $sSortParams = '';
    $transit_params = '';
    $iRecordsPerPage = 25;
    //Proceso de Vinculacion documentos
    $indiVinculo = $_GET["indiVinculo"];
    $verrad = $_GET["verrad"];
    $carpeAnt = $_GET["carpeAnt"];
    $nomcarpeta = $_GET["nomcarpeta"];
    // Build ORDER BY statement
    //$sOrder = " order by r.RADI_NUME_RADI ";
    $sOrder = " order by r.radi_fech_radi ";
    $iSort = $_GET["FormCIUDADANO_Sorting"];
    $iSorted = $_GET["FormCIUDADANO_Sorted"];
    $form_params = trim(session_name()) . '=' . trim(session_id()) . "&verrad={$verrad}&indiVinculo={$indiVinculo}&carpeAnt={$carpeAnt}&nomcarpeta={$nomcarpeta}&s_RADI_DEPE_ACTU=" . tourl($_GET["s_RADI_DEPE_ACTU"]) . "&s_RADI_NOMB=" . tourl($_GET["s_RADI_NOMB"]) . "&s_RADI_NUME_RADI=" . tourl($_GET["s_RADI_NUME_RADI"]) . "&s_TDOC_CODI=" . tourl($_GET["s_TDOC_CODI"]) . "&s_desde_dia=" . tourl($_GET["s_desde_dia"]) . "&s_desde_mes=" . tourl($_GET["s_desde_mes"]) . "&s_desde_ano=" . tourl($_GET["s_desde_ano"]) . "&s_hasta_dia=" . tourl($_GET["s_hasta_dia"]) . "&s_hasta_mes=" . tourl($_GET["s_hasta_mes"]) . "&s_hasta_ano=" . tourl($_GET["s_hasta_ano"]) . "&s_solo_nomb=" . tourl($_GET["s_solo_nomb"]) . "&s_ciudadano=" . tourl($_GET["s_ciudadano"]) . "&s_empresaESP=" . tourl($_GET["s_empresaESP"]) . "&s_oEmpresa=" . tourl($_GET["s_oEmpresa"]) . "&s_FUNCIONARIO=" . tourl($_GET["s_FUNCIONARIO"]) . "&s_entrada=" . tourl($_GET["s_entrada"]) . "&s_salida=" . tourl($_GET["s_salida"]) . "&s_DOCTO=" . tourl($_GET["s_DOCTO"]) . "&nivelus={$nivelus}&s_Listado=" . $_GET["s_Listado"] . "&s_SGD_EXP_SUBEXPEDIENTE=" . $_GET["s_SGD_EXP_SUBEXPEDIENTE"] . "&";
    // s_Listado s_ciudadano s_empresaESP s_FUNCIONARIO
    if (!$iSort) {
        $form_sorting = "";
    } else {
        if ($iSort == $iSorted) {
            $form_sorting = "";
            $sDirection = " DESC ";
            $sSortParams = "FormCIUDADANO_Sorting=" . $iSort . "&FormCIUDADANO_Sorted=" . $iSort . "&";
        } else {
            $form_sorting = $iSort;
            $sDirection = "  ";
            $sSortParams = "FormCIUDADANO_Sorting=" . $iSort . "&FormCIUDADANO_Sorted=" . "&";
        }
        switch ($iSort) {
            case 1:
                $sOrder = " order by r.radi_nume_radi" . $sDirection;
                break;
            case 2:
                $sOrder = " order by r.radi_fech_radi" . $sDirection;
                break;
            case 3:
                $sOrder = " order by r.ra_asun" . $sDirection;
                break;
            case 4:
                $sOrder = " order by td.sgd_tpr_descrip" . $sDirection;
                break;
            case 5:
                $sOrder = " order by r.radi_nume_hoja" . $sDirection;
                break;
            case 6:
                $sOrder = " order by dir.sgd_dir_direccion" . $sDirection;
                break;
            case 7:
                $sOrder = " order by dir.sgd_dir_telefono" . $sDirection;
                break;
            case 8:
                $sOrder = " order by dir.sgd_dir_mail" . $sDirection;
                break;
            case 9:
                $sOrder = " order by dir.sgd_dir_nombre" . $sDirection;
                break;
            case 12:
                $sOrder = " order by dir.sgd_dir_telefono" . $sDirection;
                break;
            case 13:
                $sOrder = " order by dir.sgd_dir_direccion" . $sDirection;
                break;
            case 14:
                $sOrder = " order by dir.sgd_dir_doc" . $sDirection;
                break;
            case 17:
                $sOrder = " order by r.radi_usu_ante" . $sDirection;
                break;
            case 20:
                $sOrder = " order by r.radi_pais" . $sDirection;
                break;
            case 21:
                $sOrder = " order by diasr" . $sDirection;
                break;
            case 22:
                $sOrder = " order by dir.sgd_dir_nombre" . $sDirection;
                break;
            case 23:
                $sOrder = " order by dir.sgd_dir_nombre" . $sDirection;
                break;
            case 24:
                $sOrder = " order by dir.sgd_dir_nombre" . $sDirection;
                break;
        }
    }
    // Encabezados HTML de las Columnas
    if ($indiVinculo != 2) {
        ?>
	<table width="2000" border="0" cellpadding="0" cellspacing="0" class="borde_tab"> 
<?php 
    } else {
        ?>
	<table width="200" border="0" cellpadding="0" cellspacing="0" class="borde_tab">
<?php 
    }
    ?>
	<tr>
		<td class="titulos4" colspan="20">
      <a name="RADICADO"><?php 
    echo $sFormTitle;
    ?>
</a>
    </td>
	</tr>
	<tr>
<?php 
    if ($indiVinculo >= 1) {
        ?>
		<td class="titulos5"><font class="ColumnFONT"> </td>
<?php 
    }
    if ($indiVinculo != 2) {
        ?>
		<td class="titulos5"><a class="vinculos" href="<?php 
        echo $sFileName;
        ?>
?<?php 
        echo $form_params;
        ?>
FormCIUDADANO_Sorting=1&FormCIUDADANO_Sorted=<?php 
        echo $form_sorting;
        ?>
&">Radicado</a></td>
		<td class="titulos5"><a class="vinculos" href="<?php 
        echo $sFileName;
        ?>
?<?php 
        echo $form_params;
        ?>
FormCIUDADANO_Sorting=2&FormCIUDADANO_Sorted=<?php 
        echo $form_sorting;
        ?>
&">Fecha Radicacion</a></td>
        <td class="titulos5"><font class="ColumnFONT">Expediente</td>
        <?php 
    } else {
        ?>
	    <td class="titulos5"><font class="ColumnFONT">Expediente</td>
        <td class="titulos5"><a class="vinculos" href="<?php 
        echo $sFileName;
        ?>
?<?php 
        echo $form_params;
        ?>
FormCIUDADANO_Sorting=1&FormCIUDADANO_Sorted=<?php 
        echo $form_sorting;
        ?>
&">Radicado vinculado al expediente</a></td>
		<td class="titulos5"><a class="vinculos" href="<?php 
        echo $sFileName;
        ?>
?<?php 
        echo $form_params;
        ?>
FormCIUDADANO_Sorting=2&FormCIUDADANO_Sorted=<?php 
        echo $form_sorting;
        ?>
&">Fecha Radicacion</a></td>
          <?php 
    }
    ?>
		<td class="titulos5">
      <a class="vinculos" href="<?php 
    echo $sFileName;
    ?>
?<?php 
    echo $form_params;
    ?>
FormCIUDADANO_Sorting=3&FormCIUDADANO_Sorted=<?php 
    echo $form_sorting;
    ?>
&">Asunto</a>
    </td>
		<td class="titulos5">
      <a class="vinculos" href="<?php 
    echo $sFileName;
    ?>
?<?php 
    echo $form_params;
    ?>
FormCIUDADANO_Sorting=4&FormCIUDADANO_Sorted=<?php 
    echo $form_sorting;
    ?>
&">Tipo de Documento</a>
    </td>
		<td class="titulos5">
      <font class="ColumnFONT">Tipo</td>
		<td class="titulos5">
      <a class="vinculos" href="<?php 
    echo $sFileName;
    ?>
?<?php 
    echo $form_params;
    ?>
FormCIUDADANO_Sorting=5&FormCIUDADANO_Sorted=<?php 
    echo $form_sorting;
    ?>
&">Numero de Hojas</a>
    </td>
		<td class="titulos5">
      <a class="vinculos" href="<?php 
    echo $sFileName;
    ?>
?<?php 
    echo $form_params;
    ?>
FormCIUDADANO_Sorting=6&FormCIUDADANO_Sorted=<?php 
    echo $form_sorting;
    ?>
&">Direccion contacto</a>
    </td>
		<td class="titulos5">
      <a class="vinculos" href="<?php 
    echo $sFileName;
    ?>
?<?php 
    echo $form_params;
    ?>
FormCIUDADANO_Sorting=7&FormCIUDADANO_Sorted=<?php 
    echo $form_sorting;
    ?>
&">Telefono contacto</a>
    </td>
		<td class="titulos5">
      <a class="vinculos" href="<?php 
    echo $sFileName;
    ?>
?<?php 
    echo $form_params;
    ?>
FormCIUDADANO_Sorting=8&FormCIUDADANO_Sorted=<?php 
    echo $form_sorting;
    ?>
&">Mail Contacto</a></td>
		<td class="titulos5"><a class="vinculos" href="<?php 
    echo $sFileName;
    ?>
?<?php 
    echo $form_params;
    ?>
FormCIUDADANO_Sorting=23&FormCIUDADANO_Sorted=<?php 
    echo $form_sorting;
    ?>
&">Dignatario</a></td>
		<td class="titulos5"><a class="vinculos" href="<?php 
    echo $sFileName;
    ?>
?<?php 
    echo $form_params;
    ?>
FormCIUDADANO_Sorting=9&FormCIUDADANO_Sorted=<?php 
    echo $form_sorting;
    ?>
&">Nombre </a></td>
		<td class="titulos5"><a class="vinculos" href="<?php 
    echo $sFileName;
    ?>
?<?php 
    echo $form_params;
    ?>
FormCIUDADANO_Sorting=14&FormCIUDADANO_Sorted=<?php 
    echo $form_sorting;
    ?>
&">Documento</a></td>
		<td class="titulos5"><a class="vinculos" href="<?php 
    echo $sFileName;
    ?>
?<?php 
    echo $form_params;
    ?>
FormCIUDADANO_Sorting=15&FormCIUDADANO_Sorted=<?php 
    echo $form_sorting;
    ?>
&">Usuario Actual</a></td>
		<td class="titulos5"><font class="ColumnFONT">Dependencia Actual</td>
		<td class="titulos5"><font class="ColumnFONT">Usuario Anterior</td>
		<td class="titulos5"><a class="vinculos" href="<?php 
    echo $sFileName;
    ?>
?<?php 
    echo $form_params;
    ?>
FormCIUDADANO_Sorting=20&FormCIUDADANO_Sorted=<?php 
    echo $form_sorting;
    ?>
&">Pais</a></td>
		<td class="titulos5"><a class="vinculos" href="<?php 
    echo $sFileName;
    ?>
?<?php 
    echo $form_params;
    ?>
FormCIUDADANO_Sorting=21&FormCIUDADANO_Sorted=<?php 
    echo $form_sorting;
    ?>
&">Dias Restantes</a></td>
	</tr>
<?php 
    // Build WHERE statement
    // Se crea la $ps_desde_RADI_FECH_RADI con los datos ingresados.
    $ps_desde_RADI_FECH_RADI = mktime(0, 0, 0, $_GET["s_desde_mes"], $_GET["s_desde_dia"], $_GET["s_desde_ano"]);
    $ps_hasta_RADI_FECH_RADI = mktime(23, 59, 59, $_GET["s_hasta_mes"], $_GET["s_hasta_dia"], $_GET["s_hasta_ano"]);
    if (strlen($ps_desde_RADI_FECH_RADI) && strlen($ps_hasta_RADI_FECH_RADI) && strlen(trim($_GET["s_RADI_NUME_RADI"])) != 14) {
        $HasParam = true;
        $sWhere = $sWhere . $db->conn->SQLDate('Y-m-d', 'r.radi_fech_radi') . " >= " . $db->conn->DBDate($ps_desde_RADI_FECH_RADI);
        //$sWhere = $sWhere . "r.radi_fech_radi>=".$db->conn->DBTimeStamp($ps_desde_RADI_FECH_RADI) ; //by HLP.
        $sWhere .= " and ";
        $sWhere = $sWhere . $db->conn->SQLDate('Y-m-d', 'r.radi_fech_radi') . " <= " . $db->conn->DBDate($ps_hasta_RADI_FECH_RADI);
        //$sWhere = $sWhere . "r.radi_fech_radi<=".$db->conn->DBTimeStamp($ps_hasta_RADI_FECH_RADI); //by HLP.
    }
    //echo $sWhere;
    /* Se recibe la dependencia actual para bsqueda */
    $ps_RADI_DEPE_ACTU = $_GET["s_RADI_DEPE_ACTU"];
    if (is_number($ps_RADI_DEPE_ACTU) && strlen($ps_RADI_DEPE_ACTU)) {
        $ps_RADI_DEPE_ACTU = tosql($ps_RADI_DEPE_ACTU, "Number");
    } else {
        $ps_RADI_DEPE_ACTU = "";
    }
    if (strlen($ps_RADI_DEPE_ACTU)) {
        if ($sWhere != "") {
            $sWhere .= " and ";
        }
        $HasParam = true;
        $sWhere = $sWhere . "r.radi_depe_actu=" . $ps_RADI_DEPE_ACTU;
    }
    // Se recibe el nmero del radicado para bsqueda
    $ps_RADI_NUME_RADI = trim($_GET["s_RADI_NUME_RADI"]);
    if (!$ps_RADI_NUME_RADI) {
        $ps_RADI_NUME_RADI = "2";
    }
    $ps_DOCTO = $_GET["s_DOCTO"];
    if (strlen($ps_RADI_NUME_RADI) != 14) {
        if ($sWhere != "") {
            $sWhere .= " and ";
        }
        $HasParam = true;
        $sWhere = $sWhere . "cast(r.radi_nume_radi as varchar(15)) like " . tosql("%" . trim($ps_RADI_NUME_RADI) . "%", "Text");
    }
    if (strlen($ps_RADI_NUME_RADI) == 14) {
        //$sWhere.=" and ";
        $HasParam = true;
        $sWhere .= "r.radi_nume_radi=" . $ps_RADI_NUME_RADI;
    }
    if (strlen($ps_DOCTO)) {
        if ($sWhere != "") {
            $sWhere .= " and ";
        }
        $HasParam = true;
        $sWhere = $sWhere . " dir.SGD_DIR_DOC = '{$ps_DOCTO}' ";
    }
    /**
     * Se recibe el numero del expediente para busqueda
     * Fecha de modificacion: 30-Junio-2006
     * Modificador: Supersolidaria
     */
    $ps_SGD_EXP_SUBEXPEDIENTE = $_GET["s_SGD_EXP_SUBEXPEDIENTE"];
    if (strlen($ps_SGD_EXP_SUBEXPEDIENTE) != 0) {
        if ($sWhere != "") {
            $sWhere .= " and ";
        }
        $HasParam = true;
        $sWhere = $sWhere . " R.RADI_NUME_RADI = EXP.RADI_NUME_RADI";
        $sWhere = $sWhere . " AND EXP.SGD_EXP_NUMERO = SEXP.SGD_EXP_NUMERO";
        /**
         * No se tienen en cuenta los radicados que han sido excluidos de un expediente.
         * Fecha de modificacion: 12-Septiembre-2006
         * Modificador: Supersolidaria
         */
        $sWhere = $sWhere . " AND EXP.SGD_EXP_ESTADO <> 2";
        $sWhere = $sWhere . " AND ( EXP.SGD_EXP_NUMERO LIKE '%" . str_replace('\'', '', tosql(trim($ps_SGD_EXP_SUBEXPEDIENTE), "Text")) . "%'";
        $sWhere = $sWhere . " OR SEXP.SGD_SEXP_PAREXP1 LIKE UPPER( '%" . str_replace('\'', '', tosql(trim($ps_SGD_EXP_SUBEXPEDIENTE), "Text")) . "%' )";
        $sWhere = $sWhere . " OR SEXP.SGD_SEXP_PAREXP2 LIKE UPPER( '%" . str_replace('\'', '', tosql(trim($ps_SGD_EXP_SUBEXPEDIENTE), "Text")) . "%' )";
        $sWhere = $sWhere . " OR SEXP.SGD_SEXP_PAREXP3 LIKE UPPER( '%" . str_replace('\'', '', tosql(trim($ps_SGD_EXP_SUBEXPEDIENTE), "Text")) . "%' )";
        $sWhere = $sWhere . " OR SEXP.SGD_SEXP_PAREXP4 LIKE UPPER( '%" . str_replace('\'', '', tosql(trim($ps_SGD_EXP_SUBEXPEDIENTE), "Text")) . "%' )";
        $sWhere = $sWhere . " OR SEXP.SGD_SEXP_PAREXP5 LIKE UPPER( '%" . str_replace('\'', '', tosql(trim($ps_SGD_EXP_SUBEXPEDIENTE), "Text")) . "%' )";
        $sWhere = $sWhere . " )";
    }
    // Se decide si busca en radicado de entrada o de salida o ambos
    $ps_entrada = strip($_GET["s_entrada"]);
    $eLen = strlen($ps_entrada);
    $ps_salida = strip($_GET["s_salida"]);
    $sLen = strlen($ps_salida);
    if ($ps_entrada != "9999") {
        if ($sWhere != "") {
            $sWhere .= " and ";
        }
        $HasParam = true;
        $sWhere = $sWhere . "cast(r.radi_nume_radi as varchar(15)) like " . tosql("%" . trim($ps_entrada), "Text");
    }
    // Se recibe el tipo de documento para la busqueda
    $ps_TDOC_CODI = $_GET["s_TDOC_CODI"];
    if (is_number($ps_TDOC_CODI) && strlen($ps_TDOC_CODI) && $ps_TDOC_CODI != "9999") {
        $ps_TDOC_CODI = tosql($ps_TDOC_CODI, "Number");
    } else {
        $ps_TDOC_CODI = "";
    }
    if (strlen($ps_TDOC_CODI)) {
        if ($sWhere != "") {
            $sWhere .= " and ";
        }
        $HasParam = true;
        $sWhere = $sWhere . "r.tdoc_codi=" . $ps_TDOC_CODI;
    }
    // Se recibe la caadena a buscar y el tipo de busqueda (All) (Any)
    $ps_RADI_NOMB = strip($_GET["s_RADI_NOMB"]);
    $ps_solo_nomb = $_GET["s_solo_nomb"];
    $yaentro = false;
    if (strlen($ps_RADI_NOMB)) {
        if ($sWhere != "") {
            $sWhere .= " and (";
        }
        $HasParam = true;
        $sWhere .= " ";
        $ps_RADI_NOMB = strtoupper($ps_RADI_NOMB);
        $tok = strtok($ps_RADI_NOMB, " ");
        $sWhere .= "(";
        while ($tok) {
            $sWhere .= "";
            if ($yaentro == true) {
                $sWhere .= " and ";
            }
            $sWhere .= "UPPER(dir.sgd_dir_nomremdes) LIKE '%" . $tok . "%' ";
            $tok = strtok(" ");
            $yaentro = true;
        }
        $sWhere .= ") or (";
        $tok = strtok($ps_RADI_NOMB, " ");
        $yaentro = false;
        while ($tok) {
            $sWhere .= "";
            if ($yaentro == true) {
                $sWhere .= " and ";
            }
            $sWhere .= "UPPER(dir.sgd_dir_nombre) LIKE '%" . $tok . "%' ";
            $tok = strtok(" ");
            $yaentro = true;
        }
        $sWhere .= ") or (";
        $yaentro = false;
        $tok = strtok($ps_RADI_NOMB, " ");
        if ($yaentro == true) {
            $sWhere .= " and (";
        }
        $sWhere .= "UPPER(" . $db->conn->Concat("r.ra_asun", "r.radi_cuentai", "dir.sgd_dir_telefono", "dir.sgd_dir_direccion") . ") LIKE '%" . $ps_RADI_NOMB . "%' ";
        $tok = strtok(" ");
        if ($yaentro == true) {
            $sWhere .= ")";
        }
        $yaentro = true;
        $sWhere .= "))";
    }
    if (strlen($ps_RADI_NOMB) && $ps_solo_nomb == "AllTTT") {
        if ($sWhere != "") {
            $sWhere .= " AND (";
        }
        $HasParam = true;
        $sWhere .= " ";
        $ps_RADI_NOMB = strtoupper($ps_RADI_NOMB);
        $tok = strtok($ps_RADI_NOMB, " ");
        $sWhere .= "(";
        $sWhere .= "";
        if ($yaentro == true) {
            $sWhere .= " AND ";
        }
        $sWhere .= "UPPER(dir.sgd_dir_nomremdes) LIKE '%" . $ps_RADI_NOMB . "%' ";
        $tok = strtok(" ");
        $yaentro = true;
        $sWhere .= ") OR (";
        $tok = strtok($ps_RADI_NOMB, " ");
        $yaentro = false;
        $sWhere .= "";
        if ($yaentro == true) {
            $sWhere .= " AND ";
        }
        $sWhere .= "UPPER(dir.sgd_dir_nombre) LIKE '%" . $ps_RADI_NOMB . "%' ";
        $tok = strtok(" ");
        $yaentro = true;
        $sWhere .= ") OR (";
        $yaentro = false;
        $tok = strtok($ps_RADI_NOMB, " ");
        if ($yaentro == true) {
            $sWhere .= " AND (";
        }
        $sWhere .= "UPPER(" . $db->conn->Concat("r.ra_asun", "r.radi_cuentai", "dir.sgd_dir_telefono", "dir.sgd_dir_direccion") . ") LIKE '%" . $ps_RADI_NOMB . "%' ";
        echo " kkkk {$ps_RADI_NOMB}";
        $tok = strtok(" ");
        if ($yaentro == true) {
            $sWhere .= ")";
        }
        $yaentro = true;
        $sWhere .= "))";
    }
    if ($HasParam) {
        $sWhere = " AND (" . $sWhere . ") ";
    }
    // Build base SQL statement
    require_once "../include/query/busqueda/busquedaPiloto1.php";
    $sSQL = "SELECT " . $radi_nume_radi . " AS RADI_NUME_RADI," . $db->conn->SQLDate('Y-m-d H:i:s', 'R.RADI_FECH_RADI') . " AS RADI_FECH_RADI,\n                                                            r.RA_ASUN, \n                                                            td.sgd_tpr_descrip, " . $redondeo . " as diasr,\n                                                            r.RADI_NUME_HOJA, \n                                                            r.RADI_PATH, \n                                                            dir.SGD_DIR_DIRECCION, \n                                                            dir.SGD_DIR_MAIL,\n                                                            dir.SGD_DIR_NOMREMDES, \n                                                            dir.SGD_DIR_TELEFONO, \n                                                            dir.SGD_DIR_DIRECCION,\n                                                            dir.SGD_DIR_DOC, \n                                                            r.RADI_USU_ANTE, \n                                                            r.RADI_PAIS, \n                                                            dir.SGD_DIR_NOMBRE,\n                                                            dir.SGD_TRD_CODIGO, \n                                                            r.RADI_DEPE_ACTU, \n                                                            r.RADI_USUA_ACTU, \n                                                            r.CODI_NIVEL, \n                                                            r.SGD_SPUB_CODIGO";
    /**
     * Busqueda por parameto del expediente
     * Fecha de modificacion: 11-Agosto-2006
     * Modificador: Supersolidaria
     */
    if (strlen($ps_SGD_EXP_SUBEXPEDIENTE) != 0) {
        $sSQL .= " ,EXP.SGD_EXP_NUMERO";
    }
    $sSQL .= " FROM sgd_dir_drecciones dir, radicado r, sgd_tpr_tpdcumento td";
    /**
     * Busqueda por expediente
     * Fecha de modificacion: 30-Junio-2006
     * Modificador: Supersolidaria
     */
    if (strlen($ps_SGD_EXP_SUBEXPEDIENTE) != 0) {
        $sSQL .= ", SGD_EXP_EXPEDIENTE EXP, SGD_SEXP_SECEXPEDIENTES SEXP";
    }
    $sSQL .= " WHERE dir.sgd_dir_tipo = 1 AND dir.RADI_NUME_RADI=r.RADI_NUME_RADI AND r.TDOC_CODI=td.SGD_TPR_CODIGO";
    //SE QUITA " AND r.CODI_NIVEL <=$nivelus "
    $sSQL .= $sWhere . $whereTrd . $sOrder;
    // $db->conn->debug=true;
    //-------------------------------
    // Execute SQL statement
    //-------------------------------
    //$db->conn->SetFetchMode(ADODB_FETCH_ASSOC);
    // print $sSQL;
    $rs = $db->conn->query($sSQL);
    $db->conn->SetFetchMode(ADODB_FETCH_NUM);
    //echo "<hr>$sSQL<hr>";
    //include "rp.php";
    //echo"<a href='rp.php?rs='.$rs.' class=\"vinculos\">1.Archivo </a>";echo "2222222222222222222222222222222222";
    function array_envia($db)
    {
        $tmp = serialize($array);
        $tmp = urlencode($tmp);
        return $tmp;
    }
    $array = $sSQL;
    $array = serialize($array);
    //var_dump ($array);
    //$array=array_envia($array);
    $_SESSION['array'] = $array;
    ?>
<!--<form action="rp.php" method="POST">
    <input name="array" type="hidden" value="<?php 
    echo $array;
    ?>
">    
    <input name="enviar" type="submit" value=" Enviar "> 
</form>    -->

 <form action="rptxt.php" method="POST">
<!--    <input name="array" type="hidden" value="<?php 
    echo $array;
    ?>
">     -->
    <input name="enviar" type="submit" value="Listado en Editor de Texto  ">
</form>  

<!-- <form action="rpxml.php" method="POST">
    <input name="array" type="hidden" value="<?php 
    echo $array;
    ?>
">     
    <input name="enviar" type="submit" value="Listado en xml  ">
</form> --> 
 <form action="rpxml.php" method="POST">
<!--    <input name="array" type="hidden" value="<?php 
    echo $array;
    ?>
">     -->
    <input name="enviar" type="submit" value="Listado en Hoja de Calculo ">
</form>  

<?php 
    //-------------------------------
    // Process empty recordset
    //-------------------------------
    if ($rs->EOF || !$rs) {
        ?>
     <tr>
      <td colspan="20" class="alarmas">No hay resultados</td>
     </tr>
    <tr>
     <td colspan="20" class="ColumnTD"><font class="ColumnFONT">
  </table>
<?php 
        return;
    }
    ?>
     <!--tr>
      <td colspan="10" class="DataTD"><b>Total Registros Encontrados: <?php 
    echo $fldTotal;
    ?>
</b></td>
     </tr-->
<?php 
    //-------------------------------
    // Initialize page counter and records per page
    //-------------------------------
    $iCounter = 0;
    //-------------------------------
    //-------------------------------
    // Process page scroller
    //-------------------------------
    $iPage = $_GET["FormCIUDADANO_Page"];
    //print ("<BR>($iPage)($iRecordsPerPage)");
    if (strlen(trim($iPage)) == 0) {
        $iPage = 1;
    } else {
        if ($iPage == "last") {
            $db_count = get_db_value($sCountSQL);
            $dResult = intval($db_count) / $iRecordsPerPage;
            $iPage = intval($dResult);
            if ($iPage < $dResult) {
                $iPage++;
            }
        } else {
            $iPage = intval($iPage);
        }
    }
    if (($iPage - 1) * $iRecordsPerPage != 0) {
        //print ("<BR>($iPage)($iRecordsPerPage)");
        do {
            $iCounter++;
            $rs->MoveNext();
            //print("Entra......");
        } while ($iCounter < ($iPage - 1) * $iRecordsPerPage && (!$rs->EOF && $rs));
    }
    $iCounter = 0;
    //$ruta_raiz ="..";
    //include "../config.php";
    //include "../jh_class/funciones_sgd.php";
    //-------------------------------
    // Display grid based on recordset
    //-------------------------------.
    $i = 1;
    while (!$rs->EOF && $rs && $iCounter < $iRecordsPerPage) {
        //-------------------------------
        // Create field variables based on database fields
        //-------------------------------
        $fldRADI_NUME_RADI = $rs->fields['RADI_NUME_RADI'];
        $fldRADI_FECH_RADI = $rs->fields['RADI_FECH_RADI'];
        /**
         *Busqueda por expediente
         *Fecha de modificacion: 11-Agosto-2006
         *Modificador: Supersolidaria
         */
        $fldsSGD_EXP_SUBEXPEDIENTE = $rs->fields['SGD_EXP_NUMERO'];
        $fldASUNTO = $rs->fields['RA_ASUN'];
        $fldTIPO_DOC = $rs->fields['SGD_TPR_DESCRIP'];
        $fldNUME_HOJAS = $rs->fields['RADI_NUME_HOJA'];
        $fldRADI_PATH = $rs->fields['RADI_PATH'];
        $fldDIRECCION_C = $rs->fields['SGD_DIR_DIRECCION'];
        $fldDIGNATARIO = $rs->fields['SGD_DIR_NOMBRE'];
        $fldTELEFONO_C = $rs->fields['SGD_DIR_TELEFONO'];
        $fldMAIL_C = $rs->fields['SGD_DIR_MAIL'];
        $fldNOMBRE = $rs->fields['SGD_DIR_NOMREMDES'];
        $fldCEDULA = $rs->fields['SGD_DIR_DOC'];
        //$fldUSUA_ACTU = $rs->fields['NOMB_ACTU") . " - (" . $rs->fields['LOGIN_ACTU").")";
        $aRADI_DEPE_ACTU = $rs->fields['RADI_DEPE_ACTU'];
        //echo $aRADI_DEPE_ACTU;
        $aRADI_USUA_ACTU = $rs->fields['RADI_USUA_ACTU'];
        $fldUSUA_ANTE = $rs->fields['RADI_USU_ANTE'];
        $fldPAIS = $rs->fields['RADI_PAIS'];
        $fldDIASR = $rs->fields['DIASR'];
        $tipoReg = $rs->fields['SGD_TRD_CODIGO'];
        $nivelRadicado = $rs->fields['CODI_NIVEL'];
        $seguridadRadicado = $rs->fields['SGD_SPUB_CODIGO'];
        $nivelExp = $rs->fields['SGD_EXP_PRIVADO'];
        if ($tipoReg == 1) {
            $tipoRegDesc = "Ciudadano";
        }
        if ($tipoReg == 2) {
            $tipoRegDesc = "Empresa";
        }
        if ($tipoReg == 3) {
            $tipoRegDesc = "Entidad";
        }
        if ($tipoReg == 4) {
            $tipoRegDesc = "Funcionario";
        }
        $fldNOMBRE = str_replace($ps_RADI_NOMB, "<font color=green><b>{$ps_RADI_NOMB}</b>", tohtml($fldNOMBRE));
        $fldASUNTO = str_replace($ps_RADI_NOMB, "<font color=green><b>{$ps_RADI_NOMB}</b>", tohtml($fldASUNTO));
        //-------------------------------
        // Busquedas Anidadas
        //-------------------------------
        $queryDep = "select DEPE_NOMB from dependencia where DEPE_CODI={$aRADI_DEPE_ACTU}";
        $db->conn->SetFetchMode(ADODB_FETCH_ASSOC);
        $rs2 = $db->query($queryDep);
        $fldDEPE_ACTU = $rs2->fields['DEPE_NOMB'];
        $queryUs = "select USUA_NOMB, USUA_DOC, DEPE_CODI from USUARIO where DEPE_CODI={$aRADI_DEPE_ACTU} and USUA_CODI={$aRADI_USUA_ACTU} ";
        $rs3 = $db->query($queryUs);
        $nivelExp = 0;
        if ($fldsSGD_EXP_SUBEXPEDIENTE) {
            $queryExp = "select sexp.SGD_EXP_PRIVADO, sexp.DEPE_CODI, sexp.USUA_DOC_RESPONSABLE\n\t\tfrom SGD_SEXP_SECEXPEDIENTES sexp \n\t       where sexp.SGD_EXP_NUMERO='{$fldsSGD_EXP_SUBEXPEDIENTE}' ";
            $rs4 = $db->query($queryExp);
            $nivelExp = $rs4->fields['SGD_EXP_PRIVADO'];
            $fldDEPE_CODI_ACTU = $rs4->fields['DEPE_CODI'];
            $fldUSUA_DOC_ACTU = $rs4->fields['USUA_DOC_RESPONSABLE'];
        }
        $fldUSUA_ACTU = $rs3->fields['USUA_NOMB'];
        $db->conn->SetFetchMode(ADODB_FETCH_NUM);
        include_once '../include/tx/Radicacion.php';
        $radicacion = new Radicacion($db);
        if ($fldRADI_NUME_RADI != "") {
            $db->conn->SetFetchMode(ADODB_FETCH_ASSOC);
            $arrAnexos = $radicacion->getRadImpresos($fldRADI_NUME_RADI);
            $db->conn->SetFetchMode(ADODB_FETCH_NUM);
        }
        if ($arrAnexos[0] != 0) {
            $clase = "impresos";
            $clasevinc = "impresosvinc";
        } else {
            $clase = "leidos";
            $clasevinc = "vinculos";
        }
        $linkDocto = "<a class='vinculos' href='javascript:noPermiso()' >";
        $linkInfGeneral = "<a class='vinculos' href='javascript:noPermiso()'>";
        //if  ($nivelRadicado <=$nivelus)
        //{
        $linkDocto = "<a class='{$clase}' href='../bodega/{$fldRADI_PATH}' target='Imagen{$iii}'>";
        $linkInfGeneral = "<a class='{$clase}' href='../verradicado.php?verrad={$fldRADI_NUME_RADI}&" . session_name() . '=' . session_id() . "&carpeta=8&nomcarpeta=Busquedas&tipo_carp=0'>";
        //}
        $verImg = true;
        $verImg = $seguridadRadicado == 1 ? $fldUSUA_ACTU != $_SESSION['usua_nomb'] ? false : true : ($nivelRadicado > $nivelus ? false : true);
        //$verImg= $verImg && !($fila['SGD_SPUB_CODIGO']==1);
        //$verImg=( $nivelExp>=1)?($fldDEPE_CODI_ACTU!=$_SESSION['depe_codi']?false:true):($fldUSUA_DOC_ACTU !=$_SESSION['usua_doc']?false:true);
        //echo $nivelExp .">=1 &&". $fldDEPE_CODI_ACTU ." != ".$_SESSION['dependencia'];
        if ($fldsSGD_EXP_SUBEXPEDIENTE) {
            if ($nivelExp >= 1 && $fldDEPE_CODI_ACTU != $_SESSION["dependencia"]) {
                if ($fldUSUA_DOC_ACTU == $_SESSION['usua_doc'] || $_SESSION['codusuario'] == 1) {
                    $verImg = true;
                } else {
                    $verImg = false;
                }
            }
        }
        if ($verImg == true) {
            //Insertar Funcion para descargar archivo
            $ruta_archivo = $fldRADI_PATH;
            $arreglo_explode = explode('/', $ruta_archivo);
            foreach ($arreglo_explode as $value) {
                $nombre_archivo = preg_match('/.+\\.[a-z]+$/', $value, $rs_nombre) ? $rs_nombre[0] : null;
            }
            $enlace_descarga = '../descargar_archivo.php?' . 'ruta_archivo=' . $ruta_archivo . '&nombre_archivo=' . $nombre_archivo . '&from=consulta' . '&radicado=' . $fldRADI_NUME_RADI;
            $linkDocto = isset($ruta_archivo) ? "<a class='{$clasevinc}' href='{$enlace_descarga}'>" : $linkDocto;
            $enlace_ver_radi = '../verradicado.php?verrad=' . $fldRADI_NUME_RADI . '&' . session_name() . '=' . session_id() . '&carpeta=8' . '&nomcarpeta=Busquedas' . '&tipo_carp=0' . '&from=consulta';
            $linkInfGeneral = "<a class='{$clasevinc}' href='{$enlace_ver_radi}'>";
        } else {
            $linkDocto = '';
            $linkInfGeneral = "<a ><img src='../imagenes/candado.gif' width=10>";
        }
        if (strlen($ps_SGD_EXP_SUBEXPEDIENTE) == 0) {
            $consultaExpediente = "SELECT SGD_EXP_NUMERO \n                      FROM SGD_EXP_EXPEDIENTE\n                      WHERE radi_nume_radi = {$fldRADI_NUME_RADI} AND\n                            sgd_exp_fech=(SELECT MIN(SGD_EXP_FECH) AS minFech\n                                          from sgd_exp_expediente\n                                          where radi_nume_radi= {$fldRADI_NUME_RADI})";
            $rsE = $db->conn->query($consultaExpediente);
            $fldsSGD_EXP_SUBEXPEDIENTE = $rsE->fields[0];
        }
        // Process the HTML controls
        if ($i == 1) {
            $formato = "listado1";
            $i = 2;
        } else {
            $formato = "listado2";
            $i = 1;
        }
        ?>
	<tr class="<?php 
        echo $formato;
        ?>
">
	<?php 
        if ($indiVinculo == 1) {
            ?>
	   <td class="<?php 
            echo $clase;
            ?>
" align="center" width="70">
	   <A href="javascript:pasar_datos('<?php 
            echo $fldRADI_NUME_RADI;
            ?>
');" >
	     Vincular
		</td>
	  <?php 
        }
        if ($indiVinculo == 2) {
            ?>
	   <td class="<?php 
            echo $clase;
            ?>
" align="center" width="70">
	   <A href="javascript:pasar_datos('<?php 
            echo $fldsSGD_EXP_SUBEXPEDIENTE;
            ?>
',2);" >
	     Vincular
		</td>

	  <?php 
        }
        ?>
	<td class="<?php 
        echo $clase;
        ?>
">
		<?php 
        if (strlen($fldRADI_PATH) && $verImg) {
            $iii = $iii + 1;
            ?>
  <?php 
            echo $linkDocto;
        }
        ?>
		<?php 
        echo $fldRADI_NUME_RADI;
        ?>
		<?php 
        if (strlen($fldRADI_PATH)) {
            ?>
</a><?php 
        }
        ?>
&nbsp;
	</td>
	<td class="<?php 
        echo $clase;
        ?>
"><?php 
        echo $linkInfGeneral;
        ?>
	<?php 
        echo tohtml($fldRADI_FECH_RADI);
        ?>
&nbsp;</a></td>
    <!--
    B�squeda por expediente
    Fecha de modificaci�n: 11-Agosto-2006
    Modificador: Supersolidaria
    -->
    <td class="<?php 
        echo $clase;
        ?>
">
    <?php 
        echo $fldsSGD_EXP_SUBEXPEDIENTE;
        ?>
&nbsp;</td>

	<td class="<?php 
        echo $clase;
        ?>
">
	<?php 
        echo $fldASUNTO;
        ?>
&nbsp;</td>
	<td class="<?php 
        echo $clase;
        ?>
">
	<?php 
        echo tohtml($fldTIPO_DOC);
        ?>
&nbsp;</td>
	<td class="<?php 
        echo $clase;
        ?>
">
	<?php 
        echo $tipoRegDesc;
        ?>
&nbsp;</td>
	<td class="<?php 
        echo $clase;
        ?>
">
	<?php 
        echo tohtml($fldNUME_HOJAS);
        ?>
&nbsp;</td>
	<td class="<?php 
        echo $clase;
        ?>
">
	<?php 
        echo tohtml($fldDIRECCION_C);
        ?>
&nbsp;</td>
	<td class="leidos">
	<?php 
        echo tohtml($fldTELEFONO_C);
        ?>
&nbsp;</td>
	<td class="leidos">
	<?php 
        echo tohtml($fldMAIL_C);
        ?>
&nbsp;</td>
	<td class="leidos">
	<?php 
        echo tohtml($fldDIGNATARIO);
        ?>
&nbsp;</td>
	<td class="leidos">
	<?php 
        echo $fldNOMBRE;
        ?>
&nbsp;</td>
	<td class="leidos">
	<?php 
        echo tohtml($fldCEDULA);
        ?>
&nbsp;</td>
	<td class="leidos">
	<?php 
        echo tohtml($fldUSUA_ACTU);
        ?>
&nbsp;</td>
	<td class="leidos">
	<?php 
        echo tohtml($fldDEPE_ACTU);
        ?>
&nbsp;</td>
	<td class="leidos">
	<?php 
        echo tohtml($fldUSUA_ANTE);
        ?>
&nbsp;</td>
		<td class="leidos">
	<?php 
        echo tohtml($fldPAIS);
        ?>
&nbsp;</td>
	<td class="leidos">
	<?php 
        if ($aRADI_DEPE_ACTU != 999) {
            echo tohtml($fldDIASR);
        } else {
            echo 'Sal';
        }
        ?>
&nbsp;</td>
	</tr>
	  <?php 
        $iCounter++;
        $rs->MoveNext();
    }
    //  Record navigator.
    ?>
<tr>
	<td colspan="20" class="ColumnTD"><font class="ColumnFONT">
<?php 
    // Navigation begin
    $bEof = $rs;
    if ($bEof && !$bEof->EOF || $iPage != 1) {
        $iCounter = 1;
        $iHasPages = $iPage;
        $sPages = "";
        $iDisplayPages = 0;
        $iNumberOfPages = 30;
        /* El nmero de paginas que aparecera en el navegador al pie de la pagina */
        while (!$rs->EOF && $rs && $iHasPages < $iPage + $iNumberOfPages) {
            if ($iCounter == $iRecordsPerPage) {
                $iCounter = 0;
                $iHasPages = $iHasPages + 1;
            }
            $iCounter++;
            $rs->MoveNext();
        }
        if (($rs->EOF || !$rs) && $iCounter > 1) {
            $iHasPages++;
        }
        if ($iHasPages - $iPage < intval($iNumberOfPages / 2)) {
            $iStartPage = $iHasPages - $iNumberOfPages;
        } else {
            $iStartPage = $iPage - $iNumberOfPages + intval($iNumberOfPages / 2);
        }
        if ($iStartPage < 0) {
            $iStartPage = 0;
        }
        for ($iPageCount = $iPageCount + 1; $iPageCount <= $iPage - 1; $iPageCount++) {
            $sPages .= "<a href=" . $sFileName . "?" . $form_params . $sSortParams . "FormCIUDADANO_Page=" . $iPageCount . "#RADICADO\"><font " . "class=\"ColumnFONT\"" . ">" . $iPageCount . "</a>&nbsp;";
            $iDisplayPages++;
        }
        $sPages .= "<font " . "class=\"paginacion\"" . "><b>" . $iPage . "</b>&nbsp;";
        $iDisplayPages++;
        $iPageCount = $iPage + 1;
        while ($iDisplayPages < $iNumberOfPages && $iStartPage + $iDisplayPages < $iHasPages) {
            $sPages .= "<a href=\"" . $sFileName . "?" . $form_params . $sSortParams . "FormCIUDADANO_Page=" . $iPageCount . "#RADICADO\"><font " . "class=\"ColumnFONT\"" . ">" . $iPageCount . "</a>&nbsp;";
            $iDisplayPages++;
            $iPageCount++;
        }
        if ($iPage == 1) {
            ?>
		<font class="paginacion">Primero
		<font class="paginacion">Anterior
<?php 
        } else {
            ?>
	<a href="<?php 
            echo $sFileName;
            ?>
?<?php 
            echo $form_params;
            echo $sSortParams;
            ?>
FormCIUDADANO_Page=1#RADICADO"><font class="paginacion">Primero</a>
	<a href="<?php 
            echo $sFileName;
            ?>
?<?php 
            echo $form_params;
            echo $sSortParams;
            ?>
FormCIUDADANO_Page=<?php 
            echo $iPage - 1;
            ?>
#RADICADO"><font class="paginacion">Anterior</a>
<?php 
        }
        echo "&nbsp;[&nbsp;" . $sPages . "]&nbsp;";
        if ($rs->EOF) {
            ?>
		<font class="ColumnFONT">Siguiente
		<font class="ColumnFONT">Ultimo
<?php 
        } else {
            ?>
		<a href="<?php 
            echo $sFileName;
            ?>
?<?php 
            echo $form_params;
            echo $sSortParams;
            ?>
FormCIUDADANO_Page=<?php 
            echo $iPage + 1;
            ?>
#RADICADO"><font class="ColumnFONT">Siguiente</a>
<?php 
        }
    }
    ?>
	</td></tr>
</table>
<?php 
}
Exemple #5
0
 */
$ruta_raiz = "../..";
include 'claseformunlario.php';
include_once "{$ruta_raiz}/config.php";
include $ruta_raiz . "/include/tx/Historico.php";
include "radicar/Radicacion.php";
foreach ($_GET as $key => $valor) {
    ${$key} = $valor;
}
//iconv("ISO-8859-1","UTF-8",$valor);
foreach ($_POST as $key => $valor) {
    ${$key} = $valor;
}
//iconv("ISO-8859-1","UTF-8",$valor);
$objclaseformulario = new claseformunlario($ruta_raiz, $_FILES);
$objradi = new Radicacion($objclaseformulario->db);
$objhist = new Historico($objclaseformulario->db);
$usuariopqr = "select USUA_CODI from usuario where usua_perm_administracionpqr = 1 AND DEPE_CODI =  {$dependencipqr}";
$rs = $objclaseformulario->db->conn->Execute($usuariopqr);
$usuariopqr = $rs->fields['USUA_CODI'];
$objclaseformulario->usuariopqr = $usuariopqr;
$objclaseformulario->dependencia = $dependencipqr;
$objclaseformulario->db->conn->debug = false;
if ($tipoid != 4) {
    $sgdttrcodigo = 1;
    $ciudadano = $objclaseformulario->crearCiudadano($tipoid, $primernombre, $segunnombre, $direcion, $primerapellido, $segundoapellido, $telefonooficina, $telefonomovil, $email, $munisipioresi, $departamentoresi, $numid, $continenteresi, $paisresi, $fax, $ocupacion, $profesion);
} else {
    $empresa = $objclaseformulario->crearEmpresa($tipoid, $paisresi, $primernombre, $numid, $munisipioresi, $departamentoresi, $direcion, $telefonooficina, $telefonomovil);
    $sgdttrcodigo = 2;
}
$descripcionAnexos = $objclaseformulario->uploader->tieneArchivos ? count($uploader->subidos) : 0;
Exemple #6
0
				$radiFechRadi,
				$sgd_apli_codi,
				$tdocCodi,
				$estaCodi,
				$radiPath,
				$dependencia,
				$usuaDoc,
				$usuaLogin,
				$usuaCodi,
				$codiNivel,
				$noDigitosRad*/
$rad = new Radicacion($db);
$rad->radiUsuaActu = $usuaDestino;
$rad->radiDepeActu = $depDestino;
// Creando el radicado
$rad = new Radicacion($db);
$rad->radiTipoDeri = 1;
//$tpRadicado;
$rad->radiCuentai = "null";
$rad->eespCodi = "null";
//$documento_us3;
$rad->mrecCodi = 3;
// Codigo para ver por que medio llego a la super 3 es internet
//	$fecha_gen_doc_YMD 	= substr($fecha_gen_doc,6 ,4)."-".substr($fecha_gen_doc,3 ,2)."-".substr($fecha_gen_doc,0 ,2);
$rad->radiFechOfic = date("d/m/Y");
//$fecha_gen_doc_YMD;
if (!$radicadopadre) {
    $radicadopadre = null;
}
$rad->radiNumeDeri = "null";
//trim($radicadopadre);
Exemple #7
0
$dir_tipo = $rssPatth->fields["sgd_dir_tipo"];
$dir_mail = $rssPatth->fields["sgd_dir_mail"];
$dir_telefono = $rssPatth->fields["sgd_dir_telefono"];
$dir_direccion = $rssPatth->fields["sgd_dir_direccion"];
$pathPadre = $rssPatth->fields["radi_path"];
$depCreadora = substr($numRadicadoPadre, 4, $digitosDependencia) * 1;
$ruta2 = "bodega/{$radano}/{$depCreadora}/docs/" . $ruta;
$ruta3 = "{$radano}/{$depCreadora}/docs/" . $ruta;
/***********************************************
// CREACION DEL RADICADO RESPUESTA
***********************************************/
//Para crear el numero de radicado se realiza el siguiente procedimiento
$isql_consec = "SELECT \n                        DEPE_RAD_TP{$ent} as secuencia \n                    FROM \n                        DEPENDENCIA \n                    WHERE \n                        DEPE_CODI = {$tpDepeRad}";
$creaNoRad = $db->conn->Execute($isql_consec);
$tpDepeRad = $creaNoRad->fields["secuencia"];
$rad = new Radicacion($db);
$rad->radiTipoDeri = 0;
// ok ????
$rad->radiCuentai = 'null';
// ok, Cuenta Interna, Oficio, Referencia
$rad->eespCodi = $iden;
//codigo emepresa de servicios publicos bodega
$rad->mrecCodi = 3;
// medio de correspondencia, 3 internet
$rad->radiFechOfic = "{$ddate}/{$mdate}/{$adate}";
// igual fecha radicado;
$rad->radiNumeDeri = $numRadicadoPadre;
//ok, radicado padre
$rad->radiPais = $pais;
//OK, codigo pais
$rad->descAnex = '.';
Exemple #8
0
 function combinar_csv($dependencia, $codusuario, $usua_doc, $usua_nomb, $depe_codi_territorial, $codiTRD, $tipoRad)
 {
     //Var que contiene el arreglo de radicados genrados a partir de la masiva
     $arrRadicados = array();
     //Instancia de la dependencia
     $objDependecia = new Dependencia($this->conexion);
     $objDependecia->Dependencia_codigo($dependencia);
     $tdocumental = $this->tipoDocto;
     //Inicializa el pdf
     $this->pdf = new Cezpdf("LEGAL", "landscape");
     $objHist = new Historico($this->conexion);
     $year = date("Y");
     $day = date("d");
     $month = date("m");
     // orientacion izquierda
     $orientCentro = array("left" => 0);
     // justificacion centrada
     $justCentro = array("justification" => "center");
     $estilo1 = array("justification" => "left", "leading" => 8);
     $estilo2 = array("left" => 0, "leading" => 12);
     $estilo3 = array("left" => 0, "leading" => 15);
     $this->pdf->ezSetCmMargins(1, 1, 3, 2);
     //top,botton,left,right
     /* Se establece la fuente que se utilizara para el texto. */
     $this->pdf->selectFont($this->ruta_raiz . "/include/pdf/fonts/Times-Roman.afm");
     $this->pdf->ezText("LISTADO DE RADICACION MASIVA\n", 15, $justCentro);
     $this->pdf->ezText("Dependencia: {$dependencia} \n", 12, $estilo2);
     $this->pdf->ezText("Usuario Responsable: {$usua_nomb} \n", 12, $estilo2);
     $this->pdf->ezText("Fecha: {$day}-{$month}-{$day} \n", 12, $estilo2);
     $this->pdf->ezText($txtformat, 12, $estilo2);
     $data = array();
     $columna = array();
     $contador = 0;
     require_once $this->ruta_raiz . "/class_control/class_controlExcel.php";
     $this->btt = new CONTROL_ORFEO($this->conexion);
     $this->rad = new Radicacion($this->conexion);
     echo "<table border=0 width 80% cellpadding='0' cellspacing='5' class='borde_tab' >";
     echo "<tr>\n            <td class='titulos4'>Registro</td>\n            <td class='titulos4'>Radicado</td>\n            <td class='titulos4'>Nombre</td>\n            <td class='titulos4'>Direccion</td>\n            <td class='titulos4'>Depto</td>\n            <td class='titulos4'>Municipio</td>\n            <td class='titulos4'>Expediente</td>\n            </tr>";
     //Referencia el archivo a abrir
     $ruta = $this->ruta_raiz . "/" . $this->carpetaBodega . "masiva/" . $this->arcCSV;
     clearstatcache();
     $fp = fopen($ruta, 'r');
     //wb 2 r
     if ($fp) {
         //Recorre el arrego de los datos
         for ($ii = 0; $ii < count($this->datos); $ii++) {
             $i = 0;
             $numeroExpediente = "";
             // Aqui se accede a la clase class_control para actualizar expedientes.
             $ruta_raiz = $this->ruta_raiz;
             // Por cada etiqueta de los campos del encabezado del CSV efecta un reemplazo
             foreach ($this->encabezado as $campos_d) {
                 if (strlen(trim($this->datos[$ii][$i])) < 1) {
                     $this->datos[$ii][$i] = "<ESPACIO>";
                 }
                 //Agregamos los radicados de manera automatica
                 //El usuario envia el csv con los demas datos y
                 //se realiza la radicacion asignando los nuevos radicados
                 $dato_r = trim($this->datos[$ii][$i]);
                 $dato_r = mb_strtoupper(trim($dato_r), 'UTF-8');
                 $dato_r = str_replace(array("\r\n", "\n", "\r", "\t"), '', $dato_r);
                 if ($campos_d == "*TIPO*") {
                     $tip_doc = $dato_r;
                 }
                 if ($campos_d == "*NOMBRE*") {
                     $nombre = $dato_r;
                 }
                 if ($campos_d == "*DOCUMENTO*") {
                     $doc_us1 = $dato_r;
                 }
                 if ($campos_d == "*NOMBRE*") {
                     $nombre_us1 = $dato_r;
                 }
                 if ($campos_d == "*PRIM_APEL*") {
                     $prim_apell_us1 = $dato_r;
                 }
                 if ($campos_d == "*SEG_APEL*") {
                     $seg_apell_us1 = $dato_r;
                 }
                 if ($campos_d == "*DIGNATARIO*") {
                     $otro_us1 = $dato_r;
                 }
                 if ($campos_d == "*CARGO*") {
                     $cargo_us1 = $dato_r;
                 }
                 if ($campos_d == "*DIR*") {
                     $direccion_us1 = $dato_r;
                 }
                 if ($campos_d == "*TELEFONO*") {
                     $telefono_us1 = $dato_r;
                 }
                 if ($campos_d == "*MUNI*") {
                     $muni_codi = $dato_r;
                 }
                 if ($campos_d == "*DEPTO*") {
                     $dpto_codi = $dato_r;
                 }
                 if ($campos_d == "*ASUNTO*") {
                     $asu = $dato_r;
                 }
                 if ($campos_d == "*ID*") {
                     $sgd_esp_codigo = $dato_r;
                 }
                 if ($campos_d == "*DESC_ANEXOS*") {
                     $desc_anexos = $dato_r;
                 }
                 if ($campos_d == "*MUNI_NOMBRE*") {
                     $muni_nombre = $dato_r;
                 }
                 if ($campos_d == "*DEPTO_NOMBRE*") {
                     $dpto_nombre = $dato_r;
                 }
                 if ($campos_d == "*PAIS_NOMBRE*") {
                     $pais = $dato_r;
                 }
                 if ($campos_d == "*TIPO_DOC*") {
                     $tdoc = $dato_r;
                 }
                 if ($campos_d == "*NUM_EXPEDIENTE*") {
                     $numeroExpediente = $dato_r;
                 }
                 //Duplican campos para masiva con copia
                 if ($campos_d == "*TIPO2*") {
                     $tip_doc2 = $dato_r;
                 }
                 if ($campos_d == "*NOMBRE2*") {
                     $nombre2 = $dato_r;
                 }
                 if ($campos_d == "*DOCUMENTO2*") {
                     $doc_us12 = $dato_r;
                 }
                 if ($campos_d == "*NOMBRE2*") {
                     $nombre_us12 = $dato_r;
                 }
                 if ($campos_d == "*PRIM_APEL2*") {
                     $prim_apell_us12 = $dato_r;
                 }
                 if ($campos_d == "*SEG_APEL2*") {
                     $seg_apell_us12 = $dato_r;
                 }
                 if ($campos_d == "*DIGNATARIO2*") {
                     $otro_us12 = $dato_r;
                 }
                 if ($campos_d == "*CARGO2*") {
                     $cargo_us12 = $dato_r;
                 }
                 if ($campos_d == "*DIR2*") {
                     $direccion_us12 = $dato_r;
                 }
                 if ($campos_d == "*TELEFONO2*") {
                     $telefono_us12 = $dato_r;
                 }
                 if ($campos_d == "*MUNI2*") {
                     $muni_codi2 = $dato_r;
                 }
                 if ($campos_d == "*DEPTO2*") {
                     $dpto_codi2 = $dato_r;
                 }
                 if ($campos_d == "*ASUNTO2*") {
                     $asu2 = $dato_r;
                 }
                 if ($campos_d == "*ID2*") {
                     $sgd_esp_codigo2 = $dato_r;
                 }
                 if ($campos_d == "*DESC_ANEXOS2*") {
                     $desc_anexos2 = $dato_r;
                 }
                 if ($campos_d == "*MUNI_NOMBRE2*") {
                     $muni_nombre2 = $dato_r;
                 }
                 if ($campos_d == "*DEPTO_NOMBRE2*") {
                     $dpto_nombre2 = $dato_r;
                 }
                 if ($campos_d == "*PAIS_NOMBRE2*") {
                     $pais2 = $dato_r;
                 }
                 if ($campos_d == "*TIPO_DOC2*") {
                     $tdoc2 = $dato_r;
                 }
                 if ($campos_d == "*NUM_EXPEDIENTE2*") {
                     $numeroExpediente2 = $dato_r;
                 }
                 if (!empty($tip_doc2) && !empty($muni_nombre2)) {
                     $dir2 = True;
                 }
                 $tipo_anexo = "0";
                 $cuentai = "";
                 $documento_us3 = "";
                 $med = "1";
                 $fec = NULL;
                 if ($campos_d == "*ESP_CODIGO*") {
                     $codigoESP = $dato_r;
                     if ($codigoESP == "<ESPACIO>") {
                         $codigoESP = null;
                     }
                 }
                 if ($campos_d == "*RAD_ANEXO*") {
                     $radicadopadre = $dato_r;
                     $tipoanexo = 0;
                     if ($radicadopadre == "<ESPACIO>") {
                         $radicadopadre = "";
                         $tipoanexo = "";
                     }
                 } else {
                     $radicadopadre = "";
                 }
                 $ane = "";
                 $carp_codi = "12";
                 $i++;
             }
             $tip_rem = "1";
             // Si no se especifico el tipo de documento
             if (!$tdoc) {
                 $tdoc = 0;
             }
             $this->validarLugar();
             // Si no se especifico el tipo de documento
             if (!$tdoc2) {
                 $tdoc2 = 0;
             }
             if ($dir2) {
                 $this->validarLugar2();
             }
             $pais_codi = $this->arrCodPais[$pais . $dpto_nombre . $muni_nombre];
             if ($dir2) {
                 $pais_codi2 = $this->arrCodPais[$pais2 . $dpto_nombre2 . $muni_nombre2];
             }
             if ($pais_codi == '') {
                 $pais_codi = '170';
             }
             if ($dir2) {
                 if ($pais_codi2 == '') {
                     $pais_codi2 = '170';
                 }
             }
             $dpto_codi = $pais_codi . "-" . $this->arrCodDepto[$dpto_nombre];
             $muni_codi = $dpto_codi . "-" . $this->arrCodMuni[$dpto_nombre . $muni_nombre];
             if ($dir2) {
                 $dpto_codi2 = $pais_codi2 . "-" . $this->arrCodDepto2[$dpto_nombre2];
                 $muni_codi2 = $dpto_codi2 . "-" . $this->arrCodMuni2[$dpto_nombre2 . $muni_nombre2];
             }
             $tmp_objMuni = new Municipio($this->conexion);
             //Creamos esto para traer el codigo del continente y transmitirlo
             $tmp_objMuni->municipio_codigo($dpto_codi, $muni_codi);
             //por las diferentes tablas.
             $cont_codi = $tmp_objMuni->get_cont_codi();
             $muni_codi = $cont_codi . "-" . $muni_codi;
             if ($dir2) {
                 $tmp_objMuni2 = new Municipio($this->conexion);
                 //Creamos esto para traer el codigo del continente y transmitirlo
                 $tmp_objMuni2->municipio_codigo($dpto_codi2, $muni_codi2);
                 //por las diferentes tablas.
                 $cont_codi2 = $tmp_objMuni2->get_cont_codi();
                 $muni_codi2 = $cont_codi2 . "-" . $muni_codi2;
             }
             //Se agregan las dos variables siguientes, para corregir
             //el error que se estaba presentando en la radicación masiva
             $codigo_depto = $this->arrCodDepto[$dpto_nombre];
             $codigo_muni = $this->arrCodMuni[$dpto_nombre . $muni_nombre];
             //Fin Variables agregadas
             //Se agregan las dos variables siguientes, para corregir
             //el error que se estaba presentando en la radicación masiva
             if ($dir2) {
                 $codigo_depto2 = $this->arrCodDepto2[$dpto_nombre2];
                 $codigo_muni2 = $this->arrCodMuni2[$dpto_nombre2 . $muni_nombre2];
             }
             //Fin Variables agregadas
             $muni_us1 = $muni_codi;
             $codep_us1 = $dpto_codi;
             $nombre_us = "{$nombre_us1} {$prim_apell_us1} {$seg_apell_us1}";
             if ($dir2) {
                 $muni_us12 = $muni_codi2;
                 $codep_us12 = $dpto_codi2;
                 $nombre_us2 = "{$nombre_us12} {$prim_apell_us12} {$seg_apell_us12}";
             }
             unset($tmp_objMuni);
             $documento_us3 = $codigoESP;
             if (!$documento_us3) {
                 $documento_us3 = null;
             }
             $rad = new Radicacion($this->conexion);
             $rad->radiTipoDeri = $tipoanexo;
             $rad->radiCuentai = "'{$cuentai}'";
             $rad->eespCodi = $documento_us3;
             $rad->mrecCodi = $med;
             $rad->radiFechOfic = $fec;
             $rad->radiNumeDeri = null;
             $rad->radiPais = "{$pais}";
             $rad->descAnex = $ane;
             $rad->raAsun = substr(htmlspecialchars(stripcslashes($asu)), 0, 349);
             $rad->radiDepeRadi = $dependencia;
             $rad->radiDepeActu = $dependencia;
             $rad->radiUsuaActu = $codusuario;
             $rad->trteCodi = 0;
             if (!$tdocumental) {
                 $tdocumental = 0;
             }
             $rad->tdocCodi = $tdocumental;
             if (!$tip_doc) {
                 $tip_doc = 0;
             }
             $rad->tdidCodi = $tip_doc;
             $rad->nofolios = 1;
             $rad->noanexos = 0;
             $rad->carpCodi = 5;
             $rad->carpPer = 1;
             $rad->trteCodi = 0;
             $rad->ra_asun = $asu;
             $rad->sgd_apli_codi = 0;
             $rad->radiPath = '';
             $codTx = 2;
             $flag = 1;
             $tpDepeRad = $_SESSION["tpDepeRad"];
             $nurad = $rad->newRadicado($tipoRad, $tpDepeRad[$tipoRad]);
             $this->radarray[] = $nurad;
             if (strlen($numeroExpediente) >= 10) {
                 $this->objExp = new Expediente($this->conexion);
                 $resultadoExp = $this->objExp->insertar_expediente($numeroExpediente, $nurad, $dependencia, $codusuario, $usua_doc);
                 $observa = "Por Rad. Masiva.";
                 if ($this->codProceso) {
                     $radicados[] = $nurad;
                     $tipoTx = 50;
                     $objFlujo = new Flujo($this->conexion, $this->codProceso, $usua_doc);
                     $expEstadoActual = $objFlujo->actualNodoExpediente($numeroExpediente);
                     $objFlujo->cambioNodoExpediente($numeroExpediente, $nurad, $this->codFlujo, $this->codArista, 1, $observa, $this->codProceso);
                 }
             }
             $nombre_us1 = trim($nombre_us1);
             $direccion_us1 = trim($direccion_us1);
             $nombre_us12 = trim($nombre_us12);
             $direccion_us12 = trim($direccion_us12);
             if ($tip_doc == 2) {
                 $codigo_us = $this->btt->grabar_usuario($doc_us1, $nombre_us1, $direccion_us1, $prim_apell_us1, $seg_apell_us1, $telefono_us1, $mail_us1, $codigo_depto, $codigo_muni);
                 $tipo_emp_us1 = 0;
                 $documento_us1 = $codigo_us;
             }
             //copia
             if ($tip_doc2 == 2) {
                 $codigo_us2 = $this->btt->grabar_usuario($doc_us12, $nombre_us12, $direccion_us12, $prim_apell_us12, $seg_apell_us12, $telefono_us12, $mail_us12, $codigo_depto2, $codigo_muni2);
                 $tipo_emp_us12 = 0;
                 $documento_us12 = $codigo_us2;
             }
             if ($tip_doc == 1) {
                 $codigo_oem = $this->arregloOem[$nombre_us1];
                 //Agregada 24 Noviembre por Lucia Ojeda
                 if (!$codigo_oem > 0) {
                     //Agregada 24 Noviembre por Lucia Ojeda
                     $codigo_oem = $this->btt->grabar_oem($doc_us1, $nombre_us1, $direccion_us1, $prim_apell_us1, $seg_apell_us1, $telefono_us1, $mail_us1, $codigo_depto, $codigo_muni);
                 }
                 $tipo_emp_us1 = 2;
                 $documento_us1 = $codigo_oem;
             }
             //copia
             if ($tip_doc2 == 1) {
                 $codigo_oem2 = $this->arregloOem[$nombre_us12];
                 if (!$codigo_oem2 > 0) {
                     $codigo_oem2 = $this->btt->grabar_oem($doc_us12, $nombre_us12, $direccion_us12, $prim_apell_us12, $seg_apell_us12, $telefono_us12, $mail_us12, $codigo_depto2, $codigo_muni2);
                 }
                 $tipo_emp_us12 = 2;
                 $documento_us12 = $codigo_oem2;
             }
             if ($tip_doc == 0) {
                 $sgd_esp_codigo = $this->arregloEsp[$nombre_us1];
                 $tipo_emp_us1 = 1;
                 $documento_us1 = $sgd_esp_codigo;
             }
             //copia
             if ($tip_doc2 == 0) {
                 $sgd_esp_codigo2 = $this->arregloEsp[$nombre_us12];
                 $tipo_emp_us12 = 1;
                 $documento_us12 = $sgd_esp_codigo2;
             }
             $documento_us2 = "";
             $documento_us3 = "";
             $cc_documento_us1 = "documento";
             $grbNombresUs1 = trim($nombre_us1) . " " . trim($prim_apel_us1) . " " . trim($seg_apel_us1);
             //copia
             $documento_us22 = "";
             $documento_us32 = "";
             $cc_documento_us12 = "documento";
             $grbNombresUs12 = trim($nombre_us12) . " " . trim($prim_apel_us12) . " " . trim($seg_apel_us12);
             $conexion =& $this->conexion;
             include "{$ruta_raiz}/radicacion/grb_direcciones.php";
             // En esta parte registra el envio en la tabla SGD_RENV_REGENVIO
             if (!$this->codigo_envio) {
                 $isql = "select max(SGD_RENV_CODIGO) as MAX FROM SGD_RENV_REGENVIO";
                 $rs = $this->conexion->query($isql);
                 if (!$rs->EOF) {
                     $nextval = $rs->fields['MAX'];
                 }
                 $nextval++;
                 $this->codigo_envio = $nextval;
                 if (empty($this->radi_nume_grupo)) {
                     $this->radi_nume_grupo = $nurad;
                 }
                 $radi_nume_grupo = $this->radi_nume_grupo;
             } else {
                 $nextval = $this->codigo_envio;
             }
             $dep_radicado = substr($verrad_sal, 4, 3);
             $carp_codi = substr($dep_radicado, 0, 2);
             $dir_tipo = 1;
             $nombre_us = mb_substr(trim($nombre_us), 0, 100, 'UTF-8');
             $direccion_us1 = mb_substr(trim($direccion_us1), 0, 200, 'UTF-8');
             $isql = "INSERT INTO SGD_RENV_REGENVIO (\n                    USUA_DOC, \n                    SGD_RENV_CODIGO, \n                    SGD_FENV_CODIGO, \n                    SGD_RENV_FECH,\n                    RADI_NUME_SAL, \n                    SGD_RENV_DESTINO, \n                    SGD_RENV_TELEFONO, \n                    SGD_RENV_MAIL, \n                    SGD_RENV_PESO, \n                    SGD_RENV_VALOR,\n                    SGD_RENV_CERTIFICADO, \n                    SGD_RENV_ESTADO, \n                    SGD_RENV_NOMBRE, \n                    SGD_DIR_CODIGO, \n                    DEPE_CODI, \n                    SGD_DIR_TIPO,\n                    RADI_NUME_GRUPO, \n                    SGD_RENV_PLANILLA, \n                    SGD_RENV_DIR, \n                    SGD_RENV_PAIS, \n                    SGD_RENV_DEPTO, \n                    SGD_RENV_MPIO,\n                    SGD_RENV_TIPO, \n                    SGD_RENV_OBSERVA,\n                    SGD_DEPE_GENERA)\n                    VALUES\n                    ({$usua_doc}, \n                    {$nextval}, \n                    0, \n                    " . $this->btt->sqlFechaHoy . ", \n                    {$nurad}, \n                    '{$muni_nomb}', \n                    '{$telefono_us1}', \n                    '{$mail}','',\n                    '{$valor_unit}', \n                    0, \n                    1, \n                    '{$nombre_us}', \n                    NULL, \n                    {$dependencia}, \n                    '{$dir_tipo}', \n                    " . $this->radi_nume_grupo . ", \n                    '00',\n                    '{$direccion_us1}', \n                    '{$pais}',\n                    '{$dpto_nombre}', \n                    '{$muni_nombre}', \n                    1, \n                    'Masiva grupo " . $this->radi_nume_grupo . "',\n                    {$dependencia}) ";
             $rs = $this->conexion->query($isql);
             if (!$rs) {
                 $this->conexion->conn->RollbackTrans();
                 die("<span class='etextomenu'>No se ha \n                        podido insertar la informacion en SGD_RENV_REGENVIO:1");
             }
             // En esta parte registra el envio en la tabla SGD_RENV_REGENVIO para
             // la direccion 2
             if ($dir2) {
                 $isql = "SELECT MAX(SGD_RENV_CODIGO) AS MAX FROM SGD_RENV_REGENVIO";
                 $rs = $this->conexion->query($isql);
                 if (!$rs->EOF) {
                     $nextval = $rs->fields['MAX'];
                 }
                 $nextval++;
                 $this->codigo_envio = $nextval;
                 $dep_radicado = substr($verrad_sal, 4, 3);
                 $carp_codi = substr($dep_radicado, 0, 2);
                 $dir_tipo = 1;
                 $nombre_us = substr(trim($nombre_us2), 0, 29);
                 $direccion_us12 = substr(trim($direccion_us12), 0, 29);
                 $isql = "INSERT INTO SGD_RENV_REGENVIO (\n                        USUA_DOC, \n                        SGD_RENV_CODIGO, \n                        SGD_FENV_CODIGO, \n                        SGD_RENV_FECH,\n                        RADI_NUME_SAL, \n                        SGD_RENV_DESTINO, \n                        SGD_RENV_TELEFONO, \n                        SGD_RENV_MAIL, \n                        SGD_RENV_PESO, \n                        SGD_RENV_VALOR,\n                        SGD_RENV_CERTIFICADO, \n                        SGD_RENV_ESTADO, \n                        SGD_RENV_NOMBRE, \n                        SGD_DIR_CODIGO, \n                        DEPE_CODI, \n                        SGD_DIR_TIPO,\n                        RADI_NUME_GRUPO, \n                        SGD_RENV_PLANILLA, \n                        SGD_RENV_DIR, \n                        SGD_RENV_PAIS, \n                        SGD_RENV_DEPTO, \n                        SGD_RENV_MPIO,\n                        SGD_RENV_TIPO, \n                        SGD_RENV_OBSERVA,\n                        SGD_DEPE_GENERA)\n                        VALUES\n                        ({$usua_doc}, \n                        {$nextval}, \n                        0, \n                        " . $this->btt->sqlFechaHoy . ", \n                        {$nurad}, \n                        '{$muni_nomb}', \n                        '{$telefono_us1}', \n                        '{$mail}',\n                        '',\n                        '{$valor_unit}', \n                        0, \n                        1, \n                        '{$nombre_us}', \n                        NULL, \n                        {$dependencia}, \n                        '{$dir_tipo}', \n                        " . $this->radi_nume_grupo . ", \n                        '00',\n                        '{$direccion_us1}', \n                        '{$pais}',\n                        '{$dpto_nombre}', \n                        '{$muni_nombre}', \n                        1, \n                        'Masiva grupo " . $this->radi_nume_grupo . "',\n                        {$dependencia}) ";
                 $rs = $this->conexion->query($isql);
                 if (!$rs) {
                     $this->conexion->conn->RollbackTrans();
                     die("<span class='etextomenu'>No se ha podido isertar la informacion en SGD_RENV_REGENVIO :2");
                 }
             }
             /*
              * Registro de la clasificacion TRD
              */
             $isql = "INSERT INTO SGD_RDF_RETDOCF(\n                    USUA_DOC, \n                    SGD_MRD_CODIGO, \n                    SGD_RDF_FECH, \n                    RADI_NUME_RADI, \n                    DEPE_CODI, \n                    USUA_CODI)\n                    VALUES({$usua_doc}, \n                    {$codiTRD},\n                    " . $this->btt->sqlFechaHoy . ", \n                    {$nurad}, \n                    '{$dependencia}', \n                    {$codusuario} )";
             $rs = $this->conexion->query($isql);
             if (!$rs) {
                 $this->conexion->conn->RollbackTrans();
                 die("<span class='etextomenu'>No se ha podido isertar la informaci&ocute;n en SGD_RENV_REGENVIO");
             }
             $contador = $ii + 1;
             echo "\n                    <tr>\n                    <td class='listado2'> {$contador} </td>\n                    <td class='listado2'> {$nurad} </td>\n                    <td class='listado2'> {$nombre_us} </td>\n                    <td class='listado2'> {$direccion_us1} </td>\n                    <td class='listado2'> {$dpto_nombre}</td>\n                    <td class='listado2'> {$muni_nombre}</td>\n                    <td class='listado2'> {$numeroExpediente} </td>\n                    </tr>";
             if ($dir2) {
                 echo "\n                        <tr>\n                        <td class='listado2'>{$contador} cc</td>\n                        <td class='listado2'></td>\n                        <td class='listado2'>{$nombre_us2}</td>\n                        <td class='listado2'>{$direccion_us12}</td>\n                        <td class='listado2'>{$dpto_nombre2}</td>\n                        <td class='listado2'>{$muni_nombre2}</td>\n                        <td class='listado2'>{$numeroExpediente2}</td>\n                        </tr>";
             }
             if (connection_status() != 0) {
                 echo "<h1>Error de conexión</h1>";
                 $objError = new CombinaError(NO_DEFINIDO);
                 echo $objError->getMessage();
                 die;
             }
             $nombre_us = $this->presentacion($nombre_us);
             $direccion_us1 = $this->presentacion($direccion_us1);
             $dpto_nombre = $this->presentacion($dpto_nombre);
             $muni_nombre = $this->presentacion($muni_nombre);
             $nombre_us2 = $this->presentacion($nombre_us2);
             $direccion_us12 = $this->presentacion($direccion_us12);
             $dpto_nombre2 = $this->presentacion($dpto_nombre2);
             $muni_nombre2 = $this->presentacion($muni_nombre2);
             $data = array_merge($data, array(array('#' => $contador, 'Radicado' => $nurad, 'Nombre' => $nombre_us, 'Direccion' => $direccion_us1, 'Departamento' => $dpto_nombre, 'Municipio' => $muni_nombre)));
             if ($dir2) {
                 $contador++;
                 $data = array_merge($data, array(array('#' => $contador, 'Radicado' => $nurad, 'Nombre' => $nombre_us2, 'Direccion' => $direccion_us12, 'Departamento' => $dpto_nombre2, 'Municipio' => $muni_nombre2)));
             }
             $arrRadicados[] = $nurad;
         }
         $queryUpdate = "update SGD_MASIVA_EXCEL set SGD_MASIVA_RADICADA = 1 where '{$nurad}' in ( SGD_MASIVA_RANGOINI , SGD_MASIVA_RANGOFIN ) AND SGD_MASIVA_DEPENDENCIA = {$dependencia}";
         $rs = $this->conexion->query($queryUpdate);
         if (!$rs) {
             $this->conexion->conn->RollbackTrans();
             die("<span class='etextomenu'>No se ha podido insertar la informaci&oacute;n de la secuencia '{$nurad}' con: {$queryUpdate}");
         }
         fclose($fp);
         echo "</table>";
         echo "<span class='info'>Numero de registros {$contador}</span>";
         $this->pdf->ezTable($data);
         $this->pdf->ezText("\n", 15, $justCentro);
         $this->pdf->ezText("Total Registros {$contador} \n", 15, $justCentro);
         $pdfcode = $this->pdf->ezOutput();
         $fp = fopen($this->arcPDF, 'wb');
         fwrite($fp, $pdfcode);
         fclose($fp);
         $objHist->insertarHistorico($arrRadicados, $dependencia, $codusuario, $dependencia, $codusuario, "Radicado insertado del grupo de masiva {$radi_nume_grupo}", 30);
         $this->resulComb = $data;
         $fileExito = "{$ruta_raiz}/" . $this->carpetaBodega . "masiva/{$archInsumo}.ok";
         $fp = fopen($fileExito, 'wb');
         fwrite($fp, "Exito");
         fclose($fp);
     } else {
         exit("No se pudo crear el archivo {$this->archivo_insumo}");
     }
 }
Exemple #9
0
                     $tablaRads .= $conCarp;
                 } else {
                     $tablaRads .= $sinCarp;
                 }
             }
         }
         $tablaRads .= "</table>";
     } else {
         $tablaRads .= "<table  width=100% class='borde_tab' align='center' cellpadding='0' cellspacing='0'>\n\t\t\t\t\t\t<tr class='timparr'>\n\t\t\t\t\t\t\t<td colspan='6' class='titulos2'><center><font><b>Actualmente no tiene Radicados Archivados</b></font></center></td>\n\t\t\t\t\t\t</tr>\n\t\t\t\t\t\t</table>";
     }
 }
 if ($verrad && $expediente) {
     $arrAnexoAsociado = $expediente->expedienteAnexoAsociado($verrad, $numExpediente);
     if (is_array($arrAnexoAsociado) && count($arrAnexoAsociado) > 0) {
         include_once "{$ruta_raiz}/include/tx/Radicacion.php";
         $rad = new Radicacion($db);
         $tblAnexAsoc = "<table width='100%' class='borde_tab' cellspacing='0' cellpadding='0' align='center' id='tblAnexoAsociado'>\n\t\t  \t\t\t\t\t<tr>\n\t\t    \t\t\t\t\t<td class='titulos5'>Y ESTA RELACIONADO CON EL(LOS) SIGUIENTE(S) DOCUMENTOS:</td>\n\t\t    \t\t\t\t\t<td class='titulos5' align='center'>";
         //if(($expediente->responsable==$_SESSION['usua_doc'] && $expediente->fase<2 and $expediente->depCodi==$_SESSION['dependencia'] ) || ($_SESSION["usua_admin_archivo"]>=1 and $expediente->fase>=2))
         //{
         $tblAnexAsoc .= "<span class='leidos2'><b>ARCHIVAR DOCUMENTOS EN EXPEDIENTE:</b></span><input type='submit' name='btnAanexoAsociado' value='>>' class='botones_2' onclick='return validaAA();' >";
         //}
         $tblAnexAsoc .= "</td>\n\t\t\t\t\t\t\t  </tr>\n\t\t\t\t\t\t\t</table>\n\t\t\t\t\t\t\t<table border=0 width=100% class='borde_tab' align='center'>\n\t\t\t\t\t\t\t  <tr class='titulos5'>\n\t\t\t\t\t\t\t    <td class='titulos5'><input type='checkbox' name='checkTodosInc' id='checkTodosInc' value='checkbox' onClick='todosInc();'></td>\n\t\t\t\t\t\t\t    <td align='center'>RADICADO</td>\n\t\t\t\t\t\t\t    <td align='center'>FECHA RADICACION</td>\n\t\t\t\t\t\t\t    <td align='center'>TIPO DOCUMENTO</td>\n\t\t\t\t\t\t\t    <td align='center'>ASUNTO</td>\n\t\t\t\t\t\t\t    <td align='center'>TIPO DE RELACION</td>\n\t\t\t\t\t\t\t  </tr>";
         foreach ($arrAnexoAsociado as $clave => $datosAnexoAsociado) {
             $arrDatosRad = $rad->getDatosRad($datosAnexoAsociado['radicado']);
             if ($arrDatosRad['ruta'] != "") {
                 $rutaRadicado = "<a href='{$ruta_raizImg}/seguridadImagen.php?fec=" . base64_encode($arrDatosRad['ruta']) . "&ln=" . base64_encode("check") . "' >" . $datosAnexoAsociado['radicado'] . "</a>";
             } else {
                 $rutaRadicado = $datosAnexoAsociado['radicado'];
             }
             $radicadoAnexo = $datosAnexoAsociado['radicado'];
             $tipoRelacion = $datosAnexoAsociado['tipoAsoc'];
Exemple #10
0
function rs2html(&$db, &$rsTmp, $ztabhtml = false, $zheaderarray = false, $htmlspecialchars = true, $echo = true, $toRefVar, $orderTipo, $ordenActual, $rutaRaiz, $checkAll = false, $checkTitulo = false, $descCarpetasGen, $descCarpetasPer, $colOptions = false, $pagEdicion = null, $pagConsulta = null)
{
    $orderTipo = strtoupper(trim($orderTipo)) != 'DESC' ? 'asc' : 'desc';
    $s = '';
    $rows = 0;
    $docnt = false;
    global $gSQLMaxRows, $gSQLBlockRows, $HTTP_GET_VARS, $HTTP_SESSION_VARS;
    if (!$rsTmp) {
        printf(ADODB_BAD_RS, 'rs2html');
        return false;
    }
    if (!$ztabhtml) {
        $ztabhtml = " width='98%'";
    }
    //else $docnt = true;
    $typearr = array();
    $ncols = $rsTmp->FieldCount();
    $hdr = "<table cols='{$ncols}' {$ztabhtml}><tr>\n\n";
    $img_no = $ordenActual;
    for ($i = 0; $i < $ncols; $i++) {
        $field = $rsTmp->FetchField($i);
        $fname = $zheaderarray ? $zheaderarray[$i] : htmlspecialchars($field->name);
        $typearr[$i] = $rsTmp->MetaType($field->type, $field->max_length);
        if (strlen($fname) == 0) {
            $fname = '&nbsp;';
        }
        if (isset($hor)) {
            $order = $i - $hor;
            $hor = 0;
        } else {
            $order = $i;
        }
        $order = $i;
        $encabezado = $toRefVar . $order;
        if ($fname == "HID_RADI_LEIDO") {
            $campoLeido = $i;
        }
        if ($fname == "IMG_Numero Radicado") {
            $iRad = $i;
        }
        $prefijo = substr($fname, 0, 4);
        switch (substr($fname, 0, 4)) {
            case 'CHU_':
                break;
            case 'CHR_':
                break;
            case 'CHK_':
                break;
            case 'IDT_':
                $fname = substr($fname, 4, 20);
                break;
            case 'IMG_':
                $fname = substr($fname, 4, 20);
                break;
            case 'DAT_':
                $fname = substr($fname, 4, 20);
                break;
            case 'HOR_':
                $hor = 1;
                break;
            case 'HID_':
                $hor = 1;
                break;
        }
        if ($prefijo != "HID_" and $prefijo != "CHU_" and $prefijo != "CHR_" and $prefijo != "CHK_" and $prefijo != "HOR_") {
            $hdr .= "<th class='titulos3'><a href='" . $_SERVER['PHP_SELF'] . "?{$encabezado}&orden_cambio=1'><span class=titulos3>";
            if ($img_no == $i) {
                $hdr .= "<img src='{$rutaRaiz}/iconos/flecha{$orderTipo}.gif' border='0'>";
            }
            $hdr .= "{$fname}</span></a></th>";
        } else {
            if (substr($fname, 0, 4) == "CHU_") {
                $hdr .= "<td class='titulos2' width='1%'>\r\n                    <center>\r\n                      <img src='{$rutaRaiz}/imagenes/estadoDoc.gif' border='0' align='left' width='130' height='32'></td>";
            }
            if (substr($fname, 0, 4) == "CHR_") {
                $hdr .= "<th class='titulos2' width='1%'><center></th>";
            }
            if (substr($fname, 0, 4) == "CHK_") {
                if ($checkAll == true) {
                    $valueCheck = " checked ";
                } else {
                    $valueCheck = "";
                }
                if ($checkTitulo == true) {
                    $fname = "<center>\r\n                      <input type='checkbox' name='checkAll' value='checkAll' onClick='markAll();' {$valueCheck}>\r\n                     </center>";
                } else {
                    $fname = " ";
                }
                $hdr .= "<th class='titulos2' width='1%'>{$fTitulo} {$fname}</TH>";
            }
        }
    }
    /** Colocar el nombre de la Columna 'Opciones'
     * Fecha de modificacion: 10-Mayo-2006
     * Modificador: Supersolidaria
     */
    if ($colOptions == true) {
        $hdr .= '<td class="titulos3">OPCIONES</td></tr>';
    }
    $hdr .= "\n</tr>";
    if ($echo) {
        print $hdr . "\n\n";
    } else {
        $html = $hdr;
    }
    // smart algorithm - handles ADODB_FETCH_MODE's correctly by probing...
    $numoffset = isset($rsTmp->fields[0]) || isset($rsTmp->fields[1]) || isset($rsTmp->fields[2]);
    $ii = 0;
    while (!$rsTmp->EOF) {
        if ($ii == 0) {
            $class_grid = 'listado1';
            $ii = 1;
        } else {
            $class_grid = 'listado2';
            $ii = 0;
        }
        if (empty($iRad)) {
            $iRad = null;
        }
        $s .= "<tr class='{$class_grid}' valign='top'>\n";
        $estadoRad = isset($rsTmp->fields["HID_RADI_LEIDO"]) ? $rsTmp->fields["HID_RADI_LEIDO"] : null;
        $radicado = isset($rsTmp->fields[$iRad]) ? $rsTmp->fields[$iRad] : null;
        if ($radicado) {
            include "{$rutaRaiz}/tx/imgRadicado.php";
        }
        $radFileClass = $estadoRad == 1 ? 'leidos' : 'no_leidos';
        if (strlen(trim($estadoRad)) == 0) {
            $radFileClass = "leidos";
        }
        for ($i = 0; $i < $ncols; $i++) {
            $special = "no";
            if ($i === 0) {
                $v = $numoffset ? $rsTmp->fields[0] : reset($rsTmp->fields);
            } else {
                $v = $numoffset ? $rsTmp->fields[$i] : next($rsTmp->fields);
            }
            $field = $rsTmp->FetchField($i);
            $vNext = isset($rsTmp->fields[$i + 1]) ? $rsTmp->fields[$i + 1] : null;
            $vNext1 = isset($rsTmp->fields[$i + 2]) ? $rsTmp->fields[$i + 2] : null;
            $fname = substr($field->name, 0, 4);
            switch ($fname) {
                case 'CHU_':
                    $chk_nomb = substr($field->name, 4, 20);
                    $chk_value = $v;
                    $valVNext = 0;
                    if ($vNext == 99) {
                        $valVNext = 99;
                    }
                    if ($vNext == 0 or $vNext == NULL) {
                        $valVNext = 97;
                    } else {
                        if ($vNext > 0) {
                            $valVNext = 98;
                        }
                    }
                    $fecha_dev = $vNext1;
                    switch ($valVNext) {
                        case 99:
                            $v = "<img src='{$rutaRaiz}/imagenes/docDevuelto_tiempo.gif'  border=0 alt='Fecha Devolucion :{$fecha_dev}' title='Fecha Devolucion :{$fecha_dev}'>";
                            break;
                        case 98:
                            $v = "<img src='{$rutaRaiz}/imagenes/docDevuelto.gif'  border=0 alt='Fecha Devolucion :{$fecha_dev}' title='Fecha Devolucion :{$fecha_dev}'>";
                            break;
                        case 97:
                            $fecha_dev = $rsTmp->fields["HID_SGD_DEVE_FECH"];
                            if ($rsTmp->fields["HID_DEVE_CODIGO1"] == 99) {
                                $v = "<img src='{$rutaRaiz}/imagenes/docDevuelto_tiempo.gif'  border=0 alt='Fecha Devolucion :{$fecha_dev}' title='Devolucion por Tiempo de Espera'>";
                                $noCheckjDevolucion = "enable";
                                break;
                            }
                            if ($rsTmp->fields["HID_DEVE_CODIGO"] >= 1 and $rsTmp->fields["HID_DEVE_CODIGO"] <= 98) {
                                $v = "<img src='{$rutaRaiz}/imagenes/docDevuelto.gif'  border=0 alt='Fecha Devolucion :{$fecha_dev}' title='Fecha Devolucion :{$fecha_dev}'>";
                                $noCheckjDevolucion = "disable";
                                break;
                            }
                            switch ($v) {
                                case 2:
                                    $v = "<img src='{$rutaRaiz}/imagenes/docRadicado.gif' border='0'>";
                                    break;
                                case 3:
                                    $v = "<img src='{$rutaRaiz}/imagenes/docImpreso.gif' border='0'>";
                                    break;
                                case 4:
                                    $v = "<img src='{$rutaRaiz}/imagenes/docEnviado.gif' border='0'>";
                                    break;
                            }
                            break;
                    }
                    $special = 'si';
                    break;
                case 'CHR_':
                    $chk_value = $v;
                    if ($vNext != 0 and $vNext != NULL and $vNext1 == 3) {
                        $v = "<img src='{$rutaRaiz}/imagenes/check_x.jpg' alt='Debe Modificar el Documento para poder reenviarlo'  title='Debe Modificar el Documento para poder reenviarlo' >";
                    } else {
                        $v = "<input type='radio' name='valRadio' value='{$chk_value}' class='ebuttons2'>";
                    }
                    $special = "si";
                    break;
                case 'CHK_':
                    $chk_nomb = substr($field->name, 4, 20);
                    $chk_value = $v;
                    $valueCheck = $checkAll == true ? ' checked ' : '';
                    if ($noCheckjDevolucion == "disable") {
                        $v = "<img src='{$rutaRaiz}/imagenes/check_x.jpg' alt='Debe Modificar el Documento para poder reenviarlo'  title='Debe Modificar el Documento para poder reenviarlo' >";
                    } else {
                        $v = "<input type='checkbox' name='checkValue[{$chk_value}]' value='{$chk_nomb}' {$valueCheck} >";
                    }
                    $special = 'si';
                    break;
                case $fname == 'IMG_' or $fname == 'IDT_':
                    /** Colocar en color rojo los radicados que tienen anexos impresos
                     * Fecha de modificacion: 10-Agosto-2006
                     * Modificador: Supersolidaria
                     */
                    include_once "{$rutaRaiz}/include/tx/Radicacion.php";
                    $radicacion = new Radicacion($db);
                    if ($rsTmp->fields["IDT_Numero Radicado"] != "") {
                        $arrAnexos = $radicacion->getRadImpresos($rsTmp->fields["IDT_Numero Radicado"]);
                    }
                    if ($arrAnexos[0] != 0) {
                        $radFileClass = "impresos";
                    } else {
                        // Aki se verifica si el radicado en mensionado.. posee los impresos.
                        $impSql = "SELECT * FROM ANEXOS \r\n                        WHERE RADI_NUME_SALIDA='" . $rsTmp->fields["IDT_Numero Radicado"] . "'\r\n                          AND ANEX_ESTADO>=3";
                        $rsImp = $db->conn->query($impSql);
                        if ($rsImp->fields["ANEX_ESTADO"] >= 3) {
                            $radFileClass = "impresos";
                        }
                    }
                    // Fin Modificacion Ses
                    $i_path = $i + 1;
                    $fieldPATH = $rsTmp->FetchField($i_path);
                    $fnamePATH = strtoupper($fieldPATH->name);
                    $pathImagen = $rsTmp->fields[$fnamePATH];
                    $arreglo_explode = explode('/', $pathImagen);
                    foreach ($arreglo_explode as $value) {
                        $nombre_archivo = preg_match('/.+\\.[a-z]+$/', $value, $rs_nombre) ? $rs_nombre[0] : null;
                    }
                    $enlace_imagen = $rutaRaiz . '/descargar_archivo.php?' . 'ruta_archivo=' . $pathImagen . '&nombre_archivo=' . $nombre_archivo . '&from=bandeja';
                    $v = $pathImagen ? "<a href='{$enlace_imagen}'><span class='{$radFileClass}'>{$v}</span></a>" : $v;
                    if ($fname == 'IDT_') {
                        $carpPer = $rsTmp->fields["HID_CARP_PER"];
                        $carpCodi = $rsTmp->fields["HID_CARP_CODI"];
                        $noHojas = $rsTmp->fields["HID_RADI_NUME_HOJA"];
                        //Modificado idrd
                        $info_resp = $rsTmp->fields["HID_INFO_RESP"];
                        /** Icono para los informados que necesitan respuesta
                         ** Modificado idrd abril 4*/
                        $imginfo = ($info_resp and $info_resp == 'Responder') ? "<img src='{$rutaRaiz}/png/resp.jpeg' width=18 height=18 alt='{$textCarpeta}' title='{$textCarpeta}'>" : '';
                        $nombreCarpeta = $carpPer == 0 ? $descCarpetasGen[$carpCodi] : '(Personal)' . $descCarpetasPer[$carpCodi];
                        $textCarpeta = "Carpeta Actual: " . $nombreCarpeta . " -- Numero de Hojas :" . $noHojas;
                        if ($rsTmp->fields["HID_EANU_CODIGO"] == 2) {
                            $imgTp = "{$rutaRaiz}/iconos/anulacionRad.gif";
                            $textCarpeta = " ** RADICADO ANULADO ** " . $textCarpeta;
                        } else {
                            $imgTp = ($rsTmp->fields["HID_RADI_TIPO_DERI"] == 0 and $rsTmp->fields["HID_RADI_NUME_DERI"] != 0) ? "{$rutaRaiz}/iconos/anexos.gif" : "{$rutaRaiz}/iconos/comentarios.gif";
                            /** Icono que indica si el radicado esta incluido en un expediente.
                             * Fecha de modificacion: 30-Junio-2006
                             * Modificador: Supersolidaria
                             */
                            include_once "{$rutaRaiz}/include/tx/Expediente.php";
                            $expediente = new Expediente($db);
                            if ($rsTmp->fields["IDT_Numero Radicado"] != "") {
                                $arrEnExpediente = $expediente->expedientesRadicado($rsTmp->fields["IDT_Numero Radicado"]);
                            } else {
                                if ($rsTmp->fields["IDT_Numero_Radicado"] != "") {
                                    $arrEnExpediente = $expediente->expedientesRadicado($rsTmp->fields["IDT_Numero_Radicado"]);
                                }
                            }
                            // Modificado SGD 20-Septiembre-2007
                            if (is_array($arrEnExpediente)) {
                                $imgExpediente = $arrEnExpediente[0] !== 0 ? "<img src='{$rutaRaiz}/iconos/folder_open.gif' width=18 height=18 alt='{$textCarpeta}' title='{$textCarpeta}'>" : '';
                            }
                        }
                        $imgEstado = "<img src='{$imgTp}' width=18 height=18 alt='{$textCarpeta}' title='{$textCarpeta}'>";
                    } else {
                        $imgEstado = "";
                    }
                    /** icono que indica si el radicado esta incluido en un expediente.
                     * Fecha de modificacion: 30-Junio-2006
                     * Modificador: Supersolidaria
                     */
                    if ($i == $iRad) {
                        $v = ($info_resp and $info_resp = "'Responder'") ? $imgEstado . "&nbsp;" . $imgExpediente . "&nbsp;" . $imginfo . $imgRad . $v : $imgEstado . "&nbsp;" . $imgExpediente . "&nbsp;" . $imgRad . $v;
                    }
                    break;
                case 'DAT_':
                    $i_radicado = $i + 1;
                    $fieldDAT = $rsTmp->FetchField($i_radicado);
                    $fnameDAT = $fieldDAT->name;
                    // Modificado SGD 21-Septiembre-2007
                    $verNumRadicado = trim(strtoupper($rsTmp->fields[$fnameDAT]));
                    $enlace_ver_radi = $rutaRaiz . '/verradicado.php?' . 'verrad=' . $verNumRadicado . '&' . $encabezado . '&from=bandeja';
                    $v = '<a href="' . $enlace_ver_radi . '"><span class="' . $radFileClass . '">' . $v . '</span></a>';
                    $special = "si";
                    break;
            }
            $type = $typearr[$i];
            switch ($type) {
                case 'D1':
                    if (!strpos($v, ':')) {
                        $s .= "\t<td><span class='{$radFileClass}'>" . $rsTmp->UserDate($v, "d-m-Y, H:i") . "&nbsp;</span></td>\n";
                        break;
                    }
                case 'T1':
                    $s .= "\t<td><span class='{$radFileClass}'>" . $rsTmp->UserTimeStamp($v, "d-m-Y, H:I") . "&nbsp;</span></TD>\n";
                    break;
                case 'I':
                default:
                    $v = stripcslashes(trim($v));
                    if (strlen($v) == 0) {
                        $v = '&nbsp;';
                    }
                    if (substr($fname, 0, 4) != "HID_" and substr($fname, 0, 4) != "HOR_") {
                        $s .= "<td><span class='{$radFileClass}'>" . str_replace("\n", '<br>', $v) . "</span></td>\n";
                    }
            }
        }
        // for
        /** Colocar las opciones de modificacion y consulta en la Columna 'Opciones'
         * Fecha de modificacion: 10-Mayo-2006
         * Modificador: Supersolidaria
         */
        if ($colOptions == true) {
            for ($i = 0; $i < $ncols; $i++) {
                if ($i === 0) {
                    $v = $numoffset ? $rsTmp->fields[0] : reset($rsTmp->fields);
                } else {
                    $v = $numoffset ? $rsTmp->fields[$i] : next($rsTmp->fields);
                }
                $field = $rsTmp->FetchField($i);
                $vNext = $rsTmp->fields[$i + 1];
                $vNext1 = $rsTmp->fields[$i + 2];
                $fname = substr($field->name, 0, 4);
                $i_radicado = $i;
                $fieldDAT = $rsTmp->FetchField($i_radicado);
                $fnameDAT = $fieldDAT->name;
                $identificador = strtoupper($rsTmp->fields[$fnameDAT]);
            }
            $enlace_consulta = $pagConsulta . '?' . 'verempresa=' . $identificador . '&' . $encabezado;
            $vista_preliminar = 'iconos/vista_preliminar.gif';
            $pagina_edicion = $pagEdicion . '?' . 'verempresa=' . $identificador . '&' . $encabezado;
            $s .= "<td width='14%'>\r\n                <div align='center'>\r\n                  <a href='{$enlace_consulta}' target='_self'>\r\n                    <img src='{$vista_preliminar}' alt='Consultar Datos' width='16' height='17' border='0' hspace='10'>\r\n                  </a>\r\n                  <a href='{$pagina_edicion}' target='_self'>\r\n                    <img src='iconos/modificar.gif' alt='Modificar Datos' width='16' height='15' border='0' hspace='10'>\r\n                  </a>\r\n                </div>\r\n              </td>";
        }
        $s .= "</tr>\n\n";
        $rows += 1;
        if ($rows >= $gSQLMaxRows) {
            $rows = "<p>Truncated at {$gSQLMaxRows}</p>";
            break;
        }
        // switch
        $rsTmp->MoveNext();
        // additional EOF check to prevent a widow header
        if (!$rsTmp->EOF && $rows % $gSQLBlockRows == 0) {
            //if (connection_aborted()) break;// not needed as PHP aborts script, unlike ASP
            if ($echo) {
                print $s . "</table>\n\n";
            } else {
                $html .= $s . "</table>\n\n";
            }
            $s = $hdr;
        }
    }
    // while
    if ($echo) {
        print $s . "</table>\n\n";
    } else {
        $html .= $s . "</table>\n\n";
    }
    if ($docnt) {
        if ($echo) {
            print '<h2>' . $rows . ' Rows</H2>';
        }
    }
    return $echo ? $rows : $html;
}