} //Eliminamos los campos vacios en el array $emails = array_filter($emails); // informacion remitente $name = ""; $email = ""; $isql = "SELECT D.* FROM SGD_DIR_DRECCIONES D\r\n\t WHERE D.RADI_NUME_RADI =" . $_GET['radicado']; $rs = $db->conn->Execute($isql); $name = $rs->fields["SGD_DIR_NOMREMDES"]; $email = $rs->fields["SGD_DIR_MAIL"]; $municicodi = $rs->fields["MUNI_CODI"]; $depecodi2 = $rs->fields["DPTO_CODI"]; $name = strtoupper($name); $depcNomb = strtoupper($depcNomb); $fecha1 = time(); $fecha = ucfirst(fechaFormateada($fecha1)); $asunto = "<br><br><br> <strong>Bogota, {$fecha}</strong>\r\n\t\t<br /><br /><br />\r\n\t\tSeñor(a)<br />\r\n <strong>\r\n {$name}</strong><br>" . $email . "<br><br><br>"; $sqlD = " SELECT\r\n\t\t a.MUNI_NOMB,\r\n\t\t b.DPTO_NOMB\r\n FROM \r\n MUNICIPIO a, DEPARTAMENTO b\r\n\t\t\t WHERE (a.ID_PAIS = 170)\r\n\t\t\t\t\tAND\t(a.ID_CONT = 1)\r\n\t\t\t\t\tAND (a.DPTO_CODI = {$depecodi2})\r\n\t\t\t\t\tAND (a.MUNI_CODI = {$municicodi})\r\n\t\t\t\t\tAND (a.DPTO_CODI=b.DPTO_CODI)\r\n\t\t\t\t\tAND (a.ID_PAIS=b.ID_PAIS)\r\n\t\t\t\t\tAND (a.ID_CONT=b.ID_CONT)"; $descripMuniDep = $db->conn->Execute($sqlD); $depcNomb = $descripMuniDep->fields["MUNI_NOMB"]; $muniNomb = $descripMuniDep->fields["DPTO_NOMB"]; $destinatario = trim($email); $sql1 = "\tselect\r\n anex_tipo_ext as ext\r\n from\r\n anexos_tipo"; $exte = $db->conn->Execute($sql1); while (!$exte->EOF) { $val = $exte->fields["EXT"]; $extn .= empty($extn) ? $val : "|" . $val; //arreglo para validar la extension $exte->MoveNext(); } $sqlSubstDesc = $db->conn->substr . "(anex_desc, 0, 50)";
$numRadicadoPadre = $_POST["radPadre"]; $tamanoMax = 7 * 1024 * 1024; // 7 megabytes $fechaGrab = trim($date1); $numramdon = rand(0, 100000); $contador = 0; $regFile = array(); $conCopiaA = ""; $enviadoA = ""; $cCopOcu = ""; $ddate = date("d"); $mdate = date("m"); $adate = date("Y"); $fechproc4 = substr($adate, 2, 4); $fecha1 = time(); $fecha = fechaFormateada($fecha1); //DATOS A VALIDAR EN RADICADO // $servidorSmtp = "172.16.1.92:25"; $tdoc = 0; // tipo documental no definido $ent = '1'; $pais = 170; //OK, codigo pais $cont = 1; //id del continente $radicado_rem = 7; $auxnumero = str_pad($auxnumero, 5, "0", STR_PAD_LEFT); $tipo = 7; #pdf $tamano = 1000; $auxsololect = 'N';