$anoSec = substr($nurad, 0, 4);
$tipoRad = substr($radicar_documento, -1);
} else {
$isql = "select * from ANEXOS\n where ANEX_CODIGO={$anexo} AND ANEX_RADI_NUME={$numrad}";
$rs = $db->query($isql);
if (!$rs->EOF) {
$radicado_salida = $rs->fields['RADI_NUME_SALIDA'];
} else {
$db->conn->RollbackTrans();
die("<span class='etextomenu'>No se ha podido obtener la informacion del radicado");
}
if (!$radicado_salida) {
//print ("Genera secuencia antigua");
$isql_hl = "select sec_{$depe_codi_territorial}.nextval as SEC from dual";
//print ("Genera secuencia antigua $isql_hl");
$sec = $db->nextId("secr_tp1_" . $dep->getDepSecRadic(1));
if ($sec == -1) {
$db->conn->RollbackTrans();
die("<span class='etextomenu'>No se encontr� la secuencia sec_{$depe_codi_territorial} ");
}
//print ("Trata de alcular la secuencia y obtiene ... (sec_$depe_codi_territorial,$sec)".$db->conn->_genIDSQL."---".$db->conn->hasGenID);
$no_digitos = 6;
$tipoRad = "1";
} else {
$sec = substr($radicado_salida, 7, $no_digitos);
$tipoRad = substr($radicar_documento, -1);
$anoSec = substr($radicado_salida, 0, 4);
echo "<span class='etextomenu'><br>Ya estaba radicado<br>";
$radicar_a = $radicado_salida;
}
}
// incluir configuracion.
$ADODB_COUNTRECS = false;
isset($_POST['ideps']) ? $ideps_defa = $_POST['ideps'] : ($ideps_defa = 0);
isset($_POST['idctt']) ? $idctt_defa = $_POST['idctt'] : ($idctt_defa = 0);
$ruta_raiz = "../..";
include_once "{$ruta_raiz}/config.php";
// incluir configuracion.
include_once "{$ruta_raiz}/include/db/ConnectionHandler.php";
$db = new ConnectionHandler("{$ruta_raiz}");
//$db->conn->debug=true;
if ($db) {
$db->conn->SetFetchMode(ADODB_FETCH_ASSOC);
$error = 0;
if (isset($_POST['btn_accion'])) {
$record = array();
$_POST['hdBandera'] == 'A' ? $record['CTT_ID'] = $db->nextId('SEC_DEF_CONTACTOS') : ($record['CTT_ID'] = $_POST['txtidctt']);
$record['CTT_ID_EMPRESA'] = $_POST['ideps'];
//$record['CTT_ID_TIPO'] = $_POST['idtipo'] + 1;
$record['CTT_ID_TIPO'] = $_POST['idtipo'];
$record['CTT_CARGO'] = $_POST['txtcargo'];
$record['CTT_NOMBRE'] = $_POST['txtnombre'];
$record['CTT_TELEFONO'] = $_POST['txttelefono'];
switch ($_POST['btn_accion']) {
case 'Agregar':
case 'Modificar':
$ok = $db->conn->Replace('SGD_DEF_CONTACTOS', $record, 'CTT_ID', $autoquote = true);
$ok ? $error = $ok : ($error = 4);
break;
case 'Eliminar':
if (!$db->conn->Execute("DELETE FROM SGD_DEF_CONTACTOS WHERE CTT_ID=" . $record['CTT_ID'])) {
$error = 5;
$codep_us[3] = $codep_us3;
$tipo_us[1] = $tipo_us1;
$tipo_us[2] = $tipo_us2;
$tipo_us[3] = $tipo_us3;
$espObjeto->Esp_nit($cc_documento_us3);
$nuir_e = $espObjeto->getNuir();
$arregloRadicado = array();
//Recorre el arreglo con los anexos radicables con el fin de radicarlos uno a uno
while ($i < $num) {
$anex->anexoRadicado($numrad, $documentosPaquete[$i]);
$tipoDocumento->TipoDocumento_codigo($anex->get_sgd_tpr_codigo());
$descripcionDocumento = "";
$descripcionDocumento = $tipoDocumento->get_sgd_tpr_descrip();
$arregloDocumentos[$i] = $descripcionDocumento;
$desc_anexos = "Documento que hace parte de un paquete de numeración y fechado";
$sec = $conexion->nextId("sec_{$depe_codi_territorial}");
if ($sec == -1) {
print "No hay secuencia";
die;
$conexion->conn->RollbackTrans();
die("<span class='etextomenu'>No existe secuencia para la generación del radicado (Territorial {$depe_codi_territorial})");
}
$sec = str_pad($sec, $no_digitos, "0", STR_PAD_left);
$rad_salida = date("Y") . $dependencia . $sec . "1";
$sql = "update ANEXOS set RADI_NUME_SALIDA={$rad_salida},\n\t\t ANEX_SOLO_LECT='S',ANEX_RADI_FECH={$sqlFechaHoy},ANEX_ESTADO=2\n\t\t where ANEX_CODIGO={$documentosPaquete[$i]} AND ANEX_RADI_NUME={$numrad}";
$rs = $conexion->query($sql);
if (!$rs) {
$conexion->conn->RollbackTrans();
die("<span class='etextomenu'>No se ha podido actualizar los anexos");
}
$pathCompleto = "";
$db->conn->SetFetchMode(ADODB_FETCH_ASSOC);
if ($agregar == "AGREGAR" and $tagregar == 0) {
$cedula = 999999;
if ($no_documento) {
$isql = "select SGD_CIU_CEDULA from SGD_CIU_CIUDADANO WHERE SGD_CIU_CEDULA='{$no_documento}'";
$rs = $db->query($isql);
if (!$rs->EOF) {
$cedula = $rs->fields["SGD_CIU_CEDULA"];
}
$flag == 0;
}
//echo "--->Doc >$no_documento<";
if ($cedula == $no_documento and $no_documento != "" and $no_documento != 0) {
echo "<center><b><font color=red><center><< No se ha podido agregar el usuario, El usuario ya se encuentra >> </center></font>";
} else {
$nextval = $db->nextId("sec_ciu_ciudadano");
if ($nextval == -1) {
die("<span class='etextomenu'>No se encontr� la secuencia sec_ciu_ciudadano ");
}
error_reporting(7);
$isql = "INSERT INTO SGD_CIU_CIUDADANO(SGD_CIU_CEDULA, TDID_CODI, SGD_CIU_CODIGO, SGD_CIU_NOMBRE,\r\n\t\t\t\t\tSGD_CIU_DIRECCION, SGD_CIU_APELL1, SGD_CIU_APELL2, SGD_CIU_TELEFONO, SGD_CIU_EMAIL, ID_CONT, ID_PAIS, \r\n\t\t\t\t\tDPTO_CODI, MUNI_CODI) values ('{$no_documento}', 2, {$nextval}, '{$nombre_nus1}', '{$direccion_nus1}', \r\n\t\t\t\t\t'{$prim_apell_nus1}', '{$seg_apell_nus1}','{$telefono_nus1}', '{$mail_nus1}', \r\n\t\t\t\t\t{$idcont4}, {$idpais4}, {$dpto_tmp}, {$muni_tmp})";
if (!trim($no_documento)) {
$nombre_essp = "{$nombre_nus1} {$prim_apell_nus1} {$seg_apell_nus1}";
}
$rs = $db->query($isql);
if (!$rs) {
$db->conn->RollbackTrans();
die("<span class='etextomenu'>No se pudo actualizar SGD_CIU_CIUDADANO ({$isql}) ");
}
}
if ($flag == 1) {
/**
* Busca el numero de secuencia de documento generado
* para un paquete de documentos del proceso de numeraqcion y fechado.
* Si el documento aun no ha sido numerado, entonces se genera la secuencia
* de acuerdo a la dependencia usando el mombre de secuencia parametrizado en la tabla
* "sgd_pnufe_procnumfe" que define los paquetes de numeracion y fechado
* @param $dependencia es el codigo de la dependencia a analizar
* @return string
*/
function get_secuenciaDocto($dependencia)
{
$q = "select * from anexos where ANEX_CODIGO='" . $this->sgd_doc_padre . "' AND ANEX_RADI_NUME=" . $this->anex_radi_nume;
$rs = $this->cursor->query($q);
if (!$rs->EOF) {
$this->sgd_doc_secuencia = $rs->fields['SGD_DOC_SECUENCIA'];
}
if ($this->sgd_doc_secuencia) {
return $this->sgd_doc_secuencia;
} else {
// EL DOCUMENTO PADRE NO TIENE LA SECUENCIA
//OBTIENE EL NOMBRE DE LA SECUENCIA
$sql = "select SGD_SENUF_SEC as SEC from SGD_SENUF_SECNUMFE where SGD_PNUFE_CODI=" . $this->sgd_pnufe_codi . " and DEPE_CODI= " . $dependencia;
$rs2 = $this->cursor->query($sql);
if ($rs2 && !$rs2->EOF) {
$nombreSecuencia = $this->sgd_doc_secuencia = $rs2->fields["SEC"];
}
$this->sgd_doc_secuencia = $this->cursor->nextId($nombreSecuencia);
if (!$this->sgd_doc_secuencia) {
$this->sgd_doc_secuencia = 0;
}
}
return $this->sgd_doc_secuencia;
}
die("<span class='etextomenu'>No se ha podido Insetar los anexos");
}
//print ($isql);
$directorio = "./bodega/" . substr(trim($archivo), 0, 4) . "/" . substr(trim($archivo), 4, 3) . "/docs/";
$estadoCopia = copy($archivoPlantilla, $directorio . trim(strtolower($archivoconversion)));
if (!$estadoCopia) {
$db->conn->RollbackTrans();
die("ERROR!! NO SE PUDO SUBIR " . $directorio . trim(strtolower($archivoconversion)));
}
if ($doctoPrincipal == "1") {
$num = count($argumento);
$i = 0;
// Recorre el array de argumentos y actualiza la base de datos
while ($i < $num) {
$record_id = key($argumento);
$secuencia = $db->nextId("sgd_anar_secue");
if ($secuencia == -1) {
$secuencia = 0;
}
$values["sgd_anar_codi"] = $secuencia;
$values["anex_codigo"] = "'{$codDoctoPadre}'";
$values["sgd_argd_codi"] = $record_id;
$values["sgd_anar_argcod"] = $argumento[$record_id];
$rs3 = $db->insert("sgd_anar_anexarg", $values);
if (!$rs3) {
$db->conn->RollbackTrans();
die("<span class='etextomenu'>No se ha podido Grabar la información seleccionada");
}
next($argumento);
++$i;
array_splice($values, 0);
$rad->ra_asun = "Respuesta al radicado " . $numRadicadoPadre;
$rad->radiPath = 'null';
$rad->sgd_apli_codi = '0';
$rad->usuaDoc = $radUsuaDoc;
$codTx = 62;
$nurad = $rad->newRadicado($ent, $tpDepeRad);
if ($nurad == "-1") {
header("Location: salidaRespuesta.php?{$encabe}&error=1");
die;
}
//datos para guardar los anexos en la carpeta del nuevo radicado
$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
$ent = '1';
$tpDepeRad = $coddepe;
$radUsuaDoc = $codigoCiu;
if ($_SESSION["krd"]) {
$krd = $_SESSION["krd"];
}
//Para crear el numero de radicado se realiza el siguiente procedimiento
//$newRadicado = date("Y") . $this->dependencia . str_pad($secNew,$this->noDigitosRad,"0", STR_PAD_LEFT) . $tpRad;
//este se puede ver en el archivo Radicacion.php
$isql_consec = "select DEPE_RAD_TP{$ent} as secuencia from DEPENDENCIA WHERE DEPE_CODI = {$tpDepeRad}";
$creaNoRad = $db->conn->Execute($isql_consec);
$tpDepeRad = $creaNoRad->fields["secuencia"];
//Email del usuario
//DATOS EMPRESA
$sigla = 'null';
$iden = $db->nextId("sec_ciu_ciudadano");
// uniqe key ??????????????????????????????
$email = $_POST['usMailSelect'];
//mail
$pais = 170;
//OK, codigo pais
$cont = 1;
//id del continente
$asu = $_POST["respuesta"];
// RADICADO
$rad = new Radicacion($db);
$rad->radiTipoDeri = 0;
// ok ????
$rad->radiCuentai = 'null';
// ok, Cuenta Interna, Oficio, Referencia
$rad->eespCodi = $iden;
<?php
if (!$ruta_raiz) {
$ruta_raiz = ".";
}
include_once "{$ruta_raiz}/include/db/ConnectionHandler.php";
include "{$ruta_raiz}/config.php";
$db = new ConnectionHandler(".");
$db->conn->SetFetchMode(ADODB_FETCH_ASSOC);
$sec = $db->nextId("secr_pruebayo");
print "Se obtiene ({$sec})";
