client/Seguridad/Permiso.vb

4653 lines
194 KiB
VB.net
Raw Normal View History

'Noviembre 2005
'No<4E> S<>nchez
'CONDORBS
'Importacion de espacios de nombres o clases
Imports CLIENTE.clsComplejo 'permite conectarme a la base de datos y establer parametros
Imports System.Data.SqlClient 'para manejar objetos de datos SQL
Imports CLIENTE.Registro 'clase que me permite encriptar el password
Imports System.Data 'Para manejar objetos de estructuras de datos
'Imports CLIENTE.clBusqueda 'para realizar busqueda en un registro
'Imports CLIENTE.clOcultarColumna 'Permite ocultar columnas
Imports CLIENTE.Perfil
Public Class Permiso
Inherits System.Windows.Forms.Form
Dim liperfil As Integer = 0
Friend WithEvents ChkTodosReporte As CheckBox
Friend WithEvents ChkTodosCatalogos As CheckBox
Friend WithEvents CheckBox2 As CheckBox
Friend WithEvents ChkModulos As CheckBox
Friend WithEvents ChkActualizadores As CheckBox
Friend WithEvents chkTodosSeguridad As CheckBox
Friend WithEvents ChkListaRestringidas As CheckBox
Friend WithEvents chkAsesoria As CheckBox
Friend WithEvents chkVigenciaAlertas As CheckBox
Friend WithEvents chkVigDoctos As CheckBox
Friend WithEvents chkRevExpediente As CheckBox
Friend WithEvents chkAVigDoctos As CheckBox
Friend WithEvents chkRevExp As CheckBox
Friend WithEvents chkparamsgen As CheckBox
Friend WithEvents chkObjCta As CheckBox
Friend WithEvents chkBoxParamMR As CheckBox
2020-01-20 18:14:59 -06:00
Friend WithEvents CheckBox1 As CheckBox
Friend WithEvents chkCdOperacion As CheckBox
Friend WithEvents chkNacionalidad As CheckBox
Friend WithEvents chkRiesgoPPE As CheckBox
Friend WithEvents chkCatsEBR As CheckBox
Friend WithEvents chkEstatusCta As CheckBox
2020-03-10 11:10:16 -06:00
Friend WithEvents chkReporteJ13 As CheckBox
Friend WithEvents chkReporteJ14 As CheckBox
#Region " C<>digo generado por el Dise<73>ador de Windows Forms "
Dim esCarga As Boolean
Public Sub New()
MyBase.New()
'El Dise<73>ador de Windows Forms requiere esta llamada.
InitializeComponent()
esCarga = False
'Agregar cualquier inicializaci<63>n despu<70>s de la llamada a InitializeComponent()
End Sub
'Form reemplaza a Dispose para limpiar la lista de componentes.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'Requerido por el Dise<73>ador de Windows Forms
Private components As System.ComponentModel.IContainer
'NOTA: el Dise<73>ador de Windows Forms requiere el siguiente procedimiento
'Puede modificarse utilizando el Dise<73>ador de Windows Forms.
'No lo modifique con el editor de c<>digo.
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
Friend WithEvents btnGuardar As System.Windows.Forms.ToolBarButton
Friend WithEvents btnSalir As System.Windows.Forms.ToolBarButton
Friend WithEvents Reportes As System.Windows.Forms.TabPage
Friend WithEvents Actualizadores As System.Windows.Forms.TabPage
Friend WithEvents seguridad As System.Windows.Forms.TabPage
Friend WithEvents Catalogos As System.Windows.Forms.TabPage
Friend WithEvents TabControl3 As System.Windows.Forms.TabControl
Friend WithEvents tlbPermiso As System.Windows.Forms.ToolBar
Friend WithEvents txtNombrePerfil As System.Windows.Forms.TextBox
Friend WithEvents lblIdPerfil As System.Windows.Forms.Label
Friend WithEvents ListaRestringuida As System.Windows.Forms.TabPage
Friend WithEvents GroupBox8 As System.Windows.Forms.GroupBox
Friend WithEvents GroupBox9 As System.Windows.Forms.GroupBox
Friend WithEvents GroupBox10 As System.Windows.Forms.GroupBox
Friend WithEvents GroupBox11 As System.Windows.Forms.GroupBox
Friend WithEvents TABServer As System.Windows.Forms.TabPage
Friend WithEvents GroupBox3 As System.Windows.Forms.GroupBox
Friend WithEvents BntSalie As System.Windows.Forms.Button
Friend WithEvents BtnAlta As System.Windows.Forms.Button
Friend WithEvents KYC As System.Windows.Forms.TabPage
Friend WithEvents GroupBox4 As System.Windows.Forms.GroupBox
Friend WithEvents chkKYC As System.Windows.Forms.CheckBox
Friend WithEvents chkCteSinKYC As System.Windows.Forms.CheckBox
Friend WithEvents chkAlarmaKYC As System.Windows.Forms.CheckBox
Friend WithEvents Modulos As System.Windows.Forms.TabPage
Friend WithEvents GroupBox5 As System.Windows.Forms.GroupBox
Friend WithEvents ChkModuloServer As System.Windows.Forms.CheckBox
Friend WithEvents ChkModuloKYC As System.Windows.Forms.CheckBox
Friend WithEvents ChkModuloClientes As System.Windows.Forms.CheckBox
Private WithEvents ShapeContainer2 As PowerPacks.ShapeContainer
Private WithEvents LineShape26 As PowerPacks.LineShape
Private WithEvents LineShape25 As PowerPacks.LineShape
Private WithEvents LineShape24 As PowerPacks.LineShape
Private WithEvents LineShape23 As PowerPacks.LineShape
Private WithEvents LineShape22 As PowerPacks.LineShape
Private WithEvents LineShape21 As PowerPacks.LineShape
Private WithEvents LineShape20 As PowerPacks.LineShape
Private WithEvents LineShape19 As PowerPacks.LineShape
Private WithEvents LineShape17 As PowerPacks.LineShape
Private WithEvents LineShape16 As PowerPacks.LineShape
Private WithEvents LineShape15 As PowerPacks.LineShape
Private WithEvents LineShape14 As PowerPacks.LineShape
Private WithEvents LineShape13 As PowerPacks.LineShape
Private WithEvents LineShape12 As PowerPacks.LineShape
Friend WithEvents gbxAlarmas As System.Windows.Forms.GroupBox
Friend WithEvents chkReproceso As System.Windows.Forms.CheckBox
Friend WithEvents ChkInuS As System.Windows.Forms.CheckBox
Friend WithEvents ChkrelevantesS As System.Windows.Forms.CheckBox
Friend WithEvents ChkFraccS As System.Windows.Forms.CheckBox
Friend WithEvents gbxContCargas As System.Windows.Forms.GroupBox
Friend WithEvents chkListas As System.Windows.Forms.CheckBox
Friend WithEvents chkTCambio As System.Windows.Forms.CheckBox
Friend WithEvents chktran As System.Windows.Forms.CheckBox
Friend WithEvents gbxProcs As System.Windows.Forms.GroupBox
Friend WithEvents ChkListasS As System.Windows.Forms.CheckBox
Friend WithEvents chkPerfilTranServer As System.Windows.Forms.CheckBox
Friend WithEvents chkConfigCarga As System.Windows.Forms.CheckBox
Friend WithEvents gbxLogs As System.Windows.Forms.GroupBox
Friend WithEvents chkAuditS As System.Windows.Forms.CheckBox
Friend WithEvents chkLogs As System.Windows.Forms.CheckBox
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents Label4 As System.Windows.Forms.Label
Friend WithEvents Label5 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents Label6 As System.Windows.Forms.Label
Friend WithEvents Label7 As System.Windows.Forms.Label
Friend WithEvents KYCControles As System.Windows.Forms.TabPage
Friend WithEvents GroupBox6 As System.Windows.Forms.GroupBox
Friend WithEvents chkKYCEstatus As System.Windows.Forms.CheckBox
Friend WithEvents lstAutorizados As System.Windows.Forms.ListBox
Friend WithEvents Label10 As System.Windows.Forms.Label
Friend WithEvents lstDisponibles As System.Windows.Forms.ListBox
Friend WithEvents Label9 As System.Windows.Forms.Label
Friend WithEvents pnlPermisosKYCEstatus As System.Windows.Forms.Panel
Friend WithEvents btnBorraUno As System.Windows.Forms.Button
Friend WithEvents btnPasaUno As System.Windows.Forms.Button
Friend WithEvents btnBorraTodos As System.Windows.Forms.Button
Friend WithEvents btnPasaTodos As System.Windows.Forms.Button
Friend WithEvents tabProcesoHit As System.Windows.Forms.TabPage
Friend WithEvents GroupBox13 As System.Windows.Forms.GroupBox
Friend WithEvents chkIngrDep As System.Windows.Forms.CheckBox
Friend WithEvents Label1 As System.Windows.Forms.Label
Private WithEvents ShapeContainer1 As PowerPacks.ShapeContainer
Private WithEvents LineShape8 As PowerPacks.LineShape
Private WithEvents LineShape4 As PowerPacks.LineShape
Private WithEvents LineShape3 As PowerPacks.LineShape
Private WithEvents LineShape2 As PowerPacks.LineShape
Private WithEvents LineShape1 As PowerPacks.LineShape
Friend WithEvents chkAcumuladoMen As System.Windows.Forms.CheckBox
Friend WithEvents chkTIF As System.Windows.Forms.CheckBox
Friend WithEvents chkreportdlls As System.Windows.Forms.CheckBox
Friend WithEvents chkCheques As System.Windows.Forms.CheckBox
Private WithEvents LineShape5 As PowerPacks.LineShape
Private WithEvents LineShape6 As PowerPacks.LineShape
Friend WithEvents chkActVul As System.Windows.Forms.CheckBox
Friend WithEvents chkConcepto As System.Windows.Forms.CheckBox
Friend WithEvents chkDesRec As System.Windows.Forms.CheckBox
Friend WithEvents chkID As System.Windows.Forms.CheckBox
Friend WithEvents chkInstrument As System.Windows.Forms.CheckBox
Friend WithEvents chkFigLegal As System.Windows.Forms.CheckBox
Friend WithEvents chkTipoPer As System.Windows.Forms.CheckBox
Friend WithEvents chkEstrucCorp As System.Windows.Forms.CheckBox
Friend WithEvents chkTipoDom As System.Windows.Forms.CheckBox
Friend WithEvents chkTipoCuenta As System.Windows.Forms.CheckBox
Friend WithEvents chkProcRec As System.Windows.Forms.CheckBox
Friend WithEvents chkParents As System.Windows.Forms.CheckBox
Friend WithEvents chkTransfer As System.Windows.Forms.CheckBox
Friend WithEvents chkFuentIng As System.Windows.Forms.CheckBox
Friend WithEvents chkSucs As System.Windows.Forms.CheckBox
Private WithEvents LineShape30 As PowerPacks.LineShape
Private WithEvents LineShape29 As PowerPacks.LineShape
Private WithEvents LineShape11 As PowerPacks.LineShape
Private WithEvents LineShape10 As PowerPacks.LineShape
Private WithEvents LineShape9 As PowerPacks.LineShape
Private WithEvents LineShape7 As PowerPacks.LineShape
Private WithEvents LineShape38 As PowerPacks.LineShape
Private WithEvents LineShape37 As PowerPacks.LineShape
Private WithEvents LineShape36 As PowerPacks.LineShape
Private WithEvents LineShape35 As PowerPacks.LineShape
Private WithEvents LineShape34 As PowerPacks.LineShape
Private WithEvents LineShape33 As PowerPacks.LineShape
Private WithEvents LineShape32 As PowerPacks.LineShape
Private WithEvents LineShape31 As PowerPacks.LineShape
Friend WithEvents GroupBox7 As System.Windows.Forms.GroupBox
Friend WithEvents chkAcumuladoMenS As System.Windows.Forms.CheckBox
Friend WithEvents ChkRiesgo As System.Windows.Forms.CheckBox
Friend WithEvents chkTransFondos As System.Windows.Forms.CheckBox
Friend WithEvents chkDllsEfec As System.Windows.Forms.CheckBox
Friend WithEvents chkPatMizuho As System.Windows.Forms.CheckBox
Friend WithEvents chkKYCEditReg As System.Windows.Forms.CheckBox
Friend WithEvents cmbKYCESTATUS2 As System.Windows.Forms.ComboBox
Friend WithEvents cmbKYCESTATUS1 As System.Windows.Forms.ComboBox
Friend WithEvents btnAdd2 As System.Windows.Forms.Button
Friend WithEvents btnAdd1 As System.Windows.Forms.Button
Friend WithEvents btnQuitar2 As System.Windows.Forms.Button
Friend WithEvents btnQuitar1 As System.Windows.Forms.Button
Friend WithEvents chkGrupoRiesgo As System.Windows.Forms.CheckBox
Private WithEvents LineShape39 As PowerPacks.LineShape
Friend WithEvents chkInterInfo As System.Windows.Forms.CheckBox
Friend WithEvents chkAvisos As System.Windows.Forms.CheckBox
Friend WithEvents chkChequesServer As System.Windows.Forms.CheckBox
Friend WithEvents chkComp As System.Windows.Forms.CheckBox
Friend WithEvents chkReviewer As System.Windows.Forms.CheckBox
Friend WithEvents chkInusuales As System.Windows.Forms.CheckBox
Friend WithEvents chkDormant As System.Windows.Forms.CheckBox
Friend WithEvents chkRelevantes As System.Windows.Forms.CheckBox
Friend WithEvents chkTransacciones As System.Windows.Forms.CheckBox
Friend WithEvents chkOperInusualesF As System.Windows.Forms.CheckBox
Friend WithEvents chkOperPreocupantes As System.Windows.Forms.CheckBox
Friend WithEvents chkFormatoCNBV As System.Windows.Forms.CheckBox
Friend WithEvents chkTodosProductos As System.Windows.Forms.CheckBox
Friend WithEvents chkOperInusuales As System.Windows.Forms.CheckBox
Friend WithEvents chkNueva As System.Windows.Forms.CheckBox
Friend WithEvents chkRepAnom As System.Windows.Forms.CheckBox
Friend WithEvents chkPerfTran As System.Windows.Forms.CheckBox
Friend WithEvents chkReportes As System.Windows.Forms.CheckBox
Private WithEvents LineShape28 As PowerPacks.LineShape
Friend WithEvents chkAsigGrpo As System.Windows.Forms.CheckBox
Friend WithEvents ParametrosDeGrupoMenu As System.Windows.Forms.CheckBox
Friend WithEvents chkTipoCambio As System.Windows.Forms.CheckBox
Friend WithEvents chkActual As System.Windows.Forms.CheckBox
Friend WithEvents chkCatalogos As System.Windows.Forms.CheckBox
Friend WithEvents chkCanales As System.Windows.Forms.CheckBox
Friend WithEvents chkSubproductos As System.Windows.Forms.CheckBox
Friend WithEvents chkIntitucional As System.Windows.Forms.CheckBox
Friend WithEvents chkProductos As System.Windows.Forms.CheckBox
Friend WithEvents ChkInsFin As System.Windows.Forms.CheckBox
Friend WithEvents chkActEco As System.Windows.Forms.CheckBox
Friend WithEvents chkMoneda As System.Windows.Forms.CheckBox
Friend WithEvents chkOficiales As System.Windows.Forms.CheckBox
Friend WithEvents chkInstrumMon As System.Windows.Forms.CheckBox
Friend WithEvents chkTipOp As System.Windows.Forms.CheckBox
Friend WithEvents chkFuncionarios2 As System.Windows.Forms.CheckBox
Friend WithEvents chkEstado As System.Windows.Forms.CheckBox
Friend WithEvents chkConf As System.Windows.Forms.CheckBox
Friend WithEvents chkPais As System.Windows.Forms.CheckBox
Friend WithEvents chkOrgInter As System.Windows.Forms.CheckBox
Friend WithEvents ChkMant As System.Windows.Forms.CheckBox
Friend WithEvents chkSeguridad As System.Windows.Forms.CheckBox
Friend WithEvents chkConfigClaves As System.Windows.Forms.CheckBox
Friend WithEvents chkPerfil As System.Windows.Forms.CheckBox
Friend WithEvents chkAuditoria As System.Windows.Forms.CheckBox
Friend WithEvents chkUsuario As System.Windows.Forms.CheckBox
Friend WithEvents ChkPersonas As System.Windows.Forms.CheckBox
Friend WithEvents chkClientes As System.Windows.Forms.CheckBox
Friend WithEvents chkListasrest As System.Windows.Forms.CheckBox
Friend WithEvents chkProcesoHIT As System.Windows.Forms.CheckBox
Friend WithEvents chkserver As System.Windows.Forms.CheckBox
Friend WithEvents chkPatronesCat As System.Windows.Forms.CheckBox
Friend WithEvents chkKYCNuevoCliente As System.Windows.Forms.CheckBox
Friend WithEvents chkCalificacionOC As System.Windows.Forms.CheckBox
Friend WithEvents SIARA As System.Windows.Forms.TabPage
Friend WithEvents GroupBox12 As System.Windows.Forms.GroupBox
Friend WithEvents chkImportarXML As System.Windows.Forms.CheckBox
Friend WithEvents chkbusquedaconclt As System.Windows.Forms.CheckBox
Friend WithEvents chkGenResp As System.Windows.Forms.CheckBox
Friend WithEvents chkCapturaManual As System.Windows.Forms.CheckBox
Friend WithEvents chkLogCarga As System.Windows.Forms.CheckBox
Friend WithEvents chkLogOperResp As System.Windows.Forms.CheckBox
Friend WithEvents chkCASFIM As System.Windows.Forms.CheckBox
Private WithEvents LineShape40 As PowerPacks.LineShape
Friend WithEvents chkLocalidad As System.Windows.Forms.CheckBox
Friend WithEvents chkSectorEco As System.Windows.Forms.CheckBox
Friend WithEvents chkInuSnT As System.Windows.Forms.CheckBox
Private WithEvents LineShape41 As PowerPacks.LineShape
Friend WithEvents chkPreoCnT As System.Windows.Forms.CheckBox
Friend WithEvents chkPreoSnT As System.Windows.Forms.CheckBox
Private WithEvents LineShape44 As PowerPacks.LineShape
Private WithEvents LineShape43 As PowerPacks.LineShape
Private WithEvents LineShape42 As PowerPacks.LineShape
Friend WithEvents BtnImprimir As System.Windows.Forms.Button
Friend WithEvents chkCalifRiesgoABC As System.Windows.Forms.CheckBox
Friend WithEvents chkControlAcceso As System.Windows.Forms.CheckBox
Friend WithEvents chkCuentasUSD As System.Windows.Forms.CheckBox
Friend WithEvents chkPropositoCuenta As System.Windows.Forms.CheckBox
Friend WithEvents chkRelacion As System.Windows.Forms.CheckBox
Friend WithEvents chkRazonUSD As System.Windows.Forms.CheckBox
Friend WithEvents chkRazonMX As System.Windows.Forms.CheckBox
Friend WithEvents chkListaSPID As System.Windows.Forms.CheckBox
Friend WithEvents chkRCuentaRel As System.Windows.Forms.CheckBox
Friend WithEvents chkRPerfilTran As System.Windows.Forms.CheckBox
Private WithEvents panel2 As Panel
Private WithEvents Img_logoCabecera As PictureBox
Friend WithEvents DesHeader As Label
Private WithEvents panel3 As Panel
Friend WithEvents Label11 As Label
Friend WithEvents lblFooter As Label
Private WithEvents LineShape27 As PowerPacks.LineShape
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Permiso))
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.txtNombrePerfil = New System.Windows.Forms.TextBox()
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
Me.TabControl3 = New System.Windows.Forms.TabControl()
Me.Modulos = New System.Windows.Forms.TabPage()
Me.ChkModulos = New System.Windows.Forms.CheckBox()
Me.GroupBox5 = New System.Windows.Forms.GroupBox()
Me.ChkModuloServer = New System.Windows.Forms.CheckBox()
Me.ChkModuloKYC = New System.Windows.Forms.CheckBox()
Me.ChkModuloClientes = New System.Windows.Forms.CheckBox()
Me.Reportes = New System.Windows.Forms.TabPage()
Me.ChkTodosReporte = New System.Windows.Forms.CheckBox()
Me.GroupBox13 = New System.Windows.Forms.GroupBox()
2020-03-10 11:10:16 -06:00
Me.chkReporteJ14 = New System.Windows.Forms.CheckBox()
Me.chkReporteJ13 = New System.Windows.Forms.CheckBox()
2020-01-20 18:14:59 -06:00
Me.CheckBox1 = New System.Windows.Forms.CheckBox()
Me.chkVigenciaAlertas = New System.Windows.Forms.CheckBox()
Me.chkAsesoria = New System.Windows.Forms.CheckBox()
Me.chkPreoSnT = New System.Windows.Forms.CheckBox()
Me.chkPreoCnT = New System.Windows.Forms.CheckBox()
Me.chkInuSnT = New System.Windows.Forms.CheckBox()
Me.chkReportes = New System.Windows.Forms.CheckBox()
Me.chkPerfTran = New System.Windows.Forms.CheckBox()
Me.chkDormant = New System.Windows.Forms.CheckBox()
Me.chkRelevantes = New System.Windows.Forms.CheckBox()
Me.chkTransacciones = New System.Windows.Forms.CheckBox()
Me.chkOperInusualesF = New System.Windows.Forms.CheckBox()
Me.chkOperPreocupantes = New System.Windows.Forms.CheckBox()
Me.chkFormatoCNBV = New System.Windows.Forms.CheckBox()
Me.chkTodosProductos = New System.Windows.Forms.CheckBox()
Me.chkOperInusuales = New System.Windows.Forms.CheckBox()
Me.chkNueva = New System.Windows.Forms.CheckBox()
Me.chkRepAnom = New System.Windows.Forms.CheckBox()
Me.chkInusuales = New System.Windows.Forms.CheckBox()
Me.chkInterInfo = New System.Windows.Forms.CheckBox()
Me.chkAvisos = New System.Windows.Forms.CheckBox()
Me.chkCheques = New System.Windows.Forms.CheckBox()
Me.chkreportdlls = New System.Windows.Forms.CheckBox()
Me.chkTIF = New System.Windows.Forms.CheckBox()
Me.chkAcumuladoMen = New System.Windows.Forms.CheckBox()
Me.chkIngrDep = New System.Windows.Forms.CheckBox()
Me.Label1 = New System.Windows.Forms.Label()
Me.ShapeContainer1 = New Microsoft.VisualBasic.PowerPacks.ShapeContainer()
Me.LineShape44 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape43 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape42 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape41 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape28 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape8 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape4 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape3 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape2 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape1 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.Actualizadores = New System.Windows.Forms.TabPage()
Me.ChkActualizadores = New System.Windows.Forms.CheckBox()
Me.GroupBox8 = New System.Windows.Forms.GroupBox()
Me.chkparamsgen = New System.Windows.Forms.CheckBox()
Me.chkActual = New System.Windows.Forms.CheckBox()
Me.chkAsigGrpo = New System.Windows.Forms.CheckBox()
Me.ParametrosDeGrupoMenu = New System.Windows.Forms.CheckBox()
Me.chkTipoCambio = New System.Windows.Forms.CheckBox()
Me.Label4 = New System.Windows.Forms.Label()
Me.Catalogos = New System.Windows.Forms.TabPage()
Me.ChkTodosCatalogos = New System.Windows.Forms.CheckBox()
Me.GroupBox10 = New System.Windows.Forms.GroupBox()
2020-03-10 11:10:16 -06:00
Me.chkEstatusCta = New System.Windows.Forms.CheckBox()
2020-01-20 18:14:59 -06:00
Me.chkCatsEBR = New System.Windows.Forms.CheckBox()
Me.chkRazonMX = New System.Windows.Forms.CheckBox()
2020-01-20 18:14:59 -06:00
Me.chkBoxParamMR = New System.Windows.Forms.CheckBox()
Me.chkRiesgoPPE = New System.Windows.Forms.CheckBox()
Me.chkCdOperacion = New System.Windows.Forms.CheckBox()
Me.chkNacionalidad = New System.Windows.Forms.CheckBox()
Me.chkObjCta = New System.Windows.Forms.CheckBox()
Me.chkRelacion = New System.Windows.Forms.CheckBox()
Me.chkPropositoCuenta = New System.Windows.Forms.CheckBox()
Me.chkCASFIM = New System.Windows.Forms.CheckBox()
Me.chkRazonUSD = New System.Windows.Forms.CheckBox()
Me.chkLocalidad = New System.Windows.Forms.CheckBox()
Me.chkPatronesCat = New System.Windows.Forms.CheckBox()
Me.ChkMant = New System.Windows.Forms.CheckBox()
Me.chkEstado = New System.Windows.Forms.CheckBox()
Me.chkConf = New System.Windows.Forms.CheckBox()
Me.chkCuentasUSD = New System.Windows.Forms.CheckBox()
Me.chkConcepto = New System.Windows.Forms.CheckBox()
Me.chkPais = New System.Windows.Forms.CheckBox()
Me.chkOrgInter = New System.Windows.Forms.CheckBox()
Me.chkSectorEco = New System.Windows.Forms.CheckBox()
Me.ChkInsFin = New System.Windows.Forms.CheckBox()
Me.chkActEco = New System.Windows.Forms.CheckBox()
Me.chkMoneda = New System.Windows.Forms.CheckBox()
Me.chkOficiales = New System.Windows.Forms.CheckBox()
Me.chkInstrumMon = New System.Windows.Forms.CheckBox()
Me.chkTipOp = New System.Windows.Forms.CheckBox()
Me.chkCanales = New System.Windows.Forms.CheckBox()
Me.chkFuncionarios2 = New System.Windows.Forms.CheckBox()
Me.chkSubproductos = New System.Windows.Forms.CheckBox()
Me.chkIntitucional = New System.Windows.Forms.CheckBox()
Me.chkProductos = New System.Windows.Forms.CheckBox()
Me.chkCatalogos = New System.Windows.Forms.CheckBox()
Me.chkGrupoRiesgo = New System.Windows.Forms.CheckBox()
Me.chkFuentIng = New System.Windows.Forms.CheckBox()
Me.chkSucs = New System.Windows.Forms.CheckBox()
Me.chkFigLegal = New System.Windows.Forms.CheckBox()
Me.chkTipoPer = New System.Windows.Forms.CheckBox()
Me.chkEstrucCorp = New System.Windows.Forms.CheckBox()
Me.chkTipoDom = New System.Windows.Forms.CheckBox()
Me.chkTipoCuenta = New System.Windows.Forms.CheckBox()
Me.chkProcRec = New System.Windows.Forms.CheckBox()
Me.chkParents = New System.Windows.Forms.CheckBox()
Me.chkTransfer = New System.Windows.Forms.CheckBox()
Me.chkInstrument = New System.Windows.Forms.CheckBox()
Me.chkID = New System.Windows.Forms.CheckBox()
Me.chkDesRec = New System.Windows.Forms.CheckBox()
Me.chkActVul = New System.Windows.Forms.CheckBox()
Me.Label2 = New System.Windows.Forms.Label()
Me.ShapeContainer2 = New Microsoft.VisualBasic.PowerPacks.ShapeContainer()
Me.LineShape40 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape39 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape38 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape37 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape36 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape35 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape34 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape33 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape32 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape31 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape30 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape29 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape11 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape10 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape9 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape7 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape6 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape5 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape27 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape26 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape25 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape24 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape23 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape22 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape21 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape20 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape19 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape17 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape16 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape15 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape14 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape13 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.LineShape12 = New Microsoft.VisualBasic.PowerPacks.LineShape()
Me.seguridad = New System.Windows.Forms.TabPage()
Me.chkTodosSeguridad = New System.Windows.Forms.CheckBox()
Me.GroupBox9 = New System.Windows.Forms.GroupBox()
Me.chkControlAcceso = New System.Windows.Forms.CheckBox()
Me.chkConfigClaves = New System.Windows.Forms.CheckBox()
Me.chkPerfil = New System.Windows.Forms.CheckBox()
Me.chkAuditoria = New System.Windows.Forms.CheckBox()
Me.chkUsuario = New System.Windows.Forms.CheckBox()
Me.chkSeguridad = New System.Windows.Forms.CheckBox()
Me.Label5 = New System.Windows.Forms.Label()
Me.ListaRestringuida = New System.Windows.Forms.TabPage()
Me.ChkListaRestringidas = New System.Windows.Forms.CheckBox()
Me.GroupBox11 = New System.Windows.Forms.GroupBox()
Me.chkListaSPID = New System.Windows.Forms.CheckBox()
Me.ChkPersonas = New System.Windows.Forms.CheckBox()
Me.chkClientes = New System.Windows.Forms.CheckBox()
Me.chkListasrest = New System.Windows.Forms.CheckBox()
Me.Label6 = New System.Windows.Forms.Label()
Me.tabProcesoHit = New System.Windows.Forms.TabPage()
Me.GroupBox7 = New System.Windows.Forms.GroupBox()
Me.chkProcesoHIT = New System.Windows.Forms.CheckBox()
Me.chkComp = New System.Windows.Forms.CheckBox()
Me.chkReviewer = New System.Windows.Forms.CheckBox()
Me.TABServer = New System.Windows.Forms.TabPage()
Me.CheckBox2 = New System.Windows.Forms.CheckBox()
Me.GroupBox3 = New System.Windows.Forms.GroupBox()
Me.chkserver = New System.Windows.Forms.CheckBox()
Me.Label7 = New System.Windows.Forms.Label()
Me.gbxLogs = New System.Windows.Forms.GroupBox()
Me.chkRCuentaRel = New System.Windows.Forms.CheckBox()
Me.chkAuditS = New System.Windows.Forms.CheckBox()
Me.chkRPerfilTran = New System.Windows.Forms.CheckBox()
Me.chkLogs = New System.Windows.Forms.CheckBox()
Me.chkAcumuladoMenS = New System.Windows.Forms.CheckBox()
Me.chkChequesServer = New System.Windows.Forms.CheckBox()
Me.chkTransFondos = New System.Windows.Forms.CheckBox()
Me.chkDllsEfec = New System.Windows.Forms.CheckBox()
Me.gbxProcs = New System.Windows.Forms.GroupBox()
Me.chkVigDoctos = New System.Windows.Forms.CheckBox()
Me.chkRevExpediente = New System.Windows.Forms.CheckBox()
Me.chkConfigCarga = New System.Windows.Forms.CheckBox()
Me.ChkRiesgo = New System.Windows.Forms.CheckBox()
Me.ChkListasS = New System.Windows.Forms.CheckBox()
Me.chkPerfilTranServer = New System.Windows.Forms.CheckBox()
Me.gbxAlarmas = New System.Windows.Forms.GroupBox()
Me.chkPatMizuho = New System.Windows.Forms.CheckBox()
Me.chkReproceso = New System.Windows.Forms.CheckBox()
Me.ChkInuS = New System.Windows.Forms.CheckBox()
Me.ChkrelevantesS = New System.Windows.Forms.CheckBox()
Me.ChkFraccS = New System.Windows.Forms.CheckBox()
Me.gbxContCargas = New System.Windows.Forms.GroupBox()
Me.chkListas = New System.Windows.Forms.CheckBox()
Me.chkTCambio = New System.Windows.Forms.CheckBox()
Me.chktran = New System.Windows.Forms.CheckBox()
Me.KYC = New System.Windows.Forms.TabPage()
Me.GroupBox4 = New System.Windows.Forms.GroupBox()
Me.Label3 = New System.Windows.Forms.Label()
Me.chkKYC = New System.Windows.Forms.CheckBox()
Me.chkCteSinKYC = New System.Windows.Forms.CheckBox()
Me.chkAlarmaKYC = New System.Windows.Forms.CheckBox()
Me.KYCControles = New System.Windows.Forms.TabPage()
Me.GroupBox6 = New System.Windows.Forms.GroupBox()
Me.chkRevExp = New System.Windows.Forms.CheckBox()
Me.chkAVigDoctos = New System.Windows.Forms.CheckBox()
Me.chkCalifRiesgoABC = New System.Windows.Forms.CheckBox()
Me.chkCalificacionOC = New System.Windows.Forms.CheckBox()
Me.chkKYCNuevoCliente = New System.Windows.Forms.CheckBox()
Me.chkKYCEditReg = New System.Windows.Forms.CheckBox()
Me.pnlPermisosKYCEstatus = New System.Windows.Forms.Panel()
Me.btnQuitar2 = New System.Windows.Forms.Button()
Me.btnQuitar1 = New System.Windows.Forms.Button()
Me.btnAdd2 = New System.Windows.Forms.Button()
Me.btnAdd1 = New System.Windows.Forms.Button()
Me.cmbKYCESTATUS2 = New System.Windows.Forms.ComboBox()
Me.cmbKYCESTATUS1 = New System.Windows.Forms.ComboBox()
Me.Label9 = New System.Windows.Forms.Label()
Me.lstAutorizados = New System.Windows.Forms.ListBox()
Me.Label10 = New System.Windows.Forms.Label()
Me.lstDisponibles = New System.Windows.Forms.ListBox()
Me.chkKYCEstatus = New System.Windows.Forms.CheckBox()
Me.btnBorraUno = New System.Windows.Forms.Button()
Me.btnPasaUno = New System.Windows.Forms.Button()
Me.btnPasaTodos = New System.Windows.Forms.Button()
Me.btnBorraTodos = New System.Windows.Forms.Button()
Me.SIARA = New System.Windows.Forms.TabPage()
Me.GroupBox12 = New System.Windows.Forms.GroupBox()
Me.chkImportarXML = New System.Windows.Forms.CheckBox()
Me.chkbusquedaconclt = New System.Windows.Forms.CheckBox()
Me.chkGenResp = New System.Windows.Forms.CheckBox()
Me.chkCapturaManual = New System.Windows.Forms.CheckBox()
Me.chkLogCarga = New System.Windows.Forms.CheckBox()
Me.chkLogOperResp = New System.Windows.Forms.CheckBox()
Me.tlbPermiso = New System.Windows.Forms.ToolBar()
Me.btnGuardar = New System.Windows.Forms.ToolBarButton()
Me.btnSalir = New System.Windows.Forms.ToolBarButton()
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.lblIdPerfil = New System.Windows.Forms.Label()
Me.BntSalie = New System.Windows.Forms.Button()
Me.BtnAlta = New System.Windows.Forms.Button()
Me.BtnImprimir = New System.Windows.Forms.Button()
Me.panel2 = New System.Windows.Forms.Panel()
Me.Img_logoCabecera = New System.Windows.Forms.PictureBox()
Me.DesHeader = New System.Windows.Forms.Label()
Me.panel3 = New System.Windows.Forms.Panel()
Me.Label11 = New System.Windows.Forms.Label()
Me.lblFooter = New System.Windows.Forms.Label()
Me.GroupBox1.SuspendLayout()
Me.GroupBox2.SuspendLayout()
Me.TabControl3.SuspendLayout()
Me.Modulos.SuspendLayout()
Me.GroupBox5.SuspendLayout()
Me.Reportes.SuspendLayout()
Me.GroupBox13.SuspendLayout()
Me.Actualizadores.SuspendLayout()
Me.GroupBox8.SuspendLayout()
Me.Catalogos.SuspendLayout()
Me.GroupBox10.SuspendLayout()
Me.seguridad.SuspendLayout()
Me.GroupBox9.SuspendLayout()
Me.ListaRestringuida.SuspendLayout()
Me.GroupBox11.SuspendLayout()
Me.tabProcesoHit.SuspendLayout()
Me.GroupBox7.SuspendLayout()
Me.TABServer.SuspendLayout()
Me.GroupBox3.SuspendLayout()
Me.gbxLogs.SuspendLayout()
Me.gbxProcs.SuspendLayout()
Me.gbxAlarmas.SuspendLayout()
Me.gbxContCargas.SuspendLayout()
Me.KYC.SuspendLayout()
Me.GroupBox4.SuspendLayout()
Me.KYCControles.SuspendLayout()
Me.GroupBox6.SuspendLayout()
Me.pnlPermisosKYCEstatus.SuspendLayout()
Me.SIARA.SuspendLayout()
Me.GroupBox12.SuspendLayout()
Me.panel2.SuspendLayout()
CType(Me.Img_logoCabecera, System.ComponentModel.ISupportInitialize).BeginInit()
Me.panel3.SuspendLayout()
Me.SuspendLayout()
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.txtNombrePerfil)
Me.GroupBox1.Location = New System.Drawing.Point(176, 56)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(248, 48)
Me.GroupBox1.TabIndex = 0
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Nombre del perfil"
'
'txtNombrePerfil
'
Me.txtNombrePerfil.Location = New System.Drawing.Point(8, 16)
Me.txtNombrePerfil.Name = "txtNombrePerfil"
Me.txtNombrePerfil.Size = New System.Drawing.Size(232, 20)
Me.txtNombrePerfil.TabIndex = 0
'
'GroupBox2
'
Me.GroupBox2.Controls.Add(Me.TabControl3)
Me.GroupBox2.Location = New System.Drawing.Point(8, 104)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(681, 440)
Me.GroupBox2.TabIndex = 1
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Permisos del perfil"
'
'TabControl3
'
Me.TabControl3.Controls.Add(Me.Modulos)
Me.TabControl3.Controls.Add(Me.Reportes)
Me.TabControl3.Controls.Add(Me.Actualizadores)
Me.TabControl3.Controls.Add(Me.Catalogos)
Me.TabControl3.Controls.Add(Me.seguridad)
Me.TabControl3.Controls.Add(Me.ListaRestringuida)
Me.TabControl3.Controls.Add(Me.tabProcesoHit)
Me.TabControl3.Controls.Add(Me.TABServer)
Me.TabControl3.Controls.Add(Me.KYC)
Me.TabControl3.Controls.Add(Me.KYCControles)
Me.TabControl3.Controls.Add(Me.SIARA)
Me.TabControl3.ItemSize = New System.Drawing.Size(55, 18)
Me.TabControl3.Location = New System.Drawing.Point(10, 26)
Me.TabControl3.Name = "TabControl3"
Me.TabControl3.SelectedIndex = 0
Me.TabControl3.Size = New System.Drawing.Size(665, 411)
Me.TabControl3.TabIndex = 1
Me.TabControl3.Tag = "55"
'
'Modulos
'
Me.Modulos.BackColor = System.Drawing.Color.White
Me.Modulos.Controls.Add(Me.ChkModulos)
Me.Modulos.Controls.Add(Me.GroupBox5)
Me.Modulos.Location = New System.Drawing.Point(4, 22)
Me.Modulos.Name = "Modulos"
Me.Modulos.Size = New System.Drawing.Size(657, 385)
Me.Modulos.TabIndex = 12
Me.Modulos.Text = "M<EFBFBD>dulos"
'
'ChkModulos
'
Me.ChkModulos.AutoSize = True
Me.ChkModulos.Location = New System.Drawing.Point(16, 18)
Me.ChkModulos.Name = "ChkModulos"
Me.ChkModulos.Size = New System.Drawing.Size(56, 17)
Me.ChkModulos.TabIndex = 75
Me.ChkModulos.Text = "Todos"
Me.ChkModulos.UseVisualStyleBackColor = True
'
'GroupBox5
'
Me.GroupBox5.BackColor = System.Drawing.Color.White
Me.GroupBox5.Controls.Add(Me.ChkModuloServer)
Me.GroupBox5.Controls.Add(Me.ChkModuloKYC)
Me.GroupBox5.Controls.Add(Me.ChkModuloClientes)
Me.GroupBox5.Location = New System.Drawing.Point(16, 41)
Me.GroupBox5.Name = "GroupBox5"
Me.GroupBox5.Size = New System.Drawing.Size(614, 313)
Me.GroupBox5.TabIndex = 11
Me.GroupBox5.TabStop = False
'
'ChkModuloServer
'
Me.ChkModuloServer.AutoSize = True
Me.ChkModuloServer.ForeColor = System.Drawing.Color.MidnightBlue
Me.ChkModuloServer.Location = New System.Drawing.Point(12, 88)
Me.ChkModuloServer.Name = "ChkModuloServer"
Me.ChkModuloServer.Size = New System.Drawing.Size(95, 17)
Me.ChkModuloServer.TabIndex = 73
Me.ChkModuloServer.Tag = "99"
Me.ChkModuloServer.Text = "M<EFBFBD>dulo Server"
Me.ChkModuloServer.UseVisualStyleBackColor = True
'
'ChkModuloKYC
'
Me.ChkModuloKYC.AutoSize = True
Me.ChkModuloKYC.ForeColor = System.Drawing.Color.MidnightBlue
Me.ChkModuloKYC.Location = New System.Drawing.Point(12, 36)
Me.ChkModuloKYC.Name = "ChkModuloKYC"
Me.ChkModuloKYC.Size = New System.Drawing.Size(85, 17)
Me.ChkModuloKYC.TabIndex = 71
Me.ChkModuloKYC.Tag = "108"
Me.ChkModuloKYC.Text = "M<EFBFBD>dulo KYC"
'
'ChkModuloClientes
'
Me.ChkModuloClientes.AutoSize = True
Me.ChkModuloClientes.ForeColor = System.Drawing.Color.MidnightBlue
Me.ChkModuloClientes.Location = New System.Drawing.Point(12, 62)
Me.ChkModuloClientes.Name = "ChkModuloClientes"
Me.ChkModuloClientes.Size = New System.Drawing.Size(101, 17)
Me.ChkModuloClientes.TabIndex = 72
Me.ChkModuloClientes.Tag = "74"
Me.ChkModuloClientes.Text = "M<EFBFBD>dulo Clientes"
'
'Reportes
'
Me.Reportes.BackColor = System.Drawing.Color.White
Me.Reportes.Controls.Add(Me.ChkTodosReporte)
Me.Reportes.Controls.Add(Me.GroupBox13)
Me.Reportes.Location = New System.Drawing.Point(4, 22)
Me.Reportes.Name = "Reportes"
Me.Reportes.Size = New System.Drawing.Size(657, 385)
Me.Reportes.TabIndex = 0
Me.Reportes.Text = "Reportes"
'
'ChkTodosReporte
'
Me.ChkTodosReporte.AutoSize = True
Me.ChkTodosReporte.Location = New System.Drawing.Point(25, 13)
Me.ChkTodosReporte.Name = "ChkTodosReporte"
Me.ChkTodosReporte.Size = New System.Drawing.Size(56, 17)
Me.ChkTodosReporte.TabIndex = 64
Me.ChkTodosReporte.Text = "Todos"
Me.ChkTodosReporte.UseVisualStyleBackColor = True
'
'GroupBox13
'
Me.GroupBox13.BackColor = System.Drawing.Color.White
2020-03-10 11:10:16 -06:00
Me.GroupBox13.Controls.Add(Me.chkReporteJ14)
Me.GroupBox13.Controls.Add(Me.chkReporteJ13)
2020-01-20 18:14:59 -06:00
Me.GroupBox13.Controls.Add(Me.CheckBox1)
Me.GroupBox13.Controls.Add(Me.chkVigenciaAlertas)
Me.GroupBox13.Controls.Add(Me.chkAsesoria)
Me.GroupBox13.Controls.Add(Me.chkPreoSnT)
Me.GroupBox13.Controls.Add(Me.chkPreoCnT)
Me.GroupBox13.Controls.Add(Me.chkInuSnT)
Me.GroupBox13.Controls.Add(Me.chkReportes)
Me.GroupBox13.Controls.Add(Me.chkPerfTran)
Me.GroupBox13.Controls.Add(Me.chkDormant)
Me.GroupBox13.Controls.Add(Me.chkRelevantes)
Me.GroupBox13.Controls.Add(Me.chkTransacciones)
Me.GroupBox13.Controls.Add(Me.chkOperInusualesF)
Me.GroupBox13.Controls.Add(Me.chkOperPreocupantes)
Me.GroupBox13.Controls.Add(Me.chkFormatoCNBV)
Me.GroupBox13.Controls.Add(Me.chkTodosProductos)
Me.GroupBox13.Controls.Add(Me.chkOperInusuales)
Me.GroupBox13.Controls.Add(Me.chkNueva)
Me.GroupBox13.Controls.Add(Me.chkRepAnom)
Me.GroupBox13.Controls.Add(Me.chkInusuales)
Me.GroupBox13.Controls.Add(Me.chkInterInfo)
Me.GroupBox13.Controls.Add(Me.chkAvisos)
Me.GroupBox13.Controls.Add(Me.chkCheques)
Me.GroupBox13.Controls.Add(Me.chkreportdlls)
Me.GroupBox13.Controls.Add(Me.chkTIF)
Me.GroupBox13.Controls.Add(Me.chkAcumuladoMen)
Me.GroupBox13.Controls.Add(Me.chkIngrDep)
Me.GroupBox13.Controls.Add(Me.Label1)
Me.GroupBox13.Controls.Add(Me.ShapeContainer1)
Me.GroupBox13.ForeColor = System.Drawing.Color.MidnightBlue
Me.GroupBox13.Location = New System.Drawing.Point(25, 36)
Me.GroupBox13.Name = "GroupBox13"
Me.GroupBox13.Size = New System.Drawing.Size(614, 346)
Me.GroupBox13.TabIndex = 18
Me.GroupBox13.TabStop = False
'
2020-03-10 11:10:16 -06:00
'chkReporteJ14
'
Me.chkReporteJ14.AutoSize = True
Me.chkReporteJ14.Location = New System.Drawing.Point(247, 176)
Me.chkReporteJ14.Name = "chkReporteJ14"
Me.chkReporteJ14.Size = New System.Drawing.Size(84, 17)
Me.chkReporteJ14.TabIndex = 195
Me.chkReporteJ14.Tag = "1207"
Me.chkReporteJ14.Text = "Reporte J14"
'
'chkReporteJ13
'
Me.chkReporteJ13.AutoSize = True
Me.chkReporteJ13.Location = New System.Drawing.Point(247, 153)
Me.chkReporteJ13.Name = "chkReporteJ13"
Me.chkReporteJ13.Size = New System.Drawing.Size(84, 17)
Me.chkReporteJ13.TabIndex = 194
Me.chkReporteJ13.Tag = "1206"
Me.chkReporteJ13.Text = "Reporte J13"
'
2020-01-20 18:14:59 -06:00
'CheckBox1
'
Me.CheckBox1.AutoSize = True
Me.CheckBox1.Location = New System.Drawing.Point(247, 130)
Me.CheckBox1.Name = "CheckBox1"
Me.CheckBox1.Size = New System.Drawing.Size(48, 17)
Me.CheckBox1.TabIndex = 193
Me.CheckBox1.Tag = "200"
Me.CheckBox1.Text = "EBR"
'
'chkVigenciaAlertas
'
Me.chkVigenciaAlertas.AutoSize = True
Me.chkVigenciaAlertas.Location = New System.Drawing.Point(247, 104)
Me.chkVigenciaAlertas.Name = "chkVigenciaAlertas"
Me.chkVigenciaAlertas.Size = New System.Drawing.Size(117, 17)
Me.chkVigenciaAlertas.TabIndex = 192
Me.chkVigenciaAlertas.Tag = "192"
Me.chkVigenciaAlertas.Text = "Vigencia de Alertas"
'
'chkAsesoria
'
Me.chkAsesoria.AutoSize = True
Me.chkAsesoria.Location = New System.Drawing.Point(247, 78)
Me.chkAsesoria.Name = "chkAsesoria"
Me.chkAsesoria.Size = New System.Drawing.Size(113, 17)
Me.chkAsesoria.TabIndex = 64
Me.chkAsesoria.Tag = "191"
Me.chkAsesoria.Text = "Alarmas Asesor<6F>as"
'
'chkPreoSnT
'
Me.chkPreoSnT.AutoSize = True
Me.chkPreoSnT.Location = New System.Drawing.Point(38, 302)
Me.chkPreoSnT.Name = "chkPreoSnT"
Me.chkPreoSnT.Size = New System.Drawing.Size(172, 17)
Me.chkPreoSnT.TabIndex = 63
Me.chkPreoSnT.Tag = "179"
Me.chkPreoSnT.Text = "Preocupantes Sin Transacci<63>n"
'
'chkPreoCnT
'
Me.chkPreoCnT.AutoSize = True
Me.chkPreoCnT.Location = New System.Drawing.Point(38, 281)
Me.chkPreoCnT.Name = "chkPreoCnT"
Me.chkPreoCnT.Size = New System.Drawing.Size(176, 17)
Me.chkPreoCnT.TabIndex = 62
Me.chkPreoCnT.Tag = "180"
Me.chkPreoCnT.Text = "Preocupantes Con Transacci<63>n"
'
'chkInuSnT
'
Me.chkInuSnT.AutoSize = True
Me.chkInuSnT.Location = New System.Drawing.Point(38, 78)
Me.chkInuSnT.Name = "chkInuSnT"
Me.chkInuSnT.Size = New System.Drawing.Size(139, 17)
Me.chkInuSnT.TabIndex = 61
Me.chkInuSnT.Tag = "178"
Me.chkInuSnT.Text = "Inusuales Conductuales"
'
'chkReportes
'
Me.chkReportes.AutoSize = True
Me.chkReportes.Location = New System.Drawing.Point(0, 0)
Me.chkReportes.Name = "chkReportes"
Me.chkReportes.Size = New System.Drawing.Size(69, 17)
Me.chkReportes.TabIndex = 60
Me.chkReportes.Tag = "75"
Me.chkReportes.Text = "Reportes"
'
'chkPerfTran
'
Me.chkPerfTran.Location = New System.Drawing.Point(247, 25)
Me.chkPerfTran.Name = "chkPerfTran"
Me.chkPerfTran.Size = New System.Drawing.Size(184, 20)
Me.chkPerfTran.TabIndex = 59
Me.chkPerfTran.Tag = "71"
Me.chkPerfTran.Text = "Alarmas Perfil Transaccional"
'
'chkDormant
'
Me.chkDormant.Location = New System.Drawing.Point(458, 295)
Me.chkDormant.Name = "chkDormant"
Me.chkDormant.Size = New System.Drawing.Size(112, 20)
Me.chkDormant.TabIndex = 58
Me.chkDormant.Tag = "8"
Me.chkDormant.Text = "Cuentas Dormidas"
Me.chkDormant.Visible = False
'
'chkRelevantes
'
Me.chkRelevantes.Location = New System.Drawing.Point(17, 209)
Me.chkRelevantes.Name = "chkRelevantes"
Me.chkRelevantes.Size = New System.Drawing.Size(93, 20)
Me.chkRelevantes.TabIndex = 56
Me.chkRelevantes.Tag = "69"
Me.chkRelevantes.Text = "Relevantes"
'
'chkTransacciones
'
Me.chkTransacciones.Location = New System.Drawing.Point(17, 185)
Me.chkTransacciones.Name = "chkTransacciones"
Me.chkTransacciones.Size = New System.Drawing.Size(99, 20)
Me.chkTransacciones.TabIndex = 53
Me.chkTransacciones.Tag = "61"
Me.chkTransacciones.Text = "Transacciones"
'
'chkOperInusualesF
'
Me.chkOperInusualesF.Location = New System.Drawing.Point(17, 233)
Me.chkOperInusualesF.Name = "chkOperInusualesF"
Me.chkOperInusualesF.Size = New System.Drawing.Size(139, 20)
Me.chkOperInusualesF.TabIndex = 54
Me.chkOperInusualesF.Tag = "63"
Me.chkOperInusualesF.Text = "Inusuales Fraccionadas"
'
'chkOperPreocupantes
'
Me.chkOperPreocupantes.Location = New System.Drawing.Point(18, 257)
Me.chkOperPreocupantes.Name = "chkOperPreocupantes"
Me.chkOperPreocupantes.Size = New System.Drawing.Size(93, 20)
Me.chkOperPreocupantes.TabIndex = 55
Me.chkOperPreocupantes.Tag = "64"
Me.chkOperPreocupantes.Text = "Preocupantes"
'
'chkFormatoCNBV
'
Me.chkFormatoCNBV.Location = New System.Drawing.Point(17, 161)
Me.chkFormatoCNBV.Name = "chkFormatoCNBV"
Me.chkFormatoCNBV.Size = New System.Drawing.Size(59, 20)
Me.chkFormatoCNBV.TabIndex = 52
Me.chkFormatoCNBV.Tag = "9"
Me.chkFormatoCNBV.Text = "CNBV"
'
'chkTodosProductos
'
Me.chkTodosProductos.AutoSize = True
Me.chkTodosProductos.Location = New System.Drawing.Point(321, 236)
Me.chkTodosProductos.Name = "chkTodosProductos"
Me.chkTodosProductos.Size = New System.Drawing.Size(123, 17)
Me.chkTodosProductos.TabIndex = 50
Me.chkTodosProductos.Tag = "68"
Me.chkTodosProductos.Text = "Todos los Productos"
Me.chkTodosProductos.Visible = False
'
'chkOperInusuales
'
Me.chkOperInusuales.Location = New System.Drawing.Point(38, 101)
Me.chkOperInusuales.Name = "chkOperInusuales"
Me.chkOperInusuales.Size = New System.Drawing.Size(191, 20)
Me.chkOperInusuales.TabIndex = 51
Me.chkOperInusuales.Tag = "6"
Me.chkOperInusuales.Text = "Inusuales Transaccionales"
'
'chkNueva
'
Me.chkNueva.Location = New System.Drawing.Point(38, 49)
Me.chkNueva.Name = "chkNueva"
Me.chkNueva.Size = New System.Drawing.Size(98, 20)
Me.chkNueva.TabIndex = 49
Me.chkNueva.Tag = "60"
Me.chkNueva.Text = "Nueva Inusual"
'
'chkRepAnom
'
Me.chkRepAnom.AutoSize = True
Me.chkRepAnom.Location = New System.Drawing.Point(247, 52)
Me.chkRepAnom.Name = "chkRepAnom"
Me.chkRepAnom.Size = New System.Drawing.Size(118, 17)
Me.chkRepAnom.TabIndex = 48
Me.chkRepAnom.Tag = "122"
Me.chkRepAnom.Text = "Reportes An<41>nimos"
'
'chkInusuales
'
Me.chkInusuales.Location = New System.Drawing.Point(17, 25)
Me.chkInusuales.Name = "chkInusuales"
Me.chkInusuales.Size = New System.Drawing.Size(74, 20)
Me.chkInusuales.TabIndex = 47
Me.chkInusuales.Tag = "1"
Me.chkInusuales.Text = "Inusuales"
'
'chkInterInfo
'
Me.chkInterInfo.AutoSize = True
Me.chkInterInfo.Location = New System.Drawing.Point(478, 199)
Me.chkInterInfo.Name = "chkInterInfo"
Me.chkInterInfo.Size = New System.Drawing.Size(153, 17)
Me.chkInterInfo.TabIndex = 46
Me.chkInterInfo.Tag = "159"
Me.chkInterInfo.Text = "Intercambio de informaci<63>n"
Me.chkInterInfo.UseVisualStyleBackColor = True
Me.chkInterInfo.Visible = False
'
'chkAvisos
'
Me.chkAvisos.AutoSize = True
Me.chkAvisos.Location = New System.Drawing.Point(478, 176)
Me.chkAvisos.Name = "chkAvisos"
Me.chkAvisos.Size = New System.Drawing.Size(57, 17)
Me.chkAvisos.TabIndex = 44
Me.chkAvisos.Tag = "157"
Me.chkAvisos.Text = "Avisos"
Me.chkAvisos.UseVisualStyleBackColor = True
Me.chkAvisos.Visible = False
'
'chkCheques
'
Me.chkCheques.AutoSize = True
Me.chkCheques.Location = New System.Drawing.Point(478, 151)
Me.chkCheques.Name = "chkCheques"
Me.chkCheques.Size = New System.Drawing.Size(107, 17)
Me.chkCheques.TabIndex = 41
Me.chkCheques.Tag = "118"
Me.chkCheques.Text = "Cheques de Caja"
Me.chkCheques.Visible = False
'
'chkreportdlls
'
Me.chkreportdlls.AutoSize = True
Me.chkreportdlls.Location = New System.Drawing.Point(478, 126)
Me.chkreportdlls.Name = "chkreportdlls"
Me.chkreportdlls.Size = New System.Drawing.Size(119, 17)
Me.chkreportdlls.TabIndex = 38
Me.chkreportdlls.Tag = "115"
Me.chkreportdlls.Text = "D<EFBFBD>lares en Efectivo"
Me.chkreportdlls.Visible = False
'
'chkTIF
'
Me.chkTIF.AutoSize = True
Me.chkTIF.Location = New System.Drawing.Point(478, 101)
Me.chkTIF.Name = "chkTIF"
Me.chkTIF.Size = New System.Drawing.Size(208, 17)
Me.chkTIF.TabIndex = 37
Me.chkTIF.Tag = "114"
Me.chkTIF.Text = "Transferencia Internacional de Fondos"
Me.chkTIF.Visible = False
'
'chkAcumuladoMen
'
Me.chkAcumuladoMen.AutoSize = True
Me.chkAcumuladoMen.Location = New System.Drawing.Point(475, 321)
Me.chkAcumuladoMen.Name = "chkAcumuladoMen"
Me.chkAcumuladoMen.Size = New System.Drawing.Size(122, 17)
Me.chkAcumuladoMen.TabIndex = 36
Me.chkAcumuladoMen.Tag = "121"
Me.chkAcumuladoMen.Text = "Acumulado Mensual"
Me.chkAcumuladoMen.Visible = False
'
'chkIngrDep
'
Me.chkIngrDep.Location = New System.Drawing.Point(478, 75)
Me.chkIngrDep.Name = "chkIngrDep"
Me.chkIngrDep.Size = New System.Drawing.Size(181, 20)
Me.chkIngrDep.TabIndex = 30
Me.chkIngrDep.Tag = "81"
Me.chkIngrDep.Text = "Ingresos/Dep<65>sitos"
Me.chkIngrDep.Visible = False
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(9, 325)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(460, 13)
Me.Label1.TabIndex = 29
Me.Label1.Text = "Nota: Al desmarcar los Checks agrupadores sus checks agrupados se apagar<61>n"
'
'ShapeContainer1
'
Me.ShapeContainer1.Location = New System.Drawing.Point(3, 16)
Me.ShapeContainer1.Margin = New System.Windows.Forms.Padding(0)
Me.ShapeContainer1.Name = "ShapeContainer1"
Me.ShapeContainer1.Shapes.AddRange(New Microsoft.VisualBasic.PowerPacks.Shape() {Me.LineShape44, Me.LineShape43, Me.LineShape42, Me.LineShape41, Me.LineShape28, Me.LineShape8, Me.LineShape4, Me.LineShape3, Me.LineShape2, Me.LineShape1})
Me.ShapeContainer1.Size = New System.Drawing.Size(608, 327)
Me.ShapeContainer1.TabIndex = 28
Me.ShapeContainer1.TabStop = False
'
'LineShape44
'
Me.LineShape44.Name = ""
Me.LineShape44.X1 = 0
Me.LineShape44.X2 = 0
Me.LineShape44.Y1 = 0
Me.LineShape44.Y2 = 0
'
'LineShape43
'
Me.LineShape43.Name = ""
Me.LineShape43.X1 = 0
Me.LineShape43.X2 = 0
Me.LineShape43.Y1 = 0
Me.LineShape43.Y2 = 0
'
'LineShape42
'
Me.LineShape42.Name = ""
Me.LineShape42.X1 = 0
Me.LineShape42.X2 = 0
Me.LineShape42.Y1 = 0
Me.LineShape42.Y2 = 0
'
'LineShape41
'
Me.LineShape41.Name = ""
Me.LineShape41.X1 = 0
Me.LineShape41.X2 = 0
Me.LineShape41.Y1 = 0
Me.LineShape41.Y2 = 0
'
'LineShape28
'
Me.LineShape28.Name = ""
Me.LineShape28.X1 = 0
Me.LineShape28.X2 = 0
Me.LineShape28.Y1 = 0
Me.LineShape28.Y2 = 0
'
'LineShape8
'
Me.LineShape8.Name = ""
Me.LineShape8.X1 = 0
Me.LineShape8.X2 = 0
Me.LineShape8.Y1 = 0
Me.LineShape8.Y2 = 0
'
'LineShape4
'
Me.LineShape4.Name = ""
Me.LineShape4.X1 = 0
Me.LineShape4.X2 = 0
Me.LineShape4.Y1 = 0
Me.LineShape4.Y2 = 0
'
'LineShape3
'
Me.LineShape3.Name = ""
Me.LineShape3.X1 = 0
Me.LineShape3.X2 = 0
Me.LineShape3.Y1 = 0
Me.LineShape3.Y2 = 0
'
'LineShape2
'
Me.LineShape2.Name = ""
Me.LineShape2.X1 = 0
Me.LineShape2.X2 = 0
Me.LineShape2.Y1 = 0
Me.LineShape2.Y2 = 0
'
'LineShape1
'
Me.LineShape1.Name = ""
Me.LineShape1.X1 = 0
Me.LineShape1.X2 = 0
Me.LineShape1.Y1 = 0
Me.LineShape1.Y2 = 0
'
'Actualizadores
'
Me.Actualizadores.Controls.Add(Me.ChkActualizadores)
Me.Actualizadores.Controls.Add(Me.GroupBox8)
Me.Actualizadores.Location = New System.Drawing.Point(4, 22)
Me.Actualizadores.Name = "Actualizadores"
Me.Actualizadores.Size = New System.Drawing.Size(657, 385)
Me.Actualizadores.TabIndex = 7
Me.Actualizadores.Text = "Actualizadores"
Me.Actualizadores.UseVisualStyleBackColor = True
'
'ChkActualizadores
'
Me.ChkActualizadores.AutoSize = True
Me.ChkActualizadores.Location = New System.Drawing.Point(16, 9)
Me.ChkActualizadores.Name = "ChkActualizadores"
Me.ChkActualizadores.Size = New System.Drawing.Size(56, 17)
Me.ChkActualizadores.TabIndex = 76
Me.ChkActualizadores.Text = "Todos"
Me.ChkActualizadores.UseVisualStyleBackColor = True
'
'GroupBox8
'
Me.GroupBox8.Controls.Add(Me.chkparamsgen)
Me.GroupBox8.Controls.Add(Me.chkActual)
Me.GroupBox8.Controls.Add(Me.chkAsigGrpo)
Me.GroupBox8.Controls.Add(Me.ParametrosDeGrupoMenu)
Me.GroupBox8.Controls.Add(Me.chkTipoCambio)
Me.GroupBox8.Controls.Add(Me.Label4)
Me.GroupBox8.ForeColor = System.Drawing.Color.MidnightBlue
Me.GroupBox8.Location = New System.Drawing.Point(16, 32)
Me.GroupBox8.Name = "GroupBox8"
Me.GroupBox8.Size = New System.Drawing.Size(614, 322)
Me.GroupBox8.TabIndex = 5
Me.GroupBox8.TabStop = False
'
'chkparamsgen
'
Me.chkparamsgen.Location = New System.Drawing.Point(21, 118)
Me.chkparamsgen.Name = "chkparamsgen"
Me.chkparamsgen.Size = New System.Drawing.Size(174, 20)
Me.chkparamsgen.TabIndex = 60
Me.chkparamsgen.Tag = "197"
Me.chkparamsgen.Text = "Par<EFBFBD>metros Generales"
'
'chkActual
'
Me.chkActual.AutoSize = True
Me.chkActual.BackColor = System.Drawing.Color.White
Me.chkActual.Location = New System.Drawing.Point(0, 0)
Me.chkActual.Name = "chkActual"
Me.chkActual.Size = New System.Drawing.Size(95, 17)
Me.chkActual.TabIndex = 58
Me.chkActual.Tag = "22"
Me.chkActual.Text = "Actualizadores"
Me.chkActual.UseVisualStyleBackColor = False
'
'chkAsigGrpo
'
Me.chkAsigGrpo.Location = New System.Drawing.Point(21, 92)
Me.chkAsigGrpo.Name = "chkAsigGrpo"
Me.chkAsigGrpo.Size = New System.Drawing.Size(174, 20)
Me.chkAsigGrpo.TabIndex = 57
Me.chkAsigGrpo.Tag = "27"
Me.chkAsigGrpo.Text = "Asignaci<EFBFBD>n de Grupos"
'
'ParametrosDeGrupoMenu
'
Me.ParametrosDeGrupoMenu.Location = New System.Drawing.Point(21, 40)
Me.ParametrosDeGrupoMenu.Name = "ParametrosDeGrupoMenu"
Me.ParametrosDeGrupoMenu.Size = New System.Drawing.Size(136, 20)
Me.ParametrosDeGrupoMenu.TabIndex = 55
Me.ParametrosDeGrupoMenu.Tag = "23"
Me.ParametrosDeGrupoMenu.Text = "Par<EFBFBD>metros de Grupo"
'
'chkTipoCambio
'
Me.chkTipoCambio.Location = New System.Drawing.Point(21, 66)
Me.chkTipoCambio.Name = "chkTipoCambio"
Me.chkTipoCambio.Size = New System.Drawing.Size(128, 20)
Me.chkTipoCambio.TabIndex = 56
Me.chkTipoCambio.Tag = "25"
Me.chkTipoCambio.Text = "Tipo de Cambio"
'
'Label4
'
Me.Label4.AutoSize = True
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label4.Location = New System.Drawing.Point(6, 301)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(460, 13)
Me.Label4.TabIndex = 53
Me.Label4.Text = "Nota: Al desmarcar los Checks agrupadores sus checks agrupados se apagar<61>n"
'
'Catalogos
'
Me.Catalogos.Controls.Add(Me.ChkTodosCatalogos)
Me.Catalogos.Controls.Add(Me.GroupBox10)
Me.Catalogos.Location = New System.Drawing.Point(4, 22)
Me.Catalogos.Name = "Catalogos"
Me.Catalogos.Size = New System.Drawing.Size(657, 385)
Me.Catalogos.TabIndex = 2
Me.Catalogos.Text = "Cat<EFBFBD>logos"
Me.Catalogos.UseVisualStyleBackColor = True
'
'ChkTodosCatalogos
'
Me.ChkTodosCatalogos.AutoSize = True
Me.ChkTodosCatalogos.Location = New System.Drawing.Point(13, 11)
Me.ChkTodosCatalogos.Name = "ChkTodosCatalogos"
Me.ChkTodosCatalogos.Size = New System.Drawing.Size(56, 17)
Me.ChkTodosCatalogos.TabIndex = 65
Me.ChkTodosCatalogos.Text = "Todos"
Me.ChkTodosCatalogos.UseVisualStyleBackColor = True
'
'GroupBox10
'
2020-01-20 18:14:59 -06:00
Me.GroupBox10.Controls.Add(Me.chkEstatusCta)
Me.GroupBox10.Controls.Add(Me.chkCatsEBR)
Me.GroupBox10.Controls.Add(Me.chkRazonMX)
Me.GroupBox10.Controls.Add(Me.chkBoxParamMR)
2020-01-20 18:14:59 -06:00
Me.GroupBox10.Controls.Add(Me.chkRiesgoPPE)
Me.GroupBox10.Controls.Add(Me.chkCdOperacion)
Me.GroupBox10.Controls.Add(Me.chkNacionalidad)
Me.GroupBox10.Controls.Add(Me.chkObjCta)
Me.GroupBox10.Controls.Add(Me.chkRelacion)
Me.GroupBox10.Controls.Add(Me.chkPropositoCuenta)
Me.GroupBox10.Controls.Add(Me.chkCASFIM)
Me.GroupBox10.Controls.Add(Me.chkRazonUSD)
Me.GroupBox10.Controls.Add(Me.chkLocalidad)
Me.GroupBox10.Controls.Add(Me.chkPatronesCat)
Me.GroupBox10.Controls.Add(Me.ChkMant)
Me.GroupBox10.Controls.Add(Me.chkEstado)
Me.GroupBox10.Controls.Add(Me.chkConf)
Me.GroupBox10.Controls.Add(Me.chkCuentasUSD)
Me.GroupBox10.Controls.Add(Me.chkConcepto)
Me.GroupBox10.Controls.Add(Me.chkPais)
Me.GroupBox10.Controls.Add(Me.chkOrgInter)
Me.GroupBox10.Controls.Add(Me.chkSectorEco)
Me.GroupBox10.Controls.Add(Me.ChkInsFin)
Me.GroupBox10.Controls.Add(Me.chkActEco)
Me.GroupBox10.Controls.Add(Me.chkMoneda)
Me.GroupBox10.Controls.Add(Me.chkOficiales)
Me.GroupBox10.Controls.Add(Me.chkInstrumMon)
Me.GroupBox10.Controls.Add(Me.chkTipOp)
Me.GroupBox10.Controls.Add(Me.chkCanales)
Me.GroupBox10.Controls.Add(Me.chkFuncionarios2)
Me.GroupBox10.Controls.Add(Me.chkSubproductos)
Me.GroupBox10.Controls.Add(Me.chkIntitucional)
Me.GroupBox10.Controls.Add(Me.chkProductos)
Me.GroupBox10.Controls.Add(Me.chkCatalogos)
Me.GroupBox10.Controls.Add(Me.chkGrupoRiesgo)
Me.GroupBox10.Controls.Add(Me.chkFuentIng)
Me.GroupBox10.Controls.Add(Me.chkSucs)
Me.GroupBox10.Controls.Add(Me.chkFigLegal)
Me.GroupBox10.Controls.Add(Me.chkTipoPer)
Me.GroupBox10.Controls.Add(Me.chkEstrucCorp)
Me.GroupBox10.Controls.Add(Me.chkTipoDom)
Me.GroupBox10.Controls.Add(Me.chkTipoCuenta)
Me.GroupBox10.Controls.Add(Me.chkProcRec)
Me.GroupBox10.Controls.Add(Me.chkParents)
Me.GroupBox10.Controls.Add(Me.chkTransfer)
Me.GroupBox10.Controls.Add(Me.chkInstrument)
Me.GroupBox10.Controls.Add(Me.chkID)
Me.GroupBox10.Controls.Add(Me.chkDesRec)
Me.GroupBox10.Controls.Add(Me.chkActVul)
Me.GroupBox10.Controls.Add(Me.Label2)
Me.GroupBox10.Controls.Add(Me.ShapeContainer2)
Me.GroupBox10.ForeColor = System.Drawing.Color.MidnightBlue
Me.GroupBox10.Location = New System.Drawing.Point(16, 34)
Me.GroupBox10.Name = "GroupBox10"
Me.GroupBox10.Size = New System.Drawing.Size(627, 346)
Me.GroupBox10.TabIndex = 16
Me.GroupBox10.TabStop = False
'
2020-03-10 11:10:16 -06:00
'chkEstatusCta
'
Me.chkEstatusCta.AutoSize = True
Me.chkEstatusCta.Location = New System.Drawing.Point(504, 171)
Me.chkEstatusCta.Name = "chkEstatusCta"
Me.chkEstatusCta.Size = New System.Drawing.Size(124, 17)
Me.chkEstatusCta.TabIndex = 150
Me.chkEstatusCta.Tag = "205"
Me.chkEstatusCta.Text = "Estatus de la Cuenta"
'
2020-01-20 18:14:59 -06:00
'chkCatsEBR
'
Me.chkCatsEBR.AutoSize = True
Me.chkCatsEBR.Location = New System.Drawing.Point(504, 150)
Me.chkCatsEBR.Name = "chkCatsEBR"
Me.chkCatsEBR.Size = New System.Drawing.Size(98, 17)
Me.chkCatsEBR.TabIndex = 149
Me.chkCatsEBR.Tag = "204"
Me.chkCatsEBR.Text = "Catalogos EBR"
'
'chkRazonMX
'
Me.chkRazonMX.Location = New System.Drawing.Point(17, 283)
Me.chkRazonMX.Name = "chkRazonMX"
Me.chkRazonMX.Size = New System.Drawing.Size(91, 39)
Me.chkRazonMX.TabIndex = 147
Me.chkRazonMX.Tag = "187"
Me.chkRazonMX.Text = "Razones Uso USD M<>xico"
Me.chkRazonMX.Visible = False
'
2020-01-20 18:14:59 -06:00
'chkBoxParamMR
'
Me.chkBoxParamMR.Location = New System.Drawing.Point(504, 52)
Me.chkBoxParamMR.Name = "chkBoxParamMR"
Me.chkBoxParamMR.Size = New System.Drawing.Size(120, 35)
Me.chkBoxParamMR.TabIndex = 145
Me.chkBoxParamMR.Tag = "199"
Me.chkBoxParamMR.Text = "Parametros Modelo Riesgo"
'
'chkRiesgoPPE
'
Me.chkRiesgoPPE.AutoSize = True
Me.chkRiesgoPPE.Location = New System.Drawing.Point(504, 131)
Me.chkRiesgoPPE.Name = "chkRiesgoPPE"
Me.chkRiesgoPPE.Size = New System.Drawing.Size(83, 17)
Me.chkRiesgoPPE.TabIndex = 145
Me.chkRiesgoPPE.Tag = "203"
Me.chkRiesgoPPE.Text = "Riesgo PPE"
'
'chkCdOperacion
'
Me.chkCdOperacion.AutoSize = True
Me.chkCdOperacion.Location = New System.Drawing.Point(504, 112)
Me.chkCdOperacion.Name = "chkCdOperacion"
Me.chkCdOperacion.Size = New System.Drawing.Size(126, 17)
Me.chkCdOperacion.TabIndex = 145
Me.chkCdOperacion.Tag = "202"
Me.chkCdOperacion.Text = "Ciudad de Operaci<63>n"
'
'chkNacionalidad
'
Me.chkNacionalidad.AutoSize = True
Me.chkNacionalidad.Location = New System.Drawing.Point(504, 93)
Me.chkNacionalidad.Name = "chkNacionalidad"
Me.chkNacionalidad.Size = New System.Drawing.Size(88, 17)
Me.chkNacionalidad.TabIndex = 145
Me.chkNacionalidad.Tag = "201"
Me.chkNacionalidad.Text = "Nacionalidad"
'
'chkObjCta
'
Me.chkObjCta.AutoSize = True
Me.chkObjCta.Location = New System.Drawing.Point(504, 34)
Me.chkObjCta.Name = "chkObjCta"
Me.chkObjCta.Size = New System.Drawing.Size(120, 17)
Me.chkObjCta.TabIndex = 145
Me.chkObjCta.Tag = "198"
Me.chkObjCta.Text = "Objeto de la Cuenta"
'
'chkRelacion
'
Me.chkRelacion.Location = New System.Drawing.Point(362, 298)
Me.chkRelacion.Name = "chkRelacion"
Me.chkRelacion.Size = New System.Drawing.Size(136, 21)
Me.chkRelacion.TabIndex = 145
Me.chkRelacion.Tag = "185"
Me.chkRelacion.Text = "Relaci<EFBFBD>n Cuenta"
'
'chkPropositoCuenta
'
Me.chkPropositoCuenta.Location = New System.Drawing.Point(362, 278)
Me.chkPropositoCuenta.Name = "chkPropositoCuenta"
Me.chkPropositoCuenta.Size = New System.Drawing.Size(136, 21)
Me.chkPropositoCuenta.TabIndex = 144
Me.chkPropositoCuenta.Tag = "184"
Me.chkPropositoCuenta.Text = "Tipo de Servicio"
'
'chkCASFIM
'
Me.chkCASFIM.AutoSize = True
Me.chkCASFIM.Location = New System.Drawing.Point(17, 291)
Me.chkCASFIM.Name = "chkCASFIM"
Me.chkCASFIM.Size = New System.Drawing.Size(65, 17)
Me.chkCASFIM.TabIndex = 140
Me.chkCASFIM.Tag = "165"
Me.chkCASFIM.Text = "CASFIM"
Me.chkCASFIM.Visible = False
'
'chkRazonUSD
'
Me.chkRazonUSD.Location = New System.Drawing.Point(17, 285)
Me.chkRazonUSD.Name = "chkRazonUSD"
Me.chkRazonUSD.Size = New System.Drawing.Size(91, 39)
Me.chkRazonUSD.TabIndex = 146
Me.chkRazonUSD.Tag = "186"
Me.chkRazonUSD.Text = "Razones Cuenta USD"
Me.chkRazonUSD.Visible = False
'
'chkLocalidad
'
Me.chkLocalidad.AutoSize = True
Me.chkLocalidad.Location = New System.Drawing.Point(32, 156)
Me.chkLocalidad.Name = "chkLocalidad"
Me.chkLocalidad.Size = New System.Drawing.Size(72, 17)
Me.chkLocalidad.TabIndex = 141
Me.chkLocalidad.Tag = "166"
Me.chkLocalidad.Text = "Localidad"
'
'chkPatronesCat
'
Me.chkPatronesCat.Location = New System.Drawing.Point(205, 182)
Me.chkPatronesCat.Name = "chkPatronesCat"
Me.chkPatronesCat.Size = New System.Drawing.Size(112, 26)
Me.chkPatronesCat.TabIndex = 139
Me.chkPatronesCat.Tag = "126"
Me.chkPatronesCat.Text = "Patrones"
'
'ChkMant
'
Me.ChkMant.AutoSize = True
Me.ChkMant.Location = New System.Drawing.Point(346, 19)
Me.ChkMant.Name = "ChkMant"
Me.ChkMant.Size = New System.Drawing.Size(95, 17)
Me.ChkMant.TabIndex = 138
Me.ChkMant.Tag = "80"
Me.ChkMant.Text = "Mantenimiento"
'
'chkEstado
'
Me.chkEstado.Location = New System.Drawing.Point(32, 234)
Me.chkEstado.Name = "chkEstado"
Me.chkEstado.Size = New System.Drawing.Size(80, 16)
Me.chkEstado.TabIndex = 136
Me.chkEstado.Tag = "40"
Me.chkEstado.Text = "Estado"
'
'chkConf
'
Me.chkConf.Location = New System.Drawing.Point(12, 187)
Me.chkConf.Name = "chkConf"
Me.chkConf.Size = New System.Drawing.Size(96, 24)
Me.chkConf.TabIndex = 134
Me.chkConf.Tag = "44"
Me.chkConf.Text = "Configuraci<EFBFBD>n"
'
'chkCuentasUSD
'
Me.chkCuentasUSD.AutoSize = True
Me.chkCuentasUSD.Location = New System.Drawing.Point(18, 296)
Me.chkCuentasUSD.Name = "chkCuentasUSD"
Me.chkCuentasUSD.Size = New System.Drawing.Size(91, 17)
Me.chkCuentasUSD.TabIndex = 143
Me.chkCuentasUSD.Tag = "183"
Me.chkCuentasUSD.Text = "Cuentas USD"
Me.chkCuentasUSD.Visible = False
'
'chkConcepto
'
Me.chkConcepto.AutoSize = True
Me.chkConcepto.Location = New System.Drawing.Point(17, 291)
Me.chkConcepto.Name = "chkConcepto"
Me.chkConcepto.Size = New System.Drawing.Size(72, 17)
Me.chkConcepto.TabIndex = 106
Me.chkConcepto.Tag = "128"
Me.chkConcepto.Text = "Concepto"
Me.chkConcepto.Visible = False
'
'chkPais
'
Me.chkPais.Location = New System.Drawing.Point(32, 214)
Me.chkPais.Name = "chkPais"
Me.chkPais.Size = New System.Drawing.Size(108, 16)
Me.chkPais.TabIndex = 135
Me.chkPais.Tag = "35"
Me.chkPais.Text = "Pa<EFBFBD>s"
'
'chkOrgInter
'
Me.chkOrgInter.Location = New System.Drawing.Point(32, 254)
Me.chkOrgInter.Name = "chkOrgInter"
Me.chkOrgInter.Size = New System.Drawing.Size(172, 20)
Me.chkOrgInter.TabIndex = 137
Me.chkOrgInter.Tag = "38"
Me.chkOrgInter.Text = "Organismos Internacionales"
'
'chkSectorEco
'
Me.chkSectorEco.Location = New System.Drawing.Point(18, 286)
Me.chkSectorEco.Name = "chkSectorEco"
Me.chkSectorEco.Size = New System.Drawing.Size(86, 36)
Me.chkSectorEco.TabIndex = 142
Me.chkSectorEco.Tag = "167"
Me.chkSectorEco.Text = "Sectores Econ<6F>micos"
Me.chkSectorEco.Visible = False
'
'ChkInsFin
'
Me.ChkInsFin.Location = New System.Drawing.Point(32, 74)
Me.ChkInsFin.Name = "ChkInsFin"
Me.ChkInsFin.Size = New System.Drawing.Size(132, 20)
Me.ChkInsFin.TabIndex = 129
Me.ChkInsFin.Tag = "42"
Me.ChkInsFin.Text = "Instituci<EFBFBD>n Financiera"
'
'chkActEco
'
Me.chkActEco.Location = New System.Drawing.Point(32, 54)
Me.chkActEco.Name = "chkActEco"
Me.chkActEco.Size = New System.Drawing.Size(132, 20)
Me.chkActEco.TabIndex = 128
Me.chkActEco.Tag = "41"
Me.chkActEco.Text = "Actividad Econ<6F>mica"
'
'chkMoneda
'
Me.chkMoneda.Location = New System.Drawing.Point(32, 134)
Me.chkMoneda.Name = "chkMoneda"
Me.chkMoneda.Size = New System.Drawing.Size(104, 20)
Me.chkMoneda.TabIndex = 132
Me.chkMoneda.Tag = "47"
Me.chkMoneda.Text = "Moneda"
'
'chkOficiales
'
Me.chkOficiales.Location = New System.Drawing.Point(12, 35)
Me.chkOficiales.Name = "chkOficiales"
Me.chkOficiales.Size = New System.Drawing.Size(68, 20)
Me.chkOficiales.TabIndex = 127
Me.chkOficiales.Tag = "34"
Me.chkOficiales.Text = "Oficiales"
'
'chkInstrumMon
'
Me.chkInstrumMon.Location = New System.Drawing.Point(32, 114)
Me.chkInstrumMon.Name = "chkInstrumMon"
Me.chkInstrumMon.Size = New System.Drawing.Size(136, 20)
Me.chkInstrumMon.TabIndex = 131
Me.chkInstrumMon.Tag = "37"
Me.chkInstrumMon.Text = "Instrumento Monetario"
'
'chkTipOp
'
Me.chkTipOp.Location = New System.Drawing.Point(32, 94)
Me.chkTipOp.Name = "chkTipOp"
Me.chkTipOp.Size = New System.Drawing.Size(128, 20)
Me.chkTipOp.TabIndex = 130
Me.chkTipOp.Tag = "36"
Me.chkTipOp.Text = "Tipo Operaci<63>n"
'
'chkCanales
'
Me.chkCanales.Location = New System.Drawing.Point(18, 291)
Me.chkCanales.Name = "chkCanales"
Me.chkCanales.Size = New System.Drawing.Size(112, 26)
Me.chkCanales.TabIndex = 126
Me.chkCanales.Tag = "83"
Me.chkCanales.Text = "Canales"
Me.chkCanales.Visible = False
'
'chkFuncionarios2
'
Me.chkFuncionarios2.Location = New System.Drawing.Point(221, 91)
Me.chkFuncionarios2.Name = "chkFuncionarios2"
Me.chkFuncionarios2.Size = New System.Drawing.Size(112, 26)
Me.chkFuncionarios2.TabIndex = 125
Me.chkFuncionarios2.Tag = "82"
Me.chkFuncionarios2.Text = "Funcionarios"
'
'chkSubproductos
'
Me.chkSubproductos.Location = New System.Drawing.Point(221, 76)
Me.chkSubproductos.Name = "chkSubproductos"
Me.chkSubproductos.Size = New System.Drawing.Size(112, 16)
Me.chkSubproductos.TabIndex = 124
Me.chkSubproductos.Tag = "46"
Me.chkSubproductos.Text = "SubProductos"
'
'chkIntitucional
'
Me.chkIntitucional.Location = New System.Drawing.Point(205, 32)
Me.chkIntitucional.Name = "chkIntitucional"
Me.chkIntitucional.Size = New System.Drawing.Size(96, 20)
Me.chkIntitucional.TabIndex = 122
Me.chkIntitucional.Tag = "48"
Me.chkIntitucional.Text = "Institucionales"
'
'chkProductos
'
Me.chkProductos.Location = New System.Drawing.Point(221, 56)
Me.chkProductos.Name = "chkProductos"
Me.chkProductos.Size = New System.Drawing.Size(80, 16)
Me.chkProductos.TabIndex = 123
Me.chkProductos.Tag = "45"
Me.chkProductos.Text = "Productos"
'
'chkCatalogos
'
Me.chkCatalogos.AutoSize = True
Me.chkCatalogos.BackColor = System.Drawing.Color.White
Me.chkCatalogos.Location = New System.Drawing.Point(0, 0)
Me.chkCatalogos.Name = "chkCatalogos"
Me.chkCatalogos.Size = New System.Drawing.Size(73, 17)
Me.chkCatalogos.TabIndex = 121
Me.chkCatalogos.Tag = "33"
Me.chkCatalogos.Text = "Catalogos"
Me.chkCatalogos.UseVisualStyleBackColor = False
'
'chkGrupoRiesgo
'
Me.chkGrupoRiesgo.AutoSize = True
Me.chkGrupoRiesgo.Location = New System.Drawing.Point(362, 261)
Me.chkGrupoRiesgo.Name = "chkGrupoRiesgo"
Me.chkGrupoRiesgo.Size = New System.Drawing.Size(120, 17)
Me.chkGrupoRiesgo.TabIndex = 120
Me.chkGrupoRiesgo.Tag = "156"
Me.chkGrupoRiesgo.Text = "Grupo de Monitoreo"
'
'chkFuentIng
'
Me.chkFuentIng.AutoSize = True
Me.chkFuentIng.Location = New System.Drawing.Point(362, 244)
Me.chkFuentIng.Name = "chkFuentIng"
Me.chkFuentIng.Size = New System.Drawing.Size(97, 17)
Me.chkFuentIng.TabIndex = 119
Me.chkFuentIng.Tag = "141"
Me.chkFuentIng.Text = "Fuente Ingreso"
'
'chkSucs
'
Me.chkSucs.AutoSize = True
Me.chkSucs.Location = New System.Drawing.Point(362, 227)
Me.chkSucs.Name = "chkSucs"
Me.chkSucs.Size = New System.Drawing.Size(78, 17)
Me.chkSucs.TabIndex = 118
Me.chkSucs.Tag = "140"
Me.chkSucs.Text = "Sucursales"
'
'chkFigLegal
'
Me.chkFigLegal.AutoSize = True
Me.chkFigLegal.Location = New System.Drawing.Point(362, 210)
Me.chkFigLegal.Name = "chkFigLegal"
Me.chkFigLegal.Size = New System.Drawing.Size(84, 17)
Me.chkFigLegal.TabIndex = 117
Me.chkFigLegal.Tag = "139"
Me.chkFigLegal.Text = "Figura Legal"
'
'chkTipoPer
'
Me.chkTipoPer.AutoSize = True
Me.chkTipoPer.Location = New System.Drawing.Point(362, 193)
Me.chkTipoPer.Name = "chkTipoPer"
Me.chkTipoPer.Size = New System.Drawing.Size(89, 17)
Me.chkTipoPer.TabIndex = 116
Me.chkTipoPer.Tag = "138"
Me.chkTipoPer.Text = "Tipo Persona"
'
'chkEstrucCorp
'
Me.chkEstrucCorp.AutoSize = True
Me.chkEstrucCorp.Location = New System.Drawing.Point(362, 176)
Me.chkEstrucCorp.Name = "chkEstrucCorp"
Me.chkEstrucCorp.Size = New System.Drawing.Size(99, 17)
Me.chkEstrucCorp.TabIndex = 115
Me.chkEstrucCorp.Tag = "137"
Me.chkEstrucCorp.Text = "Estructura Corp"
'
'chkTipoDom
'
Me.chkTipoDom.AutoSize = True
Me.chkTipoDom.Location = New System.Drawing.Point(362, 159)
Me.chkTipoDom.Name = "chkTipoDom"
Me.chkTipoDom.Size = New System.Drawing.Size(92, 17)
Me.chkTipoDom.TabIndex = 114
Me.chkTipoDom.Tag = "136"
Me.chkTipoDom.Text = "Tipo Domicilio"
'
'chkTipoCuenta
'
Me.chkTipoCuenta.AutoSize = True
Me.chkTipoCuenta.Location = New System.Drawing.Point(362, 142)
Me.chkTipoCuenta.Name = "chkTipoCuenta"
Me.chkTipoCuenta.Size = New System.Drawing.Size(84, 17)
Me.chkTipoCuenta.TabIndex = 113
Me.chkTipoCuenta.Tag = "135"
Me.chkTipoCuenta.Text = "Tipo Cuenta"
'
'chkProcRec
'
Me.chkProcRec.AutoSize = True
Me.chkProcRec.Location = New System.Drawing.Point(362, 125)
Me.chkProcRec.Name = "chkProcRec"
Me.chkProcRec.Size = New System.Drawing.Size(100, 17)
Me.chkProcRec.TabIndex = 112
Me.chkProcRec.Tag = "134"
Me.chkProcRec.Text = "Origen Recurso"
'
'chkParents
'
Me.chkParents.AutoSize = True
Me.chkParents.Location = New System.Drawing.Point(362, 108)
Me.chkParents.Name = "chkParents"
Me.chkParents.Size = New System.Drawing.Size(80, 17)
Me.chkParents.TabIndex = 111
Me.chkParents.Tag = "133"
Me.chkParents.Text = "Parentesco"
'
'chkTransfer
'
Me.chkTransfer.AutoSize = True
Me.chkTransfer.Location = New System.Drawing.Point(362, 91)
Me.chkTransfer.Name = "chkTransfer"
Me.chkTransfer.Size = New System.Drawing.Size(115, 17)
Me.chkTransfer.TabIndex = 110
Me.chkTransfer.Tag = "132"
Me.chkTransfer.Text = "Tipo Transferencia"
'
'chkInstrument
'
Me.chkInstrument.AutoSize = True
Me.chkInstrument.Location = New System.Drawing.Point(517, 319)
Me.chkInstrument.Name = "chkInstrument"
Me.chkInstrument.Size = New System.Drawing.Size(81, 17)
Me.chkInstrument.TabIndex = 109
Me.chkInstrument.Tag = "131"
Me.chkInstrument.Text = "Instrumento"
Me.chkInstrument.Visible = False
'
'chkID
'
Me.chkID.AutoSize = True
Me.chkID.Location = New System.Drawing.Point(362, 72)
Me.chkID.Name = "chkID"
Me.chkID.Size = New System.Drawing.Size(89, 17)
Me.chkID.TabIndex = 108
Me.chkID.Tag = "130"
Me.chkID.Text = "Identificaci<EFBFBD>n"
'
'chkDesRec
'
Me.chkDesRec.AutoSize = True
Me.chkDesRec.Location = New System.Drawing.Point(362, 54)
Me.chkDesRec.Name = "chkDesRec"
Me.chkDesRec.Size = New System.Drawing.Size(105, 17)
Me.chkDesRec.TabIndex = 107
Me.chkDesRec.Tag = "129"
Me.chkDesRec.Text = "Destino Recurso"
'
'chkActVul
'
Me.chkActVul.AutoSize = True
Me.chkActVul.Location = New System.Drawing.Point(362, 36)
Me.chkActVul.Name = "chkActVul"
Me.chkActVul.Size = New System.Drawing.Size(123, 17)
Me.chkActVul.TabIndex = 105
Me.chkActVul.Tag = "127"
Me.chkActVul.Text = "Actividad Vulnerable"
'
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label2.Location = New System.Drawing.Point(9, 325)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(460, 13)
Me.Label2.TabIndex = 52
Me.Label2.Text = "Nota: Al desmarcar los Checks agrupadores sus checks agrupados se apagar<61>n"
'
'ShapeContainer2
'
Me.ShapeContainer2.Location = New System.Drawing.Point(3, 16)
Me.ShapeContainer2.Margin = New System.Windows.Forms.Padding(0)
Me.ShapeContainer2.Name = "ShapeContainer2"
Me.ShapeContainer2.Shapes.AddRange(New Microsoft.VisualBasic.PowerPacks.Shape() {Me.LineShape40, Me.LineShape39, Me.LineShape38, Me.LineShape37, Me.LineShape36, Me.LineShape35, Me.LineShape34, Me.LineShape33, Me.LineShape32, Me.LineShape31, Me.LineShape30, Me.LineShape29, Me.LineShape11, Me.LineShape10, Me.LineShape9, Me.LineShape7, Me.LineShape6, Me.LineShape5, Me.LineShape27, Me.LineShape26, Me.LineShape25, Me.LineShape24, Me.LineShape23, Me.LineShape22, Me.LineShape21, Me.LineShape20, Me.LineShape19, Me.LineShape17, Me.LineShape16, Me.LineShape15, Me.LineShape14, Me.LineShape13, Me.LineShape12})
Me.ShapeContainer2.Size = New System.Drawing.Size(621, 327)
Me.ShapeContainer2.TabIndex = 51
Me.ShapeContainer2.TabStop = False
'
'LineShape40
'
Me.LineShape40.Name = ""
Me.LineShape40.X1 = 0
Me.LineShape40.X2 = 0
Me.LineShape40.Y1 = 0
Me.LineShape40.Y2 = 0
'
'LineShape39
'
Me.LineShape39.Name = ""
Me.LineShape39.X1 = 0
Me.LineShape39.X2 = 0
Me.LineShape39.Y1 = 0
Me.LineShape39.Y2 = 0
'
'LineShape38
'
Me.LineShape38.Name = ""
Me.LineShape38.X1 = 0
Me.LineShape38.X2 = 0
Me.LineShape38.Y1 = 0
Me.LineShape38.Y2 = 0
'
'LineShape37
'
Me.LineShape37.Name = ""
Me.LineShape37.X1 = 0
Me.LineShape37.X2 = 0
Me.LineShape37.Y1 = 0
Me.LineShape37.Y2 = 0
'
'LineShape36
'
Me.LineShape36.Name = ""
Me.LineShape36.X1 = 0
Me.LineShape36.X2 = 0
Me.LineShape36.Y1 = 0
Me.LineShape36.Y2 = 0
'
'LineShape35
'
Me.LineShape35.Name = ""
Me.LineShape35.X1 = 0
Me.LineShape35.X2 = 0
Me.LineShape35.Y1 = 0
Me.LineShape35.Y2 = 0
'
'LineShape34
'
Me.LineShape34.Name = ""
Me.LineShape34.X1 = 0
Me.LineShape34.X2 = 0
Me.LineShape34.Y1 = 0
Me.LineShape34.Y2 = 0
'
'LineShape33
'
Me.LineShape33.Name = ""
Me.LineShape33.X1 = 0
Me.LineShape33.X2 = 0
Me.LineShape33.Y1 = 0
Me.LineShape33.Y2 = 0
'
'LineShape32
'
Me.LineShape32.Name = ""
Me.LineShape32.X1 = 0
Me.LineShape32.X2 = 0
Me.LineShape32.Y1 = 0
Me.LineShape32.Y2 = 0
'
'LineShape31
'
Me.LineShape31.Name = ""
Me.LineShape31.X1 = 0
Me.LineShape31.X2 = 0
Me.LineShape31.Y1 = 0
Me.LineShape31.Y2 = 0
'
'LineShape30
'
Me.LineShape30.Name = ""
Me.LineShape30.X1 = 0
Me.LineShape30.X2 = 0
Me.LineShape30.Y1 = 0
Me.LineShape30.Y2 = 0
'
'LineShape29
'
Me.LineShape29.Name = ""
Me.LineShape29.X1 = 0
Me.LineShape29.X2 = 0
Me.LineShape29.Y1 = 0
Me.LineShape29.Y2 = 0
'
'LineShape11
'
Me.LineShape11.Name = ""
Me.LineShape11.X1 = 0
Me.LineShape11.X2 = 0
Me.LineShape11.Y1 = 0
Me.LineShape11.Y2 = 0
'
'LineShape10
'
Me.LineShape10.Name = ""
Me.LineShape10.X1 = 0
Me.LineShape10.X2 = 0
Me.LineShape10.Y1 = 0
Me.LineShape10.Y2 = 0
'
'LineShape9
'
Me.LineShape9.Name = ""
Me.LineShape9.X1 = 0
Me.LineShape9.X2 = 0
Me.LineShape9.Y1 = 0
Me.LineShape9.Y2 = 0
'
'LineShape7
'
Me.LineShape7.Name = ""
Me.LineShape7.X1 = 0
Me.LineShape7.X2 = 0
Me.LineShape7.Y1 = 0
Me.LineShape7.Y2 = 0
'
'LineShape6
'
Me.LineShape6.Name = ""
Me.LineShape6.X1 = 0
Me.LineShape6.X2 = 0
Me.LineShape6.Y1 = 0
Me.LineShape6.Y2 = 0
'
'LineShape5
'
Me.LineShape5.Name = ""
Me.LineShape5.X1 = 0
Me.LineShape5.X2 = 0
Me.LineShape5.Y1 = 0
Me.LineShape5.Y2 = 0
'
'LineShape27
'
Me.LineShape27.Name = ""
Me.LineShape27.X1 = 0
Me.LineShape27.X2 = 0
Me.LineShape27.Y1 = 0
Me.LineShape27.Y2 = 0
'
'LineShape26
'
Me.LineShape26.Name = ""
Me.LineShape26.X1 = 0
Me.LineShape26.X2 = 0
Me.LineShape26.Y1 = 0
Me.LineShape26.Y2 = 0
'
'LineShape25
'
Me.LineShape25.Name = ""
Me.LineShape25.X1 = 0
Me.LineShape25.X2 = 0
Me.LineShape25.Y1 = 0
Me.LineShape25.Y2 = 0
'
'LineShape24
'
Me.LineShape24.Name = ""
Me.LineShape24.X1 = 0
Me.LineShape24.X2 = 0
Me.LineShape24.Y1 = 0
Me.LineShape24.Y2 = 0
'
'LineShape23
'
Me.LineShape23.Name = ""
Me.LineShape23.X1 = 0
Me.LineShape23.X2 = 0
Me.LineShape23.Y1 = 0
Me.LineShape23.Y2 = 0
'
'LineShape22
'
Me.LineShape22.Name = ""
Me.LineShape22.X1 = 0
Me.LineShape22.X2 = 0
Me.LineShape22.Y1 = 0
Me.LineShape22.Y2 = 0
'
'LineShape21
'
Me.LineShape21.Name = ""
Me.LineShape21.X1 = 0
Me.LineShape21.X2 = 0
Me.LineShape21.Y1 = 0
Me.LineShape21.Y2 = 0
'
'LineShape20
'
Me.LineShape20.Name = ""
Me.LineShape20.X1 = 0
Me.LineShape20.X2 = 0
Me.LineShape20.Y1 = 0
Me.LineShape20.Y2 = 0
'
'LineShape19
'
Me.LineShape19.Name = ""
Me.LineShape19.X1 = 0
Me.LineShape19.X2 = 0
Me.LineShape19.Y1 = 0
Me.LineShape19.Y2 = 0
'
'LineShape17
'
Me.LineShape17.Name = ""
Me.LineShape17.X1 = 0
Me.LineShape17.X2 = 0
Me.LineShape17.Y1 = 0
Me.LineShape17.Y2 = 0
'
'LineShape16
'
Me.LineShape16.Name = ""
Me.LineShape16.X1 = 0
Me.LineShape16.X2 = 0
Me.LineShape16.Y1 = 0
Me.LineShape16.Y2 = 0
'
'LineShape15
'
Me.LineShape15.Name = ""
Me.LineShape15.X1 = 0
Me.LineShape15.X2 = 0
Me.LineShape15.Y1 = 0
Me.LineShape15.Y2 = 0
'
'LineShape14
'
Me.LineShape14.Name = ""
Me.LineShape14.X1 = 0
Me.LineShape14.X2 = 0
Me.LineShape14.Y1 = 0
Me.LineShape14.Y2 = 0
'
'LineShape13
'
Me.LineShape13.Name = ""
Me.LineShape13.X1 = 0
Me.LineShape13.X2 = 0
Me.LineShape13.Y1 = 0
Me.LineShape13.Y2 = 0
'
'LineShape12
'
Me.LineShape12.Name = ""
Me.LineShape12.X1 = 0
Me.LineShape12.X2 = 0
Me.LineShape12.Y1 = 0
Me.LineShape12.Y2 = 0
'
'seguridad
'
Me.seguridad.Controls.Add(Me.chkTodosSeguridad)
Me.seguridad.Controls.Add(Me.GroupBox9)
Me.seguridad.Location = New System.Drawing.Point(4, 22)
Me.seguridad.Name = "seguridad"
Me.seguridad.Size = New System.Drawing.Size(657, 385)
Me.seguridad.TabIndex = 8
Me.seguridad.Text = "Seguridad"
Me.seguridad.UseVisualStyleBackColor = True
'
'chkTodosSeguridad
'
Me.chkTodosSeguridad.AutoSize = True
Me.chkTodosSeguridad.Location = New System.Drawing.Point(16, 7)
Me.chkTodosSeguridad.Name = "chkTodosSeguridad"
Me.chkTodosSeguridad.Size = New System.Drawing.Size(56, 17)
Me.chkTodosSeguridad.TabIndex = 77
Me.chkTodosSeguridad.Text = "Todos"
Me.chkTodosSeguridad.UseVisualStyleBackColor = True
'
'GroupBox9
'
Me.GroupBox9.Controls.Add(Me.chkControlAcceso)
Me.GroupBox9.Controls.Add(Me.chkConfigClaves)
Me.GroupBox9.Controls.Add(Me.chkPerfil)
Me.GroupBox9.Controls.Add(Me.chkAuditoria)
Me.GroupBox9.Controls.Add(Me.chkUsuario)
Me.GroupBox9.Controls.Add(Me.chkSeguridad)
Me.GroupBox9.Controls.Add(Me.Label5)
Me.GroupBox9.ForeColor = System.Drawing.Color.MidnightBlue
Me.GroupBox9.Location = New System.Drawing.Point(16, 30)
Me.GroupBox9.Name = "GroupBox9"
Me.GroupBox9.Size = New System.Drawing.Size(614, 324)
Me.GroupBox9.TabIndex = 4
Me.GroupBox9.TabStop = False
'
'chkControlAcceso
'
Me.chkControlAcceso.Location = New System.Drawing.Point(28, 123)
Me.chkControlAcceso.Name = "chkControlAcceso"
Me.chkControlAcceso.Size = New System.Drawing.Size(118, 20)
Me.chkControlAcceso.TabIndex = 59
Me.chkControlAcceso.Tag = "182"
Me.chkControlAcceso.Text = "Control de Accesos"
'
'chkConfigClaves
'
Me.chkConfigClaves.Location = New System.Drawing.Point(473, 302)
Me.chkConfigClaves.Name = "chkConfigClaves"
Me.chkConfigClaves.Size = New System.Drawing.Size(135, 20)
Me.chkConfigClaves.TabIndex = 58
Me.chkConfigClaves.Tag = "73"
Me.chkConfigClaves.Text = "Configuraci<EFBFBD>n Claves"
Me.chkConfigClaves.Visible = False
'
'chkPerfil
'
Me.chkPerfil.Location = New System.Drawing.Point(28, 71)
Me.chkPerfil.Name = "chkPerfil"
Me.chkPerfil.Size = New System.Drawing.Size(104, 20)
Me.chkPerfil.TabIndex = 56
Me.chkPerfil.Tag = "31"
Me.chkPerfil.Text = "Perfiles"
'
'chkAuditoria
'
Me.chkAuditoria.Location = New System.Drawing.Point(28, 97)
Me.chkAuditoria.Name = "chkAuditoria"
Me.chkAuditoria.Size = New System.Drawing.Size(104, 20)
Me.chkAuditoria.TabIndex = 57
Me.chkAuditoria.Tag = "32"
Me.chkAuditoria.Text = "Auditor<EFBFBD>a"
'
'chkUsuario
'
Me.chkUsuario.Location = New System.Drawing.Point(28, 45)
Me.chkUsuario.Name = "chkUsuario"
Me.chkUsuario.Size = New System.Drawing.Size(104, 20)
Me.chkUsuario.TabIndex = 55
Me.chkUsuario.Tag = "30"
Me.chkUsuario.Text = "Usuarios"
'
'chkSeguridad
'
Me.chkSeguridad.AutoSize = True
Me.chkSeguridad.BackColor = System.Drawing.Color.White
Me.chkSeguridad.Location = New System.Drawing.Point(0, 0)
Me.chkSeguridad.Name = "chkSeguridad"
Me.chkSeguridad.Size = New System.Drawing.Size(74, 17)
Me.chkSeguridad.TabIndex = 54
Me.chkSeguridad.Tag = "29"
Me.chkSeguridad.Text = "Seguridad"
Me.chkSeguridad.UseVisualStyleBackColor = False
'
'Label5
'
Me.Label5.AutoSize = True
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label5.Location = New System.Drawing.Point(7, 298)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(460, 13)
Me.Label5.TabIndex = 53
Me.Label5.Text = "Nota: Al desmarcar los Checks agrupadores sus checks agrupados se apagar<61>n"
'
'ListaRestringuida
'
Me.ListaRestringuida.Controls.Add(Me.ChkListaRestringidas)
Me.ListaRestringuida.Controls.Add(Me.GroupBox11)
Me.ListaRestringuida.Location = New System.Drawing.Point(4, 22)
Me.ListaRestringuida.Name = "ListaRestringuida"
Me.ListaRestringuida.Size = New System.Drawing.Size(657, 385)
Me.ListaRestringuida.TabIndex = 6
Me.ListaRestringuida.Text = "Listas Restringidas"
Me.ListaRestringuida.UseVisualStyleBackColor = True
'
'ChkListaRestringidas
'
Me.ChkListaRestringidas.AutoSize = True
Me.ChkListaRestringidas.Location = New System.Drawing.Point(16, 15)
Me.ChkListaRestringidas.Name = "ChkListaRestringidas"
Me.ChkListaRestringidas.Size = New System.Drawing.Size(56, 17)
Me.ChkListaRestringidas.TabIndex = 78
Me.ChkListaRestringidas.Text = "Todos"
Me.ChkListaRestringidas.UseVisualStyleBackColor = True
'
'GroupBox11
'
Me.GroupBox11.Controls.Add(Me.chkListaSPID)
Me.GroupBox11.Controls.Add(Me.ChkPersonas)
Me.GroupBox11.Controls.Add(Me.chkClientes)
Me.GroupBox11.Controls.Add(Me.chkListasrest)
Me.GroupBox11.Controls.Add(Me.Label6)
Me.GroupBox11.ForeColor = System.Drawing.Color.MidnightBlue
Me.GroupBox11.Location = New System.Drawing.Point(16, 38)
Me.GroupBox11.Name = "GroupBox11"
Me.GroupBox11.Size = New System.Drawing.Size(614, 316)
Me.GroupBox11.TabIndex = 10
Me.GroupBox11.TabStop = False
'
'chkListaSPID
'
Me.chkListaSPID.Location = New System.Drawing.Point(489, 296)
Me.chkListaSPID.Name = "chkListaSPID"
Me.chkListaSPID.Size = New System.Drawing.Size(104, 20)
Me.chkListaSPID.TabIndex = 61
Me.chkListaSPID.Tag = "188"
Me.chkListaSPID.Text = "SPID"
Me.chkListaSPID.Visible = False
'
'ChkPersonas
'
Me.ChkPersonas.Location = New System.Drawing.Point(28, 39)
Me.ChkPersonas.Name = "ChkPersonas"
Me.ChkPersonas.Size = New System.Drawing.Size(104, 20)
Me.ChkPersonas.TabIndex = 55
Me.ChkPersonas.Tag = "56"
Me.ChkPersonas.Text = "Personas"
'
'chkClientes
'
Me.chkClientes.Location = New System.Drawing.Point(28, 65)
Me.chkClientes.Name = "chkClientes"
Me.chkClientes.Size = New System.Drawing.Size(104, 20)
Me.chkClientes.TabIndex = 56
Me.chkClientes.Tag = "57"
Me.chkClientes.Text = "Clientes"
'
'chkListasrest
'
Me.chkListasrest.AutoSize = True
Me.chkListasrest.BackColor = System.Drawing.Color.White
Me.chkListasrest.Location = New System.Drawing.Point(0, 0)
Me.chkListasrest.Name = "chkListasrest"
Me.chkListasrest.Size = New System.Drawing.Size(114, 17)
Me.chkListasrest.TabIndex = 54
Me.chkListasrest.Tag = "55"
Me.chkListasrest.Text = "Listas Restringidas"
Me.chkListasrest.UseVisualStyleBackColor = False
'
'Label6
'
Me.Label6.AutoSize = True
Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label6.Location = New System.Drawing.Point(6, 288)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(460, 13)
Me.Label6.TabIndex = 53
Me.Label6.Text = "Nota: Al desmarcar los Checks agrupadores sus checks agrupados se apagar<61>n"
'
'tabProcesoHit
'
Me.tabProcesoHit.BackColor = System.Drawing.Color.White
Me.tabProcesoHit.Controls.Add(Me.GroupBox7)
Me.tabProcesoHit.Location = New System.Drawing.Point(4, 22)
Me.tabProcesoHit.Name = "tabProcesoHit"
Me.tabProcesoHit.Size = New System.Drawing.Size(657, 385)
Me.tabProcesoHit.TabIndex = 14
Me.tabProcesoHit.Text = "ProcesoHIT"
'
'GroupBox7
'
Me.GroupBox7.Controls.Add(Me.chkProcesoHIT)
Me.GroupBox7.Controls.Add(Me.chkComp)
Me.GroupBox7.Controls.Add(Me.chkReviewer)
Me.GroupBox7.ForeColor = System.Drawing.Color.MidnightBlue
Me.GroupBox7.Location = New System.Drawing.Point(17, 12)
Me.GroupBox7.Name = "GroupBox7"
Me.GroupBox7.Size = New System.Drawing.Size(610, 340)
Me.GroupBox7.TabIndex = 0
Me.GroupBox7.TabStop = False
'
'chkProcesoHIT
'
Me.chkProcesoHIT.AutoSize = True
Me.chkProcesoHIT.Location = New System.Drawing.Point(0, 0)
Me.chkProcesoHIT.Name = "chkProcesoHIT"
Me.chkProcesoHIT.Size = New System.Drawing.Size(83, 17)
Me.chkProcesoHIT.TabIndex = 3
Me.chkProcesoHIT.Tag = "125"
Me.chkProcesoHIT.Text = "ProcesoHIT"
Me.chkProcesoHIT.UseVisualStyleBackColor = True
Me.chkProcesoHIT.Visible = False
'
'chkComp
'
Me.chkComp.AutoSize = True
Me.chkComp.Location = New System.Drawing.Point(23, 85)
Me.chkComp.Name = "chkComp"
Me.chkComp.Size = New System.Drawing.Size(81, 17)
Me.chkComp.TabIndex = 2
Me.chkComp.Tag = "162"
Me.chkComp.Text = "Compliance"
Me.chkComp.UseVisualStyleBackColor = True
Me.chkComp.Visible = False
'
'chkReviewer
'
Me.chkReviewer.AutoSize = True
Me.chkReviewer.Location = New System.Drawing.Point(23, 52)
Me.chkReviewer.Name = "chkReviewer"
Me.chkReviewer.Size = New System.Drawing.Size(71, 17)
Me.chkReviewer.TabIndex = 1
Me.chkReviewer.Tag = "161"
Me.chkReviewer.Text = "Reviewer"
Me.chkReviewer.UseVisualStyleBackColor = True
Me.chkReviewer.Visible = False
'
'TABServer
'
Me.TABServer.Controls.Add(Me.CheckBox2)
Me.TABServer.Controls.Add(Me.GroupBox3)
Me.TABServer.Location = New System.Drawing.Point(4, 22)
Me.TABServer.Name = "TABServer"
Me.TABServer.Padding = New System.Windows.Forms.Padding(3)
Me.TABServer.Size = New System.Drawing.Size(657, 385)
Me.TABServer.TabIndex = 10
Me.TABServer.Text = "Server"
Me.TABServer.UseVisualStyleBackColor = True
'
'CheckBox2
'
Me.CheckBox2.AutoSize = True
Me.CheckBox2.Location = New System.Drawing.Point(16, 8)
Me.CheckBox2.Name = "CheckBox2"
Me.CheckBox2.Size = New System.Drawing.Size(56, 17)
Me.CheckBox2.TabIndex = 74
Me.CheckBox2.Text = "Todos"
Me.CheckBox2.UseVisualStyleBackColor = True
'
'GroupBox3
'
Me.GroupBox3.Controls.Add(Me.chkserver)
Me.GroupBox3.Controls.Add(Me.Label7)
Me.GroupBox3.Controls.Add(Me.gbxLogs)
Me.GroupBox3.Controls.Add(Me.gbxProcs)
Me.GroupBox3.Controls.Add(Me.gbxAlarmas)
Me.GroupBox3.Controls.Add(Me.gbxContCargas)
Me.GroupBox3.ForeColor = System.Drawing.Color.MidnightBlue
Me.GroupBox3.Location = New System.Drawing.Point(16, 31)
Me.GroupBox3.Name = "GroupBox3"
Me.GroupBox3.Size = New System.Drawing.Size(614, 348)
Me.GroupBox3.TabIndex = 4
Me.GroupBox3.TabStop = False
'
'chkserver
'
Me.chkserver.AutoSize = True
Me.chkserver.BackColor = System.Drawing.Color.White
Me.chkserver.Location = New System.Drawing.Point(0, 0)
Me.chkserver.Name = "chkserver"
Me.chkserver.Size = New System.Drawing.Size(88, 17)
Me.chkserver.TabIndex = 73
Me.chkserver.Tag = "84"
Me.chkserver.Text = "Minds Server"
Me.chkserver.UseVisualStyleBackColor = False
Me.chkserver.Visible = False
'
'Label7
'
Me.Label7.AutoSize = True
Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label7.Location = New System.Drawing.Point(10, 331)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(460, 13)
Me.Label7.TabIndex = 72
Me.Label7.Text = "Nota: Al desmarcar los Checks agrupadores sus checks agrupados se apagar<61>n"
'
'gbxLogs
'
Me.gbxLogs.Controls.Add(Me.chkRCuentaRel)
Me.gbxLogs.Controls.Add(Me.chkAuditS)
Me.gbxLogs.Controls.Add(Me.chkRPerfilTran)
Me.gbxLogs.Controls.Add(Me.chkLogs)
Me.gbxLogs.Controls.Add(Me.chkAcumuladoMenS)
Me.gbxLogs.Controls.Add(Me.chkChequesServer)
Me.gbxLogs.Controls.Add(Me.chkTransFondos)
Me.gbxLogs.Controls.Add(Me.chkDllsEfec)
Me.gbxLogs.Location = New System.Drawing.Point(415, 34)
Me.gbxLogs.Name = "gbxLogs"
Me.gbxLogs.Size = New System.Drawing.Size(170, 288)
Me.gbxLogs.TabIndex = 71
Me.gbxLogs.TabStop = False
Me.gbxLogs.Text = "Logs"
'
'chkRCuentaRel
'
Me.chkRCuentaRel.Location = New System.Drawing.Point(10, 213)
Me.chkRCuentaRel.Name = "chkRCuentaRel"
Me.chkRCuentaRel.Size = New System.Drawing.Size(131, 30)
Me.chkRCuentaRel.TabIndex = 73
Me.chkRCuentaRel.Tag = "190"
Me.chkRCuentaRel.Text = "Recalcular Cuentas Relacionadas"
Me.chkRCuentaRel.Visible = False
'
'chkAuditS
'
Me.chkAuditS.Location = New System.Drawing.Point(10, 44)
Me.chkAuditS.Name = "chkAuditS"
Me.chkAuditS.Size = New System.Drawing.Size(128, 20)
Me.chkAuditS.TabIndex = 67
Me.chkAuditS.Tag = "94"
Me.chkAuditS.Text = "Auditor<EFBFBD>a"
'
'chkRPerfilTran
'
Me.chkRPerfilTran.Location = New System.Drawing.Point(10, 183)
Me.chkRPerfilTran.Name = "chkRPerfilTran"
Me.chkRPerfilTran.Size = New System.Drawing.Size(115, 31)
Me.chkRPerfilTran.TabIndex = 72
Me.chkRPerfilTran.Tag = "189"
Me.chkRPerfilTran.Text = "Recalcular Perfil Transaccional"
Me.chkRPerfilTran.Visible = False
'
'chkLogs
'
Me.chkLogs.Location = New System.Drawing.Point(10, 19)
Me.chkLogs.Name = "chkLogs"
Me.chkLogs.Size = New System.Drawing.Size(128, 20)
Me.chkLogs.TabIndex = 66
Me.chkLogs.Tag = "93"
Me.chkLogs.Text = "Log de transacciones"
'
'chkAcumuladoMenS
'
Me.chkAcumuladoMenS.Location = New System.Drawing.Point(10, 93)
Me.chkAcumuladoMenS.Name = "chkAcumuladoMenS"
Me.chkAcumuladoMenS.Size = New System.Drawing.Size(145, 20)
Me.chkAcumuladoMenS.TabIndex = 67
Me.chkAcumuladoMenS.Tag = "151"
Me.chkAcumuladoMenS.Text = "Acumulado Mensual"
Me.chkAcumuladoMenS.Visible = False
'
'chkChequesServer
'
Me.chkChequesServer.AutoSize = True
Me.chkChequesServer.Location = New System.Drawing.Point(10, 165)
Me.chkChequesServer.Name = "chkChequesServer"
Me.chkChequesServer.Size = New System.Drawing.Size(107, 17)
Me.chkChequesServer.TabIndex = 53
Me.chkChequesServer.Tag = "160"
Me.chkChequesServer.Text = "Cheques de Caja"
Me.chkChequesServer.UseVisualStyleBackColor = True
Me.chkChequesServer.Visible = False
'
'chkTransFondos
'
Me.chkTransFondos.Location = New System.Drawing.Point(10, 107)
Me.chkTransFondos.Name = "chkTransFondos"
Me.chkTransFondos.Size = New System.Drawing.Size(145, 40)
Me.chkTransFondos.TabIndex = 68
Me.chkTransFondos.Tag = "152"
Me.chkTransFondos.Text = "Transferencia Internacional de Fondos"
Me.chkTransFondos.Visible = False
'
'chkDllsEfec
'
Me.chkDllsEfec.Location = New System.Drawing.Point(10, 143)
Me.chkDllsEfec.Name = "chkDllsEfec"
Me.chkDllsEfec.Size = New System.Drawing.Size(145, 20)
Me.chkDllsEfec.TabIndex = 69
Me.chkDllsEfec.Tag = "153"
Me.chkDllsEfec.Text = "D<EFBFBD>lares en Efectivo"
Me.chkDllsEfec.Visible = False
'
'gbxProcs
'
Me.gbxProcs.Controls.Add(Me.chkVigDoctos)
Me.gbxProcs.Controls.Add(Me.chkRevExpediente)
Me.gbxProcs.Controls.Add(Me.chkConfigCarga)
Me.gbxProcs.Controls.Add(Me.ChkRiesgo)
Me.gbxProcs.Controls.Add(Me.ChkListasS)
Me.gbxProcs.Controls.Add(Me.chkPerfilTranServer)
Me.gbxProcs.Location = New System.Drawing.Point(216, 34)
Me.gbxProcs.Name = "gbxProcs"
Me.gbxProcs.Size = New System.Drawing.Size(170, 288)
Me.gbxProcs.TabIndex = 70
Me.gbxProcs.TabStop = False
Me.gbxProcs.Text = "Procesos Especiales"
'
'chkVigDoctos
'
Me.chkVigDoctos.AutoSize = True
Me.chkVigDoctos.Location = New System.Drawing.Point(9, 128)
Me.chkVigDoctos.Name = "chkVigDoctos"
Me.chkVigDoctos.Size = New System.Drawing.Size(145, 17)
Me.chkVigDoctos.TabIndex = 68
Me.chkVigDoctos.Tag = "194"
Me.chkVigDoctos.Text = "Vigencia de Documentos"
'
'chkRevExpediente
'
Me.chkRevExpediente.AutoSize = True
Me.chkRevExpediente.Location = New System.Drawing.Point(9, 109)
Me.chkRevExpediente.Name = "chkRevExpediente"
Me.chkRevExpediente.Size = New System.Drawing.Size(138, 17)
Me.chkRevExpediente.TabIndex = 67
Me.chkRevExpediente.Tag = "193"
Me.chkRevExpediente.Text = "Revisi<EFBFBD>n de Expediente"
'
'chkConfigCarga
'
Me.chkConfigCarga.Location = New System.Drawing.Point(9, 147)
Me.chkConfigCarga.Name = "chkConfigCarga"
Me.chkConfigCarga.Size = New System.Drawing.Size(148, 34)
Me.chkConfigCarga.TabIndex = 61
Me.chkConfigCarga.Tag = "101"
Me.chkConfigCarga.Text = "Configuraci<EFBFBD>n Proceso Autom<6F>tico"
'
'ChkRiesgo
'
Me.ChkRiesgo.Location = New System.Drawing.Point(9, 51)
Me.ChkRiesgo.Name = "ChkRiesgo"
Me.ChkRiesgo.Size = New System.Drawing.Size(145, 34)
Me.ChkRiesgo.TabIndex = 66
Me.ChkRiesgo.Tag = "92"
Me.ChkRiesgo.Text = "Calificaci<EFBFBD>n autom<6F>tica de riesgo"
'
'ChkListasS
'
Me.ChkListasS.Location = New System.Drawing.Point(9, 14)
Me.ChkListasS.Name = "ChkListasS"
Me.ChkListasS.Size = New System.Drawing.Size(146, 35)
Me.ChkListasS.TabIndex = 60
Me.ChkListasS.Tag = "90"
Me.ChkListasS.Text = "Verificaci<EFBFBD>n Clientes vs Listas"
'
'chkPerfilTranServer
'
Me.chkPerfilTranServer.Location = New System.Drawing.Point(9, 87)
Me.chkPerfilTranServer.Name = "chkPerfilTranServer"
Me.chkPerfilTranServer.Size = New System.Drawing.Size(145, 20)
Me.chkPerfilTranServer.TabIndex = 63
Me.chkPerfilTranServer.Tag = "103"
Me.chkPerfilTranServer.Text = "Perf<EFBFBD>l Transaccional"
'
'gbxAlarmas
'
Me.gbxAlarmas.Controls.Add(Me.chkPatMizuho)
Me.gbxAlarmas.Controls.Add(Me.chkReproceso)
Me.gbxAlarmas.Controls.Add(Me.ChkInuS)
Me.gbxAlarmas.Controls.Add(Me.ChkrelevantesS)
Me.gbxAlarmas.Controls.Add(Me.ChkFraccS)
Me.gbxAlarmas.Location = New System.Drawing.Point(13, 153)
Me.gbxAlarmas.Name = "gbxAlarmas"
Me.gbxAlarmas.Size = New System.Drawing.Size(170, 169)
Me.gbxAlarmas.TabIndex = 69
Me.gbxAlarmas.TabStop = False
Me.gbxAlarmas.Text = "Alarmas y Patrones"
'
'chkPatMizuho
'
Me.chkPatMizuho.Location = New System.Drawing.Point(6, 131)
Me.chkPatMizuho.Name = "chkPatMizuho"
Me.chkPatMizuho.Size = New System.Drawing.Size(145, 20)
Me.chkPatMizuho.TabIndex = 60
Me.chkPatMizuho.Tag = "150"
Me.chkPatMizuho.Text = "Patrones Mizuho"
Me.chkPatMizuho.Visible = False
'
'chkReproceso
'
Me.chkReproceso.Location = New System.Drawing.Point(6, 88)
Me.chkReproceso.Name = "chkReproceso"
Me.chkReproceso.Size = New System.Drawing.Size(145, 20)
Me.chkReproceso.TabIndex = 59
Me.chkReproceso.Tag = "89"
Me.chkReproceso.Text = "Proceso por Periodo"
'
'ChkInuS
'
Me.ChkInuS.Location = New System.Drawing.Point(6, 20)
Me.ChkInuS.Name = "ChkInuS"
Me.ChkInuS.Size = New System.Drawing.Size(145, 20)
Me.ChkInuS.TabIndex = 58
Me.ChkInuS.Tag = "88"
Me.ChkInuS.Text = "Operaciones Inusuales"
'
'ChkrelevantesS
'
Me.ChkrelevantesS.Location = New System.Drawing.Point(6, 64)
Me.ChkrelevantesS.Name = "ChkrelevantesS"
Me.ChkrelevantesS.Size = New System.Drawing.Size(148, 20)
Me.ChkrelevantesS.TabIndex = 56
Me.ChkrelevantesS.Tag = "95"
Me.ChkrelevantesS.Text = "Operaciones Relevantes"
'
'ChkFraccS
'
Me.ChkFraccS.Location = New System.Drawing.Point(6, 42)
Me.ChkFraccS.Name = "ChkFraccS"
Me.ChkFraccS.Size = New System.Drawing.Size(153, 20)
Me.ChkFraccS.TabIndex = 57
Me.ChkFraccS.Tag = "96"
Me.ChkFraccS.Text = "Inusuales Fraccionadas"
'
'gbxContCargas
'
Me.gbxContCargas.Controls.Add(Me.chkListas)
Me.gbxContCargas.Controls.Add(Me.chkTCambio)
Me.gbxContCargas.Controls.Add(Me.chktran)
Me.gbxContCargas.Location = New System.Drawing.Point(13, 34)
Me.gbxContCargas.Name = "gbxContCargas"
Me.gbxContCargas.Size = New System.Drawing.Size(170, 113)
Me.gbxContCargas.TabIndex = 68
Me.gbxContCargas.TabStop = False
Me.gbxContCargas.Text = " Cargas de Informaci<63>n "
'
'chkListas
'
Me.chkListas.Location = New System.Drawing.Point(6, 52)
Me.chkListas.Name = "chkListas"
Me.chkListas.Size = New System.Drawing.Size(145, 20)
Me.chkListas.TabIndex = 54
Me.chkListas.Tag = "100"
Me.chkListas.Text = "Listas Restringidas"
'
'chkTCambio
'
Me.chkTCambio.Location = New System.Drawing.Point(6, 80)
Me.chkTCambio.Name = "chkTCambio"
Me.chkTCambio.Size = New System.Drawing.Size(122, 20)
Me.chkTCambio.TabIndex = 55
Me.chkTCambio.Tag = "85"
Me.chkTCambio.Text = "Tipos de Cambio"
Me.chkTCambio.Visible = False
'
'chktran
'
Me.chktran.Location = New System.Drawing.Point(6, 24)
Me.chktran.Name = "chktran"
Me.chktran.Size = New System.Drawing.Size(153, 20)
Me.chktran.TabIndex = 53
Me.chktran.Tag = "86"
Me.chktran.Text = "Transacciones Diarias"
'
'KYC
'
Me.KYC.Controls.Add(Me.GroupBox4)
Me.KYC.Location = New System.Drawing.Point(4, 22)
Me.KYC.Name = "KYC"
Me.KYC.Size = New System.Drawing.Size(657, 385)
Me.KYC.TabIndex = 11
Me.KYC.Text = "KYC"
Me.KYC.UseVisualStyleBackColor = True
'
'GroupBox4
'
Me.GroupBox4.Controls.Add(Me.Label3)
Me.GroupBox4.Controls.Add(Me.chkKYC)
Me.GroupBox4.Controls.Add(Me.chkCteSinKYC)
Me.GroupBox4.Controls.Add(Me.chkAlarmaKYC)
Me.GroupBox4.ForeColor = System.Drawing.Color.MidnightBlue
Me.GroupBox4.Location = New System.Drawing.Point(16, 16)
Me.GroupBox4.Name = "GroupBox4"
Me.GroupBox4.Size = New System.Drawing.Size(520, 347)
Me.GroupBox4.TabIndex = 6
Me.GroupBox4.TabStop = False
'
'Label3
'
Me.Label3.AutoSize = True
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label3.Location = New System.Drawing.Point(9, 325)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(460, 13)
Me.Label3.TabIndex = 53
Me.Label3.Text = "Nota: Al desmarcar los Checks agrupadores sus checks agrupados se apagar<61>n"
'
'chkKYC
'
Me.chkKYC.Location = New System.Drawing.Point(16, -1)
Me.chkKYC.Name = "chkKYC"
Me.chkKYC.Size = New System.Drawing.Size(48, 15)
Me.chkKYC.TabIndex = 20
Me.chkKYC.Tag = ""
Me.chkKYC.Text = "KYC"
'
'chkCteSinKYC
'
Me.chkCteSinKYC.Location = New System.Drawing.Point(12, 36)
Me.chkCteSinKYC.Name = "chkCteSinKYC"
Me.chkCteSinKYC.Size = New System.Drawing.Size(136, 20)
Me.chkCteSinKYC.TabIndex = 21
Me.chkCteSinKYC.Tag = ""
Me.chkCteSinKYC.Text = "Clientes sin KYC"
'
'chkAlarmaKYC
'
Me.chkAlarmaKYC.Location = New System.Drawing.Point(12, 56)
Me.chkAlarmaKYC.Name = "chkAlarmaKYC"
Me.chkAlarmaKYC.Size = New System.Drawing.Size(128, 20)
Me.chkAlarmaKYC.TabIndex = 22
Me.chkAlarmaKYC.Tag = ""
Me.chkAlarmaKYC.Text = "Alarmas KYC"
'
'KYCControles
'
Me.KYCControles.BackColor = System.Drawing.Color.White
Me.KYCControles.Controls.Add(Me.GroupBox6)
Me.KYCControles.Location = New System.Drawing.Point(4, 22)
Me.KYCControles.Name = "KYCControles"
Me.KYCControles.Size = New System.Drawing.Size(657, 385)
Me.KYCControles.TabIndex = 13
Me.KYCControles.Text = "KYC Controles"
'
'GroupBox6
'
Me.GroupBox6.Controls.Add(Me.chkRevExp)
Me.GroupBox6.Controls.Add(Me.chkAVigDoctos)
Me.GroupBox6.Controls.Add(Me.chkCalifRiesgoABC)
Me.GroupBox6.Controls.Add(Me.chkCalificacionOC)
Me.GroupBox6.Controls.Add(Me.chkKYCNuevoCliente)
Me.GroupBox6.Controls.Add(Me.chkKYCEditReg)
Me.GroupBox6.Controls.Add(Me.pnlPermisosKYCEstatus)
Me.GroupBox6.Controls.Add(Me.chkKYCEstatus)
Me.GroupBox6.Controls.Add(Me.btnBorraUno)
Me.GroupBox6.Controls.Add(Me.btnPasaUno)
Me.GroupBox6.Controls.Add(Me.btnPasaTodos)
Me.GroupBox6.Controls.Add(Me.btnBorraTodos)
Me.GroupBox6.Location = New System.Drawing.Point(16, 16)
Me.GroupBox6.Name = "GroupBox6"
Me.GroupBox6.Size = New System.Drawing.Size(614, 338)
Me.GroupBox6.TabIndex = 7
Me.GroupBox6.TabStop = False
'
'chkRevExp
'
Me.chkRevExp.AutoSize = True
Me.chkRevExp.ForeColor = System.Drawing.Color.MidnightBlue
Me.chkRevExp.Location = New System.Drawing.Point(314, 294)
Me.chkRevExp.Name = "chkRevExp"
Me.chkRevExp.Size = New System.Drawing.Size(179, 17)
Me.chkRevExp.TabIndex = 68
Me.chkRevExp.Tag = "196"
Me.chkRevExp.Text = "Reporte Revisi<73>n de Expediente"
Me.chkRevExp.UseVisualStyleBackColor = True
'
'chkAVigDoctos
'
Me.chkAVigDoctos.AutoSize = True
Me.chkAVigDoctos.ForeColor = System.Drawing.Color.MidnightBlue
Me.chkAVigDoctos.Location = New System.Drawing.Point(314, 271)
Me.chkAVigDoctos.Name = "chkAVigDoctos"
Me.chkAVigDoctos.Size = New System.Drawing.Size(190, 17)
Me.chkAVigDoctos.TabIndex = 67
Me.chkAVigDoctos.Tag = "195"
Me.chkAVigDoctos.Text = "Alerta de Vigencia de Documentos"
Me.chkAVigDoctos.UseVisualStyleBackColor = True
'
'chkCalifRiesgoABC
'
Me.chkCalifRiesgoABC.AutoSize = True
Me.chkCalifRiesgoABC.ForeColor = System.Drawing.Color.MidnightBlue
Me.chkCalifRiesgoABC.Location = New System.Drawing.Point(161, 270)
Me.chkCalifRiesgoABC.Name = "chkCalifRiesgoABC"
Me.chkCalifRiesgoABC.Size = New System.Drawing.Size(130, 17)
Me.chkCalifRiesgoABC.TabIndex = 66
Me.chkCalifRiesgoABC.Tag = "181"
Me.chkCalifRiesgoABC.Text = "Evaluaci<EFBFBD>n de Riesgo"
Me.chkCalifRiesgoABC.UseVisualStyleBackColor = True
'
'chkCalificacionOC
'
Me.chkCalificacionOC.AutoSize = True
Me.chkCalificacionOC.ForeColor = System.Drawing.Color.MidnightBlue
Me.chkCalificacionOC.Location = New System.Drawing.Point(6, 314)
Me.chkCalificacionOC.Name = "chkCalificacionOC"
Me.chkCalificacionOC.Size = New System.Drawing.Size(137, 17)
Me.chkCalificacionOC.TabIndex = 65
Me.chkCalificacionOC.Tag = "164"
Me.chkCalificacionOC.Text = "Calificaci<EFBFBD>n Riesgo O.C"
Me.chkCalificacionOC.UseVisualStyleBackColor = True
'
'chkKYCNuevoCliente
'
Me.chkKYCNuevoCliente.AutoSize = True
Me.chkKYCNuevoCliente.ForeColor = System.Drawing.Color.MidnightBlue
Me.chkKYCNuevoCliente.Location = New System.Drawing.Point(6, 291)
Me.chkKYCNuevoCliente.Name = "chkKYCNuevoCliente"
Me.chkKYCNuevoCliente.Size = New System.Drawing.Size(131, 17)
Me.chkKYCNuevoCliente.TabIndex = 64
Me.chkKYCNuevoCliente.Tag = "163"
Me.chkKYCNuevoCliente.Text = "Permite Nuevo Cliente"
Me.chkKYCNuevoCliente.UseVisualStyleBackColor = True
'
'chkKYCEditReg
'
Me.chkKYCEditReg.AutoSize = True
Me.chkKYCEditReg.ForeColor = System.Drawing.Color.MidnightBlue
Me.chkKYCEditReg.Location = New System.Drawing.Point(6, 270)
Me.chkKYCEditReg.Name = "chkKYCEditReg"
Me.chkKYCEditReg.Size = New System.Drawing.Size(115, 17)
Me.chkKYCEditReg.TabIndex = 63
Me.chkKYCEditReg.Text = "Permite Editar KYC"
Me.chkKYCEditReg.UseVisualStyleBackColor = True
'
'pnlPermisosKYCEstatus
'
Me.pnlPermisosKYCEstatus.Controls.Add(Me.btnQuitar2)
Me.pnlPermisosKYCEstatus.Controls.Add(Me.btnQuitar1)
Me.pnlPermisosKYCEstatus.Controls.Add(Me.btnAdd2)
Me.pnlPermisosKYCEstatus.Controls.Add(Me.btnAdd1)
Me.pnlPermisosKYCEstatus.Controls.Add(Me.cmbKYCESTATUS2)
Me.pnlPermisosKYCEstatus.Controls.Add(Me.cmbKYCESTATUS1)
Me.pnlPermisosKYCEstatus.Controls.Add(Me.Label9)
Me.pnlPermisosKYCEstatus.Controls.Add(Me.lstAutorizados)
Me.pnlPermisosKYCEstatus.Controls.Add(Me.Label10)
Me.pnlPermisosKYCEstatus.Controls.Add(Me.lstDisponibles)
Me.pnlPermisosKYCEstatus.Location = New System.Drawing.Point(58, 45)
Me.pnlPermisosKYCEstatus.Name = "pnlPermisosKYCEstatus"
Me.pnlPermisosKYCEstatus.Size = New System.Drawing.Size(506, 220)
Me.pnlPermisosKYCEstatus.TabIndex = 59
'
'btnQuitar2
'
Me.btnQuitar2.Location = New System.Drawing.Point(170, 62)
Me.btnQuitar2.Name = "btnQuitar2"
Me.btnQuitar2.Size = New System.Drawing.Size(75, 23)
Me.btnQuitar2.TabIndex = 67
Me.btnQuitar2.Text = "Eliminar"
Me.btnQuitar2.UseVisualStyleBackColor = True
'
'btnQuitar1
'
Me.btnQuitar1.Location = New System.Drawing.Point(411, 63)
Me.btnQuitar1.Name = "btnQuitar1"
Me.btnQuitar1.Size = New System.Drawing.Size(75, 23)
Me.btnQuitar1.TabIndex = 66
Me.btnQuitar1.Text = "Eliminar"
Me.btnQuitar1.UseVisualStyleBackColor = True
'
'btnAdd2
'
Me.btnAdd2.Location = New System.Drawing.Point(10, 63)
Me.btnAdd2.Name = "btnAdd2"
Me.btnAdd2.Size = New System.Drawing.Size(75, 23)
Me.btnAdd2.TabIndex = 65
Me.btnAdd2.Text = "Agregar"
Me.btnAdd2.UseVisualStyleBackColor = True
'
'btnAdd1
'
Me.btnAdd1.Location = New System.Drawing.Point(256, 62)
Me.btnAdd1.Name = "btnAdd1"
Me.btnAdd1.Size = New System.Drawing.Size(75, 23)
Me.btnAdd1.TabIndex = 64
Me.btnAdd1.Text = "Agregar"
Me.btnAdd1.UseVisualStyleBackColor = True
'
'cmbKYCESTATUS2
'
Me.cmbKYCESTATUS2.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cmbKYCESTATUS2.FormattingEnabled = True
Me.cmbKYCESTATUS2.Location = New System.Drawing.Point(10, 36)
Me.cmbKYCESTATUS2.Name = "cmbKYCESTATUS2"
Me.cmbKYCESTATUS2.Size = New System.Drawing.Size(229, 21)
Me.cmbKYCESTATUS2.TabIndex = 63
'
'cmbKYCESTATUS1
'
Me.cmbKYCESTATUS1.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cmbKYCESTATUS1.FormattingEnabled = True
Me.cmbKYCESTATUS1.Location = New System.Drawing.Point(256, 36)
Me.cmbKYCESTATUS1.Name = "cmbKYCESTATUS1"
Me.cmbKYCESTATUS1.Size = New System.Drawing.Size(229, 21)
Me.cmbKYCESTATUS1.TabIndex = 62
'
'Label9
'
Me.Label9.AutoSize = True
Me.Label9.ForeColor = System.Drawing.Color.MidnightBlue
Me.Label9.Location = New System.Drawing.Point(7, 11)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(99, 13)
Me.Label9.TabIndex = 54
Me.Label9.Text = "Estatus Disponibles"
'
'lstAutorizados
'
Me.lstAutorizados.FormattingEnabled = True
Me.lstAutorizados.Location = New System.Drawing.Point(10, 97)
Me.lstAutorizados.Name = "lstAutorizados"
Me.lstAutorizados.Size = New System.Drawing.Size(240, 108)
Me.lstAutorizados.TabIndex = 57
'
'Label10
'
Me.Label10.AutoSize = True
Me.Label10.ForeColor = System.Drawing.Color.MidnightBlue
Me.Label10.Location = New System.Drawing.Point(253, 11)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(170, 13)
Me.Label10.TabIndex = 56
Me.Label10.Text = "Estatus Autorizados para Modificar"
'
'lstDisponibles
'
Me.lstDisponibles.FormattingEnabled = True
Me.lstDisponibles.Location = New System.Drawing.Point(256, 96)
Me.lstDisponibles.Name = "lstDisponibles"
Me.lstDisponibles.Size = New System.Drawing.Size(240, 108)
Me.lstDisponibles.TabIndex = 55
'
'chkKYCEstatus
'
Me.chkKYCEstatus.BackColor = System.Drawing.Color.White
Me.chkKYCEstatus.ForeColor = System.Drawing.Color.MidnightBlue
Me.chkKYCEstatus.Location = New System.Drawing.Point(6, 19)
Me.chkKYCEstatus.Name = "chkKYCEstatus"
Me.chkKYCEstatus.Size = New System.Drawing.Size(90, 20)
Me.chkKYCEstatus.TabIndex = 20
Me.chkKYCEstatus.Tag = "109"
Me.chkKYCEstatus.Text = "KYC Estatus"
Me.chkKYCEstatus.UseVisualStyleBackColor = False
'
'btnBorraUno
'
Me.btnBorraUno.Location = New System.Drawing.Point(474, 185)
Me.btnBorraUno.Name = "btnBorraUno"
Me.btnBorraUno.Size = New System.Drawing.Size(75, 23)
Me.btnBorraUno.TabIndex = 61
Me.btnBorraUno.Text = "<"
Me.btnBorraUno.UseVisualStyleBackColor = True
Me.btnBorraUno.Visible = False
'
'btnPasaUno
'
Me.btnPasaUno.Location = New System.Drawing.Point(474, 156)
Me.btnPasaUno.Name = "btnPasaUno"
Me.btnPasaUno.Size = New System.Drawing.Size(75, 23)
Me.btnPasaUno.TabIndex = 60
Me.btnPasaUno.Text = ">"
Me.btnPasaUno.UseVisualStyleBackColor = True
Me.btnPasaUno.Visible = False
'
'btnPasaTodos
'
Me.btnPasaTodos.Location = New System.Drawing.Point(474, 127)
Me.btnPasaTodos.Name = "btnPasaTodos"
Me.btnPasaTodos.Size = New System.Drawing.Size(75, 23)
Me.btnPasaTodos.TabIndex = 58
Me.btnPasaTodos.Text = ">>"
Me.btnPasaTodos.UseVisualStyleBackColor = True
Me.btnPasaTodos.Visible = False
'
'btnBorraTodos
'
Me.btnBorraTodos.Location = New System.Drawing.Point(474, 213)
Me.btnBorraTodos.Name = "btnBorraTodos"
Me.btnBorraTodos.Size = New System.Drawing.Size(75, 23)
Me.btnBorraTodos.TabIndex = 59
Me.btnBorraTodos.Text = "<<"
Me.btnBorraTodos.UseVisualStyleBackColor = True
Me.btnBorraTodos.Visible = False
'
'SIARA
'
Me.SIARA.Controls.Add(Me.GroupBox12)
Me.SIARA.Location = New System.Drawing.Point(4, 22)
Me.SIARA.Name = "SIARA"
Me.SIARA.Size = New System.Drawing.Size(657, 385)
Me.SIARA.TabIndex = 15
Me.SIARA.Text = "Contestador de Oficios"
Me.SIARA.UseVisualStyleBackColor = True
'
'GroupBox12
'
Me.GroupBox12.Controls.Add(Me.chkImportarXML)
Me.GroupBox12.Controls.Add(Me.chkbusquedaconclt)
Me.GroupBox12.Controls.Add(Me.chkGenResp)
Me.GroupBox12.Controls.Add(Me.chkCapturaManual)
Me.GroupBox12.Controls.Add(Me.chkLogCarga)
Me.GroupBox12.Controls.Add(Me.chkLogOperResp)
Me.GroupBox12.Location = New System.Drawing.Point(21, 22)
Me.GroupBox12.Name = "GroupBox12"
Me.GroupBox12.Size = New System.Drawing.Size(600, 323)
Me.GroupBox12.TabIndex = 0
Me.GroupBox12.TabStop = False
'
'chkImportarXML
'
Me.chkImportarXML.AutoSize = True
Me.chkImportarXML.ForeColor = System.Drawing.Color.MidnightBlue
Me.chkImportarXML.Location = New System.Drawing.Point(74, 97)
Me.chkImportarXML.Name = "chkImportarXML"
Me.chkImportarXML.Size = New System.Drawing.Size(89, 17)
Me.chkImportarXML.TabIndex = 7
Me.chkImportarXML.Tag = "142"
Me.chkImportarXML.Text = "Importar XML"
Me.chkImportarXML.UseVisualStyleBackColor = True
'
'chkbusquedaconclt
'
Me.chkbusquedaconclt.AutoSize = True
Me.chkbusquedaconclt.ForeColor = System.Drawing.Color.MidnightBlue
Me.chkbusquedaconclt.Location = New System.Drawing.Point(313, 97)
Me.chkbusquedaconclt.Name = "chkbusquedaconclt"
Me.chkbusquedaconclt.Size = New System.Drawing.Size(216, 17)
Me.chkbusquedaconclt.TabIndex = 10
Me.chkbusquedaconclt.Tag = "146"
Me.chkbusquedaconclt.Text = " B<>squeda de Coincidencias en Clientes"
Me.chkbusquedaconclt.UseVisualStyleBackColor = True
'
'chkGenResp
'
Me.chkGenResp.ForeColor = System.Drawing.Color.MidnightBlue
Me.chkGenResp.Location = New System.Drawing.Point(313, 202)
Me.chkGenResp.Name = "chkGenResp"
Me.chkGenResp.Size = New System.Drawing.Size(158, 24)
Me.chkGenResp.TabIndex = 12
Me.chkGenResp.Tag = "149"
Me.chkGenResp.Text = "Generar Respuesta"
'
'chkCapturaManual
'
Me.chkCapturaManual.AutoSize = True
Me.chkCapturaManual.ForeColor = System.Drawing.Color.MidnightBlue
Me.chkCapturaManual.Location = New System.Drawing.Point(74, 206)
Me.chkCapturaManual.Name = "chkCapturaManual"
Me.chkCapturaManual.Size = New System.Drawing.Size(101, 17)
Me.chkCapturaManual.TabIndex = 9
Me.chkCapturaManual.Tag = "145"
Me.chkCapturaManual.Text = "Captura Manual"
Me.chkCapturaManual.UseVisualStyleBackColor = True
'
'chkLogCarga
'
Me.chkLogCarga.AutoSize = True
Me.chkLogCarga.ForeColor = System.Drawing.Color.MidnightBlue
Me.chkLogCarga.Location = New System.Drawing.Point(74, 154)
Me.chkLogCarga.Name = "chkLogCarga"
Me.chkLogCarga.Size = New System.Drawing.Size(90, 17)
Me.chkLogCarga.TabIndex = 8
Me.chkLogCarga.Tag = "144"
Me.chkLogCarga.Text = "Log de Carga"
Me.chkLogCarga.UseVisualStyleBackColor = True
'
'chkLogOperResp
'
Me.chkLogOperResp.AutoSize = True
Me.chkLogOperResp.ForeColor = System.Drawing.Color.MidnightBlue
Me.chkLogOperResp.Location = New System.Drawing.Point(313, 154)
Me.chkLogOperResp.Name = "chkLogOperResp"
Me.chkLogOperResp.Size = New System.Drawing.Size(165, 17)
Me.chkLogOperResp.TabIndex = 11
Me.chkLogOperResp.Tag = "147"
Me.chkLogOperResp.Text = "Log de Operaci<63>n Respuesta"
Me.chkLogOperResp.UseVisualStyleBackColor = True
'
'tlbPermiso
'
Me.tlbPermiso.Buttons.AddRange(New System.Windows.Forms.ToolBarButton() {Me.btnGuardar, Me.btnSalir})
Me.tlbPermiso.ButtonSize = New System.Drawing.Size(75, 40)
Me.tlbPermiso.DropDownArrows = True
Me.tlbPermiso.ImageList = Me.ImageList1
Me.tlbPermiso.Location = New System.Drawing.Point(0, 0)
Me.tlbPermiso.Name = "tlbPermiso"
Me.tlbPermiso.ShowToolTips = True
Me.tlbPermiso.Size = New System.Drawing.Size(806, 42)
Me.tlbPermiso.TabIndex = 2
Me.tlbPermiso.Visible = False
'
'btnGuardar
'
Me.btnGuardar.ImageIndex = 7
Me.btnGuardar.Name = "btnGuardar"
Me.btnGuardar.Text = "Guardar"
'
'btnSalir
'
Me.btnSalir.ImageIndex = 4
Me.btnSalir.Name = "btnSalir"
Me.btnSalir.Text = "Salir"
'
'ImageList1
'
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
Me.ImageList1.TransparentColor = System.Drawing.Color.Turquoise
Me.ImageList1.Images.SetKeyName(0, "")
Me.ImageList1.Images.SetKeyName(1, "")
Me.ImageList1.Images.SetKeyName(2, "")
Me.ImageList1.Images.SetKeyName(3, "")
Me.ImageList1.Images.SetKeyName(4, "")
Me.ImageList1.Images.SetKeyName(5, "")
Me.ImageList1.Images.SetKeyName(6, "")
Me.ImageList1.Images.SetKeyName(7, "")
'
'lblIdPerfil
'
Me.lblIdPerfil.ForeColor = System.Drawing.SystemColors.Control
Me.lblIdPerfil.Location = New System.Drawing.Point(16, 56)
Me.lblIdPerfil.Name = "lblIdPerfil"
Me.lblIdPerfil.Size = New System.Drawing.Size(40, 23)
Me.lblIdPerfil.TabIndex = 3
Me.lblIdPerfil.Text = "Label1"
Me.lblIdPerfil.Visible = False
'
'BntSalie
'
Me.BntSalie.BackColor = System.Drawing.Color.Black
Me.BntSalie.Cursor = System.Windows.Forms.Cursors.Hand
Me.BntSalie.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.BntSalie.ForeColor = System.Drawing.Color.White
Me.BntSalie.Location = New System.Drawing.Point(697, 495)
Me.BntSalie.Name = "BntSalie"
Me.BntSalie.Size = New System.Drawing.Size(106, 33)
Me.BntSalie.TabIndex = 102
Me.BntSalie.Text = "Cerrar"
Me.BntSalie.UseVisualStyleBackColor = False
'
'BtnAlta
'
Me.BtnAlta.BackColor = System.Drawing.Color.Black
Me.BtnAlta.Cursor = System.Windows.Forms.Cursors.Hand
Me.BtnAlta.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.BtnAlta.ForeColor = System.Drawing.Color.White
Me.BtnAlta.Location = New System.Drawing.Point(697, 417)
Me.BtnAlta.Name = "BtnAlta"
Me.BtnAlta.Size = New System.Drawing.Size(106, 33)
Me.BtnAlta.TabIndex = 101
Me.BtnAlta.Text = "Guardar"
Me.BtnAlta.UseVisualStyleBackColor = False
'
'BtnImprimir
'
Me.BtnImprimir.BackColor = System.Drawing.Color.Black
Me.BtnImprimir.Cursor = System.Windows.Forms.Cursors.Hand
Me.BtnImprimir.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.BtnImprimir.ForeColor = System.Drawing.Color.White
Me.BtnImprimir.Location = New System.Drawing.Point(697, 456)
Me.BtnImprimir.Name = "BtnImprimir"
Me.BtnImprimir.Size = New System.Drawing.Size(106, 33)
Me.BtnImprimir.TabIndex = 109
Me.BtnImprimir.Text = "Exportar"
Me.BtnImprimir.UseVisualStyleBackColor = False
'
'panel2
'
Me.panel2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.panel2.BackColor = System.Drawing.Color.Black
Me.panel2.Controls.Add(Me.Img_logoCabecera)
Me.panel2.Controls.Add(Me.DesHeader)
Me.panel2.ForeColor = System.Drawing.Color.Navy
Me.panel2.Location = New System.Drawing.Point(0, 0)
Me.panel2.Name = "panel2"
Me.panel2.Size = New System.Drawing.Size(808, 42)
Me.panel2.TabIndex = 161
'
'Img_logoCabecera
'
Me.Img_logoCabecera.Image = Global.CLIENTE.My.Resources.Resources.blackrock_logo
Me.Img_logoCabecera.Location = New System.Drawing.Point(674, -8)
Me.Img_logoCabecera.Name = "Img_logoCabecera"
Me.Img_logoCabecera.Size = New System.Drawing.Size(117, 50)
Me.Img_logoCabecera.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.Img_logoCabecera.TabIndex = 360
Me.Img_logoCabecera.TabStop = False
'
'DesHeader
'
Me.DesHeader.AutoSize = True
Me.DesHeader.BackColor = System.Drawing.Color.Transparent
2020-03-10 11:10:16 -06:00
Me.DesHeader.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.DesHeader.ForeColor = System.Drawing.SystemColors.Window
Me.DesHeader.Location = New System.Drawing.Point(21, 8)
Me.DesHeader.Name = "DesHeader"
2020-03-10 11:10:16 -06:00
Me.DesHeader.Size = New System.Drawing.Size(71, 24)
Me.DesHeader.TabIndex = 2
Me.DesHeader.Text = "Perfiles"
'
'panel3
'
Me.panel3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.panel3.BackColor = System.Drawing.Color.Black
Me.panel3.Controls.Add(Me.Label11)
Me.panel3.Controls.Add(Me.lblFooter)
Me.panel3.ForeColor = System.Drawing.Color.Navy
Me.panel3.Location = New System.Drawing.Point(0, 547)
Me.panel3.Name = "panel3"
Me.panel3.Size = New System.Drawing.Size(808, 32)
Me.panel3.TabIndex = 362
'
'Label11
'
Me.Label11.AutoSize = True
Me.Label11.BackColor = System.Drawing.Color.Transparent
2020-03-10 11:10:16 -06:00
Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label11.ForeColor = System.Drawing.SystemColors.Window
Me.Label11.Location = New System.Drawing.Point(731, 8)
Me.Label11.Name = "Label11"
2020-03-10 11:10:16 -06:00
Me.Label11.Size = New System.Drawing.Size(41, 15)
Me.Label11.TabIndex = 3
Me.Label11.Text = "Minds"
'
'lblFooter
'
Me.lblFooter.AutoSize = True
Me.lblFooter.BackColor = System.Drawing.Color.Transparent
2020-03-10 11:10:16 -06:00
Me.lblFooter.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblFooter.ForeColor = System.Drawing.SystemColors.Window
Me.lblFooter.Location = New System.Drawing.Point(1019, 7)
Me.lblFooter.Name = "lblFooter"
2020-03-10 11:10:16 -06:00
Me.lblFooter.Size = New System.Drawing.Size(41, 15)
Me.lblFooter.TabIndex = 2
Me.lblFooter.Text = "Minds"
'
'Permiso
'
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None
Me.BackColor = System.Drawing.Color.White
Me.ClientSize = New System.Drawing.Size(806, 579)
Me.Controls.Add(Me.panel3)
Me.Controls.Add(Me.panel2)
Me.Controls.Add(Me.BtnImprimir)
Me.Controls.Add(Me.BntSalie)
Me.Controls.Add(Me.BtnAlta)
Me.Controls.Add(Me.lblIdPerfil)
Me.Controls.Add(Me.tlbPermiso)
Me.Controls.Add(Me.GroupBox2)
Me.Controls.Add(Me.GroupBox1)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "Permiso"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Permisos"
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox1.PerformLayout()
Me.GroupBox2.ResumeLayout(False)
Me.TabControl3.ResumeLayout(False)
Me.Modulos.ResumeLayout(False)
Me.Modulos.PerformLayout()
Me.GroupBox5.ResumeLayout(False)
Me.GroupBox5.PerformLayout()
Me.Reportes.ResumeLayout(False)
Me.Reportes.PerformLayout()
Me.GroupBox13.ResumeLayout(False)
Me.GroupBox13.PerformLayout()
Me.Actualizadores.ResumeLayout(False)
Me.Actualizadores.PerformLayout()
Me.GroupBox8.ResumeLayout(False)
Me.GroupBox8.PerformLayout()
Me.Catalogos.ResumeLayout(False)
Me.Catalogos.PerformLayout()
Me.GroupBox10.ResumeLayout(False)
Me.GroupBox10.PerformLayout()
Me.seguridad.ResumeLayout(False)
Me.seguridad.PerformLayout()
Me.GroupBox9.ResumeLayout(False)
Me.GroupBox9.PerformLayout()
Me.ListaRestringuida.ResumeLayout(False)
Me.ListaRestringuida.PerformLayout()
Me.GroupBox11.ResumeLayout(False)
Me.GroupBox11.PerformLayout()
Me.tabProcesoHit.ResumeLayout(False)
Me.GroupBox7.ResumeLayout(False)
Me.GroupBox7.PerformLayout()
Me.TABServer.ResumeLayout(False)
Me.TABServer.PerformLayout()
Me.GroupBox3.ResumeLayout(False)
Me.GroupBox3.PerformLayout()
Me.gbxLogs.ResumeLayout(False)
Me.gbxLogs.PerformLayout()
Me.gbxProcs.ResumeLayout(False)
Me.gbxProcs.PerformLayout()
Me.gbxAlarmas.ResumeLayout(False)
Me.gbxContCargas.ResumeLayout(False)
Me.KYC.ResumeLayout(False)
Me.GroupBox4.ResumeLayout(False)
Me.GroupBox4.PerformLayout()
Me.KYCControles.ResumeLayout(False)
Me.GroupBox6.ResumeLayout(False)
Me.GroupBox6.PerformLayout()
Me.pnlPermisosKYCEstatus.ResumeLayout(False)
Me.pnlPermisosKYCEstatus.PerformLayout()
Me.SIARA.ResumeLayout(False)
Me.GroupBox12.ResumeLayout(False)
Me.GroupBox12.PerformLayout()
Me.panel2.ResumeLayout(False)
Me.panel2.PerformLayout()
CType(Me.Img_logoCabecera, System.ComponentModel.ISupportInitialize).EndInit()
Me.panel3.ResumeLayout(False)
Me.panel3.PerformLayout()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
#End Region
'decalracion de varibales globales para la conexion
Dim dap As SqlDataAdapter = New SqlDataAdapter()
Dim cmd As SqlCommand
Dim das As DataSet
Dim cnn As SqlConnection
' Dim Vector(100) As Integer 'el tama<6D>o del vector es el numero de permisos q existen en la tabla permisos
Dim i As Integer
Dim cadSQLPerfil As String
Dim lsnombre As String
Dim inicio As Boolean
Sub New(ByVal perfil As Integer, ByVal nombre As String)
InitializeComponent()
liperfil = perfil
lsnombre = nombre
End Sub
Private Sub Permiso_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim sql As String
Dim classcom As New clsComplejo
Dim classcom2 As New clsComplejo
Dim FILA1 As DataRow
If clsVaribles.lbDemo = True Then Exit Sub
'cuando se carga el formulario
lblIdPerfil.Text = liperfil
txtNombrePerfil.Text = lsnombre
' guardaPermisos()
Perfil.NuevoPerfil = False
inicio = True
Enlazar()
limpiarPermisos()
inicio = False
DesHeader.Text = Me.Text
If liperfil = 0 Then
Perfil.NuevoPerfil = True
'BtnAlta.Text = "Modificar"
'sql = "spConPerfil 6," & liperfil
'classcom = New clsComplejo
'classcom.fdtDataSet(Sql)
'If classcom.ds.Tables(0).Rows.Count <> 0 Then
' Fila1 = classcom.ds.Tables(0).Rows(0)
' For Each Fila1 In classcom.ds.Tables(0).Rows
' lblIdPerfil.Text = FILA1("Perfil")
' liperfil = FILA1("Perfil")
' Next
'End If
'enlaza permisos server
' Me.TabControl3.TabPages.Remove(Busqueda)
End If
'-- oculta la pesta<74>a de KYC, de momento,
'-- hasta que esten listops los reportes
classcom.sbLlenaCombo("select IDKYCESTATUS clave, KYCESTATUS nombre from dbo.CAT_KYCESTATUS where ACTIVO = 1", cmbKYCESTATUS1)
cmbKYCESTATUS1.SelectedIndex = -1
classcom2.sbLlenaCombo("select IDKYCESTATUS clave, KYCESTATUS nombre from dbo.CAT_KYCESTATUS where ACTIVO = 1", cmbKYCESTATUS2)
cmbKYCESTATUS2.SelectedIndex = -1
KYC.Parent = Nothing
Me.TabControl3.TabPages.Remove(tabProcesoHit)
Me.TabControl3.TabPages.Remove(SIARA)
End Sub
Private Sub Enlazar()
'enlazo los ocntroles con el valor del form
Dim i As Integer
Dim lcCtrl As Object
Dim lctab As Object
Dim classcom As New clsComplejo
Dim sql As String
Dim Fila As DataRow
Dim fila1 As DataRow
esCarga = True
Try
If clsVaribles.lbDemo = True Then Exit Sub
sql = "spConPerfil 3," & liperfil 'server
classcom = New clsComplejo
classcom.fdtDataSet(sql)
If classcom.ds.Tables(0).Rows.Count <> 0 Then
Fila = classcom.ds.Tables(0).Rows(0)
For Each Fila In classcom.ds.Tables(0).Rows
For Each ctrl As Control In TabControl3.Controls
If TypeOf ctrl Is TabPage Then
If ctrl.Name.ToUpper = "TABSERVER" Then
For Each ctrltab As Control In ctrl.Controls
If TypeOf ctrltab Is GroupBox Then
For Each ctrltab1 As Control In ctrltab.Controls
If TypeOf ctrltab1 Is GroupBox Then ''CheckBox Then
For Each ctrltab2 As Control In ctrltab1.Controls
If TypeOf ctrltab2 Is CheckBox Then
If UCase(ctrltab2.Name) = UCase(Fila("control")) Then
'If UCase(ctrltab1.Text) = UCase(Fila("etiqueta")) Then
DirectCast(ctrltab2, CheckBox).Checked = Fila("activo")
End If
End If
Next
End If
Next
End If
Next
End If
End If
Next
Next
End If
'cliente
sql = "spConPerfil 4," & liperfil
classcom = New clsComplejo
classcom.fdtDataSet(sql)
If classcom.ds.Tables(0).Rows.Count <> 0 Then
fila1 = classcom.ds.Tables(0).Rows(0)
For Each fila1 In classcom.ds.Tables(0).Rows
For Each ctrl As Control In TabControl3.Controls
If TypeOf ctrl Is TabPage Then
For Each ctrltab As Control In ctrl.Controls
If TypeOf ctrltab Is GroupBox Then
For Each ctrltab1 As Control In ctrltab.Controls
If TypeOf ctrltab1 Is CheckBox Then
If UCase(ctrltab1.Name) = UCase(fila1("control")) Then
If ctrl.Name = "ChkMant" Then
MessageBox.Show("")
End If
DirectCast(ctrltab1, CheckBox).Checked = fila1("activo")
If ctrltab1.Text = "Inusuales" Then
chkInuSnT.Checked = False
chkTodosProductos.Checked = False
chkOperInusuales.Checked = False
chkNueva.Checked = False
End If
End If
End If
Next
End If
Next
' Referenciamos el control de texto
End If
Next
Next
End If
'- Pesta<74>a de modulos a los que tiene acceso el perfil
sql = "spConPerfil 7," & liperfil
classcom = New clsComplejo
classcom.fdtDataSet(sql)
If classcom.ds.Tables(0).Rows.Count <> 0 Then
fila1 = classcom.ds.Tables(0).Rows(0)
For Each fila1 In classcom.ds.Tables(0).Rows
For Each ctrl As Control In TabControl3.Controls
If TypeOf ctrl Is TabPage Then
For Each ctrltab As Control In ctrl.Controls
If TypeOf ctrltab Is GroupBox Then
For Each ctrltab1 As Control In ctrltab.Controls
If TypeOf ctrltab1 Is CheckBox Then
If UCase(ctrltab1.Text) = UCase(fila1("etiqueta")) Then
DirectCast(ctrltab1, CheckBox).Checked = fila1("activo")
End If
End If
Next
End If
Next
' Referenciamos el control de texto
End If
Next
Next
End If
'- Pesta<74>a de KYC ESTATUS
sql = "spConPerfil 8," & liperfil
classcom = New clsComplejo
classcom.fdtDataSet(sql)
If classcom.ds.Tables(0).Rows.Count <> 0 Then
For Each fila1 In classcom.ds.Tables(0).Rows
Select Case fila1("Control")
Case "chkKYCEstatus"
chkKYCEstatus.Checked = fila1("activo")
Case "chkKYCNuevoCliente"
chkKYCNuevoCliente.Checked = fila1("activo")
Case "chkCalificacionOC"
chkCalificacionOC.Checked = fila1("activo")
Case "chkCalifRiesgoABC"
chkCalifRiesgoABC.Checked = fila1("activo")
Case "chkAVigDoctos"
chkAVigDoctos.Checked = fila1("activo")
Case "chkRevExp"
chkRevExp.Checked = fila1("activo")
End Select
Next
End If
sql = "spPerfilPermisoOficio 1," & liperfil
classcom = New clsComplejo
classcom.fdtDataSet(sql)
If classcom.ds.Tables(0).Rows.Count <> 0 Then
For Each fila1 In classcom.ds.Tables(0).Rows
Select Case fila1("Control")
Case "btnImportarXML"
chkImportarXML.Checked = fila1("Expr1")
Case "btnLog"
chkLogCarga.Checked = fila1("Expr1")
Case "btnCapturaManual"
chkCapturaManual.Checked = fila1("Expr1")
Case "btnBuscarCoincidencias"
chkbusquedaconclt.Checked = fila1("Expr1")
Case "btnLogOperacionRespuesta"
chkLogOperResp.Checked = fila1("Expr1")
Case "btnRespuesta"
chkGenResp.Checked = fila1("Expr1")
End Select
Next
End If
sql = "select PuedeEditar from dbo.PERFIL_KYC_EDITAR_REGISTRO where IdPerfil = " & liperfil
classcom = New clsComplejo
classcom.fdtDataSet(sql)
If classcom.ds.Tables(0).Rows.Count <> 0 Then
chkKYCEditReg.Checked = classcom.ds.Tables(0).Rows(0).Item(0)
Else
chkKYCEditReg.Checked = False
End If
Catch er As Exception
MsgBox("Error en la funcion 'Enlazar' en el formulario 'permiso': " & er.Message)
End Try
esCarga = False
End Sub
Private Sub guardaModificacion()
'declaracion de variables
Dim classcom As clsComplejo, classcomKYCEstatusAutorizados As clsComplejo
Dim _IdPerfil As Integer
Dim _Activo As Integer
Dim _IdListaPermiso As Integer
Dim sql As String, sqlKYCEstatusAutorizados As String
Dim fila As DataRow
Dim fila1 As DataRow
Dim ClassAud As New ClassMyUtils
Dim lsValAct As String
Dim name As String
Dim check As String
If clsVaribles.lbDemo = True Then Exit Sub
Try
Cursor = Cursors.WaitCursor
'sql = "spConPerfil 3" 'server
'classcom = New clsComplejo
If Len(txtNombrePerfil.Text.Trim) = 0 Then
MessageBox.Show("El Nombre del Perfil no puede ser un valor nulo, Favor de validar", "Minds", MessageBoxButtons.OK, MessageBoxIcon.Information)
Exit Sub
End If
'classcom.fdtDataSet(sql)
classcom = New clsComplejo
sql = "spConPerfil 6," & liperfil & ",'" & txtNombrePerfil.Text & "'"
classcom.fdtDataSet(sql)
If Perfil.NuevoPerfil = True Then
'sql = "spConPerfil 6"
'classcom = New clsComplejo
If classcom.ds.Tables(0).Rows.Count <> 0 Then
fila1 = classcom.ds.Tables(0).Rows(0)
For Each fila1 In classcom.ds.Tables(0).Rows
lblIdPerfil.Text = fila1("Perfil")
liperfil = fila1("Perfil")
Next
End If
ClassAud.RT_Auditoria(clsVaribles.varUsuario, 45, 1, "Nuevo perfil: " & txtNombrePerfil.Text)
Else
ClassAud.RT_Auditoria(clsVaribles.varUsuario, 47, 1, "Modificaci<EFBFBD>n de perfil: " & txtNombrePerfil.Text)
End If
clsVaribles.lsValAnt = ""
clsVaribles.lsValAnt = ClassAud.FnObtenValAnterior("SpConPermisosCad " & liperfil)
For Each ctrl As Control In TabControl3.Controls
If TypeOf ctrl Is TabPage Then
If ctrl.Name = "TABServer" Then
For Each ctrltab As Control In ctrl.Controls
If TypeOf ctrltab Is GroupBox Then
For Each ctrltab1 As Control In ctrltab.Controls
If TypeOf ctrltab1 Is GroupBox Then ''CheckBox Then
For Each ctrltab2 As Control In ctrltab1.Controls
If TypeOf ctrltab2 Is CheckBox Then
If DirectCast(ctrltab2, CheckBox).Checked = True Then
'activo
sql = "spGrabaPermiso " & liperfil & ",2, " & ctrltab2.Tag & ", 1"
Else
'desactivo
sql = "spGrabaPermiso " & liperfil & ",2, " & ctrltab2.Tag & ", 0"
End If
classcom = New clsComplejo
classcom.sbInserta(sql)
End If
Next
End If
Next
End If
Next
End If
' Referenciamos el control de texto
End If
Next
'Next
'End If
'cliente
For Each ctrl As Control In TabControl3.Controls
If TypeOf ctrl Is TabPage Then
If ctrl.Name <> "TABServer" Then
For Each ctrltab As Control In ctrl.Controls
If TypeOf ctrltab Is GroupBox Then
For Each ctrltab1 As Control In ctrltab.Controls
If TypeOf ctrltab1 Is CheckBox Then
'If UCase(ctrltab1.Name) = UCase("control") Then
'If ctrltab1.Tag = 80 Then
' MsgBox("aqui")
'End If
If DirectCast(ctrltab1, CheckBox).Checked = True Then
'activo
''If ctrltab1.Text = "Listas Restringidas" Then
'' MsgBox("aqui")
''End If
name = ctrl.Name
check = ctrltab1.Name
If ctrl.Name = "Modulos" Then
If ctrltab1.Text = "M<EFBFBD>dulo Clientes" Then sql = "spGrabaPermiso " & liperfil & ",1, " & ctrltab1.Tag & ", 1"
If ctrltab1.Text = "M<EFBFBD>dulo Server" Then sql = "spGrabaPermiso " & liperfil & ",2, " & ctrltab1.Tag & ", 1"
If ctrltab1.Text = "M<EFBFBD>dulo KYC" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 1"
If ctrltab1.Text = "M<EFBFBD>dulo KYE" Then sql = "spGrabaPermiso " & liperfil & ",4, " & ctrltab1.Tag & ", 1"
ElseIf ctrl.Name = "KYCControles" Then
If ctrltab1.Name = "chkKYCEstatus" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 1"
If ctrltab1.Name = "chkAVigDoctos" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 1"
If ctrltab1.Name = "chkRevExp" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 1"
classcomKYCEstatusAutorizados = New clsComplejo
If ctrltab1.Name = "chkKYCEditReg" Then
sqlKYCEstatusAutorizados = "spIU_PERFIL_KYC_EDITAR_REGISTRO " & liperfil & ", 1"
classcomKYCEstatusAutorizados.sbInserta(sqlKYCEstatusAutorizados)
End If
sqlKYCEstatusAutorizados = "spD_KYCEstatus_Perfil " & liperfil
classcomKYCEstatusAutorizados.sbInserta(sqlKYCEstatusAutorizados)
For Each lst As String In lstDisponibles.Items
sqlKYCEstatusAutorizados = "INSERT INTO PERFIL_KYCEstatus_Permitidos (IdPerfil,IdKYCEstatus)"
sqlKYCEstatusAutorizados += "VALUES (" & liperfil & "," & dicDesde.Item(lst) & ")"
classcomKYCEstatusAutorizados.sbInserta(sqlKYCEstatusAutorizados)
Next
If ctrltab1.Name = "chkKYCNuevoCliente" Then
sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 1"
End If
If ctrltab1.Name = "chkCalificacionOC" Then
sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 1"
End If
If ctrltab1.Name = "chkCalifRiesgoABC" Then
sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 1"
End If
For Each lst As String In lstAutorizados.Items
sqlKYCEstatusAutorizados = "INSERT INTO tblPermiso_KYCEstatus_Perfil (IdPerfil,IdKYCEstatus)"
sqlKYCEstatusAutorizados += "VALUES (" & liperfil & "," & dicHacia.Item(lst) & ")"
classcomKYCEstatusAutorizados.sbInserta(sqlKYCEstatusAutorizados)
Next
'For i = 0 To lstAutorizados.Items.Count - 1
' sqlKYCEstatusAutorizados = "spGrabaKYCEstatusAutorizado " & liperfil & ", " & CType(lstAutorizados.Items(i), LBItem).Valor
' classcomKYCEstatusAutorizados.sbInserta(sqlKYCEstatusAutorizados)
'Next
'If ctrltab1.Name = "chkKYC_MRCambioPreguntas" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 1"
'If ctrltab1.Name = "chkKYC_MRCambioOficialCump" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 1"
'If ctrltab1.Name = "chk_modEstatusKYC" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 1"
ElseIf ctrl.Name = "SIARA" Then
sql = "spGrabaPermiso " & liperfil & ",5, " & ctrltab1.Tag & ", 1"
Else
sql = "spGrabaPermiso " & liperfil & ",1, " & ctrltab1.Tag & ", 1"
End If
Else
'desactivo
If ctrl.Name = "Modulos" Then
If ctrltab1.Text = "M<EFBFBD>dulo Clientes" Then sql = "spGrabaPermiso " & liperfil & ",1, " & ctrltab1.Tag & ", 0"
If ctrltab1.Text = "M<EFBFBD>dulo Server" Then sql = "spGrabaPermiso " & liperfil & ",2, " & ctrltab1.Tag & ", 0"
If ctrltab1.Text = "M<EFBFBD>dulo KYC" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 0"
If ctrltab1.Text = "M<EFBFBD>dulo KYE" Then sql = "spGrabaPermiso " & liperfil & ",4, " & ctrltab1.Tag & ", 0"
ElseIf ctrl.Name = "KYCControles" Then
If ctrltab1.Text = "KYC Estatus" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 0"
If ctrltab1.Name = "chkAVigDoctos" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 0"
If ctrltab1.Name = "chkRevExp" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 0"
classcomKYCEstatusAutorizados = New clsComplejo
If ctrltab1.Name = "chkKYCEditReg" Then
sqlKYCEstatusAutorizados = "spIU_PERFIL_KYC_EDITAR_REGISTRO " & liperfil & ", 0"
classcomKYCEstatusAutorizados.sbInserta(sqlKYCEstatusAutorizados)
End If
If ctrltab1.Name = "chkKYCNuevoCliente" Then
sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 0"
End If
If ctrltab1.Name = "chkCalificacionOC" Then
sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 0"
End If
If ctrltab1.Name = "chkCalifRiesgoABC" Then
sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 0"
End If
sqlKYCEstatusAutorizados = "spD_KYCEstatus_Perfil " & liperfil
classcomKYCEstatusAutorizados.sbInserta(sqlKYCEstatusAutorizados)
'If ctrltab1.Name = "chkKYC_MRCambioPreguntas" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 0"
'If ctrltab1.Name = "chkKYC_MRCambioOficialCump" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 0"
'If ctrltab1.Name = "chk_modEstatusKYC" Then sql = "spGrabaPermiso " & liperfil & ",3, " & ctrltab1.Tag & ", 0"
ElseIf ctrl.Name = "SIARA" Then
sql = "spGrabaPermiso " & liperfil & ",5, " & ctrltab1.Tag & ", 0"
Else
sql = "spGrabaPermiso " & liperfil & ",1, " & ctrltab1.Tag & ", 0"
End If
End If
classcom = New clsComplejo
classcom.sbInserta(sql)
'End If
End If
Next
End If
Next
End If
' Referenciamos el control de texto
End If
Next
lsValAct = ClassAud.FnObtenValAnterior("SpConPermisosCad " & liperfil)
ClassAud.RT_Auditoria(clsVaribles.varUsuario, 53, 1, "Valores Anteriores: " & clsVaribles.lsValAnt & " | Valores Nuevos: " & lsValAct)
Cursor = Cursors.Default
MessageBox.Show("Permisos Registrados Correctamente. Los cambios efectuados surtiran efecto cuando vuelva a iniciar MINDS CLIENTE.", "MInds", MessageBoxButtons.OK, MessageBoxIcon.Information)
Catch er As Exception
Cursor = Cursors.Default
MessageBox.Show("Error al grabar Permisos " & er.Message, "MInds", MessageBoxButtons.OK, MessageBoxIcon.Information)
Finally
'cnn.Close()
End Try
End Sub
Private Sub BtnAlta_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnAlta.Click
If clsVaribles.lbDemo = True Then Exit Sub
guardaModificacion()
Perfil.NuevoPerfil = False
End Sub
Private Sub BntSalie_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BntSalie.Click
Me.Close()
End Sub
Private Sub chkInusuales_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkInusuales.CheckedChanged
If chkInusuales.Checked = True Then
'chkReportes.Checked = True
chkNueva.Checked = True
chkTodosProductos.Checked = True
chkOperInusuales.Checked = True
chkInuSnT.Checked = True
chkInusuales.Checked = True
Else 'If chkInusuales.Checked = False And chkReportes.Checked = False Then
'If MsgBox("Apagar este marcador apagar<61> todos los marcadores dependientes. <20>Desea continuar?", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "MINDS - Perfiles") = MsgBoxResult.Yes Then
chkNueva.Checked = False
chkTodosProductos.Checked = False
chkOperInusuales.Checked = False
chkInuSnT.Checked = False
'End If
End If
End Sub
Private Sub chkNueva_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkNueva.Checked = True Then
chkReportes.Checked = True
chkInusuales.Checked = True
End If
End Sub
Private Sub chkTodosProductos_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkTodosProductos.Checked = True Then
chkReportes.Checked = True
chkInusuales.Checked = True
Else 'If chkTodosProductos.Checked = False And chkInusuales.Checked = False And chkReportes.Checked = False Then
'If MsgBox("Apagar este marcador apagar<61> todos los marcadores dependientes. <20>Desea continuar?", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "MINDS - Perfiles") = MsgBoxResult.Yes Then
chkOperInusuales.Checked = False
'End If
End If
End Sub
Private Sub chkOperInusuales_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkOperInusuales.Checked = True Then
chkReportes.Checked = True
chkInusuales.Checked = True
chkTodosProductos.Checked = True
End If
End Sub
Private Sub chkFormatoCNBV_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkFormatoCNBV.Checked = True Then
chkReportes.Checked = True
End If
End Sub
Private Sub chkTransacciones_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkTransacciones.Checked = True Then
chkReportes.Checked = True
End If
End Sub
Private Sub chkOperInusualesF_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkOperInusualesF.Checked = True Then
chkReportes.Checked = True
End If
End Sub
Private Sub chkOperPreocupantes_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkOperPreocupantes.Checked = True Then
chkReportes.Checked = True
End If
End Sub
Private Sub chkRelevantes_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkRelevantes.Checked = True Then
chkReportes.Checked = True
End If
End Sub
Private Sub chkDormant_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkDormant.Checked = True Then
chkReportes.Checked = True
End If
End Sub
Private Sub chkPerfTran_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkPerfTran.Checked = True Then
chkReportes.Checked = True
End If
End Sub
Private Sub chkKYC_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkKYC.CheckedChanged
If chkKYC.Checked = False Then
chkCteSinKYC.Checked = False
chkAlarmaKYC.Checked = False
End If
End Sub
Private Sub chkCteSinKYC_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkCteSinKYC.CheckedChanged
If chkCteSinKYC.Checked = True Then
chkKYC.Checked = True
End If
End Sub
Private Sub chkAlarmaKYC_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkAlarmaKYC.CheckedChanged
If chkAlarmaKYC.Checked = True Then
chkKYC.Checked = True
End If
End Sub
'Private Sub chkActual_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkActual.CheckedChanged
' Try
' If inicio Then Exit Sub
' For Each chk As CheckBox In GroupBox8.Controls
' chk.Checked = chkActual.Checked
' Next
' Catch ex As Exception
' End Try
'End Sub
Private Sub ParametrosDeGrupoMenu_CheckedChanged(sender As System.Object, e As System.EventArgs)
If ParametrosDeGrupoMenu.Checked = True Then
chkActual.Checked = True
End If
End Sub
Private Sub chkTipoCambio_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkTipoCambio.Checked = True Then
chkActual.Checked = True
End If
End Sub
Private Sub chkAsigGrpo_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkAsigGrpo.Checked = True Then
chkActual.Checked = True
End If
End Sub
Private Sub chkSeguridad_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkSeguridad.CheckedChanged
'Try
' If inicio Then Exit Sub
' For Each chk As CheckBox In GroupBox9.Controls
' chk.Checked = chkSeguridad.Checked
' Next
'Catch ex As Exception
'End Try
End Sub
Private Sub chkCatalogos_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkCatalogos.CheckedChanged
'Try
' If inicio Then Exit Sub
' For Each chk As CheckBox In GroupBox10.Controls
' chk.Checked = chkCatalogos.Checked
' Next
'Catch ex As Exception
'End Try
End Sub
Private Sub chkOficiales_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkOficiales.Checked = True Then
chkCatalogos.Checked = True
Else
chkActEco.Checked = False
ChkInsFin.Checked = False
chkTipOp.Checked = False
chkInstrumMon.Checked = False
chkMoneda.Checked = False
End If
End Sub
Private Sub chkConf_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkConf.Checked = True Then
chkCatalogos.Checked = True
Else
chkPais.Checked = False
chkEstado.Checked = False
chkOrgInter.Checked = False
End If
End Sub
Private Sub chkIntitucional_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkIntitucional.Checked = True Then
chkCatalogos.Checked = True
Else
chkProductos.Checked = False
chkSubproductos.Checked = False
End If
End Sub
Private Sub chkUsuario_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkUsuario.Checked = True Then
chkSeguridad.Checked = True
End If
End Sub
Private Sub chkActEco_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkActEco.Checked = True Then
chkOficiales.Checked = True
chkCatalogos.Checked = True
End If
End Sub
Private Sub ChkInsFin_CheckedChanged(sender As System.Object, e As System.EventArgs)
If ChkInsFin.Checked = True Then
chkOficiales.Checked = True
chkCatalogos.Checked = True
End If
End Sub
Private Sub chkTipOp_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkTipOp.Checked = True Then
chkOficiales.Checked = True
chkCatalogos.Checked = True
End If
End Sub
Private Sub chkInstrumMon_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkInstrumMon.Checked = True Then
chkOficiales.Checked = True
chkCatalogos.Checked = True
End If
End Sub
Private Sub chkMoneda_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkMoneda.Checked = True Then
chkOficiales.Checked = True
chkCatalogos.Checked = True
End If
End Sub
Private Sub chkPais_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkPais.Checked = True Then
chkConf.Checked = True
chkCatalogos.Checked = True
End If
End Sub
Private Sub chkEstado_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkEstado.Checked = True Then
chkConf.Checked = True
chkCatalogos.Checked = True
End If
End Sub
Private Sub chkOrgInter_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkOrgInter.Checked = True Then
chkConf.Checked = True
chkCatalogos.Checked = True
End If
End Sub
Private Sub chkProductos_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkProductos.Checked = True Then
chkIntitucional.Checked = True
chkCatalogos.Checked = True
End If
End Sub
Private Sub chkSubproductos_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkSubproductos.Checked = True Then
chkIntitucional.Checked = True
chkCatalogos.Checked = True
End If
End Sub
Private Sub ChkMant_CheckedChanged(sender As System.Object, e As System.EventArgs)
If ChkMant.Checked = True Then
chkCatalogos.Checked = True
End If
End Sub
Private Sub chkPerfil_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkPerfil.Checked = True Then
chkSeguridad.Checked = True
End If
End Sub
Private Sub chkAuditoria_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkAuditoria.Checked = True Then
chkSeguridad.Checked = True
End If
End Sub
Private Sub chkConfigClaves_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkConfigClaves.Checked = True Then
chkSeguridad.Checked = True
End If
End Sub
Private Sub chkListasrest_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkListasrest.CheckedChanged
End Sub
Private Sub ChkPersonas_CheckedChanged(sender As System.Object, e As System.EventArgs)
If ChkPersonas.Checked = True Then
chkListasrest.Checked = True
End If
End Sub
Private Sub chkClientes_CheckedChanged(sender As System.Object, e As System.EventArgs)
If chkClientes.Checked = True Then
chkListasrest.Checked = True
End If
End Sub
Private Sub chkserver_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkserver.CheckedChanged
'Try
' If inicio Then Exit Sub
' For Each gp As Control In GroupBox3.Controls
' If TypeOf gp Is GroupBox Then
' For Each Chk As CheckBox In gp.Controls
' Chk.Checked = chkserver.Checked
' Next
' End If
' Next
'Catch ex As Exception
'End Try
End Sub
Private Sub chkTCambio_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkTCambio.CheckedChanged
If chkTCambio.Checked = True Then
chkserver.Checked = True
End If
End Sub
Private Sub chktran_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chktran.CheckedChanged
If chktran.Checked = True Then
chkserver.Checked = True
End If
End Sub
Private Sub chkListas_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkListas.CheckedChanged
If chkListas.Checked = True Then
chkserver.Checked = True
End If
End Sub
Private Sub ChkrelevantesS_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles ChkrelevantesS.CheckedChanged
If ChkrelevantesS.Checked = True Then
chkserver.Checked = True
End If
End Sub
Private Sub ChkFraccS_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles ChkFraccS.CheckedChanged
If ChkFraccS.Checked = True Then
chkserver.Checked = True
End If
End Sub
Private Sub ChkInuS_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles ChkInuS.CheckedChanged
If ChkInuS.Checked = True Then
chkserver.Checked = True
End If
End Sub
Private Sub chkReproceso_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkReproceso.CheckedChanged
If chkReproceso.Checked = True Then
chkserver.Checked = True
End If
End Sub
Private Sub ChkListasS_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles ChkListasS.CheckedChanged
If ChkListasS.Checked = True Then
chkserver.Checked = True
End If
End Sub
Private Sub chkConfigCarga_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkConfigCarga.CheckedChanged
If chkConfigCarga.Checked = True Then
chkserver.Checked = True
End If
End Sub
Private Sub chkPerfilTranServer_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkPerfilTranServer.CheckedChanged
If chkPerfilTranServer.Checked = True Then
chkserver.Checked = True
End If
End Sub
Private Sub chkLogs_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkLogs.CheckedChanged
If chkLogs.Checked = True Then
chkserver.Checked = True
End If
End Sub
Private Sub chkAuditS_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkAuditS.CheckedChanged
If chkAuditS.Checked = True Then
chkserver.Checked = True
End If
End Sub
Private Sub ChkRiesgo_CheckedChanged(sender As System.Object, e As System.EventArgs)
If ChkRiesgo.Checked = True Then
chkserver.Checked = True
End If
End Sub
Private Sub btnPasaUno_Click(sender As System.Object, e As System.EventArgs) Handles btnPasaUno.Click
If lstDisponibles.SelectedIndex >= 0 Then
If Not lstAutorizados.Items.Contains(lstDisponibles.SelectedItem) Then
lstAutorizados.Items.Add(lstDisponibles.SelectedItem)
lstDisponibles.Items.Remove(lstDisponibles.SelectedItem)
End If
Else
MessageBox.Show("Debe seleccionar al menos un elemento de los disponibles", "Minds", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If
End Sub
Private Sub btnPasaTodos_Click(sender As System.Object, e As System.EventArgs) Handles btnPasaTodos.Click
Dim x As Integer
For x = 0 To lstDisponibles.Items.Count - 1
lstAutorizados.Items.Add(lstDisponibles.Items(x))
Next
lstDisponibles.Items.Clear()
End Sub
Private Sub btnBorraUno_Click(sender As System.Object, e As System.EventArgs) Handles btnBorraUno.Click
If lstAutorizados.SelectedIndex >= 0 Then
If Not lstDisponibles.Items.Contains(lstAutorizados.SelectedItem) Then
lstDisponibles.Items.Add(lstAutorizados.SelectedItem)
lstAutorizados.Items.Remove(lstAutorizados.SelectedItem)
End If
Else
MessageBox.Show("Debe seleccionar al menos un elemento de los autorizados", "Minds", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If
End Sub
Private Sub btnBorraTodos_Click(sender As System.Object, e As System.EventArgs) Handles btnBorraTodos.Click
Dim x As Integer
For x = 0 To lstAutorizados.Items.Count - 1
lstDisponibles.Items.Add(lstAutorizados.Items(x))
Next
lstAutorizados.Items.Clear()
End Sub
Dim dicDesde As New Generic.Dictionary(Of String, Integer)
Dim dicHacia As New Generic.Dictionary(Of String, Integer)
Private Sub chkKYCEstatus_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkKYCEstatus.CheckedChanged
limpiarPermisos()
End Sub
Private Sub limpiarPermisos()
Dim sql As String
Dim classcom As New clsComplejo
Dim ds As DataSet
Try
If chkKYCEstatus.Checked Then
pnlPermisosKYCEstatus.Enabled = True
' '--ajuste para los permisos de estatus kyc
classcom.ds.Tables.Clear()
lstDisponibles.Items.Clear()
dicDesde.Clear()
sql = "spS_PERFIL_KYCEstatus_Permitidos " & liperfil
ds = classcom.fdtDataSet(sql)
If Not ds.Tables(0) Is Nothing Then
For Each dr As DataRow In ds.Tables(0).Rows
dicDesde.Add(dr(1), dr(0))
lstDisponibles.Items.Add(dr(1))
Next
End If
ds.Tables.Clear()
dicHacia.Clear()
lstAutorizados.Items.Clear()
sql = "spS_tblPermiso_KYCEstatus_Perfil " & liperfil
ds = classcom.fdtDataSet(sql)
If Not ds.Tables(0) Is Nothing Then
For Each dr As DataRow In ds.Tables(0).Rows
dicHacia.Add(dr(1), dr(0))
lstAutorizados.Items.Add(dr(1))
Next
End If
Else
lstDisponibles.Items.Clear()
lstAutorizados.Items.Clear()
pnlPermisosKYCEstatus.Enabled = False
End If
Catch ex As Exception
MessageBox.Show(ex.Message, "limpiarPermisos", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub
Private Sub btnAdd1_Click(sender As System.Object, e As System.EventArgs) Handles btnAdd1.Click
AgregarDesde()
End Sub
Private Function AgregarDesde() As Boolean
AgregarDesde = False
If cmbKYCESTATUS1.SelectedIndex = -1 Then Exit Function
Try
If lstDisponibles.Items.Count > 0 Then
For Each lst As String In lstDisponibles.Items
If lst.Trim = cmbKYCESTATUS1.Text.Trim Then
Exit Function
End If
Next
dicDesde.Add(cmbKYCESTATUS1.Text, cmbKYCESTATUS1.SelectedValue)
lstDisponibles.Items.Add(cmbKYCESTATUS1.Text)
Else
dicDesde.Add(cmbKYCESTATUS1.Text, cmbKYCESTATUS1.SelectedValue)
lstDisponibles.Items.Add(cmbKYCESTATUS1.Text)
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
AgregarDesde = True
End Function
Private Function AgregarHacia() As Boolean
AgregarHacia = False
If cmbKYCESTATUS2.SelectedIndex = -1 Then Exit Function
Try
If lstAutorizados.Items.Count > 0 Then
For Each lst As String In lstAutorizados.Items
If lst.Trim = cmbKYCESTATUS2.Text.Trim Then
Exit Function
End If
Next
dicHacia.Add(cmbKYCESTATUS2.Text, cmbKYCESTATUS2.SelectedValue)
lstAutorizados.Items.Add(cmbKYCESTATUS2.Text)
Else
dicHacia.Add(cmbKYCESTATUS2.Text, cmbKYCESTATUS2.SelectedValue)
lstAutorizados.Items.Add(cmbKYCESTATUS2.Text)
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
AgregarHacia = True
End Function
Private Sub btnAdd2_Click(sender As System.Object, e As System.EventArgs) Handles btnAdd2.Click
AgregarHacia()
End Sub
Private Sub btnQuitar1_Click(sender As System.Object, e As System.EventArgs) Handles btnQuitar1.Click
QuitarDesde()
End Sub
Private Function QuitarDesde() As Boolean
QuitarDesde = False
Try
dicDesde.Remove(lstDisponibles.SelectedItem)
lstDisponibles.Items.Remove(lstDisponibles.SelectedItem)
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
QuitarDesde = True
End Function
Private Function QuitarHacia() As Boolean
QuitarHacia = False
Try
dicHacia.Remove(lstAutorizados.SelectedItem)
lstAutorizados.Items.Remove(lstAutorizados.SelectedItem)
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
QuitarHacia = True
End Function
Private Sub btnQuitar2_Click(sender As System.Object, e As System.EventArgs) Handles btnQuitar2.Click
QuitarHacia()
End Sub
Private Sub chkProcesoHIT_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkProcesoHIT.CheckedChanged
Try
Catch ex As Exception
End Try
End Sub
Private Sub chkReviewer_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkReviewer.CheckedChanged
If chkReviewer.Checked Then
chkComp.Checked = Not (chkReviewer.Checked)
End If
End Sub
Private Sub chkComp_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkComp.CheckedChanged
If chkComp.Checked Then
chkReviewer.Checked = Not (chkComp.Checked)
End If
End Sub
Private Sub chkOperPreocupantes_CheckedChanged_1(sender As System.Object, e As System.EventArgs) Handles chkOperPreocupantes.CheckedChanged
If chkOperPreocupantes.Checked Then
'chkReportes.Checked = True
chkPreoCnT.Checked = True
chkPreoSnT.Checked = True
Else
chkPreoCnT.Checked = False
chkPreoSnT.Checked = False
End If
End Sub
Private Sub BtnImprimir_Click(sender As System.Object, e As System.EventArgs) Handles BtnImprimir.Click
Exportar()
End Sub
Private Sub Exportar()
Dim ds As DataSet
Try
Dim clsExcel As aExcel = New aExcel
Dim cls As New clsComplejo
ds = cls.fdtDataSet("spS_PerfilPermisos " & liperfil)
'Obtenemos el nombre o el titulo del form
clsExcel.Titulo = "Permisos: " + txtNombrePerfil.Text
'Utilizo la funcion ExportDataset de la clase aExcel
clsExcel.ExportDataset(ds) 'Asigno el dataset a exportar
Catch ex As Exception
End Try
End Sub
Private Sub txtNombrePerfil_TextChanged(sender As Object, e As EventArgs) Handles txtNombrePerfil.TextChanged
End Sub
Private Sub chkNueva_CheckedChanged_1(sender As Object, e As EventArgs) Handles chkNueva.CheckedChanged
If chkNueva.Checked = True Then
' chkInusuales.Checked = True
'chkReportes.Checked = True
End If
End Sub
Private Sub chkInuSnT_CheckedChanged(sender As Object, e As EventArgs) Handles chkInuSnT.CheckedChanged
If chkInuSnT.Checked = True Then
'chkInusuales.Checked = True
'chkReportes.Checked = True
chkInuSnT.Checked = True
End If
End Sub
Private Sub chkTodosProductos_CheckedChanged_1(sender As Object, e As EventArgs) Handles chkTodosProductos.CheckedChanged
'If chkTodosProductos.Checked = True Then
' chkOperInusuales.Checked = True
' 'chkInusuales.Checked = True
' 'chkReportes.Checked = True
'Else
' chkOperInusuales.Checked = False
'End If
End Sub
Private Sub chkOperInusuales_CheckedChanged_1(sender As Object, e As EventArgs) Handles chkOperInusuales.CheckedChanged
If chkOperInusuales.Checked = True Then
chkTodosProductos.Checked = True
'chkInusuales.Checked = True
'chkReportes.Checked = True
End If
End Sub
Private Sub chkPreoCnT_CheckedChanged(sender As Object, e As EventArgs) Handles chkPreoCnT.CheckedChanged
If chkPreoCnT.Checked = True Then
' chkOperPreocupantes.Checked = True
chkPreoCnT.Checked = True
End If
End Sub
Private Sub chkPreoSnT_CheckedChanged(sender As Object, e As EventArgs) Handles chkPreoSnT.CheckedChanged
Dim todos As Boolean = False
If chkPreoSnT.Checked = True Then
'chkOperPreocupantes.Checked = True
todos = True
chkPreoSnT.Checked = True
Else
todos = False
End If
If chkPreoCnT.Checked = True Then
todos = True
Else
todos = False
End If
If todos Then
chkOperPreocupantes.Checked = True
End If
End Sub
Private Sub chkOficiales_CheckedChanged_1(sender As Object, e As EventArgs) Handles chkOficiales.CheckedChanged
If esCarga = False Then
If chkOficiales.Checked = True Then
ActivaOficiales(True)
Else
ActivaOficiales(False)
End If
End If
End Sub
Private Sub ActivaConfig(status)
chkPais.Checked = status
chkEstado.Checked = status
chkOrgInter.Checked = status
End Sub
Private Sub ActivaInstituciones(status)
chkProductos.Checked = status
chkSubproductos.Checked = status
chkFuncionarios2.Checked = status
End Sub
Private Sub ActivaOficiales(status)
chkActEco.Checked = status
ChkInsFin.Checked = status
chkTipOp.Checked = status
chkInstrumMon.Checked = status
chkMoneda.Checked = status
chkLocalidad.Checked = status
End Sub
Private Sub ActivaMantenimiento(status)
chkActVul.Checked = status
chkDesRec.Checked = status
chkID.Checked = status
chkInstrument.Checked = status
chkTransfer.Checked = status
chkParents.Checked = status
chkProcRec.Checked = status
chkTipoCuenta.Checked = status
chkTipoDom.Checked = status
chkEstrucCorp.Checked = status
chkTipoPer.Checked = status
chkFigLegal.Checked = status
chkSucs.Checked = status
chkFuentIng.Checked = status
chkGrupoRiesgo.Checked = status
chkCASFIM.Checked = status
chkPropositoCuenta.Checked = status
chkRelacion.Checked = status
End Sub
Private Sub chkConf_CheckedChanged_1(sender As Object, e As EventArgs) Handles chkConf.CheckedChanged
If esCarga = False Then
If chkConf.Checked = True Then
ActivaConfig(True)
Else
ActivaConfig(False)
End If
End If
End Sub
Private Sub chkIntitucional_CheckedChanged_1(sender As Object, e As EventArgs) Handles chkIntitucional.CheckedChanged
If esCarga = False Then
If chkIntitucional.Checked = True Then
ActivaInstituciones(True)
Else
ActivaInstituciones(False)
End If
End If
End Sub
Private Sub ChkMant_CheckedChanged_1(sender As Object, e As EventArgs) Handles ChkMant.CheckedChanged
If ChkMant.Checked = True Then
ActivaMantenimiento(True)
Else
ActivaMantenimiento(False)
End If
End Sub
Private Sub ChkTodosReporte_Click(sender As Object, e As EventArgs) Handles ChkTodosReporte.Click
ValidaTodosCampos(GroupBox13, ChkTodosReporte)
End Sub
Private Sub ValidaTodosCampos(ByVal _groupbox As GroupBox, ByVal _checkbox As CheckBox)
For Each g As System.Windows.Forms.Control In _groupbox.Controls
If TypeOf g Is CheckBox Then
Dim chk As CheckBox = TryCast(g, CheckBox)
chk.Checked = _checkbox.Checked
End If
Next
End Sub
Private Sub ChkTodosCatalogos_CheckedChanged(sender As Object, e As EventArgs) Handles ChkTodosCatalogos.CheckedChanged
ValidaTodosCampos(GroupBox10, ChkTodosCatalogos)
End Sub
Private Sub CheckBox2_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox2.CheckedChanged
ValidaTodosCampos(GroupBox3, CheckBox2)
ValidaTodosCampos(gbxContCargas, CheckBox2)
ValidaTodosCampos(gbxAlarmas, CheckBox2)
ValidaTodosCampos(gbxProcs, CheckBox2)
ValidaTodosCampos(gbxLogs, CheckBox2)
End Sub
Private Sub ChkModulos_CheckedChanged(sender As Object, e As EventArgs) Handles ChkModulos.CheckedChanged
ValidaTodosCampos(GroupBox5, ChkModulos)
End Sub
Private Sub ChkActualizadores_CheckedChanged(sender As Object, e As EventArgs) Handles ChkActualizadores.CheckedChanged
ValidaTodosCampos(GroupBox8, ChkActualizadores)
End Sub
Private Sub chkTodosSeguridad_CheckedChanged(sender As Object, e As EventArgs) Handles chkTodosSeguridad.CheckedChanged
ValidaTodosCampos(GroupBox9, chkTodosSeguridad)
End Sub
Private Sub ChkListaRestringidas_CheckedChanged(sender As Object, e As EventArgs) Handles ChkListaRestringidas.CheckedChanged
ValidaTodosCampos(GroupBox11, ChkListaRestringidas)
End Sub
End Class
Class LBItem
Public Contenido As String
Public Valor As Integer
'
Public Sub New(ByVal c As String, ByVal v As Integer)
Contenido = c
Valor = v
End Sub
'
Public Overrides Function ToString() As String
Return Contenido
End Function
End Class