$sqlSelect = "SELECT SGD_CAUX_CODIGO,COUNT(RADI_NUME_RADI) COUNT_RADI\n\t\t\t\t\t\tFROM SGD_CAUX_CAUSALES \n\t\t\t\t\t\tWHERE RADI_NUME_RADI = '{$verradicado}'\n\t\t\t\t\t\tGROUP BY SGD_CAUX_CODIGO";
$db->update("SGD_CAUX_CAUSALES", $recordSet, $recordWhere);
//select para saber habia registro por actualizar
$rs = $db->conn->Execute($sqlSelect);
if (!$recordSet->EOF) {
$actualizo = $rs->fields["COUNT_RADI"];
}
array_splice($recordSet, 0);
array_splice($recordWhere, 0);
$causal_nombre_grb = $causal_nombre != '' ? $causal_nombre : 'Sin Tipificar';
$dcausal_nombre_grb = $dcausal_nombre != '' ? $dcausal_nombre : 'Sin Tipificar';
if ($actualizo != null) {
echo "Causal Actualizada";
$observa = "*Cambio Causal/detalle* ({$causal_nombre_grb} / {$dcausal_nombre_grb})";
$codusdp = str_pad($dependencia, 3, "0", STR_PAD_LEFT) . str_pad($codusuario, 3, "0", STR_PAD_LEFT);
$objHistorico->insertarHistorico($arrayRad, $dependencia, $codusuario, $dependencia, $codusuario, $observa, 17);
$actualizoFlag = true;
}
// Si no habia nada por actualizar inserta el registro
if ($actualizo == null) {
// Si la causal no se encuentra la inserta en este procedimineto
$isql = "SELECT a.SGD_CAUX_CODIGO FROM SGD_CAUX_CAUSALES a\n\t\t\t\t\t\t\tWHERE rownum < 10 \n\t\t\t\t\t\t\t ORDER BY a.SGD_CAUX_CODIGO desc";
$flag = 0;
$rs = $db->query($isql);
$cod_caux = $rs->fields["SGD_CAUX_CODIGO"];
$cod_caux++;
$recordSet["SGD_CAUX_CODIGO"] = "'" . $cod_caux . "'";
$recordSet["SGD_DCAU_CODIGO"] = "'" . $deta_causal . "'";
$recordSet["RADI_NUME_RADI"] = $verradicado;
$recordSet["SGD_DDCA_CODIGO"] = "'" . $ddca_causal . "'";
$rs = $db->insert("SGD_CAUX_CAUSALES", $recordSet);
$flag = 1;
$noRad = $rad->newRadicado($ent, $tpDepeRad[$ent]);
if ($noRad == "0") {
echo "<font color=red >Ha ocurrido un Problema<br>Verfique los datos e intente de nuevo</font>";
} else {
if ($radicadopadre and ($tpRadicado == 2 or $tpRadicado == 1)) {
$sqlE = "select sgd_exp_numero from sgd_exp_expediente where radi_nume_radi like '" . $radicadopadre . "'";
$rsE = $db->conn->Execute($sqlE);
$expe = $rsE->fields['SGD_EXP_NUMERO'];
$et = $Exp->insertar_expediente($expe, $noRad, $dependencia, $codusuario, ' ', ' ');
}
if (!$noRad) {
echo "<hr>RADICADO GENERADO <HR>{$noRad}<hr>";
}
$radicadosSel[0] = $noRad;
$hist->insertarHistorico($radicadosSel, $dependencia, $codusuario, $coddepe, $radi_usua_actu, " ", $codTx);
$nurad = $noRad;
echo "<INPUT TYPE=HIDDEN NAME=nurad value={$nurad}>";
echo "<INPUT TYPE=HIDDEN NAME=flag value={$flag}>";
if ($noRad) {
$var_envio = session_name() . "=" . session_id() . "&faxPath&leido=no&krd={$krd}&verrad={$nurad}&ent={$ent}";
?>
<p><center><img src='../iconos/img_alerta_2.gif'><font face='Arial' size='3'><b>
Se ha generado el radicado No.</font></b>
<font face='Arial' size='4' color='red'><b><u>
<?php
echo $nurad;
?>
</u></b></font><br>
<font face='Arial' size='4' color='red'>
<?php
/**
* trae los Usuarios de una dependencia
* @txAccion bool Si es true entonces carga solo los jefe. txAccion es la accion a realizar Informar o reasignar
**/
function newRadicadoAjax($idObjetoHtml, $asunto, $tipoRadicado, $radiDepeRadi, $radiDepeActu, $dependenciaSecuencia, $radiUsuaRadi, $radiUsuaActu, $usuaDoc, $cuentai, $docUs3 = 0, $mRecCodi = 0, $radiFechOficio, $radicadoPadre, $radPais, $tipoDocumento = 0, $carpetaPer = 0, $carpetaCodi, $tDidCodi = 0, $tipoRemitente = 0, $ane = '', $radiPath = '')
{
//echo "alert('<!-- $carpetaCodi -- $docUs3 "." -->'); ";
$response = new HTML_AJAX_Action();
$this->radiTipoDeri = 0;
$this->radiCuentai = "" . trim($cuentai) . "";
$this->eespCodi = $docUs3;
$this->mrecCodi = $mRecCodi;
$fecha_gen_doc_YMD = substr($radiFechOficio, 6, 4) . "-" . substr($radiFechOficio, 3, 2) . "-" . substr($radiFechOficio, 0, 2);
$this->radiFechOfic = $fecha_gen_doc_YMD;
if (!$radicadopadre) {
$radicadopadre = "'0'";
}
$this->radiNumeDeri = trim($radicadopadre);
$this->radiPais = $radPais;
$this->descAnex = $ane;
$this->raAsun = utf8_decode($asunto);
$this->radiDepeActu = $radiDepeActu;
$this->radiDepeRadi = $radiDepeRadi;
$this->radiUsuaActu = $radiUsuaActu;
$this->radiUsuaRadi = $radiUsuaRadi;
$this->usuaCodi = $radiUsuaRadi;
$this->eespCodi = $docUs3;
$this->trteCodi = $tipoRemitente;
$this->tdocCodi = $tipoDocumento;
$this->tdidCodi = $tDidCodi;
$this->carpCodi = $carpetaCodi;
$this->carPer = $carpetaPer;
$this->usuaDoc = $usuaDoc;
$this->noDigitosRad = 6;
$this->dependencia = $radiDepeRadi;
if ($radiPath) {
$this->radiPath = $radiPath;
}
//$this->trteCodi = $tip_rem;
//return "$tipoRadicado,$dependenciaSecuencia";
$noRad = $this->newRadicado($tipoRadicado, $dependenciaSecuencia);
if ($noRad <= 1) {
$errorNewRadicado = "<font size=1 color=red>Error al Generar el Radicado." . $this->errorNewRadicado . "</font>";
}
//$rtaDirecciones = $this->insertDireccionAjax($noRad, 1,0);
//grabarDirecciones(document.getElementById('numeroRadicado').value);
$cadena = "seleccion = document.getElementById('{$idObjetoHtml}'); ";
//if($noRad>=1)
//{
$cadena1 = "document.getElementById('numeroRadicado').value=" . $noRad . "; grabarDirecciones(document.getElementById('numeroRadicado').value);";
$cadena1 .= "document.getElementById('Submit33').style.visibility='hidden'; ";
$cadena1 .= "document.getElementById('grabarDir').style.visibility='visible'; ";
//$cadena1 .= "verDatosRad(".$noRad."); ";
$cadena .= 'valor="<table wdith=50%><tr class=titulos1><td><img src=../imagenes/gnu.png width=50 alt=GNU/GPL title=GNU/GPL></td><td><center><font size=4>Radicado No ' . $noRad . ' - - ' . htmlspecialchars($errorNewRadicado) . '</font></center></td></tr></table><SCRIPT>verDatosRad(' . $noRad . ');</SCRIPT>";';
//echo "<!-- alert('<!-- $carpetaCodi -- $noRad "." -->'); -->";
//}else{
//$cadena .= 'valor="'.$errorNewRadicado.'";';
//}
include_once "../../tx/Historico.php";
$historico = new Historico($this->db);
$radicados[] = $noRad;
$resHistorico = $historico->insertarHistorico($radicados, $radiDepeRadi, $radiUsuaRadi, $radiDepeActu, $radiUsuaActu, '', 2);
$cadena .= " {$cadena1} seleccion.innerHTML=valor;";
//$cadena .= " alert('".$resHistorico."');";
$response->insertScript($cadena);
return $response;
}
<td align="right" bgcolor="#CCCCCC" height="25" class="titulos2">DEPENDENCIA ORIGEN:
</td>
<td width="65%" height="25" class="listado2_no_identa">
<?php
echo $_SESSION['depe_nomb'];
?>
</td>
</tr>
</table>
<table class="borde_tab">
<tr><td class="titulosError">
<?php
$query = "update radicado\n \t\t\tset radi_path='{$fileGrb}', radi_nume_hoja={$pagecount}\n \t\t\twhere radi_nume_radi={$valRadio}\n ";
if ($db->conn->Execute($query)) {
$radicadosSel[] = $valRadio;
$codTx = 42;
//Codigo de la transaccion
include "{$ruta_raiz}/include/tx/Historico.php";
$hist = new Historico($db);
$hist->insertarHistorico($radicadosSel, $dependencia, $codusuario, $dependencia, $codusuario, " ({$pagecount} Paginas) " . $observa, $codTx);
} else {
echo "<hr>No actualizo la BD <hr>";
}
?>
</td></tr>
</table>
</form>
</body>
</html>
if (!$db->insert("SGD_FIRRAD_FIRMARADS", $values)) {
$db->conn->RollbackTrans();
die("<span class=eerrores>ERROR TRATANDO DE SOLICITAR FIRMA</span>");
}
if (count($recordWhere) > 0) {
array_splice($recordWhere, 0);
}
$values2["ANEX_ESTADO"] = 2;
$recordWhere["RADI_NUME_SALIDA"] = $radicado;
$rs = $db->update("ANEXOS", $values2, $recordWhere);
if (!$rs) {
$db->conn->RollbackTrans();
die("<span class='etextomenu'>No se ha podido actualizar la informaci�n ANEXOS");
}
//PRINT ("HISTO......($usua_doc)....");
$objHist->insertarHistorico($arrRad, $dependencia, $codusuario, $objUsuario->depe_codi, $objUsuario->usua_codi, "Solicitud de firma digital a (" . $objUsuario->get_usua_nomb() . ")", 39);
// ($radicados, $depeOrigen , $usCodOrigen, $depeDestino,$usCodDestino, $observacion, $tipoTx)
}
$j++;
}
$i++;
}
$db->conn->CompleteTrans();
//Genera el texto de la opetaci�n efectuada, si es necesario
if (count($num) > 0) {
?>
<table border=0 cellspace=2 cellpad=2 WIDTH=50% class="t_bordeGris" id=tb_general align="left">
<tr>
<td colspan="2" class="titulos4">ACCION REQUERIDA </td>
</tr>
<tr>
<td align="right" bgcolor="#CCCCCC" height="25" class="titulos2">DEPENDENCIA ORIGEN:
</td>
<td width="65%" height="25" class="listado2_no_identa">
<?php
echo $_SESSION['depe_nomb'];
?>
</td>
</tr>
</table>
<table class="borde_tab">
<tr><td class="titulosError">
<?php
$fileGrb = "/" . $fileGrb;
$query = "update radicado\n \t\t\tset radi_path='{$fileGrb}'\n \t\t\twhere radi_nume_radi={$valRadio}";
if ($db->conn->Execute($query)) {
$radicadosSel[] = $valRadio;
$codTx = 42;
//Código de la transacción
include "{$ruta_raiz}/include/tx/Historico.php";
$hist = new Historico($db);
$hist->insertarHistorico($radicadosSel, $dependencia, $codusuario, $dependencia, $codusuario, $observa, $codTx);
} else {
echo "<hr>No actualizo la BD <hr>";
}
?>
</td></tr>
</table>
</form>
</body>
</html>
*/
if ($modificar) {
$mensaje = "ERROR EN EL PROCESO PASO 2";
if ($tdoc != 0 && $tsub != 0 && $codserie != 0) {
$sqlH = "SELECT ANEX_RADI_NUME,\r\n\t\t\t\t SGD_MRD_CODIGO\r\n\t\t\t\t\t FROM SGD_RDA_RETDOCA \r\n\t\t\t\t\t WHERE ANEX_RADI_NUME = '{$nurad}'\r\n\t\t\t\t\t AND ANEX_CODIGO = '{$coddocu}'\r\n\t\t\t\t AND DEPE_CODI = '{$coddepe}'\r\n\t\t\t\t\t";
$rsH = $db->conn->query($sqlH);
$codiActu = $rsH->fields['SGD_MRD_CODIGO'];
$i = 0;
while (!$rsH->EOF) {
$codiRegH[$i] = $rsH->fields['ANEX_RADI_NUME'];
$i++;
$rsH->MoveNext();
}
$observa = "*Modificado el TRD del ANEXO " . $coddocu . "dependencia*" . $coddepe;
$Historico = new Historico($db);
$radiModi = $Historico->insertarHistorico($codiRegH, $coddepe, $codusua, $coddepe, $codusua, $observa, 32);
/*
*Actualiza el campo tdoc_codi de la tabla Anexos
*/
$radiUp = $trd->actualizarTRD($codiRegH, $tdoc);
$mensaje = "Registro Modificado";
// $codiTRDU = nuevo codigo TRD
$isqlTRD = "select SGD_MRD_CODIGO \r\n\t\t\t\t\t\t\tfrom SGD_MRD_MATRIRD \r\n\t\t\t\t\t\t\twhere DEPE_CODI = '{$coddepe}'\r\n\t\t\t\t \t \t\t\t and SGD_SRD_CODIGO = '{$codserie}'\r\n\t\t\t\t \t\t\t and SGD_SBRD_CODIGO = '{$tsub}'\r\n\t\t\t\t\t \t\t\t and SGD_TPR_CODIGO = '{$tdoc}'";
$rsTRD = $db->conn->Execute($isqlTRD);
$codiTRDU = $rsTRD->fields['SGD_MRD_CODIGO'];
$sqlUA = "UPDATE SGD_RDA_RETDOCA \r\n\t\t\t\t\t\t SET SGD_MRD_CODIGO = '{$codiTRDU}',\r\n\t\t\t\t\t\t USUA_CODI = '{$codusua}'\r\n\t\t\t\t WHERE ANEX_RADI_NUME = '{$nurad}' \r\n\t\t\t\t\t\t AND ANEX_CODIGO = '{$coddocu}' \r\n\t\t\t\t\t\t AND DEPE_CODI = '{$coddepe}'";
$rsUp = $db->conn->query($sqlUA);
$mensaje = "Registro Modificado <br> ";
}
}
?>
*$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);
$radicadosPdf = "<table>\n\t\t<tr><td><b> Radicado</b> \n\t\t</td><td><b>Motivo Anulación</b></td></tr>";
foreach ($radAnularE as $id => $noRadicado) {
$radicadosPdf .= "<tr><td> " . $radAnularE[$id] . " </td><td>" . iconv($odt->codificacion($radObservaE[$id]), 'ISO-8859-1', $radObservaE[$id]) . "</td></tr>";
}
$anoActual = date("Y");
$radicadosPdf .= "</table>";
error_reporting(7);
$ruta_raiz = "..";
include "{$ruta_raiz}/fpdf/html2pdf.php";
$fecha = date("d-m-Y");
$fecha_hoy_corto = date("d-m-Y");
include "{$ruta_raiz}/class_control/class_gen.php";
$rad->carpCodi = 0;
//$carp_codi;
$rad->carPer = "null";
//$carp_per;
$rad->trteCodi = 0;
//$tip_rem;
$rad->ra_asun = "radicado(a) via WEB";
// HLP Este si sirve? Para radicar se utiliza la variable $rad->raAsun )
$rad->radiPath = 'null';
//
$aplintegra = "0";
// Por defecto aplicaciones integradas Cero
$rad->sgd_apli_codi = $aplintegra;
$a = $rad->newRadicado(1, 100);
require_once $ruta_raiz . "/include/tx/Historico.php";
$codTx = 2;
$radicadosSel[0] = $noRad;
$dependencia = $depDestino;
$codusuario = $usuaCodi;
$coddepe = $depDestino;
$radi_usua_actu = $usuaCodi;
$observacion = "Radicacion de QRS por WEB";
$hist = new Historico($db);
$hist->insertarHistorico($radicadosSel, $dependencia, $codusuario, $coddepe, $radi_usua_actu, $observacion, $codTx);
if (!empty($noRad) && $noRad != "-1") {
$nurad = $noRad;
$barnumber = $noRad;
include_once $ruta_raiz . "/radicacion/grb_direcciones.php";
include_once $ruta_raiz . "/include/barcode/index.php";
}
echo $a;
$primerno = substr($nurad, 0, 4);
$segundono = $_SESSION["dependencia"];
$ruta1 = $primerno . "/" . $segundono . "/docs/";
$adjuntos = 'bodega/' . $ruta1;
$nextval = $db->nextId("sec_dir_direcciones");
//se buscan los datos del radicado padre y se
//insertaran en los del radicado hijo
$isql = "insert into SGD_DIR_DRECCIONES(\t\t\t\n SGD_TRD_CODIGO,\n SGD_DIR_NOMREMDES,\n SGD_DIR_DOC,\n DPTO_CODI,\n MUNI_CODI,\n id_pais,\n id_cont,\n SGD_DOC_FUN,\n SGD_OEM_CODIGO,\n SGD_CIU_CODIGO,\n SGD_ESP_CODI,\n RADI_NUME_RADI,\n SGD_SEC_CODIGO,\n SGD_DIR_DIRECCION,\n SGD_DIR_TELEFONO,\n SGD_DIR_MAIL,\n SGD_DIR_TIPO,\n SGD_DIR_CODIGO,\n SGD_DIR_NOMBRE)\n values( 1,\n '{$dir_nombre}',\n NULL,\n 11,\n 1,\n 170,\n 1,\n '{$usua_doc}',\n NULL,\n NULL,\n NULL,\n {$nurad},\n 0,\n '{$dir_direccion}',\n '{$dir_telefono}',\n '{$dir_mail}',\n 1,\n {$nextval},\n '{$dir_nombre}')";
$rsg = $db->conn->Execute($isql);
$mensajeHistorico = "Se envia respuesta rapida";
if (!empty($regFile)) {
$mensajeHistorico .= ", con archivos adjuntos";
}
//inserta el evento del radicado padre.
$radicadosSel[0] = $numRadicadoPadre;
$hist->insertarHistorico($radicadosSel, $coddepe, $usua_actu, $coddepe, $usua_actu, $mensajeHistorico, $codTx);
//Inserta el evento del radicado de respuesta nuevo.
$radicadosSel[0] = $nurad;
$hist->insertarHistorico($radicadosSel, $coddepe, $usua_actu, $coddepe, $usua_actu, "", 2);
//Agregar un nuevo evento en el historico para que
//muestre como contestado y no genere alarmas.
//A la respuesta se le agrega el siguiente evento
$hist->insertarHistorico($radicadosSel, $coddepe, $usua_actu, $coddepe, $usua_actu, "Imagen asociada desde respuesta rapida", 42);
/***********************************************
// VALIDAR DATOS ADJUNTOS
***********************************************/
if (!empty($_FILES["archs"]["name"][0])) {
// Arreglo para Validar la extension
$sql1 = "\tselect\n anex_tipo_codi as codigo\n , anex_tipo_ext as ext\n , anex_tipo_mime as mime\n from\n anexos_tipo";
$exte = $db->conn->Execute($sql1);
while (!$exte->EOF) {
{
$record["SGD_SPUB_CODIGO"] = 1;
}*/
foreach ($record as $key => $value) {
$campo .= "{$key},";
$valor .= "{$value},";
}
$campo = substr($campo, 0, strlen($campo) - 1);
$valor = substr($valor, 0, strlen($valor) - 1);
$sql = "INSERT INTO RADICADO ({$campo}) VALUES ({$valor})";
$db->conn->Execute($sql);
$isqDep = "select DEPE_NOMB from dependencia where depe_codi={$slc_dep}";
$rsDep = $db->conn->Execute($isqDep);
$dependencia_asig = $rsDep->fields["DEPE_NOMB"];
$radicadosSel[0] = $newRadicado;
$hst->insertarHistorico($radicadosSel, $_SESSION['dependencia'], $_SESSION["codusuario"], 998, 2, "Rad. Express", 2);
$record = null;
$record["RADI_NUME_RADI"] = $newRadicado;
$record['SGD_DIR_TIPO'] = 1;
$record['SGD_DIR_CODIGO'] = $nextval;
$insertSQL = $db->conn->Replace("SGD_DIR_DRECCIONES", $record, array('RADI_NUME_RADI', 'SGD_DIR_TIPO'), $autoquote = true);
$ok = $db->conn->CompleteTrans();
if ($ok) {
$ses = session_name() . "=" . session_id();
$msg = "<tr><td><center><b><font face='Arial'>";
$msg .= "Se ha generado el radicado No. </font><font face='Arial' size='4' color='red'>";
$msg .= "<a href=\"javascript:NewWindow('{$ruta_raiz}/radicacion/gen_etiqueta.php?r=" . base64_encode($newRadicado . '%') . "&{$ses}','popup_ver_estiquer',350,150,'center','front');\">{$newRadicado}</a>";
$msg .= "</font></b></center></td></tr>";
} else {
$msg = "<tr><td>Error al generar radicado.</td></tr>";
}
}
}
$objReport = new ReportExpressPDF();
$objReport->fechaIni = $fi;
$objReport->fechaFin = $ff;
$objReport->titulo = $tit;
$objReport->dependencia = $dependencia;
$objReport->krd = $krd;
$objReport->consecutivo = $rsnpla->fields['NUM'];
$objReport->fechaHoy = date('Y-m-d H:i:s');
$objReport->Entidad = $entidad_largo;
$objReport->creaFormato($depDest);
$ruta = str_replace("../", "", $objReport->enlacePDF());
$msg2 = '<a href="' . $ruta . '" target="_blank"> Generacion de planilla N° Planilla N°' . $rsnpla->fields['NUM'] . '</a>';
$resultado = array_unique($objReport->radicado);
$his->insertarHistorico($resultado, $_SESSION["dependencia"], $_SESSION["codusuario"], $_SESSION["dependencia"], $_SESSION["codusuario"], $msg2, 69);
$msg .= "<a href='" . $objReport->enlacePDF() . "' target='" . date("dmYh") . time("his") . "' class='vinculos'>Abrir Archivo Pdf</a>";
}
} else {
$msg = "El criterio de búsqueda no arroja registros.";
}
}
//ciclo for para generar las opciones en los combos de horas,minutos y segundos
for ($h = 0; $h < 24; $h++) {
$ih .= "<option value='{$h}'>{$h}</option>";
$tmp = $h == $txt_hor ? 'selected' : '';
$fh .= "<option value='{$h}' {$tmp}>{$h}</option>";
}
for ($m = 0; $m < 60; $m++) {
$im .= "<option value='{$m}'>{$m}</option>";
$tmp = $m == $txt_min ? 'selected' : '';
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ó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}");
}
}
$radicados = $trd->insertarTRD($codiTRDS, $codiTRD, $verrad, $dependencia, $codusuario);
// echo "<b>$radicados</b>";
$TRD = $codiTRD;
include "{$ruta_raiz}/radicacion/detalle_clasificacionTRD.php";
$sqlH = "SELECT RADI_NUME_RADI\r\n\t\t\t\t\tFROM SGD_RDF_RETDOCF \r\n\t\t\t\t\tWHERE RADI_NUME_RADI = '{$verrad}'\r\n\t\t\t\t AND SGD_MRD_CODIGO = '{$codiTRD}'";
$rsH = $db->conn->query($sqlH);
$i = 0;
while (!$rsH->EOF) {
$codiRegH[$i] = $rsH->fields['RADI_NUME_RADI'];
$i++;
$rsH->MoveNext();
}
$observa = "*TRD*" . $deta_serie . "/" . $deta_subserie . "/" . $deta_tipodocu;
$Historico = new Historico($db);
//$radiModi = $Historico->insertarHistorico($codiRegH, $coddepe, $codusua, $coddepe, $codusua, $observa, 32);
$radiModi = $Historico->insertarHistorico($codiRegH, "500", $codusuario, "500", $codusuario, $observa, 32);
/* echo "codiRegH: $codiRegH <br>";
echo "dependencia:$dependencia <br>";
echo "codusuario=$codusuario <br>";
echo "dependencia=$dependencia<br>";
echo "codusuario=$codusuario<br>";
echo "observa=$observa<br>";
echo "codigoH: $codiRegH<br>";
echo "tipo doc $tdoc<br>";
*/
$radiUp = $trd->actualizarTRD($codiRegH, $tdoc);
}
//incluir expediente
if ($expediente > 0) {
if ($expediente == 1) {
$rs = $db->conn->Execute($sqlSancionados);
}
$fecha_hoy = date("Y-m-d");
$dateReplace = $db->conn->SQLDate("Y-m-d", "{$fecha_hoy}");
$Historico = new Historico($db);
/**
* Funcion Insertar Historico
* insertarHistorico($radicados,
* $depeOrigen,
* $usCodOrigen,
* $depeDestino,
* $usCodDestino,
* $observacion,
* $tipoTx)
*/
$radicados = $Historico->insertarHistorico($radicadosSel, $dependencia, $codusuario, $depe_codi_territorial, 1, $observaHist . ". " . $observa, 25);
}
?>
<table border="0"><TR><TD><p></p></TD></TR></table>
<table class='borde_tab' width=60% cellpadding="0" cellspacing="5">
<form action='enviardatos.php<?php
echo session_name() . "=" . session_id() . "&krd={$krd}";
?>
' method=post name=formulario>
<tr><td class="titulos4" colspan="3">ACCIÓN REQUERIDA COMPLETADA</td></tr>
<tr><td class="titulos2">ACCIÓN REQUERIDA :</td>
<td class="listado2"><span class=leidos>Solicitud de Anulación de Radicados</span></td></tr>
<tr><td class="titulos2">RADICADOS INVOLUCRADOS</td>
<td class="listado2"><span class=leidos>
<?php
if (!empty($radicados[0])) {
//$objHistorico->insertarHistorico($arrayRad2[$i],$dep_sel ,$codusuario, $dep_sel,$codusuario, $observa, 57);
}
}
}
$i++;
$k++;
}
} else {
echo "La fecha final esta incorrecta";
}
}
if ($res == false) {
echo '<br>Lo siento no pudo Actualizar los datos del expediente<br>';
} else {
echo "<br>Datos de expediente Grabados Correctamente<br>";
$objHistorico->insertarHistorico($arrayRad4, $dep_sel, $codusuario, $dep_sel, $codusuario, $observa, 57);
//$this->db->conn->debug=true;
}
//$objHistorico->insertarHistoricoExp($num_expediente,$arrayRad,$dep_sel ,$codusuario, $observa2, 57,1);
}
if ($ent == 1) {
$btt->datos_expediente($num_expediente, $nurad);
$num_carpetas = $btt->exp_num_carpetas;
$exp_subexpediente = $btt->exp_subexpediente;
$exp_item1 = $btt->exp_item1;
$exp_piso = $btt->exp_item2;
$exp_caja = $btt->exp_caja;
$exp_estante = $btt->exp_estante;
$exp_carpeta = $btt->exp_carpeta;
$exp_estado = $btt->exp_estado;
$exp_archivo = $btt->exp_archivo;
//Modificado skina
$sqlH = "SELECT {$radi_nume_radi} as RADI_NUME_RADI,\r\n\t\t\t\t \tSGD_MRD_CODIGO \r\n\t\t\t\t\t\tFROM SGD_RDF_RETDOCF r\r\n\t\t\t\t\t\tWHERE RADI_NUME_RADI = '{$nurad}'\r\n\t\t\t\t \t\tAND DEPE_CODI = '{$coddepe}'";
$rsH = $db->conn->query($sqlH);
$codiActu = $rsH->fields['SGD_MRD_CODIGO'];
$i = 0;
while (!$rsH->EOF) {
$codiRegH[$i] = $rsH->fields['RADI_NUME_RADI'];
$i++;
$rsH->MoveNext();
}
$TRD = $codiActu;
include "{$ruta_raiz}/radicacion/detalle_clasificacionTRD.php";
$observa = "*Modificado TRD* " . $deta_serie . "/" . $deta_subserie . "/" . $deta_tipodocu;
$Historico = new Historico($db);
//$radiModi = $Historico->insertarHistorico($codiRegH, $coddepe, $codusua, $coddepe, $codusua, $observa, 32);
$radiModi = $Historico->insertarHistorico($codiRegH, $dependencia, $codusuario, $dependencia, $codusuario, $observa, 32);
/*
*Actualiza el campo tdoc_codi de la tabla Radicados
*/
$radiUp = $trd->actualizarTRD($codiRegH, $tdoc);
$mensaje = "Registro Modificado";
$isqlTRD = "select SGD_MRD_CODIGO \r\n\t\t\t\t\t\tfrom SGD_MRD_MATRIRD \r\n\t\t\t\t\t\twhere DEPE_CODI = '{$coddepe}'\r\n\t\t\t\t \t \tand SGD_SRD_CODIGO = '{$codserie}'\r\n\t\t\t\t \t\tand SGD_SBRD_CODIGO = '{$tsub}'\r\n\t\t\t\t\t \tand SGD_TPR_CODIGO = '{$tdoc}'";
$rsTRD = $db->conn->Execute($isqlTRD);
$codiTRDU = $rsTRD->fields['SGD_MRD_CODIGO'];
$sqlUA = "UPDATE SGD_RDF_RETDOCF SET SGD_MRD_CODIGO = '{$codiTRDU}',\r\n\t\t\t\t\t\t USUA_CODI = '{$codusua}'\r\n\t\t\t\t\t\t WHERE RADI_NUME_RADI = '{$nurad}' AND DEPE_CODI = '{$coddepe}'";
$rsUp = $db->conn->query($sqlUA);
$mensaje = "Registro Modificado <br> ";
}
}
$tdoc = '';
$tsub = '';
$objradi->descAnex = "'" . $descripcionAnexos . "'";
$objradi->radiDepeRadi = $dependencipqr;
$objradi->radiUsuaActu = $usuariopqr;
$objradi->carpCodi = 0;
$objradi->trteCodi = 0;
$objradi->dependencia = $dependencipqr;
$objradi->radiDepeActu = $dependencipqr;
$objradi->tdocCodi = $tdoccodigo;
$objradi->tdidCodi = "''";
$objradi->sgd_apli_codi = 1;
$objradi->nivelRad = 0;
$numeroRadicado = $objradi->newRadicado(2, $dependencipqr, 1);
$objclaseformulario->cargarArchivos($dependencipqr, $numeroRadicado, $adjuntosSubidos);
if ($numeroRadicado) {
$codigodir = $objclaseformulario->direciones($num_dir, $empresa, $ciudadano, $numeroRadicado, $munisipioresi, $departamentoresi, $direcion, $primernombre, $segunnombre, $primerapellido, $segundoapellido, $sgdttrcodigo, $numid, $paisresi, $continenteresi, $email, $conticonta, $paisconta, $departaconta, $municonta, $direcioncontac, $emailconta, $telefonocontac, $celularcontac);
$objhist->insertarHistorico($numeroRadicado, $dependencipqr, $usuariopqr, $dependencipqr, $usuariopqr, "....", 2);
$objclaseformulario->AnexarArchivos($numeroRadicado, $dependencipqr, $usuariopqr);
include 'funciones.php';
require 'barcode.php';
$textpdf = "Señor(a) " . $primernombre . " " . $segunnombre . "" . $primerapellido . " " . $segundoapellido . ", Número de identificación: " . $numid . ", gracias por utilizar los canales de Atención al Ciudadano del servicio geologico colombiano, usted ha recibido el radicado de su PQR número " . $numeroRadicado . " de fecha " . date("Y/m/d") . " a las " . date("H:i:s") . ", con este podrá realizar el seguimiento de su solicitud y conocer su estado, para realizarlo usted deberá consultar el siguiente link: http://sgc.gov.co Al ingresar usted deberá digitar el número del radicado y verificar (" . $codigoverificacion . ") el estado de su PQR.";
$textpdf = utf8_encode($textpdf);
$sql_depeNomb = "select depe_nomb from dependencia where depe_codi = " . $dependencipqr;
$rs_depeNomb = $objclaseformulario->db->conn->Execute($sql_depeNomb);
if (!$rs_depeNomb->EOF) {
$depeNomb = substr($rs_depeNomb->fields["depe_nomb"], 0, 40);
}
$sql_muniNomb = "select muni_nomb from municipio where muni_codi = " . $munisipioresi . " and dpto_codi = " . $departamentoresi;
$rs_muniNomb = $objclaseformulario->db->conn->Execute($sql_muniNomb);
if (!$rs_muniNomb->EOF) {
$muniNomb = $rs_muniNomb->fields["muni_nomb"];
} else {
}
//$bien=unlink(trim($linkarchivo));
$bien = true;
if ($bien) {
$isql = "update anexos set anex_borrado='S' " . "where anex_codigo='{$anexo}'";
$bien = $db->query($isql);
}
if ($bien) {
include "{$ruta_raiz}/include/tx/Historico.php";
$hist = new Historico($db);
$anexBorrado = array();
$anexBorrado[] = $numrad;
$observa = "Se Elimina Anexo Digitalizado con Codigo: {$anexo}. Eliminado por: {$nombreUsuario}.";
$codTx = 31;
//Código correspondiente a la eliminación de anexos
$hist->insertarHistorico($anexBorrado, $dependencia, $codusuario, $dependencia, $codusuario, $observa, $codTx);
$mensaje = "<span class='info'>Archivo eliminado<span><br> ";
$db->conn->CommitTrans();
} else {
$mensaje = "<span class='alarmas'>No fue posible eliminar Archivo<span></br>";
$db->conn->RollbackTrans();
}
?>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Informaci�n de Anexos</title>
<link rel="stylesheet" href="estilos/orfeo.css">
</head>
<script language="javascript">
function actualizar(){
$rad->radiPath = 'null';
if (strlen(trim($aplintegra)) == 0) {
$aplintegra = "0";
}
$rad->sgd_apli_codi = $aplintegra;
$codTx = 2;
$flag = 1;
$noRad = $rad->newRadicado($ent, $tpDepeRad[$ent]);
if ($noRad == "-1") {
die("<hr><b><font color=red><center>Error no genero un Numero de Secuencia o Inserto el radicado<br>SQL </center></font></b><hr>");
}
if (!$noRad) {
echo "<hr>RADICADO GENERADO <HR>{$noRad}<hr>";
}
$radicadosSel[0] = $noRad;
$hist->insertarHistorico($radicadosSel, $dependencia, $codusuario, $coddepe, $radi_usua_actu, " ", $codTx);
$nurad = $noRad;
echo "<INPUT TYPE=HIDDEN NAME=nurad value={$nurad}>";
echo "<INPUT TYPE=HIDDEN NAME=flag value={$flag}>";
if ($noRad) {
$var_envio = session_name() . "=" . session_id() . "&faxPath&leido=no&krd={$krd}&verrad={$nurad}&ent={$ent}";
?>
</p><center><img src='../iconos/img_alerta_2.gif'><font face='Arial' size='3'><b>
Se ha generado el radicado No.<b></font>
<font face='Arial' size='4' color='red'><b><u>
<?php
if (substr($nurad, -1) === '2') {
$ses = session_name() . "=" . session_id();
echo "<a href=\"javascript:NewWindow('{$ruta_raiz}/radicacion/gen_etiqueta.php?r=" . base64_encode($nurad . '%') . "&{$ses}','popup_ver_estiquer',350,150,'center','front');\">" . $nurad . "</a>";
} else {
echo $nurad;
function combinar_csv($dependencia, $codusuario, $usua_doc, $usua_nomb, $depe_codi_territorial, $codiTRD, $TipoRad)
{
$odt = new OpenDocText();
$b = new CLASS_GEN();
//Var que contiene el arreglo de radicados genrados a partir de la masiva
$arrRadicados = array();
//echo "<hr> TipoRas es $TipoRad <hr>";
//Instancia de la dependencia
$objDependecia = new Dependencia($this->conexion);
$objDependecia->Dependencia_codigo($dependencia);
//Almacena la secuencia de radicacion para esta dependencia
$secRadicacion = "secr_tp" . $TipoRad . "_" . $objDependecia->getSecRadicTipDepe($dependencia, $TipoRad);
// $this->conexion->conn->debug = true;
$archivo = $this->arcFinal;
$archivo = trim(substr($archivo, strpos($archivo, $this->carpetaBodega) + strlen($this->carpetaBodega), strlen($archivo) - strpos($archivo, $this->carpetaBodega) + strlen($this->carpetaBodega)));
// INICIALIZA EL PDF
$this->pdf = new Cezpdf("LETTER", "landscape");
$objHist = new Historico($this->conexion);
$year = date("Y");
$day = date("d");
$month = date("m");
// orientaci�n izquierda
$orientCentro = array("left" => 0);
// justificaci�n 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_control.php";
$this->btt = new CONTROL_ORFEO($this->conexion);
echo "<table border=0 width 80% cellpadding='0' cellspacing='5' class='borde_tab' >";
echo "<tr><td class='titulos4'>Registro</td><td class='titulos4'>Radicado</td><td class='titulos4' >Nombre</td><td class='titulos4'>Direccion</td><td class='titulos4'>Depto</td><td class='titulos4'>Municipio</td><td class='titulos4'>Expediente</td></tr>";
//Referencia el archivo a abrir
$ruta = $this->ruta_raiz . "/" . $this->carpetaBodega . "/masiva/" . $this->archivo_insumo;
clearstatcache();
unlink($ruta);
$fp = fopen($ruta, 'wb');
if ($fp) {
fputs($fp, "plantilla={$this->arcPlantilla}" . "\n");
fputs($fp, "csv={$this->arcCSV}" . "\n");
fputs($fp, "archFinal={$this->arcFinal}" . "\n");
fputs($fp, "archTmp={$this->arcTmp}" . "\n");
// Comentariada por HLP. Cambiar , por ;
fputs($fp, implode(",", $this->encabezado[0]) . ",*RAD_S*,*F_RAD_S*,*F_HOY*" . "\n");
//fputs ($fp,implode( ";", $this->encabezado[0]).";*RAD_S*;*F_RAD_S*"."\n");
//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 efect�a un reemplazo
foreach ($this->encabezado[0] as $campos_d) {
if (strlen(trim($this->datos[$ii][$i])) < 1) {
$this->datos[$ii][$i] = "";
}
$dato_r = str_replace("'", "''", trim($this->datos[$ii][$i]));
$texto_tmp = str_replace($campos_d, $dato_r, $texto_tmp);
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 = trim($dato_r);
}
if ($campos_d == "*NUM_EXPEDIENTE*") {
$numeroExpediente = trim($dato_r);
}
if ($campos_d == "*ESP_CODIGO*") {
$codigoESP = $dato_r;
if ($codigoESP == "") {
$codigoESP = null;
}
}
if ($campos_d == "*RAD_ANEXO*") {
$radicadopadre = $dato_r;
$tipoanexo = 0;
if ($radicadopadre == "") {
$radicadopadre = "";
$tipoanexo = "";
}
} else {
$radicadopadre = "";
}
$tipo_anexo = "0";
$cuentai = "";
$documento_us3 = "";
$med = "";
$fec = "";
$ane = "";
//$pais="COLOMBIA";
$carp_codi = "12";
$i++;
}
$tip_rem = "1";
// Si no se especifico el tipo de documento
if (!$tdoc) {
$tdoc = 0;
}
// $this->validarLugar();
$pais_codi = $this->arrCodPais[$pais . $dpto_nombre . $muni_nombre];
if ($pais_codi == '') {
$pais_codi = '170';
}
$dpto_codi = $pais_codi . "-" . $this->arrCodDepto[$dpto_nombre];
$muni_codi = $dpto_codi . "-" . $this->arrCodMuni[$dpto_nombre . $muni_nombre];
$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;
//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
$muni_us1 = $muni_codi;
$codep_us1 = $dpto_codi;
$nombre_us = "{$nombre_us1} {$prim_apell_us1} {$seg_apell_us1}";
unset($tmp_objMuni);
$documento_us3 = $codigoESP;
if (!$documento_us3) {
$documento_us3 = null;
}
//Si se trata de una combinacion de correspondencia definitiva
if ($this->definitivo == "si") {
// Segun el tipo de remitente se graba en la tabla respectiva.
// 0 - ESP 1 - OTRA EMPRESA 2 - PERSONA NATURAL
$nurad = $this->btt->radicar_salida_masiva($tipoanexo, $cuentai, $documento_us3, $med, $fec, $radicadopadre, $codusuario, $tip_doc, $ane, $pais, $asu, $dependencia, $tip_rem, $usua_doc, $this->tipoDocto, $muni_codi, $archivo, $usua_doc, $depe_codi_territorial, $secRadicacion, $numeroExpediente, $TipoRad);
//include_once("$this->ruta_raiz/include/tx/Expediente.php");
//$this->objExp = new Expediente($this->conexion);
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);
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, $muni_us1);
$tipo_emp_us1 = 0;
$documento_us1 = $codigo_us;
}
if ($tip_doc == 1) {
$codigo_oem = $this->btt->grabar_oem($doc_us1, $nombre_us1, $direccion_us1, $prim_apell_us1, $seg_apell_us1, $telefono_us1, $mail_us1, $muni_us1);
$tipo_emp_us1 = 2;
$documento_us1 = $codigo_oem;
}
if ($tip_doc == 0) {
$sgd_esp_codigo = $this->arregloEsp[$nombre_us1];
$tipo_emp_us1 = 1;
$documento_us1 = $sgd_esp_codigo;
}
$documento_us2 = "";
$documento_us3 = "";
$mail_us1;
$cc_documento_us1 = "documento";
$grbNombresUs1 = trim($nombre_us1) . " " . trim($prim_apel_us1) . " " . trim($seg_apel_us1);
$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;
$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 = substr(trim($nombre_us), 0, 49);
$direccion_us1 = substr(trim($direccion_us1), 0, 29);
if (!$muni_nomb) {
$muni_nomb = $muni_tmp1;
}
if (!$valor_unit) {
$valor_unit = 0;
}
//
$isql = "INSERT INTO SGD_RENV_REGENVIO (USUA_DOC, SGD_RENV_CODIGO, SGD_FENV_CODIGO, SGD_RENV_FECH,\n\t\t\t\t\t\tRADI_NUME_SAL, SGD_RENV_DESTINO, SGD_RENV_TELEFONO, SGD_RENV_MAIL, SGD_RENV_PESO, SGD_RENV_VALOR,\n\t\t\t\t\t\tSGD_RENV_CERTIFICADO, SGD_RENV_ESTADO, SGD_RENV_NOMBRE, SGD_DIR_CODIGO, DEPE_CODI, SGD_DIR_TIPO,\n\t\t\t\t\t\tRADI_NUME_GRUPO, SGD_RENV_PLANILLA, SGD_RENV_DIR, SGD_RENV_PAIS, SGD_RENV_DEPTO, SGD_RENV_MPIO,\n\t\t\t\t\t\tSGD_RENV_TIPO, SGD_RENV_OBSERVA,SGD_DEPE_GENERA)\n\t\t\t\t\t\tVALUES\n\t\t\t\t\t\t({$usua_doc}, {$nextval}, 101, " . $this->btt->sqlFechaHoy . ", {$nurad}, '{$muni_nomb}', '{$telefono_us1}', '{$mail}','',\n\t\t\t\t\t\t'{$valor_unit}', 0, 1, '{$nombre_us}', NULL, {$dependencia}, '{$dir_tipo}', " . $this->radi_nume_grupo . ", '00',\n\t\t\t\t\t\t'{$direccion_us1}', '{$pais}','{$dpto_nombre}', '{$muni_nombre}', 1, 'Masiva grupo " . $this->radi_nume_grupo . "',\n\t\t\t\t\t\t{$dependencia}) ";
$rs = $this->conexion->conn->Execute($isql);
if (!$rs) {
$this->conexion->conn->RollbackTrans();
die("<span class='etextomenu'>No se ha podido insertar la información en SGD_RENV_REGENVIO.");
}
/*
* Registro de la clasificacion TRD
*/
$isql = "INSERT INTO SGD_RDF_RETDOCF(USUA_DOC, SGD_MRD_CODIGO, SGD_RDF_FECH, RADI_NUME_RADI, DEPE_CODI, USUA_CODI)\n\t\t\t\t\t\tVALUES({$usua_doc}, {$codiTRD}," . $this->btt->sqlFechaHoy . ", {$nurad}, '{$dependencia}', {$codusuario} )";
$rs = $this->conexion->query($isql);
if (!$rs) {
$this->conexion->conn->RollbackTrans();
die("<span class='etextomenu'>No se ha podido insertar la informaci&ocute;n en SGD_RENV_REGENVIO");
}
} else {
$sec = $ii;
$sec = str_pad($sec, 5, "X", STR_PAD_LEFT);
$nurad = date("Y") . $dependencia . $sec . "1X";
}
// Comentariada por HLP. Cambiar , por ;
fputs($fp, implode(",", $this->datos[$ii]) . ",{$nurad}," . date("d/m/Y") . "," . str_ireplace(",", " ", $b->traducefecha(date("m/d/Y"))) . " \n");
//fputs ($fp,implode( ";", $this->datos[$ii]).";$nurad;".date("d/m/Y")."\n");
$contador = $ii + 1;
echo "<tr><td class='listado2'>{$contador}</td><td class='listado2' >{$nurad}</td>\n\t\t \t <td class='listado2'>" . unhtmlspecialchars($nombre_us) . "</td><td class='listado2'>" . unhtmlspecialchars($direccion_us1) . "</td>\n\t\t \t<td class='listado2' >{$dpto_nombre}</td><td class='listado2'>{$muni_nombre}</td>\n\t\t \t<td class='listado2'>{$numeroExpediente}</td></tr>";
if (connection_status() != 0) {
echo "<h1>Error de conexión</h1>";
$objError = new CombinaError(NO_DEFINIDO);
echo $objError->getMessage();
die;
}
$nombPdf = iconv($odt->codificacion($nombre_us), 'ISO-8859-1', $nombre_us);
$dirPdf = iconv($odt->codificacion($direccion_us1), 'ISO-8859-1', $direccion_us1);
$dptoPdf = iconv($odt->codificacion($dpto_nombre), 'ISO-8859-1', $dpto_nombre);
$muniPdf = iconv($odt->codificacion($muni_nombre), 'ISO-8859-1', $muni_nombre);
$data = array_merge($data, array(array('#' => $contador, 'Radicado' => $nurad, 'Nombre' => $nombPdf, 'Direccion' => $dirPdf, 'Departamento' => $dptoPdf, 'Municipio' => $muniPdf)));
$arrRadicados[] = $nurad;
}
fclose($fp);
echo "</table>";
echo "<span class='info'>Número 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);
if ($this->definitivo == "si") {
$objHist->insertarHistorico($arrRadicados, $dependencia, $codusuario, $dependencia, $codusuario, "Radicado insertado del grupo de masiva {$radi_nume_grupo}", 30);
}
$this->resulComb = $data;
} else {
exit("No se pudo crear el archivo {$this->archivo_insumo}");
}
}
}
closedir($gestor);
}
// Fin listado Archivos
if (!$rsg and empty($referencia)) {
echo "<script type='text/javascript'>document.location.href = '../pqr/index.php?error=1';</script>";
} elseif (!$rsg and !empty($referencia)) {
header("Location: ../pqr/index.php?dosxfort&error=1");
}
if ($noRad == "-1" and empty($referencia)) {
echo "<script type='text/javascript'>document.location.href = '../pqr/index.php?error=1';</script>";
} elseif ($noRad == "-1" and !empty($referencia)) {
header("Location: ../pqr/index.php?dosxfort&error=1");
}
$radicadosSel[0] = $noRad;
$hist->insertarHistorico($radicadosSel, $coddepe, $radi_usua_actu, $coddepe, $radi_usua_actu, "El usuario : " . $grbNombresUs2 . "\n Dejo el siguiente E-mail : " . $mail_us . "" . " y numero Telefonico: " . $telefono_us, 61);
/*********** Generacion del archivo de salida *********************************************/
$fecha1 = time();
$fecha = FechaFormateada($fecha1);
/*
*Se pasan las variables a la pagina salida_radicado.tpl
*por medio del template
**/
$tipodoc = makeLabel($db, $tdoc);
$tdoc = $tipodoc->fields["SGD_PQR_LABEL"];
$ubica = nom_muni_dpto($muni, $dep, $db);
while (!$ubica->EOF) {
$municip = $ubica->fields["MUNI_NOMB"];
$departa = $ubica->fields["DPTO_NOMB"];
$ubica->MoveNext();
}
