$error = 0;
if ($db) {
include_once $ruta_raiz . "/radicacion/crea_combos_universales.php";
$db->conn->SetFetchMode(ADODB_FETCH_ASSOC);
//$db->conn->debug=true;
if (isset($_POST['btn_accion'])) {
$record = array();
$record['NUIR'] = $_POST['txt_nuir'];
$record['NOMBRE_DE_LA_EMPRESA'] = mb_strtoupper(trim($_POST['txt_name']), ini_get('default_charset'));
$record['NIT_DE_LA_EMPRESA'] = mb_strtoupper(trim($_POST['txt_nit']), ini_get('default_charset'));
$record['SIGLA_DE_LA_EMPRESA'] = $_POST['txt_sigla'];
$record['DIRECCION'] = $_POST['txt_dir'];
include_once "{$ruta_raiz}/class_control/Municipio.php";
$tmp_mun = new Municipio($db);
$tmp_mun->municipio_codigo($_POST['codep_us1'], $_POST['muni_us1']);
$record['ID_CONT'] = $tmp_mun->get_cont_codi();
$record['ID_PAIS'] = $tmp_mun->get_pais_codi();
$record['CODIGO_DEL_DEPARTAMENTO'] = $tmp_mun->dpto_codi;
$record['CODIGO_DEL_MUNICIPIO'] = $tmp_mun->muni_codi;
$record['TELEFONO_1'] = $_POST['txt_tel1'];
isset($_POST['txt_tel2']) ? $record['TELEFONO_2'] = $_POST['txt_tel2'] : ($record['TELEFONO_2'] = null);
$record['EMAIL'] = $_POST['txt_mail'];
$_POST['Slc_act'] == "S" ? $record['ACTIVA'] = 1 : ($record['ACTIVA'] = 0);
$record['ARE_ESP_SECUE'] = 8;
$record['NOMBRE_REP_LEGAL'] = mb_strtoupper(trim($_POST['txt_namer']), ini_get('default_charset'));
if ($_POST['btn_accion'] == 'Agregar') {
$record['IDENTIFICADOR_EMPRESA'] = $db->conn->nextId("SEC_BODEGA_EMPRESAS");
}
if ($_POST['btn_accion'] == 'Modificar') {
$record['IDENTIFICADOR_EMPRESA'] = $_POST['sls_idesp'];
}
break;
case 2:
$idcont2 = $tmp_idcont;
$idpais2 = $tmp_idpais;
$dpto_tmp2 = $muni_tmp2[0];
$muni_tmp2 = $muni_tmp2[1];
break;
}
unset($tmp_mun);
unset($tmp_idcont);
unset($tmp_idpais);
}
if (!is_null($muni_us3)) {
$tmp_mun = new Municipio($conexion);
$tmp_mun->municipio_codigo($codep_us3, $muni_us3);
$tmp_idcont = $tmp_mun->get_cont_codi();
$tmp_idpais = $tmp_mun->get_pais_codi();
$muni_tmp3 = explode("-", $muni_us3);
switch (count($muni_tmp3)) {
case 4:
$idcont3 = $muni_tmp3[0];
$idpais3 = $muni_tmp3[1];
$dpto_tmp3 = $muni_tmp3[2];
$muni_tmp3 = $muni_tmp3[3];
break;
case 3:
$idcont3 = $tmp_idcont;
$idpais3 = $muni_tmp3[0];
$dpto_tmp3 = $muni_tmp3[1];
$muni_tmp3 = $muni_tmp3[2];
break;
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}");
}
}
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}");
}
}