$i = 0;
while (!$rsSel->EOF) {
$radAnularE[$i] = $rsSel->fields['RADI_NUME_RADI'];
$radObservaE[$i] = $rsSel->fields['SGD_ANU_DESC'];
$i++;
$rsSel->MoveNext();
}
//
if (!$radAnularE) {
die("<P><span class=etextomenu><CENTER><FONT COLOR=RED>NO HAY RADICADOS PARA ANULAR</FONT></CENTER><span>");
} else {
/*
*$where_TipoRadicado incluido 03082005 para filtrar por tipo radicacion del anulado
*/
$where_TipoRadicado = " and sgd_trad_codigo = " . $tipoRadicado;
$Anulacion = new Anulacion($db);
$observa = "Radicado Anulado. (Acta No {$actaNo})";
$noArchivo = "/pdfs/planillas/ActaAnul_{$dependencia}" . "_" . "{$tipoRadicado}" . "_" . "{$actaNo}.pdf";
$radicados = $Anulacion->genAnulacion($radAnularE, $dependencia, $usua_doc, $observaE, $codusuario, $actaNo, $noArchivo, $where_depe, $where_TipoRadicado, $tipoRadicado);
$Historico = new Historico($db);
/** Funcion Insertar Historico
*
* ($radicados, $depeOrigen, $depeDest, $usDocOrigen , $usDocDest, $usCodOrigen, $usCodDest, $observacion, $tipoTx)
*
*/
require_once $ruta_raiz . "/radsalida/masiva/OpenDocText.class.php";
$odt = new OpenDocText();
$radicados = $Historico->insertarHistorico($radAnularE, $dependencia, $codusuario, $depe_codi_territorial, 1, $observa, 26);
define(FPDF_FONTPATH, '../fpdf/font/');
$radAnulados = join(",", $radAnularE);
error_reporting(7);
$whereFiltro = " and b.radi_nume_radi in({$setFiltroSelect})";
}
}
$systemDate = $db->conn->OffsetDate(0, $db->conn->sysTimeStamp);
include '../config.php';
include_once "Anulacion.php";
include_once "{$ruta_raiz}/include/tx/Historico.php";
// Se vuelve crear el objeto por que saca un error con el anterior
$db = new ConnectionHandler("{$ruta_raiz}");
/*
* Se trae la descripcion del motivo de anulacion
*/
$isql = "select motivo_anulacion_descrip as descrip from motivo_anulacion where motivo_anulacion_codigo={$slc_motAnulacion}";
$rs_asuAnulacion = $db->conn->Execute($isql);
$motivoAnulacion = $rs_asuAnulacion->fields['DESCRIP'];
$Anulacion = new Anulacion($db);
$observaHist = "{$motivoAnulacion}";
/* Sentencia para consultar en sancionados el estado en que se encuentra el radicado
* A = Anulado, V = Vigente, B = Estado temporal
* Si el estado del radicado en sancionados es diferente de V puede realizar la sancion
*/
// Si por lo menos hay un radicado por anular
if (!empty($radicadosSel[0])) {
$radicados = $Anulacion->solAnulacion($radicadosSel, $dependencia, $usua_doc, $observaHist, $codusuario, $systemDate, $slc_motAnulacion);
if (!empty($radicadosXAnular)) {
$sqlSancionados = "update SGD_APLMEN_APLIMENS \n\t\t\t\t\t\tset SGD_APLMEN_DESDEORFEO = 2 \n\t\t\t\t\t\twhere SGD_APLMEN_REF in({$radicadosXAnular})";
$rs = $db->conn->Execute($sqlSancionados);
}
$fecha_hoy = date("Y-m-d");
$dateReplace = $db->conn->SQLDate("Y-m-d", "{$fecha_hoy}");
$Historico = new Historico($db);
$i = 0;
while (!$rsSel->EOF) {
$radAnularE[$i] = $rsSel->fields['RADI_NUME_RADI'];
$radObservaE[$i] = $rsSel->fields['SGD_ANU_DESC'];
$i++;
$rsSel->MoveNext();
}
//
if (!$radAnularE) {
die("<P><span class=etextomenu><CENTER><FONT COLOR=RED>NO HAY RADICADOS PARA ANULAR</FONT></CENTER><span>");
} else {
/*
*$where_TipoRadicado incluido 03082005 para filtrar por tipo radicacion del anulado
*/
$where_TipoRadicado = " and sgd_trad_codigo = " . $tipoRadicado;
$Anulacion = new Anulacion($db);
$observa = "Radicado Anulado. (Acta No {$actaNo})";
$noArchivo = "/pdfs/planillas/ActaAnul_{$dependencia}" . "_" . "{$tipoRadicado}" . "_" . "{$actaNo}.pdf";
$archivo_generado = "ActaAnul_{$dependencia_}{$tipoRadicado_}{$actaNo}.pdf";
$radicados = $Anulacion->genAnulacion($radAnularE, $_SESSION['dependencia'], $_SESSION['usua_doc'], $observaE, $_SESSION['codusuario'], $actaNo, $noArchivo, $where_depe, $where_TipoRadicado, $tipoRadicado, $rsk->fields["0"]);
$Historico = new Historico($db);
/** Funcion Insertar Historico
*
* ($radicados, $depeOrigen, $depeDest, $usDocOrigen , $usDocDest, $usCodOrigen, $usCodDest, $observacion, $tipoTx)
*
*/
$radicados = $Historico->insertarHistorico($radAnularE, $dependencia, $codusuario, $depe_codi_territorial, 1, $observa, 26);
define(FPDF_FONTPATH, '../fpdf/font/');
$radAnulados = join(",", $radAnularE);
error_reporting(7);
$radicadosPdf = "<table>\r\n\t\t<tr><td><b>Radicado</b> \r\n\t\t</td><td><b>Observacion Solicitante</b></td></tr>";