_ Partial Class frmSeleccionPoolTitulos Inherits System.Windows.Forms.Form 'Form reemplaza a Dispose para limpiar la lista de componentes. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Requerido por el Diseñador de Windows Forms Private components As System.ComponentModel.IContainer 'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento 'Se puede modificar usando el Diseñador de Windows Forms. 'No lo modifique con el editor de código. _ Private Sub InitializeComponent() Me.lblTitulo = New System.Windows.Forms.Label() Me.dgvTitulos = New System.Windows.Forms.DataGridView() Me.GroupBox1 = New System.Windows.Forms.GroupBox() Me.rdbDeshabilitarFecha = New System.Windows.Forms.RadioButton() Me.lblFecha = New System.Windows.Forms.Label() Me.rdbRangoFechas = New System.Windows.Forms.RadioButton() Me.rdbFecha = New System.Windows.Forms.RadioButton() Me.dtpFechaOperacion = New System.Windows.Forms.DateTimePicker() Me.Label5 = New System.Windows.Forms.Label() Me.Label4 = New System.Windows.Forms.Label() Me.dtpFechaOperacion2 = New System.Windows.Forms.DateTimePicker() Me.dtpFechaOperacion1 = New System.Windows.Forms.DateTimePicker() Me.grpVigencia = New System.Windows.Forms.GroupBox() Me.rdbTodosVigencia = New System.Windows.Forms.RadioButton() Me.rdbVigente = New System.Windows.Forms.RadioButton() Me.lblEmpresa = New System.Windows.Forms.Label() Me.cboEmpresa = New System.Windows.Forms.ComboBox() Me.btnVer = New System.Windows.Forms.Button() Me.btnAgregar = New System.Windows.Forms.Button() Me.lblInstrumentos = New System.Windows.Forms.Label() Me.cboInstrumentos = New System.Windows.Forms.ComboBox() Me.dgvPool = New System.Windows.Forms.DataGridView() Me.CodigoTitulo = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.Instrumento = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.NombreInstrumento = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.Empresa = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.NombreEmpresa = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.MontoTotal = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.MontoUsado = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.Porcentaje = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.FechaCreacion = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.IdFlujo = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.IdEspLR = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.txtMontoUsar = New System.Windows.Forms.TextBox() Me.lblPorcentaje = New System.Windows.Forms.Label() Me.btnGenerarPool = New System.Windows.Forms.Button() Me.lblCodigo = New System.Windows.Forms.Label() Me.txtcodigo = New System.Windows.Forms.TextBox() Me.btnLimpiar = New System.Windows.Forms.Button() CType(Me.dgvTitulos, System.ComponentModel.ISupportInitialize).BeginInit() Me.GroupBox1.SuspendLayout() Me.grpVigencia.SuspendLayout() CType(Me.dgvPool, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'lblTitulo ' Me.lblTitulo.Anchor = System.Windows.Forms.AnchorStyles.Top Me.lblTitulo.AutoSize = True Me.lblTitulo.Font = New System.Drawing.Font("Trebuchet MS", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblTitulo.Location = New System.Drawing.Point(52, 9) Me.lblTitulo.Name = "lblTitulo" Me.lblTitulo.Size = New System.Drawing.Size(258, 24) Me.lblTitulo.TabIndex = 81 Me.lblTitulo.Text = "Seleccionar Lista de Titulos" ' 'dgvTitulos ' Me.dgvTitulos.AllowUserToAddRows = False Me.dgvTitulos.AllowUserToDeleteRows = False Me.dgvTitulos.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.dgvTitulos.AutoSizeRowsMode = System.Windows.Forms.DataGridViewAutoSizeRowsMode.AllCells Me.dgvTitulos.BackgroundColor = System.Drawing.Color.White Me.dgvTitulos.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvTitulos.Location = New System.Drawing.Point(7, 221) Me.dgvTitulos.Name = "dgvTitulos" Me.dgvTitulos.RowHeadersVisible = False Me.dgvTitulos.Size = New System.Drawing.Size(806, 166) Me.dgvTitulos.TabIndex = 82 ' 'GroupBox1 ' Me.GroupBox1.Controls.Add(Me.rdbDeshabilitarFecha) Me.GroupBox1.Controls.Add(Me.lblFecha) Me.GroupBox1.Controls.Add(Me.rdbRangoFechas) Me.GroupBox1.Controls.Add(Me.rdbFecha) Me.GroupBox1.Controls.Add(Me.dtpFechaOperacion) Me.GroupBox1.Controls.Add(Me.Label5) Me.GroupBox1.Controls.Add(Me.Label4) Me.GroupBox1.Controls.Add(Me.dtpFechaOperacion2) Me.GroupBox1.Controls.Add(Me.dtpFechaOperacion1) Me.GroupBox1.Location = New System.Drawing.Point(3, 49) Me.GroupBox1.Name = "GroupBox1" Me.GroupBox1.Size = New System.Drawing.Size(423, 109) Me.GroupBox1.TabIndex = 87 Me.GroupBox1.TabStop = False Me.GroupBox1.Text = "Busqueda por Fecha de Operación" ' 'rdbDeshabilitarFecha ' Me.rdbDeshabilitarFecha.AutoSize = True Me.rdbDeshabilitarFecha.Checked = True Me.rdbDeshabilitarFecha.Location = New System.Drawing.Point(355, 19) Me.rdbDeshabilitarFecha.Name = "rdbDeshabilitarFecha" Me.rdbDeshabilitarFecha.Size = New System.Drawing.Size(65, 17) Me.rdbDeshabilitarFecha.TabIndex = 16 Me.rdbDeshabilitarFecha.TabStop = True Me.rdbDeshabilitarFecha.Text = "Ninguno" Me.rdbDeshabilitarFecha.UseVisualStyleBackColor = True ' 'lblFecha ' Me.lblFecha.Anchor = System.Windows.Forms.AnchorStyles.None Me.lblFecha.AutoSize = True Me.lblFecha.Location = New System.Drawing.Point(44, 39) Me.lblFecha.Name = "lblFecha" Me.lblFecha.Size = New System.Drawing.Size(37, 13) Me.lblFecha.TabIndex = 4 Me.lblFecha.Text = "Fecha" ' 'rdbRangoFechas ' Me.rdbRangoFechas.AutoSize = True Me.rdbRangoFechas.Location = New System.Drawing.Point(178, 17) Me.rdbRangoFechas.Name = "rdbRangoFechas" Me.rdbRangoFechas.Size = New System.Drawing.Size(127, 17) Me.rdbRangoFechas.TabIndex = 15 Me.rdbRangoFechas.Text = "Busqueda Por Rango" Me.rdbRangoFechas.UseVisualStyleBackColor = True ' 'rdbFecha ' Me.rdbFecha.AutoSize = True Me.rdbFecha.Location = New System.Drawing.Point(21, 19) Me.rdbFecha.Name = "rdbFecha" Me.rdbFecha.Size = New System.Drawing.Size(91, 17) Me.rdbFecha.TabIndex = 14 Me.rdbFecha.Text = "Buscar Fecha" Me.rdbFecha.UseVisualStyleBackColor = True ' 'dtpFechaOperacion ' Me.dtpFechaOperacion.Anchor = System.Windows.Forms.AnchorStyles.None Me.dtpFechaOperacion.Format = System.Windows.Forms.DateTimePickerFormat.[Short] Me.dtpFechaOperacion.Location = New System.Drawing.Point(21, 67) Me.dtpFechaOperacion.Name = "dtpFechaOperacion" Me.dtpFechaOperacion.Size = New System.Drawing.Size(91, 20) Me.dtpFechaOperacion.TabIndex = 0 ' 'Label5 ' Me.Label5.AutoSize = True Me.Label5.Location = New System.Drawing.Point(254, 36) Me.Label5.Name = "Label5" Me.Label5.Size = New System.Drawing.Size(62, 13) Me.Label5.TabIndex = 10 Me.Label5.Text = "Fecha Final" ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.Location = New System.Drawing.Point(152, 37) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(67, 13) Me.Label4.TabIndex = 9 Me.Label4.Text = "Fecha Inicial" ' 'dtpFechaOperacion2 ' Me.dtpFechaOperacion2.Format = System.Windows.Forms.DateTimePickerFormat.[Short] Me.dtpFechaOperacion2.Location = New System.Drawing.Point(242, 67) Me.dtpFechaOperacion2.Name = "dtpFechaOperacion2" Me.dtpFechaOperacion2.Size = New System.Drawing.Size(100, 20) Me.dtpFechaOperacion2.TabIndex = 8 ' 'dtpFechaOperacion1 ' Me.dtpFechaOperacion1.Format = System.Windows.Forms.DateTimePickerFormat.[Short] Me.dtpFechaOperacion1.Location = New System.Drawing.Point(136, 67) Me.dtpFechaOperacion1.Name = "dtpFechaOperacion1" Me.dtpFechaOperacion1.Size = New System.Drawing.Size(100, 20) Me.dtpFechaOperacion1.TabIndex = 7 ' 'grpVigencia ' Me.grpVigencia.Controls.Add(Me.rdbTodosVigencia) Me.grpVigencia.Controls.Add(Me.rdbVigente) Me.grpVigencia.Location = New System.Drawing.Point(432, 51) Me.grpVigencia.Name = "grpVigencia" Me.grpVigencia.Size = New System.Drawing.Size(149, 107) Me.grpVigencia.TabIndex = 88 Me.grpVigencia.TabStop = False Me.grpVigencia.Text = "Vigencia" ' 'rdbTodosVigencia ' Me.rdbTodosVigencia.AutoSize = True Me.rdbTodosVigencia.Location = New System.Drawing.Point(8, 47) Me.rdbTodosVigencia.Name = "rdbTodosVigencia" Me.rdbTodosVigencia.Size = New System.Drawing.Size(93, 17) Me.rdbTodosVigencia.TabIndex = 16 Me.rdbTodosVigencia.Text = "Mostrar Todos" Me.rdbTodosVigencia.UseVisualStyleBackColor = True ' 'rdbVigente ' Me.rdbVigente.AutoSize = True Me.rdbVigente.Checked = True Me.rdbVigente.Location = New System.Drawing.Point(8, 24) Me.rdbVigente.Name = "rdbVigente" Me.rdbVigente.Size = New System.Drawing.Size(128, 17) Me.rdbVigente.TabIndex = 15 Me.rdbVigente.TabStop = True Me.rdbVigente.Text = "Mostrar Solo Vigentes" Me.rdbVigente.UseVisualStyleBackColor = True ' 'lblEmpresa ' Me.lblEmpresa.Anchor = System.Windows.Forms.AnchorStyles.None Me.lblEmpresa.AutoSize = True Me.lblEmpresa.Location = New System.Drawing.Point(657, 68) Me.lblEmpresa.Name = "lblEmpresa" Me.lblEmpresa.Size = New System.Drawing.Size(48, 13) Me.lblEmpresa.TabIndex = 85 Me.lblEmpresa.Text = "Empresa" ' 'cboEmpresa ' Me.cboEmpresa.Anchor = System.Windows.Forms.AnchorStyles.None Me.cboEmpresa.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.cboEmpresa.FormattingEnabled = True Me.cboEmpresa.Location = New System.Drawing.Point(600, 84) Me.cboEmpresa.Name = "cboEmpresa" Me.cboEmpresa.Size = New System.Drawing.Size(171, 21) Me.cboEmpresa.TabIndex = 83 ' 'btnVer ' Me.btnVer.BackColor = System.Drawing.Color.White Me.btnVer.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnVer.ForeColor = System.Drawing.Color.Maroon Me.btnVer.Location = New System.Drawing.Point(398, 393) Me.btnVer.Name = "btnVer" Me.btnVer.Size = New System.Drawing.Size(75, 23) Me.btnVer.TabIndex = 89 Me.btnVer.Text = "Ver Detalles" Me.btnVer.UseVisualStyleBackColor = False ' 'btnAgregar ' Me.btnAgregar.BackColor = System.Drawing.Color.White Me.btnAgregar.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnAgregar.ForeColor = System.Drawing.Color.Maroon Me.btnAgregar.Location = New System.Drawing.Point(398, 422) Me.btnAgregar.Name = "btnAgregar" Me.btnAgregar.Size = New System.Drawing.Size(75, 55) Me.btnAgregar.TabIndex = 90 Me.btnAgregar.Text = " l" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "V" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) Me.btnAgregar.UseVisualStyleBackColor = False ' 'lblInstrumentos ' Me.lblInstrumentos.Anchor = System.Windows.Forms.AnchorStyles.None Me.lblInstrumentos.AutoSize = True Me.lblInstrumentos.Location = New System.Drawing.Point(647, 116) Me.lblInstrumentos.Name = "lblInstrumentos" Me.lblInstrumentos.Size = New System.Drawing.Size(67, 13) Me.lblInstrumentos.TabIndex = 92 Me.lblInstrumentos.Text = "Instrumentos" ' 'cboInstrumentos ' Me.cboInstrumentos.Anchor = System.Windows.Forms.AnchorStyles.None Me.cboInstrumentos.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.cboInstrumentos.FormattingEnabled = True Me.cboInstrumentos.Location = New System.Drawing.Point(600, 132) Me.cboInstrumentos.Name = "cboInstrumentos" Me.cboInstrumentos.Size = New System.Drawing.Size(171, 21) Me.cboInstrumentos.TabIndex = 91 ' 'dgvPool ' Me.dgvPool.AllowUserToAddRows = False Me.dgvPool.AllowUserToDeleteRows = False Me.dgvPool.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.dgvPool.AutoSizeRowsMode = System.Windows.Forms.DataGridViewAutoSizeRowsMode.AllCells Me.dgvPool.BackgroundColor = System.Drawing.Color.White Me.dgvPool.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvPool.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.CodigoTitulo, Me.Instrumento, Me.NombreInstrumento, Me.Empresa, Me.NombreEmpresa, Me.MontoTotal, Me.MontoUsado, Me.Porcentaje, Me.FechaCreacion, Me.IdFlujo, Me.IdEspLR}) Me.dgvPool.Location = New System.Drawing.Point(6, 483) Me.dgvPool.Name = "dgvPool" Me.dgvPool.RowHeadersVisible = False Me.dgvPool.Size = New System.Drawing.Size(807, 167) Me.dgvPool.TabIndex = 93 ' 'CodigoTitulo ' Me.CodigoTitulo.HeaderText = "Codigo Titulo" Me.CodigoTitulo.Name = "CodigoTitulo" ' 'Instrumento ' Me.Instrumento.HeaderText = "Instrumento" Me.Instrumento.Name = "Instrumento" ' 'NombreInstrumento ' Me.NombreInstrumento.HeaderText = "Nombre Instrumento" Me.NombreInstrumento.Name = "NombreInstrumento" ' 'Empresa ' Me.Empresa.HeaderText = "Empresa" Me.Empresa.Name = "Empresa" ' 'NombreEmpresa ' Me.NombreEmpresa.HeaderText = "Nombre Empresa" Me.NombreEmpresa.Name = "NombreEmpresa" ' 'MontoTotal ' Me.MontoTotal.HeaderText = "Mono Total" Me.MontoTotal.Name = "MontoTotal" ' 'MontoUsado ' Me.MontoUsado.HeaderText = "Monto Usado" Me.MontoUsado.Name = "MontoUsado" ' 'Porcentaje ' Me.Porcentaje.HeaderText = "Porcentaje" Me.Porcentaje.Name = "Porcentaje" ' 'FechaCreacion ' Me.FechaCreacion.HeaderText = "FechaCreacion" Me.FechaCreacion.Name = "FechaCreacion" ' 'IdFlujo ' Me.IdFlujo.HeaderText = "IdFlujo" Me.IdFlujo.Name = "IdFlujo" ' 'IdEspLR ' Me.IdEspLR.HeaderText = "IdEspLR" Me.IdEspLR.Name = "IdEspLR" ' 'txtMontoUsar ' Me.txtMontoUsar.Location = New System.Drawing.Point(515, 428) Me.txtMontoUsar.MaxLength = 20 Me.txtMontoUsar.Name = "txtMontoUsar" Me.txtMontoUsar.Size = New System.Drawing.Size(121, 20) Me.txtMontoUsar.TabIndex = 94 Me.txtMontoUsar.Text = "0" ' 'lblPorcentaje ' Me.lblPorcentaje.AutoSize = True Me.lblPorcentaje.Location = New System.Drawing.Point(309, 431) Me.lblPorcentaje.Name = "lblPorcentaje" Me.lblPorcentaje.Size = New System.Drawing.Size(58, 13) Me.lblPorcentaje.TabIndex = 95 Me.lblPorcentaje.Text = "Porcentaje" ' 'btnGenerarPool ' Me.btnGenerarPool.BackColor = System.Drawing.Color.White Me.btnGenerarPool.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnGenerarPool.ForeColor = System.Drawing.Color.Maroon Me.btnGenerarPool.Location = New System.Drawing.Point(368, 657) Me.btnGenerarPool.Name = "btnGenerarPool" Me.btnGenerarPool.Size = New System.Drawing.Size(127, 42) Me.btnGenerarPool.TabIndex = 96 Me.btnGenerarPool.Text = "Guardar Lista de Titulos" Me.btnGenerarPool.UseVisualStyleBackColor = False ' 'lblCodigo ' Me.lblCodigo.AutoSize = True Me.lblCodigo.Location = New System.Drawing.Point(596, 17) Me.lblCodigo.Name = "lblCodigo" Me.lblCodigo.Size = New System.Drawing.Size(40, 13) Me.lblCodigo.TabIndex = 97 Me.lblCodigo.Text = "Codigo" ' 'txtcodigo ' Me.txtcodigo.Location = New System.Drawing.Point(642, 14) Me.txtcodigo.Name = "txtcodigo" Me.txtcodigo.ReadOnly = True Me.txtcodigo.Size = New System.Drawing.Size(129, 20) Me.txtcodigo.TabIndex = 98 ' 'btnLimpiar ' Me.btnLimpiar.BackColor = System.Drawing.Color.White Me.btnLimpiar.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnLimpiar.ForeColor = System.Drawing.Color.Maroon Me.btnLimpiar.Location = New System.Drawing.Point(650, 426) Me.btnLimpiar.Name = "btnLimpiar" Me.btnLimpiar.Size = New System.Drawing.Size(87, 23) Me.btnLimpiar.TabIndex = 99 Me.btnLimpiar.Text = "Limpiar" Me.btnLimpiar.UseVisualStyleBackColor = False ' 'frmSeleccionPoolTitulos ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.Color.WhiteSmoke Me.ClientSize = New System.Drawing.Size(820, 711) Me.Controls.Add(Me.btnLimpiar) Me.Controls.Add(Me.txtcodigo) Me.Controls.Add(Me.lblCodigo) Me.Controls.Add(Me.btnGenerarPool) Me.Controls.Add(Me.lblPorcentaje) Me.Controls.Add(Me.txtMontoUsar) Me.Controls.Add(Me.dgvPool) Me.Controls.Add(Me.lblInstrumentos) Me.Controls.Add(Me.cboInstrumentos) Me.Controls.Add(Me.btnAgregar) Me.Controls.Add(Me.btnVer) Me.Controls.Add(Me.GroupBox1) Me.Controls.Add(Me.grpVigencia) Me.Controls.Add(Me.lblEmpresa) Me.Controls.Add(Me.cboEmpresa) Me.Controls.Add(Me.dgvTitulos) Me.Controls.Add(Me.lblTitulo) Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog Me.Name = "frmSeleccionPoolTitulos" CType(Me.dgvTitulos, System.ComponentModel.ISupportInitialize).EndInit() Me.GroupBox1.ResumeLayout(False) Me.GroupBox1.PerformLayout() Me.grpVigencia.ResumeLayout(False) Me.grpVigencia.PerformLayout() CType(Me.dgvPool, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents lblTitulo As Label Friend WithEvents dgvTitulos As DataGridView Friend WithEvents GroupBox1 As GroupBox Friend WithEvents rdbDeshabilitarFecha As RadioButton Friend WithEvents lblFecha As Label Friend WithEvents rdbRangoFechas As RadioButton Friend WithEvents rdbFecha As RadioButton Friend WithEvents dtpFechaOperacion As DateTimePicker Friend WithEvents Label5 As Label Friend WithEvents Label4 As Label Friend WithEvents dtpFechaOperacion2 As DateTimePicker Friend WithEvents dtpFechaOperacion1 As DateTimePicker Friend WithEvents grpVigencia As GroupBox Friend WithEvents rdbTodosVigencia As RadioButton Friend WithEvents rdbVigente As RadioButton Friend WithEvents lblEmpresa As Label Friend WithEvents cboEmpresa As ComboBox Friend WithEvents btnVer As Button Friend WithEvents btnAgregar As Button Friend WithEvents lblInstrumentos As Label Friend WithEvents cboInstrumentos As ComboBox Friend WithEvents dgvPool As DataGridView Friend WithEvents txtMontoUsar As TextBox Friend WithEvents lblPorcentaje As Label Friend WithEvents btnGenerarPool As Button Friend WithEvents lblCodigo As Label Friend WithEvents txtcodigo As TextBox Friend WithEvents CodigoTitulo As DataGridViewTextBoxColumn Friend WithEvents Instrumento As DataGridViewTextBoxColumn Friend WithEvents NombreInstrumento As DataGridViewTextBoxColumn Friend WithEvents Empresa As DataGridViewTextBoxColumn Friend WithEvents NombreEmpresa As DataGridViewTextBoxColumn Friend WithEvents MontoTotal As DataGridViewTextBoxColumn Friend WithEvents MontoUsado As DataGridViewTextBoxColumn Friend WithEvents Porcentaje As DataGridViewTextBoxColumn Friend WithEvents FechaCreacion As DataGridViewTextBoxColumn Friend WithEvents IdFlujo As DataGridViewTextBoxColumn Friend WithEvents IdEspLR As DataGridViewTextBoxColumn Friend WithEvents btnLimpiar As Button End Class