Attribute VB_Name = "basVariableGlobal"
'********************************************
'**      EQUIPO 3B                         **
'********************************************
'**      PROGRAMACION 2                    **
'********************************************
'**      INTEGRANTES:                      **
'**      ACOSTA LAZALDE SEBASTIAN IRAM     **
'**      ANDRADE SANCHEZ SAMUEL            **
'**      GALLEGOS BRECEDA LUCIANO          **
'**      MACDONALD MALDONADO EDUARDO       **
'**      MARQUEZ LOYA EDGAR ALEJANDRO      **
'**      PEŅA PEREZ MANUEL ALEJANDRO       **
'********************************************

Option Explicit 'REQUIERE DECLARACION DE VARIABLES

'variables de control de actividades varias
Public gstrName As String   'VARIABLE GLOBAL NAME OBTIENE EL CONTENIDO DEL CAMPO "NOMBRE USUARIO" DEL REGISTRO CONTROL
Public gintD As Integer     'VARIABLE QUE CONTROLA SI SE MUESTRA EL FORMULARIO DE DATOS O SE HABILITA EL FRAME PARA MANIPULAR REGISTROS
Public gintA As Integer     'VARIABLE QUE CONTROLA EL HECHO DE EMPEZAR A ALMACENAR REGISTROS O DE QUE SI YA NO SE VAN HA INTRODUCIR OTROS REGISTROS
Public glngL As Long        'VARIABLE GLOBAL L OBTIENE EL VALOR DEL CAMPO "IDCONTROL" DEL REGISTRO CONTROL
Public gintI As Integer     'VARIABLE GLOBAL I ALMACENA EL NUMERO DEL LOCAL A OCUPAR
Public gstrA As String      'VARIABLE GLOBAL STRING A QUE ALMACENA EL NOMBRE DE LA SECCION SELECCIONADA (A,B,C o D)
Public gintDreams As Integer
Public gstrHora As String   'VARIABLE QUE ALMACENA EL TEXTO "ENTRADA O SALIDA" MAS LA HORA DEL SISTEMA
Public gstrLocal As String  'VARIABLE QUE ALMACENA EL NOMBRE COMPLETO DEL LOCAL A OCUPAR
Public gintK As Integer     'VARIABLE QUE DETERMINA SI SE ESCRIBE O NO EN LA TABLA REGISTRO
Public gintQ As Integer     'VARIABLE QUE DETERMINA SI SE ENVIA O NO INFORMACION VIA SERIAL
Public gintDefault As Integer   'VARIABLE QUE CONTROLA EL ACCESO A LOS MAPAS DE SECCIONES
Public gintHomero As Integer    'VARIABLE DE CONTROL DECIDE SI LA INFORMACION SE ESTA RECIBIENDO DEL EXTERIOR O NO
'Variable para base de datos
Public gdbBase As Database  'VARIABLE QUE ALMACENA LA INFORMACION DE LA BASE DE DATOS PROYECT
Public grstControl As Recordset 'VARIABLE QUE ALMACENA LOS REGISTROS DE LA TABLA USUARIO
Public grstInOut As Recordset   'VARIABLE QUE ALMACENA LOS REGISTROS DE LA TABLA REGISTRO
Public gtbdRegistro As TableDef 'VARIABLE QUE SE USA EN LA CREACION DE LA TABLA REGISTRO
Public grstRegistro As Recordset    'VARIABLE QUE ALMACENA LOS REGISTROS DE LA TABLA REGISTRO
'Matrices que controlan los lugares
Public glngAngelina(0 To 19) As Long    'MATRIZ QUE DEFINE LOS LUGARES DE LA SECCION A Y DONDE SE GUARDAN LOS NUMEROS DE CONTROL DE LOS USUARIOS QUE ENTRAN
Public glngBritney(0 To 21) As Long     'MATRIZ QUE DEFINE LOS LUGARES DE LA SECCION B Y DONDE SE GUARDAN LOS NUMEROS DE CONTROL DE LOS USUARIOS QUE ENTRAN
Public glngCatherine(0 To 18) As Long   'MATRIZ QUE DEFINE LOS LUGARES DE LA SECCION C Y DONDE SE GUARDAN LOS NUMEROS DE CONTROL DE LOS USUARIOS QUE ENTRAN
Public glngDushku(0 To 15) As Long      'MATRIZ QUE DEFINE LOS LUGARES DE LA SECCION D Y DONDE SE GUARDAN LOS NUMEROS DE CONTROL DE LOS USUARIOS QUE ENTRAN
'Variables de Adquisicion de datos via internet
Public gstrDatos1 As String

