if (eregi($type, $value)) {
$bandera = true;
if ($tamano < $tamanoMax) {
//grabar el registro en la base de datos
if (strlen($str) > 90) {
$nombre = substr($nombre, '-90:');
}
$anexo->anex_radi_nume = $nurad;
$anexo->usuaCodi = $usua_actu;
$anexo->depe_codi = $coddepe;
$anexo->anex_solo_lect = "'S'";
$anexo->anex_tamano = $tamano;
$anexo->anex_creador = "'" . $usua . "'";
$anexo->anex_desc = "Adjunto: " . $nombre;
$anexo->anex_nomb_archivo = $nombre;
$auxnumero = $anexo->obtenerMaximoNumeroAnexo($nurad);
$anexoCodigo = $anexo->anexarFilaRadicado($auxnumero);
$nomFinal = $anexo->get_anex_nomb_archivo();
//Guardar el archivo en la carpteta ya creada
$Grabar_path = $adjuntos . $nomFinal;
if (move_uploaded_file($tmporal, $ruta_raiz . $Grabar_path)) {
//si existen adjuntos los agregamos para enviarlos por correo
$mail->AddAttachment($ruta_raiz . $Grabar_path, $nombre);
} else {
$errores .= empty($errores) ? "&error=6" : '-6';
}
} else {
$errores .= empty($errores) ? "&error=5" : '-5';
}
}
}
function enviarCorreo($verradicado2, $correo, $usuario, $Nomb_usua, $Email_usua, $servidorSmtp, $adjuntos, $ext, $respuesta, $correocopia, $nurad, $rutaArchivo, $db)
{
$mail = new PHPMailer();
$cuerpo = "<br>El Departamento Nacional de Planeacion\r\n <br> ha dado respuesta a su solicitud No. " . $nurad . " mediante el oficio No." . $verradicado2 . ", la cual tambien puede ser consultada en el portal Web del DNP.</p>\r\n <br><br><b><center>Si no puede visualizar bien el correo, o no llegaron bien los Adjuntos, puede Consultarlos en :\r\n <a href='http://orfeo.dnp.gov.co/pqr/consulta.php?rad={$nurad}'>http://orfeo.dnp.gov.co/pqr/consulta.php</a><br><br><br>" . htmlspecialchars($respuesta) . "</b></center><BR>\r\n ";
$db = new ConnectionHandler("{$ruta_raiz}");
$db->conn->SetFetchMode(ADODB_FETCH_ASSOC);
$iSqlRadPadre = "Select RADI_PATH from radicado where radi_nume_radi={$nurad}";
$rsPath = $db->conn->Execute($iSqlRadPadre);
$pathPadre = $rsPath->fields["RADI_PATH"];
$mail->Mailer = "smtp";
$mail->From = $correo;
$mail->FromName = $usuario;
$mail->Host = $servidorSmtp;
$mail->Mailer = "smtp";
$mail->SMTPAuth = "true";
$mail->Subject = "Respuesta al radicado " . $nurad . " Departamento Nacional de Planeacion";
$mail->AltBody = "Para ver el mensaje, por favor use un visor de E-mail compatible!";
$mail->Body = $cuerpo;
$mail->IsHTML(true);
$mail->SMTPDebug = 0;
// enables SMTP debug information (for testing)
// 1 = errors and messages
// 2 = messages only
if (trim($Email_usua)) {
$emailSend = split(";", $Email_usua);
$enviadoA = "";
foreach ($emailSend as $mailDir) {
if ($mailDir) {
$mail->AddAddress(trim($mailDir));
}
echo ">" . $mailDir . " <br> ";
$enviadoA .= ">" . $mailDir . " <br> ";
}
}
$conCopiaA = "";
if (trim($correocopia)) {
$emailSend = split(";", $correocopia);
foreach ($emailSend as $mailDir) {
if ($mailDir) {
$mail->AddCC(trim($mailDir));
}
echo "CC> " . $mailDir . " <br> ";
$conCopiaA .= "CC>" . $mailDir . "<br>";
}
}
$conCopiaOcultaA = "";
if (trim($_POST["concopiaOculta"])) {
$emailSend = split(";", $_POST["concopiaOculta"]);
foreach ($emailSend as $mailDir) {
if ($mailDir) {
$mail->AddBCC(trim($mailDir));
}
echo "BCC> " . $mailDir . " <br> ";
$conCopiaOcultaA .= $mailDir;
}
}
$mail->AddReplyTo($correo, $usuario);
$posExt = stripos($pathPadre, ".");
$docRecibido = "Documento Recibido" . substr($pathPadre, $posExt, strlen($pathPadre));
//$docRecibido = str_replace("/".$nurad,"DocRecibido", $pathP);
$mail->AddAttachment("../bodega/" . $pathPadre, $docRecibido);
$mail->AddAttachment("../bodega/" . $rutaArchivo, "Respuesta" . $verradicado2 . ".pdf");
//$anex = new Anexo($db);
if ($adjuntos != NULL) {
$i = 0;
$usua = $_POST["usualog"];
$anexo = new Anexo($db);
while ($i < count($adjuntos)) {
if ($i < count($adjuntos) - 1) {
$anexoAno = date('Y');
$mail->AddAttachment("../bodega/tmp/" . $adjuntos[$i], $adjuntos[$i]);
$anexo->anex_radi_nume = $nurad;
$anexo->usuaCodi = 1;
$anexo->depe_codi = coddepe;
$anexo->anex_solo_lect = "'S'";
$anexo->anex_tamano = "0";
$anexo->anex_creador = "'" . $usua . "'";
$anexo->anex_desc = "Adjunto: " . str_replace($adjuntos[$i], "", $adjuntos[$i]);
$anexo->anex_nomb_archivo = $adjuntos[$i];
$auxnumero = $anexo->obtenerMaximoNumeroAnexo($nurad);
$anexoCodigo = $anexo->anexarFilaRadicado($auxnumero);
$file = $adjuntos[$i];
$destin = "../bodega/tmp/" . $file;
$newfile = "../bodega" . $anexo->anexoRutaArchivo;
if (!copy($destin, $newfile)) {
echo "<font color=RED><B>No se Pudo Copiar el archivo < {$file} > ...</B></FONT><br>";
}
}
$i++;
}
}
if (!$mail->Send()) {
echo "<BR><BR><CENTER><font color=RED><B>Error enviando correo: " . $mail->ErrorInfo . "<br>Destinatario: " . $Email_usua . "</B></FONT></CENTER><br>";
//return false;
$envioOk = "No";
} else {
$mail->ClearAddresses();
$mail->ClearAttachments();
$envioOk = "Si";
$sql_sgd_renv_codigo = "select SGD_RENV_CODIGO FROM SGD_RENV_REGENVIO ORDER BY SGD_RENV_CODIGO DESC ";
$rsRegenvio = $db->conn->SelectLimit($sql_sgd_renv_codigo, 2);
$nextval = $rsRegenvio->fields["SGD_RENV_CODIGO"];
$nextval++;
//$db->conn->debug= true;
$fechaActual = $db->conn->OffsetDate(0, $db->conn->sysTimeStamp);
$destinatarios = "Destino:" . $_POST["destinatario"] . " Copia:" . $_POST["concopia"];
$dependencia = $_POST["depecodi"];
$iSqlEnvio = "INSERT INTO SGD_RENV_REGENVIO(SGD_RENV_CODIGO\r\n ,SGD_FENV_CODIGO,SGD_RENV_FECH,RADI_NUME_SAL,SGD_RENV_DESTINO,SGD_RENV_MAIL\r\n ,SGD_RENV_PESO,SGD_RENV_VALOR,SGD_RENV_ESTADO,USUA_DOC,SGD_RENV_NOMBRE\r\n ,SGD_RENV_PLANILLA,SGD_RENV_FECH_SAL,DEPE_CODI,SGD_DIR_TIPO,RADI_NUME_GRUPO,SGD_RENV_DIR\r\n ,SGD_RENV_CANTIDAD,SGD_RENV_TIPO,SGD_RENV_OBSERVA\r\n ,SGD_RENV_GRUPO,SGD_RENV_VALORTOTAL,SGD_RENV_VALISTAMIENTO,SGD_RENV_VDESCUENTO,SGD_RENV_VADICIONAL,SGD_DEPE_GENERA,SGD_RENV_PAIS,SGD_RENV_NUMGUIA)\r\n VALUES ({$nextval} ,106 ,{$fechaActual}\r\n ,{$verradicado2},'{$destinatarios}'\r\n ,'{$destinatarios}','0','0',1," . $_SESSION["usua_doc"] . "\r\n ,'" . $_POST["destinatario"] . "', '0' ,{$fechaActual}\r\n ," . $dependencia . ", 1,{$verradicado2} ,'{$destinatarios}'\r\n ,1 ,1 ,'Envio Respuesta Rapida a Correo Electronico'\r\n ,{$verradicado2} ,'0','0','0','0'\r\n ,{$dependencia}\r\n ,'Colombia'\r\n ,'0')";
$rsRegenvio = $db->conn->query($iSqlEnvio);
return $envioOk;
}
}