* 1 Radicar documentos, 2 Impresion de Doc's, 3 Radicacion e Impresion. * (Por. Jh) * Ademas verifica que el documento no este radicado con $rowwan[9] y [10] * El jefe con $codusuario=1 siempre podra radicar */ if ($rs->fields["ANEX_SALIDA"] == 1 and ($codusuario == 1 or $perm_radi_sal == 1 or $perm_radi_sal == 3) and ($ruta_raiz != ".." and !$rs->fields["SGD_PNUFE_CODI"] or $rs->fields["SGD_PNUFE_CODI"] and $rs->fields["SGD_DOC_SECUENCIA"] and $rs->fields["SGD_DOC_SECUENCIA"] > 0)) { if (!$rs->fields["RADI_NUME_SALIDA"]) { if (substr($verrad, -1) == 2 && $puedeRadicarAnexo == 1) { $rs->fields["SGD_PNUFE_CODI"] = 0; $flag_regenerar = FALSE; echo "<a class=vinculos href=javascript:radicarArchivo('{$coddocu}','{$linkarchivo}','si'," . $rs->fields["SGD_PNUFE_CODI"] . ",'{$tpradic}','{$aplinteg}','{$numextdoc}','{$radicado_rem}','{$sol_lect}',0,'{$flag_regenerar}')>Radicar(-{$tpradic})</a>"; $radicado = "false"; $anexo = $cod_radi; } else { if ($puedeRadicarAnexo != 1) { $objError = new AplExternaError(); $objError->setMessage($puedeRadicarAnexo); echo $objError->getMessage(); } else { if (substr($verrad, -1) != 2 and $num_archivos == 1 and !$rs->fields["SGD_PNUFE_CODI"] and $swRadDesdeAnex == false) { echo "<a class=vinculos href=javascript:asignarRadicado('{$coddocu}','{$linkarchivo}','{$cod_radi}','{$numextdoc}','{$radicado_rem}','{$sol_lect}',0)>Asignar Rad</a>"; $radicado = "false"; $anexo = $cod_radi; } else { if ($rs->fields["SGD_PNUFE_CODI"] && strcmp($cod_radi, $rs->fields["SGD_DOC_PADRE"]) == 0 && !$anex->seHaRadicadoUnPaquete($rs->fields["SGD_DOC_PADRE"])) { $flag_regenerar = FALSE; echo "<a class=vinculos href=javascript:radicarArchivo('{$coddocu}','{$linkarchivo}','si'," . $rs->fields["SGD_PNUFE_CODI"] . ",'{$tpradic}','{$aplinteg}','{$numextdoc}','{$radicado_rem}','{$sol_lect}',0,'{$flag_regenerar}')>Radicar(-{$tpradic})</a>"; $radicado = "false"; $anexo = $cod_radi; } else { if ($puedeRadicarAnexo == 1) {
$es_valido = $tiene_permisos && $es_formato_valido; if ($es_valido) { if (!$rs->fields["RADI_NUME_SALIDA"]) { if (substr($verrad, -1) == 2 && $puedeRadicarAnexo == 1) { $rs->fields["SGD_PNUFE_CODI"] = 0; $anexos_radicado[$contador]['MOSTRAR_RADICAR'] = true; $anexos_radicado[$contador]['COD_DOCU'] = $coddocu; $anexos_radicado[$contador]['LINK_ARCHIVO'] = $linkarchivo; $anexos_radicado[$contador]['TP_RADICADO'] = $tpradic; $anexos_radicado[$contador]['APLINTEG'] = $aplinteg; $anexos_radicado[$contador]['NUM_EXT_DOC'] = $numextdoc; $anexos_radicado[$contador]['SGD_PNUFE_CODI'] = $rs->fields["SGD_PNUFE_CODI"]; $radicado = false; $anexo = $cod_radi; } elseif ($puedeRadicarAnexo != 1) { $objError = new AplExternaError(); $objError->setMessage($puedeRadicarAnexo); $anexos_radicado[$contador]['ERROR_RADICACION'] = $objError->getMessage(); } else { $esta_validado = substr($verrad, -1) != 2 && $num_archivos == 1 && !$rs->fields["SGD_PNUFE_CODI"] && $swRadDesdeAnex == false; $permitir_opc = $rs->fields["SGD_PNUFE_CODI"] && strcmp($cod_radi, $rs->fields["SGD_DOC_PADRE"]) == 0 && !$anex->seHaRadicadoUnPaquete($rs->fields["SGD_DOC_ PADRE"]); if ($esta_validado) { $anexos_radicado[$contador]['MOSTRAR_ASIGNAR_RADICADO'] = true; $anexos_radicado[$contador]['COD_DOCU'] = $coddocu; $anexos_radicado[$contador]['LINK_ARCHIVO'] = $linkarchivo; $anexos_radicado[$contador]['COD_RADI'] = $cod_radi; $anexos_radicado[$contador]['NUM_EXT_DOC'] = $numextdoc; $radicado = false; $anexo = $cod_radi; } elseif ($permitir_opc) { $anexos_radicado[$contador]['MOSTRAR_RADICAR_2'] = true;
/* FILTRO DE DATOS * @$setFiltroSelect Contiene los valores digitados por el usuario separados por coma. * @$filtroSelect Si SetfiltoSelect contiene algunvalor la siguiente rutina realiza el arreglo de la condición para la consulta a la base de datos y lo almacena en whereFiltro. * @$whereFiltro Si filtroSelect trae valor la rutina del where para este filtro es almacenado aqui. * */ if ($checkValue) { $num = count($checkValue); $i = 0; while ($i < $num) { $record_id = key($checkValue); $setFiltroSelect .= $record_id; //Validacion de anulación respecto de aplicativos externos $puedeContinuar = $objCtrlAplInt->contiInstancia($record_id, $MODULO_ANULACION, 1); if ($puedeContinuar != 1) { $objError = new AplExternaError(); $objError->setMessage($puedeContinuar); $mensaje_error = $objError->getMessage(); $mensaje_error = "<center><table class='borde_tab' width=100% CELSPACING=5><tr class=titulosError><td><center> < {$mensaje_error} > <BR> {$record_id}</CENTER></td></tr></table><center>"; die($mensaje_error); } if ($i <= $num - 2) { $setFiltroSelect .= ","; } next($checkValue); $i++; } if ($radicadosSel) { $whereFiltro = " and b.radi_nume_radi in({$setFiltroSelect})"; } }