Public Class clsVaribles 'Clase que contiene variables publicas q son utilizadas en diferentes forms Public Shared ReportadoPor As String Public Shared Nombre As String Public Shared No_Referencia As String Public Shared idtransaccion As String Public Shared idproducto As String Public Shared Id_SubProducto As String Public Shared Id_Patron As String Public Shared Id_EstatusTransaccion As String Public Shared IDCliente As Long Public Shared TipoPersona As Integer Public Shared lnidTranPreo As Long Public Shared lnidFunPreo As Long Public Shared gblIdFuncionario As String Public Shared lscaptionForm = "" Public Shared lbDemo As Boolean = False Public Shared lnInusual As Integer = 0 Public Shared lsValAnt As String = "" Public Shared lsClienteNombre As String = "" Public Shared lsClienteNombreT As String = "" Public Shared Id_Transaccion As String Public Shared Id_Producto As String 'Public Shared FldRng1 As Word.Range 'Public Shared FldRng2 As Word.Range 'Public Shared FldRng3 As Word.Range 'Public Shared FldRng4 As Word.Range 'Public Shared FldRng5 As Word.Range 'Public Shared FldRng6 As Word.Range 'Public Shared FldRng7 As Word.Range 'Public Shared FldRng8 As Word.Range 'Public Shared FldRng9 As Word.Range 'Public Shared FldRng10 As Word.Range 'Public Shared FldRng11 As Word.Range 'Public Shared FldRngGen1 As Word.Range 'Public Shared FldRngGen2 As Word.Range 'Public Shared FldRngGen3 As Word.Range 'Public Shared FldRngGen4 As Word.Range 'Public Shared FldRngGen5 As Word.Range 'Public Shared FldRngGen6 As Word.Range 'Public Shared FldRngGen7 As Word.Range 'Public Shared FldRngGen8 As Word.Range 'Public Shared FldRngGen9 As Word.Range 'Public Shared FldRngGen10 As Word.Range 'Public Shared FldRngGen11 As Word.Range 'Public Shared FldRngAct1 As Word.Range 'Public Shared FldRngAct2 As Word.Range 'Public Shared FldRngAct3 As Word.Range 'Public Shared FldRngAct4 As Word.Range 'Public Shared FldRngAct5 As Word.Range 'Public Shared FldRngAct6 As Word.Range 'Public Shared FldRngAct7 As Word.Range 'Public Shared FldRngAct8 As Word.Range 'Public Shared FldRngApo11 As Word.Range 'Public Shared FldRngApo12 As Word.Range 'Public Shared FldRngApo13 As Word.Range 'Public Shared FldRngApo14 As Word.Range 'Public Shared FldRngApo15 As Word.Range 'Public Shared FldRngApo16 As Word.Range 'Public Shared FldRngApo17 As Word.Range 'Public Shared FldRngApo18 As Word.Range 'Public Shared FldRngApo19 As Word.Range 'Public Shared FldRngApo110 As Word.Range 'Public Shared FldRngApo111 As Word.Range 'Public Shared FldRngApo112 As Word.Range 'Public Shared FldRngApo21 As Word.Range 'Public Shared FldRngApo22 As Word.Range 'Public Shared FldRngApo23 As Word.Range 'Public Shared FldRngApo24 As Word.Range 'Public Shared FldRngApo25 As Word.Range 'Public Shared FldRngApo26 As Word.Range 'Public Shared FldRngApo27 As Word.Range 'Public Shared FldRngApo28 As Word.Range 'Public Shared FldRngApo29 As Word.Range 'Public Shared FldRngApo210 As Word.Range 'Public Shared FldRngApo211 As Word.Range 'Public Shared FldRngApo212 As Word.Range 'Public Shared FldRngApo31 As Word.Range 'Public Shared FldRngApo32 As Word.Range 'Public Shared FldRngApo33 As Word.Range 'Public Shared FldRngApo34 As Word.Range 'Public Shared FldRngApo35 As Word.Range 'Public Shared FldRngApo36 As Word.Range 'Public Shared FldRngApo37 As Word.Range 'Public Shared FldRngApo38 As Word.Range 'Public Shared FldRngApo39 As Word.Range 'Public Shared FldRngApo310 As Word.Range 'Public Shared FldRngApo311 As Word.Range 'Public Shared FldRngApo312 As Word.Range 'Public Shared FldRngApo41 As Word.Range 'Public Shared FldRngApo42 As Word.Range 'Public Shared FldRngApo43 As Word.Range 'Public Shared FldRngApo44 As Word.Range 'Public Shared FldRngApo45 As Word.Range 'Public Shared FldRngApo46 As Word.Range 'Public Shared FldRngApo47 As Word.Range 'Public Shared FldRngApo48 As Word.Range 'Public Shared FldRngApo49 As Word.Range 'Public Shared FldRngApo410 As Word.Range 'Public Shared FldRngApo411 As Word.Range 'Public Shared FldRngApo412 As Word.Range Public Shared Finicio As Date Public Shared Ffin As Date Public Shared varTransaccion As Long Public Shared varFecha As String Public Shared varUsuario As Long Public Shared varProceso As String Public Shared varCatalogo As String Public Shared VarInicio As Integer Public Shared VarPermiso As String Public Shared VarProcesoOK As Boolean Public Shared VarPerfil As Integer Public Shared VarSQL As String Public Shared VarActualiza As Boolean Public Shared FechaComodin As Date Public Shared blnActualizaFecha As Boolean Public Shared lngFiltroIDCliente As Long = 0 Public Shared strSQL As String Public Shared lngIDFraccionada As Long Public Shared strProdFraccionada As String Public Shared lngProdFraccionada As Long Public Shared CampoID As String Public Shared Tabla As String Public Shared strCon As String Public Shared EsActualizacion As Boolean Public Shared Cnbv_NumeroOficio As String Public Shared Cnbv_NumeroExpediente As String Public Shared Cnbv_SolicitudSiara As String Public Shared Cnbv_Folio As Integer Public Shared Cnbv_OficioYear As Integer Public Shared blnBuscaOficion As Boolean Public Shared strSTOficio As String = "" Public Shared blnActualizaExpediente As Boolean Public Shared strRutaOficios As String Public Shared strTipoArchivo As String '------------------------------------------- Public Shared VarIdCliente As Long Public Shared VarTpPersona As Integer Public Shared VarNivel As Integer Public Shared Tablas As String Public Shared Nacionalidad As String Public Shared ARR1 As System.Array Public Shared ARR2 As System.Array Public Shared ARR3 As System.Array Public Shared ARR4 As System.Array Public Shared ARR5 As System.Array Public Shared strCuenta As String Public Shared varPorcent As Double Public Shared IntEstatusActual As String Public Shared IntEstatusAnterior As String Public Shared SoloLectura As Boolean Public Shared swMetodoRiesgo As Boolean Public Shared CampoID1 As String Public Shared CampoID2 As String Public Shared CampoID3 As String Public Shared CampoID4 As String Public Shared CampoID5 As String Public Shared intNegocio As Integer = 2 'AJB 20Nov2009 'Se cambio el tipo de dato a double para que acepte los decimales. 'Public Shared varPorcent As Integer Public Shared strSQLGlobal As String Public Shared blnEsNuevo As Boolean Public Shared strCTRLCuenta As String Public Shared blnDesdePrincipal As Boolean = False Public Shared blnNoNuevo As Boolean Public Shared strNombreCliente As String Public Shared blnEsdeBanco As Boolean Public Shared blnEsActualizacion As Boolean = False 'Public Shared intNegocio As Integer Public Shared lbPEP As Boolean Public Shared liPerfilB As Integer = 0 Public Shared IdPerfil As String = String.Empty Public Shared NombreUsuario As String = String.Empty Public Shared NombreCompleto As String = String.Empty Public Shared NombrePerfil As String = String.Empty Public Shared LsTituloExcel As String = "" '------------- Public Shared SQL As String Public Shared strOPCION As Boolean = False Public Shared gsUsuario As String Friend Shared idCuenta As Integer Friend Shared numCuenta As String '------ Public Shared Conexion As SqlClient.SqlConnection End Class