// // /////////////////////////////////////////////////////////////////////////// if ($_POST['new_doc']) { $mensaje .= nuevo_documento($_POST); } if ($_POST['eli_doc']) { $mensaje .= eliminar_documento($_POST); } if ($_POST['edid_id']) { $mensaje .= editar_documento($_POST); } if ($_POST['newrev_doc']) { $mensaje .= nueva_revision($_POST); } if ($_POST['rev_vigor']) { $mensaje .= poner_en_vigor_rev($_POST, $_POST['estado_vigor']); } if ($_POST['elimrev_id']) { $mensaje .= eliminar_revision($_POST); } if ($_POST['edirev_id']) { $mensaje .= editar_revision($_POST); } if ($_POST['newdoc_real']) { $mensaje .= nuevo_documento_real($_POST); } if ($_POST['edireal_id']) { $mensaje .= editar_documento_real($_POST); } if ($_POST['eliminar_manual']) { $mensaje .= eliminar_manual($_POST);
function nueva_revision($datos) { $link = conectar($_SESSION[APLICACION_ . 'bbdd']); if ($datos['tipo_doc'] == 'MANUAL') { $sql = mysql_query("Insert into kz_tec_doc_revisiones \n\t\t(id, rev, soporte, realizado, aprobado, cambio, fecha, lugar,periodo, vigor, iddoc) \n\t\tvalues(null,'" . $datos['revision'] . "', '" . $datos['newrev_soporte'] . "', \n\t\t'" . $datos['newrev_realizado'] . "', \n\t\t'" . $datos['newrev_aprobado'] . "', \n\t\t'" . $datos['newrev_cambio'] . "',\n\t\t'" . $datos['newrev_fecha'] . "', \n\t\t'" . $datos['lugar'] . "', \n\t\t'" . $datos['anos'] . "," . $datos['meses'] . "',\n\t\t'" . $datos['vigor'] . "',\n\t\t'" . $datos['rev_doc'] . "')"); $sql2 = "SELECT max(idrev) as maxima_rev FROM kz_tec_doc_manual WHERE iddoc = " . $datos['rev_doc'] . ""; $rs = mysql_query($sql2); while ($row = mysql_fetch_assoc($rs)) { if ($row['maxima_rev']) { $sql3 = "SELECT * FROM kz_tec_doc_manual WHERE iddoc = " . $datos['rev_doc'] . " AND idrev = " . $row['maxima_rev'] . ""; $rs2 = mysql_query($sql3); while ($row2 = mysql_fetch_assoc($rs2)) { $sql4 = "Insert into kz_tec_doc_manual \n\t\t\t\t\t(id, presentacion_empresa, politica_calidad, alcance_sistema, referencia_procedimientos, mapa_procesos, organigrama_empresa, funciones_responsabilidades, iddoc, idrev, descripcion) \n\t\t\t\t\tvalues(null,'" . $row2['presentacion_empresa'] . "', '" . $row2['politica_calidad'] . "', \n\t\t\t\t\t'" . $row2['alcance_sistema'] . "', \n\t\t\t\t\t'" . $row2['referencia_procedimientos'] . "', \n\t\t\t\t\t'" . $row2['mapa_procesos'] . "',\n\t\t\t\t\t'" . $row2['organigrama_empresa'] . "', \n\t\t\t\t\t'" . $row2['funciones_responsabilidades'] . "',\n\t\t\t\t\t'" . $datos['rev_doc'] . "',\n\t\t\t\t\t'" . $datos['revision'] . "',\n\t\t\t\t\t'" . $row2['descripcion'] . "')"; if (!mysql_query($sql4)) { desconectar($link); echo "<script>alert('ERROR creando la revisión');</script>"; } else { $ultimo_id = mysql_insert_id(); desconectar($link); poner_en_vigor_rev(array("rev_iddoc" => $datos['newrev_id'], "rev_vigor" => $ultimo_id)); echo "<script>alert('Revisión creada correctamente');</script>"; } } } echo "<script>alert('Revisión creada correctamente');</script>"; } } else { if ($datos['tipo_doc'] == 'PROCEDIMIENTO') { $sql = mysql_query("Insert into kz_tec_doc_revisiones \n\t\t\t(id, rev, soporte, realizado, aprobado, cambio, fecha, lugar,periodo, vigor, iddoc) \n\t\t\tvalues(null,'" . $datos['revision'] . "', '" . $datos['newrev_soporte'] . "', \n\t\t\t'" . $datos['newrev_realizado'] . "', \n\t\t\t'" . $datos['newrev_aprobado'] . "', \n\t\t\t'" . $datos['newrev_cambio'] . "',\n\t\t\t'" . $datos['newrev_fecha'] . "', \n\t\t\t'" . $datos['lugar'] . "', \n\t\t\t'" . $datos['anos'] . "," . $datos['meses'] . "',\n\t\t\t'" . $datos['vigor'] . "',\n\t\t\t'" . $datos['rev_doc'] . "')"); $sql2 = "SELECT max(idrev) as maxima_rev FROM kz_tec_doc_procedimientos WHERE iddoc = " . $datos['rev_doc'] . ""; $rs = mysql_query($sql2); while ($row = mysql_fetch_assoc($rs)) { if ($row['maxima_rev']) { $sql3 = "SELECT * FROM kz_tec_doc_procedimientos WHERE iddoc = " . $datos['rev_doc'] . " AND idrev = " . $row['maxima_rev'] . ""; $rs2 = mysql_query($sql3); while ($row2 = mysql_fetch_assoc($rs2)) { $sql4 = "Insert into kz_tec_doc_procedimientos \n\t\t\t\t\t\t(id, objeto, alcance, responsabilidades, desarrollo, flujo_proceso, referencias, registros_asociados, iddoc, idrev, descripcion) \n\t\t\t\t\t\tvalues(null,'" . $row2['objeto'] . "', '" . $row2['alcance'] . "', \n\t\t\t\t\t\t'" . $row2['responsabilidades'] . "', \n\t\t\t\t\t\t'" . $row2['desarrollo'] . "', \n\t\t\t\t\t\t'" . $row2['flujo_proceso'] . "',\n\t\t\t\t\t\t'" . $row2['referencias'] . "', \n\t\t\t\t\t\t'" . $row2['registros_asociados'] . "',\n\t\t\t\t\t\t'" . $datos['rev_doc'] . "',\n\t\t\t\t\t\t'" . $datos['revision'] . "',\n\t\t\t\t\t\t'" . $row2['descripcion'] . "')"; if (!mysql_query($sql4)) { desconectar($link); echo "<script>alert('ERROR creando la " . html_entity_decode("revisión") . "');</script>"; } else { $ultimo_id = mysql_insert_id(); desconectar($link); poner_en_vigor_rev(array("rev_iddoc" => $datos['newrev_id'], "rev_vigor" => $ultimo_id)); echo "<script>alert('" . html_entity_decode("Revisión") . " creada correctamente');</script>"; } } } echo "<script>alert('" . html_entity_decode("Revisión") . " creada correctamente');</script>"; } } else { $sql = mysql_query("Insert into kz_tec_doc_revisiones \n\t\t\t(id, rev, soporte, realizado, aprobado, cambio, fecha, lugar,periodo, vigor, iddoc) \n\t\t\tvalues(null,'" . $datos['revision'] . "', '" . $datos['newrev_soporte'] . "', \n\t\t\t'" . $datos['newrev_realizado'] . "', \n\t\t\t'" . $datos['newrev_aprobado'] . "', \n\t\t\t'" . $datos['newrev_cambio'] . "',\n\t\t\t'" . $datos['newrev_fecha'] . "', \n\t\t\t'" . $datos['lugar'] . "', \n\t\t\t'" . $datos['anos'] . "," . $datos['meses'] . "',\n\t\t\t'" . $datos['vigor'] . "',\n\t\t\t'" . $datos['rev_doc'] . "')"); $sql2 = "SELECT max(idrev) as maxima_rev FROM kz_tec_doc_documentos_reales WHERE iddoc = " . $datos['rev_doc'] . ""; $rs = mysql_query($sql2); while ($row = mysql_fetch_assoc($rs)) { if ($row['maxima_rev']) { $sql3 = "SELECT * FROM kz_tec_doc_documentos_reales WHERE iddoc = " . $datos['rev_doc'] . " AND idrev = " . $row['maxima_rev'] . ""; $rs2 = mysql_query($sql3); while ($row2 = mysql_fetch_assoc($rs2)) { $sql4 = "Insert into kz_tec_doc_documentos_reales \n\t\t\t\t\t\t(id, iddoc, titulo, contenido, fecha, idrev) \n\t\t\t\t\t\tvalues(null,'" . $datos['rev_doc'] . "', '" . $row2['titulo'] . "', \n\t\t\t\t\t\t'" . $row2['contenido'] . "', \n\t\t\t\t\t\t'" . $row2['fecha'] . "',\n\t\t\t\t\t\t'" . $datos['revision'] . "')"; if (!mysql_query($sql4)) { desconectar($link); echo "<script>alert('ERROR creando la revisión');</script>"; } else { $ultimo_id = mysql_insert_id(); desconectar($link); poner_en_vigor_rev(array("rev_iddoc" => $datos['newrev_id'], "rev_vigor" => $ultimo_id)); echo "<script>alert('" . html_entity_decode("Revisión") . " creada correctamente');</script>"; } } } echo "<script>alert('" . html_entity_decode("Revisión") . " creada correctamente');</script>"; } } } }