query($sql); while ($arr = $rs_trad->FetchRow()) { $isql_inicial .= "USUA_PRAD_TP" . $arr['SGD_TRAD_CODIGO'] . ", "; $isql_final .= ${$cad . $arr['SGD_TRAD_CODIGO']} . ", "; } //////////////////////////////////////////////////////////////////////////// if ($modificaciones) { $isql_inicial = $isql_inicial . "USUA_PERM_MODIFICA, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . "USUA_PERM_MODIFICA, "; $isql_final = $isql_final . "0, "; } if ($impresion) { $isql_inicial = $isql_inicial . " USUA_PERM_IMPRESION, "; $isql_final = $isql_final . $impresion . ", "; } else { $isql_inicial = $isql_inicial . " USUA_PERM_IMPRESION, "; $isql_final = $isql_final . "0, "; } if (($s_anulaciones) && !($anulaciones)) { $isql_inicial = $isql_inicial . " SGD_PANU_CODI, "; $isql_final = $isql_final . "1, "; } if (($anulaciones) && !($s_anulaciones)) { $isql_inicial = $isql_inicial . " SGD_PANU_CODI, "; $isql_final = $isql_final . "2, "; } if (($s_anulaciones) && ($anulaciones)) { $isql_inicial = $isql_inicial . " SGD_PANU_CODI, "; $isql_final = $isql_final . "3, "; } if ($adm_archivo) { $isql_inicial = $isql_inicial . " USUA_ADMIN_ARCHIVO, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . " USUA_ADMIN_ARCHIVO, "; $isql_final = $isql_final . "0, "; } if ($dev_correo) { $isql_inicial = $isql_inicial . " USUA_PERM_DEV, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . " USUA_PERM_DEV, "; $isql_final = $isql_final . "0, "; } if ($adm_sistema) { $isql_inicial = $isql_inicial . " USUA_ADMIN_SISTEMA, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . " USUA_ADMIN_SISTEMA, "; $isql_final = $isql_final . "0, "; } if ($usua_nuevoM) { $isql_inicial = $isql_inicial . " USUA_NUEVO, "; $isql_final = $isql_final . "0, "; } else { $isql_inicial = $isql_inicial . " USUA_NUEVO, "; $isql_final = $isql_final . "1, "; } if ($env_correo) { $isql_inicial = $isql_inicial . " USUA_PERM_ENVIOS, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . " USUA_PERM_ENVIOS, "; $isql_final = $isql_final . "0, "; } if ($estadisticas) { $isql_inicial = $isql_inicial . " SGD_PERM_ESTADISTICA, "; $isql_final = $isql_final . $estadisticas . ", "; } else { $isql_inicial = $isql_inicial . " SGD_PERM_ESTADISTICA, "; $isql_final = $isql_final . "0, "; } if ($usua_activo) { $isql_inicial = $isql_inicial . " USUA_ESTA, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . " USUA_ESTA, "; $isql_final = $isql_final . "0, "; } if ($tablas) { $isql_inicial = $isql_inicial . " USUA_PERM_TRD, "; //by skina //permiso 0, 1-->listado trd, 2-->todo $isql_final = $isql_final . $tablas . ", "; } else { $isql_inicial = $isql_inicial . " USUA_PERM_TRD, "; $isql_final = $isql_final . "0, "; } if ($usua_publico) { $isql_inicial = $isql_inicial . " USUARIO_PUBLICO, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . " USUARIO_PUBLICO, "; $isql_final = $isql_final . "0, "; } if ($reasigna) { $isql_inicial = $isql_inicial . " USUARIO_REASIGNAR, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . " USUARIO_REASIGNAR, "; $isql_final = $isql_final . "0, "; } if ($firma) { $isql_inicial = $isql_inicial . " USUA_PERM_FIRMA, "; $isql_final = $isql_final . $firma . ", "; } else { $isql_inicial = $isql_inicial . " USUA_PERM_FIRMA, "; $isql_final = $isql_final . "0, "; } if ($notifica) { $isql_inicial = $isql_inicial . " USUA_PERM_NOTIFICA, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . " USUA_PERM_NOTIFICA, "; $isql_final = $isql_final . "0, "; } /* Modificacio SKina Permiso de uso de lector de pantallas 20-NOV-2013 INCI */ if ($lectpant) { $isql_inicial = $isql_inicial . " USUA_PERM_ACCESI, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . " USUA_PERM_ACCESI, "; $isql_final = $isql_final . "0, "; } /* Modificacio SKina Permiso Agregar contactos 31-JULIO-2014 EAAAE */ if ($usua_perm_agrcontacto) { $isql_inicial = $isql_inicial . " USUA_PERM_AGRCONTACTO, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . " USUA_PERM_AGRCONTACTO, "; $isql_final = $isql_final . "0, "; } if ($usuaPermRadEmail) { $isql_inicial = $isql_inicial . " USUA_PERM_RADEMAIL, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . " USUA_PERM_RADEMAIL, "; $isql_final = $isql_final . "0, "; } if ($preRadica) { $isql_inicial = $isql_inicial . "USUA_PERM_PRERADICADO, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . "USUA_PERM_PRERADICADO, "; $isql_final = $isql_final . "0, "; } if ($permDescargaDocumentos) { $isql_inicial = $isql_inicial . "DESCARGAR_DOCUMENTOS, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . "DESCARGAR_DOCUMENTOS, "; $isql_final = $isql_final . "0, "; } if ($autenticaLDAP) { $isql_inicial = $isql_inicial . " USUA_AUTH_LDAP, "; $isql_final = $isql_final . "1, "; } else { $isql_inicial = $isql_inicial . " USUA_AUTH_LDAP, "; $isql_final = $isql_final . "0, "; } if ($usua_permexp) { $isql_inicial = $isql_inicial . " USUA_PERM_EXPEDIENTE, "; $isql_final = $isql_final . $usua_permexp . ", "; } else { $isql_inicial = $isql_inicial . " USUA_PERM_EXPEDIENTE, "; $isql_final = $isql_final . "0, "; } //Nivel de Seguridad if (!$nivel) $nivel = 1; $isql_inicial = $isql_inicial . " CODI_NIVEL) "; $isql_final = $isql_final . $nivel . ") "; } ?>