0% encontró este documento útil (0 votos)
233 vistas138 páginas

Modem Contech

Este documento presenta el diseño e implementación de un Sistema de Gestión para Módems Satelitales (SGMS) para supervisar módems Comtech EF Data CDM 550. El SGMS consta de un módulo de hardware que se comunica con los módems a través de una interfaz RS-485 y un módulo de software desarrollado en Visual Basic que permite la exploración, configuración y monitoreo de los parámetros de los módems de manera remota. El SGMS brinda una solución para la supervisión contin

Cargado por

rafaelhvca
Derechos de autor
© © All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como PDF, TXT o lee en línea desde Scribd
0% encontró este documento útil (0 votos)
233 vistas138 páginas

Modem Contech

Este documento presenta el diseño e implementación de un Sistema de Gestión para Módems Satelitales (SGMS) para supervisar módems Comtech EF Data CDM 550. El SGMS consta de un módulo de hardware que se comunica con los módems a través de una interfaz RS-485 y un módulo de software desarrollado en Visual Basic que permite la exploración, configuración y monitoreo de los parámetros de los módems de manera remota. El SGMS brinda una solución para la supervisión contin

Cargado por

rafaelhvca
Derechos de autor
© © All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como PDF, TXT o lee en línea desde Scribd

DISEO E IMPLEMENTACIN DE UN SISTEMA

DE GESTIN PARA MDEMS SATELITALES

SGMS

CSAR HERNN BOHRQUEZ MAHECHA


RAL ROJAS MEDINA

UNIVERSIDAD DE SAN BUENAVENTURA


FACULTAD DE INGENIERA
PROGRAMA DE ELECTRNICA
BOGOT D.C.
2007

1
DISEO E IMPLEMENTACIN DE UN SISTEMA
DE GESTIN PARA MDEMS SATELITALES

SGMS

CSAR HERNN BOHRQUEZ MAHECHA


RAL ROJAS MEDINA

Trabajo de grado para optar al titulo de


Ingeniero Electrnico

ASESOR TEMTICO
INGENIERO NSTOR PENAGOS

UNIVERSIDAD DE SAN BUENAVENTURA


FACULTAD DE INGENIERA
PROGRAMA DE ELECTRNICA
BOGOT D.C.
2007

2
CONTENIDO

Pg.

INTRODUCCIN 1
1. PLANEAMIENTO DEL PROBLEMA 2
1.1. ANTECEDENTES 2
1.2 DESCRIPCIN Y FORMULACIN DEL PROBLEMA 6
1.3 JUSTIFICACIN 6
1.4 OBJETIVOS 6
1.4.1 General 6
1.4.2 Especficos 6
1.5 ALCANCES Y LIMITACIONES DEL PROYECTO 7
1.5.1 Alcances 7
1.5.2 Limitaciones 7
2. MARCO DE REFERENCIA 8
2.1 MARCO CONCEPTUAL 8
2.2 MARCO LEGAL O NORMATIVO 10
2.3 MARCO TERICO 12
2.3.1 Principios del mdem 12
2.3.2 Interface RS-485 15
2.3.3 Mdems Comtech EF Data 17
3. METODOLOGA 19
3.1 ENFOQUE DE LA INVESTIGACIN 19
3.2 LNEA DE INVESTIGACIN DE LA UNIVERSIDAD DE SAN BUENAVENTURA 19
3.4 HIPTESIS 19
3.5 MDULO HARDWARE 20
3.6 MDULO SOFTWARE 21
3.7 FUNCIONES DEL SISTEMA 21
3.8 VARIABLES 22
3.8.1 Independientes 22
3.8.2 Dependientes 22
4. PRESENTACIN Y ANLISIS DE RESULTADOS 23
5. DESARROLLO INGENIERIL 24
5.1 MODULO DE HARDWARE 26
5.1.2 Protocolo bsico para el mdem CDM 550 28
5.2 MODULO DE SOFTWARE 36
5.2.1 Ventana Principal 41
5.2.2 Requerimiento de interrupcin de exploracin 46
5.2.3 Barra de herramientas 52
5.2.4 Modo Exploracin 55
5.2.5 Modo Configuracin 55
iii

3
Pg.

5.2.6 Modo Terminal 57


6. CONCLUSIONES 58
7. RECOMENDACIONES 59
BIBLIOGRAFA 60
ANEXOS 62

iv

4
LISTA DE FIGURAS

Pg.

Figura 1. Sistema de gestin Compass de Newpoint 2


Figura 2. Diagrama de un sistema de gestin de equipos satelitales. 4
Figura 3. Interface CiM-25 Comtech EF Data. 5
Figura 4. Ubicacin del mdem en la cadena de subida 8
Figura 5. Ubicacin del mdem en la cadena de bajada 9
Figura 6. Componentes del mdem 12
Figura 7. Formatos de la modulacin digital. 14
Figura 8. Ejemplo de modulacin PSK bifsica y cuadrifsica 15
Figura 9. Bus de 4 hilos interface RS485 16
Figura 10. Diagrama bsico de un mdem satelital 17
Figura 11. Vista frontal del mdem Comtech EF Data CDM 550 18
Figura 12. Esquema generalizado del SGMS 20
Figura 13. Conexin para el acceso remoto mdem Comtech EF Data 550 28
Figura 14. Diagramas de flujo del programa 35
Figura 15. Flujo de la informacin en el SGMS 41
Figura 16. Ventana principal del SGMS 43
Figura 17. Ventana de monitor 47
Figura 18. Ventana de validacin de ingreso 48
Figura 19. Ventana de configuracin 49
Figura 20. Ventana adicionar cliente 51
Figura 21. Ventana eliminar cliente 52
Figura 22. Ventana Terminal 53
Figura 23. Ventana Acerca de 54
Figura 24. Barra de exploracin 54
Figura 25. rbol de men principal 56

5
LISTA DE TABLAS

Pg.

Tabla 1. Configuracin mnima del computador 22


Tabla 2. Distribucin de los mdems en los bastidores 24
Tabla 3. Base se datos de los circuitos 37
Tabla 4. Asignacin de grupo por cliente 39

vi

6
LISTA DE ANEXOS

Pag.

Anexo A. Cdigo de la programacin de Visual Basic del SGMS 63


Anexo B. Cdigos y protocolos de los parmetros del modem Comtech 97
Anexo C. Conversor RS-232/485. Modelo 485TBLED 112
Anexo D. Manual de usuario del SGMS 115
Anexo E. Carta viabilidad de la empresa Telefnica Telecom 127

vii

7
Nota de aceptacin

Presidente del Jurado

Jurado

Jurado

Jurado

Bogot D.C., 14 Noviembre 2007

viii

8
A mi esposa Olga Lucia y a mis hijos Sergio
Andres, Daniel Alejandro y Maria Paula por
regalarme gran parte de su tiempo, paciencia,
colaboracin y comprensin.

CSAR HERNN BOHRQUEZ MAHECHA

ix

9
A mi familia a quien amo, pues me ayudaron con
su apoyo y estmulo constante en la realizacin
de este proyecto

RAL ROJAS MEDINA

10
AGRADECIMIENTOS

Los autores de ste trabajo, deseamos expresar nuestros agradecimientos a:

Ingeniero Jorge Simbaqueba por su valiosa colaboracin y asesora en el


desarrollo de todo ste trabajo.

Ingeniero Nstor Penagos por el acompaamiento y por sus innumerables


sugerencias para llevar a feliz termino la obra emprendida.

xi

11
INTRODUCCIN

La supervisin de los enlaces de telecomunicaciones en forma continua, es una de


las principales tareas que todo proveedor de servicios de comunicaciones debe
implementar para brindarlos en forma eficiente y con la mejor disponibilidad el
control y monitoreo durante las 24 horas y los 365 das del ao, con el fin de dar a
los clientes un buen nivel de satisfaccin, cumpliendo as con los tiempos de
respuesta pactados.

La variedad de aplicaciones en hardware y software ofrecen grandes beneficios en


la implementacin de unidades de mantenimiento y control a los equipos de
comunicaciones realzando su funcionalidad, utilizando accesorios e interfaces,
para proporcionar facilidades al personal tcnico que efecta la supervisin,
operacin mantenimiento de los equipos de los sistemas de telecomunicaciones.

Este trabajo contempla el Diseo e Implementacin de un Sistema de Gestin


para Mdems Satelitales (SGMS), el cual abarcar la utilizacin de diversos tipos
de interfaces de comunicaciones para el manejo cdigos de transmisin y
protocolos de la informacin involucrada en los diferentes parmetros tcnicos que
manejan los mdems Comtech EF Data CDM 550, en los enlaces de los sistemas
satelitales.

1
1. PLANEAMIENTO DEL PROBLEMA

1.1. ANTECEDENTES

En el mbito internacional existen variados sistemas de gestin de equipos de


comunicaciones con diversas aplicaciones de hardware y software cuyo diseo
esta orientado al control y administracin de enlaces que manejan un trfico
elevado de diferentes tipos de comunicaciones.

El sistema de gestin COMPASS de la compaa americana NEWPOINT1


mostrado en la figura 1, es un sistema de gestin de equipos de comunicaciones
de gran nivel y complejidad en el control, de diversos equipos de comunicaciones
satelitales gestionados en forma local y remotamente a travs de las interfaces de
control y mantenimiento que tienen incorporados los mdems que conforman los
enlaces va satlite.

Figura 1. Sistema de gestin Compass de Newpoint


1
Newpoint. [Internet] [consultado 5 junio 2007] Disponible en: <http://www.newpoint.com.com>

2
Las principales funciones del Compass en la gestin de una red satelital son:

Mantenimiento y control hasta de 100.00 dispositivos


Interconexin a travs de cualquier tipo de interface con opciones de
autoconfiguracin.
Administracin en tiempo real de la red.
Reconocimiento de alarmas, filtrado de acuerdo al nivel de prioridad y
registro de para el almacenamiento y su anlisis posterior.

En Colombia la antigua Empresa Nacional de Telecomunicaciones Telecom,


instal en el ao 2003, en la estacin terrena de Chocont un sistema de gestin
para los equipos satelitales de la red domstica perteneciente al Plan Bianual I.

El sistema se implement, de acuerdo a la dimensin de la estacin terrena, con


equipos Compass y Mercury del fabricante New Point, para efectuar el monitoreo
local y remoto en cada uno de las estaciones remotas y as mismo tener gestin
remota va mdem satelital desde Chocont. El sistema se encuentra actualmente
en funcionamiento con alcance desde Bogot a travs de una red LAN/WAN. En la
figura 2, se observa la disposicin de la red Domsat2.

El CiM-25, mostrado en la figura 3, es una interface de control y monitoreo a


travs del protocolo de Internet IP y la interfaz serial para uso remoto que tienen
los mdems, diseado por el fabricante de mdems Comtech EF Data3 de
Estados Unidos, y es un dispositivo que promocionan como una solucin
econmica, con facilidades de acceso remoto para el control y monitoreo, pero con
la desventaja limitante de acceder a solo un mdem o un convertidor de
frecuencia, Comtech EF Data, equipos utilizados en las redes satelitales.

2
ANDITEL, manual de entrenamiento red Domsat junio 4 de 2004, p.3.
3
COMTECH EF DATA. Manual de la interface CiM-25, rev.3 julio 21 de 2004, p. 1~4.

3
Figura 2. Diagrama de un sistema de gestin de equipos satelitales.

El control se puede efectuar remotamente desde la estacin terrena o ubicacin


del mdem hasta el centro de operacin y mantenimiento mediante
direccionamiento IP a travs de la nube de Internet.

4
Cada unidad CiM-25 es programada en fbrica para proveer al cliente la interface
exclusivamente para el tipo de equipo Comtech EF Data previamente definido y no
podr funcionar, una vez cargado su software, en otra unidad as sea del mismo
fabricante, al menos que sea actualizado mediante un Flash Upload.

La interface usa tecnologa Flash y soporta una gran variedad de equipos que
poseen una plataforma de hardware sencilla, actualmente provee facilidades de
acceso para los siguientes equipos:

mdems

SDM-300L1* SDM-300A/SLM-3650*
SDM-300L2* CDM-550T
SDM-300L3 CDM-600*
SDM-2020M* SDM-2020D*
SDM-8000* SDM-9000*

Convertidores de frecuencia

UT4500 series 1 kHz and 125 kHz step size Up Converters*


DT4500 series 1 kHz and 125 kHz step size Down Converters

* Indica que el equipo requiere una fuente de alimentacin externa de 5 Vdc.

Figura 3. Interface CiM-25 Comtech EF Data.

5
1.2 DESCRIPCIN Y FORMULACIN DEL PROBLEMA

Aprovechando las facilidades de interaccin incluidas en los mdems satelitales


Comtech EF Data CDM 550, es posible disear e implementar un sistema de
gestin remota para agruparlos y desde ella facilitar al personal tcnico la
configuracin, monitoreo y control de todas las funciones de que poseen stos
equipos.

Cmo se gestionaran ms de 50 mdems satelitales Comtech EF Data en un


sistema centralizado?

1.3 JUSTIFICACIN

El Centro de Operaciones (POP 102 - Point Of Presence - ) que la compaa


Telefnica-Telecom tiene ubicado en la calle 102 con la autopista norte de la
ciudad de Bogot, no tiene personal tcnico disponible de tiempo completo, para
efectuar la operacin y mantenimiento de los 53 mdems que actualmente tiene
en servicio y con una gran tendencia de crecimiento; por tanto un sistema de
gestin como el SGMS puede llegar a tenerse como una solucin integral que
simplifique las operaciones rutinarias de los enlaces satelitales, disponga de
estadsticas e historiales fiables del comportamiento de los enlaces, que ayude a
mejorar los indicadores de gestin y a los tiempos de respuesta de atencin a los
clientes, suministrndoles un servicio de telecomunicaciones ms eficiente .

1.4 OBJETIVOS

1.4.1 General

Disear e implementar un sistema de gestin para optimizar las labores de


supervisin, operacin y mantenimiento en forma remota de un conjunto de
mdems satelitales Comtech EF Data CDM 550.

1.4.2 Especficos

Definir y establecer las operaciones de control y configuracin de los


parmetros de los mdems.

6
Identificar en tiempo real el estado de funcionamiento de los mdems.
Disear e implementar la programacin de informes y estadsticas del
desempeo de los mdems.
Proveer la interaccin con los operadores a travs de un sistema grfico
sencillo y amigable.
Elaborar un manual de operacin del sistema de gestin SGMS.

1.5 ALCANCES Y LIMITACIONES DEL PROYECTO

1.5.1 Alcances

Implementar el sistema SGMS nicamente, en los mdems satelitales de la marca


Comtech EF Data, modelo CDM 550, que utiliza Telefnica -Telecom Bogot en el
Telepuerto POP 102, para el servicio de las comunicaciones satelitales de sus
clientes corporativos VIP de la pequea y mediana empresa de nuestro pas.

El sistema de gestin se mostrar en funcionamiento al momento de la realizar la


socializacin del proyecto.

1.5.2 Limitaciones

El sistema de gestin de mdems satelitales SGMS se limita a los fabricados por


Comtech EF Data, debido a la facilidad de accederlos remotamente mediante su
protocolo de comunicacin propietario, razn por la cual se dificultara ser
gestionados en conjunto con mdems de otras marcas.

La operacin y manipulacin del SGMS est dirigida a personas que tengan


conocimientos en telecomunicaciones y particularmente en el funcionamiento de
mdems satelitales.

7
2. MARCO DE REFERENCIA

2.1 MARCO CONCEPTUAL

El mdem o Unidad de Canal hace parte del conjunto de equipos de


comunicaciones satelitales, que se utiliza para transmitir las seales hacia el
satlite por la "cadena de subida" y recibir las seales que se envan a la tierra
desde el satlite por la "cadena de bajada a travs de una serie de subsistemas
bsicos, integrados en el proceso del establecimiento de un enlace satelital. En la
figura 4 se representa el modulador como parte del enlace ascendente.

Figura 4. Ubicacin del mdem en la cadena de subida

Para evitar interferencias entre las cadenas de subida y de bajada, las frecuencias
de ambos son distintas. Las frecuencias de la cadena de subida son mayores que
las de la cadena de bajada, debido a que cuanto mayor sea la frecuencia se
produce mayor atenuacin en el recorrido de la seal, y por tanto es preferible
transmitir con ms potencia desde la tierra, donde la disponibilidad energtica y/o
ganancia de antena es mayor. Para evitar que los canales prximos de la cadena
de bajada interfieran entre s, se utilizan polarizaciones ortogonales.

8
En el interior del satlite existen unos bloques denominados transpondedores, que
tienen como misin recibir, cambiar y transmitir las frecuencias del satlite, a fin de
que la informacin que se enva desde la base llegue a las antenas receptoras4.
En la figura 5 se representa el demodulador como parte del enlace descendente.

Figura 5. Ubicacin del mdem en la cadena de bajada

La denominacin de mdem se origina de la integracin del modulador y del


demodulador en un solo equipo. El modulador es el bloque encargado de realizar
el scrambling de los datos, codificar FEC, y modular en BPSK/QPSK. El
modulador QPSK utiliza una frecuencia de referencia local para crear los smbolos
a transmitirse; esta seal de referencia es entregada por el demodulador.
Finalmente, la salida del modulador QPSK es convertida a la frecuencia IF de
salida necesaria para el uso del convertidor de subida o Up Converter, luego es
amplificada y filtrada convenientemente.

El demodulador recibe la seal de IF que es disminuida en frecuencia mediante el


uso del convertidor de bajada o Down Converter, luego la misma es demodulada
en sus dos componentes, alimentndolos en un procesador. Este procesador es el
encargado de monitorear la conexin, controlar los tiempos, las ganancias,
generar las seales de reloj de salida y entrada; finalmente la seal es procesada
con un decodificador secuencial, y es entregada a la interfaz de salida de datos
apropiada5.
4
Wikipedia [Internet] [consultado 03 jun. 2007] disponible en
<http://es.wikipedia.org/wiki/Internet_por_sat%C3%A9lite>
5
Modems ComStream. [Internet] [consultado 04 jun. 2007] disponible en <http://www.
fi.uba.ar/materias/6679/mextra/Present_Modem_Coms.pdf>

9
2.2 MARCO LEGAL O NORMATIVO

La legislacin acerca de la utilizacin de los mdems Comtech EF Data se basan


en las recomendaciones emitidas por entidades como la TTED (Telecomunications
Terminal Equipment Directive) y la ED (European Directive), para cumplir
bsicamente con los estndares de funcionamiento en las redes satelitales, lo
mismo que las especificaciones de los protocolos de pruebas para estos equipos,
cuando entran en funcionamiento en sistemas domsticos satelitales DOMSAT y
los requerimientos de las organizaciones internacionales de satlites, como
INTELSAT, COMSAT, PANAMSAT, EUTELSAT, SATMEX, a continuacin se
relacionan las principales recomendaciones:

SSOG-308/309/310/314/315, (Gua de Explotacin del Sistema de Satlites


INTELSAT) es una serie de documentos en los que se describen, detalladamente
los procedimientos de las pruebas operacionales equipo6 y contienen las normas
y especificaciones mandatorias para los mdems que se van a utilizar en los
sistemas digitales, a travs de los satlites de INTELSAT, se refieren a las
pruebas mnimas que se deben realizar para comprobar el funcionamiento del
equipo, en caractersticas y parmetros como, la banda base, el mtodo de
modulacin, el espectro de salida del modulador, la dispersin de energa
(Aleaturizacin), espectro de ruido etc..

EEC/91/263 de la TTED que se refiere a que los mdems Comtech EF Data, no


deben ser conectados directamente a una red pblica de telecomunicaciones.

EEC/89/336 de la ED, con instrucciones sobre el cumplimiento las pruebas


independientes en fbrica y con los tems siguientes referentes a la compatibilidad
electromagntica de los mdems7:

Emisiones: ENE55022 Clase B, sobre las caractersticas de los lmites y


mtodos de medida de las interferencias de radio e informacin sobre la
tecnologa aplicada al equipo, incluye todo lo aprobado, en la parte 15 y
clase B, por la Comisin Federal de Comunicaciones (FCC) de Estados
Unidos.
Inmunidad: ENE50082 PARTE 1, que es el estndar genrico de inmunidad
en el entorno domstico, comercial e industrial con respecto al medio
ambiente.

6
INTELSAT, Manual de tecnologa de estaciones terrenas, revisin 5, editorial INTELSAT junio de
1999, p. 112-1, 12-11~12-18.
7
COMTECH EF DATA. Manual del modem CDM-600, revisin 5, marzo 11 de 2002, p. xii y xiii

10
ENE61000-3-2, emisiones de armnicos
ENE61000-3-3, fluctuaciones y oscilaciones de voltaje
ENE61000-4-8, inmunidad a la frecuencia y potencia de los campos
magnticos.
ENE61000-4-11, variaciones, interrupciones y picos de voltaje.

Las portadoras de los mdems Comtech EF Data al operar en los diferentes


proveedores satelitales en Colombia, ocupan un determinado ancho de banda y
usan una determinada frecuencia, en las bandas C o Ku (6/4 Ghz. o 14/11 Ghz.)
que estn reglamentadas en las normas del Ministerio de Comunicaciones8.

El mencionado ministerio, es el ente regulador del espectro electromagntico y


como tal, ha promulgado algunos decretos con los cuales administra, controla,
tarifica y factura la utilizacin del espectro por los diferentes proveedores de
servicios de telecomunicaciones. Los decretos son:

Decreto nmero 1137 de 1996, por el cual se reglamenta la administracin,


asignacin y gestin del espectro electromagntico atribuido a la
radiocomunicacin espacial, para ser utilizado por las redes satelitales,
incluidos los segmentos espacial y terrestre.
Los decretos: nmero 2041 de 1998 (8 octubre) y nmero 1705 de 1999
(agosto 31) establecen el rgimen unificado de contraprestaciones, por
concepto de concesiones, autorizaciones, permisos y registros en materia
de telecomunicaciones y los procedimientos para su liquidacin, cobro,
recaudo y pago. Indicndose que el Ministerio de Comunicaciones,
establecer los cnones que por derechos de utilizacin del espectro
radioelctrico, deben pagar al Fondo de Comunicaciones los
concesionarios y dems entidades autorizadas para operar redes
satelitales.

Sin embargo, especficamente estos decretos de regulacin no afectan el


desarrollo e implementacin del SGMS

8
Ministerio de Comunicaciones [INTERNET] [consultado 22 junio 2007] Disponible en
<http://www.mincomunicaciones.gov.co/mincom/src/?find=ok&page=./mods/legislacion/legislacion_
user_list&id_tool=0>

11
2.3 MARCO TERICO

2.3.1 Principios del mdem

La modulacin se emplea para modificar las caractersticas estructurales de una


seal, con el propsito de facilitar la recuperacin de la seal, en su forma original,
en la otra extremidad. La modulacin es una tcnica de conversin usada para la
transmisin de seales de datos digitales sobre lneas de transmisin analgicas,
dicha transmisin consta de una forma de onda que vara en amplitud y
frecuencia. La modulacin tambin se define como un proceso mediante el cual se
vara la caracterstica de onda portadora de acuerdo con otra seal u onda,
generalmente se utiliza para hacer las seales digitales compatibles con las
facilidades de comunicacin analgicas9.

Tcnicamente la modulacin se ha definido como el proceso de combinar una


seal de entrada m(t) y una portadora (seal continua de frecuencia constante) a
frecuencia fc para producir una seal s(t) cuyo ancho de banda este normalmente
centrado en torno a fc. La figura 6 representa el proceso tcnico de las seales en
el mdem.

Seal m(t) s(t)


Digital o Modulador Demodulador m(t)
Anloga Analgica

Figura 6. Componentes del mdem

Todas las tcnicas de modulacin implican la modificacin de algunos o varios de


los parmetros de la portadora como lo son: la amplitud, la frecuencia o la fase.
Para las comunicaciones radiofnicas, la modulacin consiste bsicamente en
variar la amplitud, la frecuencia o la fase de una portadora de radiofrecuencia, en
conformidad con la informacin que se habr de transmitir.

La figura 7, contiene ejemplos de los formatos de modulacin digital para la


modulacin por desplazamiento de fase (PSK), la modulacin por desplazamiento
de frecuencia (FSK) y la modulacin por desplazamiento de amplitud (ASK), as
9
Universidad de Almera [INTERNET] [consultado 22 de junio 2007] Disponible en
<http://www.ace.ual.es/~vruiz/docencia/redes/apuntes/html/node67.html>

12
como la combinacin de PSK y ASK conocida tambin como modulacin de
amplitud en cuadratura (QAM). Como se observa en la figura 4, en el caso de la
llamada sealizacin PSK M-valente (MPSK), el procesador acepta k bitios de la
fuente y ordena al modulador que se produzca uno o varios tipos de forma de
k
onda M = 2 que estn disponibles. En la prctica M corresponde generalmente a
una potencia de dos distinta de cero (2, 4, 8, 16, ).

Muchos de los formatos de modulacin no se prestan para las comunicaciones por


satlite10. Las no linealidades de los transpondedores y los efectos de rendimiento
de potencia generalmente exigen que el formato de la modulacin tenga una
envolvente constante, excluyendo as el formato ASK. Los mtodos ms
interesantes seran el PSK y una versin del FSK de fase continua denominada
modulacin por desplazamiento mnimo.

La modulacin por desplazamiento de fase bivalente o BPSK es la forma ms


simple de PSK, en la que el desplazamiento de fase vara con cada nuevo bitio de
datos. En este caso, un cdigo binario se correlaciona bitio por bitio con un par de
estados de fase, cuya diferencia de fase es 180 grados. En la figura 7 se
representan los formatos de modulacin.

10
INTELSAT, Manual de Tecnologa digital de comunicaciones por satlite, revisin 3, editorial
INTELSAT, abril de 1999. p. 3.1 -3.3

13
Figura 7. Formatos de la modulacin digital.

La modulacin cuadrifsica o QPSK codifica cada par de bitios en una de cuatro


fases, segn muestra en la figura 8. En comparacin con el mtodo BPSK, el
QPSK tiene como una de sus principales ventajas el hecho de que ofrece la
misma eficiencia de potencia utilizando nicamente la mitad del ancho de banda.

El QPSK es particularmente importante para la transmisin de datos por satlite.


El calificativo de cuadrifsico proviene del hecho de que una portadora es
modulada a lo largo del vector de fase desde 0, 180 (el canal en fase o
cosenoidal) y la otra a lo largo del vector de fase 90, 270 (el canal en cuadratura
o senoidal). Tericamente los dos canales son independientes11. En la figura 8 se
muestra el esquema de modulacin BPSK Y QPSK.

8
INTELSAT, Manual de Tecnologa digital de comunicaciones por satlite, revisin 3, editorial
INTELSAT, Abril de 1999. p. 65 - 66

14
Figura 8. Ejemplo de modulacin PSK bifsica y cuadrifsica

2.3.2 Interface RS-485

La interfaz RS485 ha sido desarrollada para la transmisin en serie de datos de


alta velocidad a grandes distancias y encuentra creciente aplicacin en el sector
industrial. La RS485 est concebida como sistema Bus bidireccional con hasta 32
dispositivos. El Bus RS485 puede instalarse tanto como sistema de 2 hilos o de 4
hilos. Dado que varios transmisores trabajan en una lnea comn, tiene que
garantizarse con un protocolo que en todo momento est activo, como mximo un
transmisor de datos. Los otros transmisores tienen que encontrarse en ese
momento en estado de alta impedancia.

La tcnica del bus 4 hilos RS485, en la figura 9, puede ser usada por
aplicaciones Master/Slave. Conforme al diagrama, se cablea aqu la salida de
datos del Maestro a las entradas de datos de todos los Servidores. Las salidas de
datos de los Servidores estn concebidas conjuntamente en la entrada de datos
del Maestro. En la figura 9 se representa la interfaz RS-485 a 4 hilos.

15
Figura 9. Bus de 4 hilos interface RS485

Los datos en serie, se transmiten sin referencia a tierra, como diferencia de


tensin entre dos lneas correspondientes. Para cada seal a transmitir existe un
par de conductores que se compone de una lnea de seales invertida y otra no
invertida. La lnea invertida se caracteriza por regla general por el ndice "A" o "-",
mientras que la lnea no invertida lleva "B" o "+". El receptor evala solamente la
diferencia existente entre ambas lneas, de modo que las modalidades comunes
de perturbacin en la lnea de transmisin no falsifican la seal til12.

Los transmisores RS485 ponen a disposicin bajo carga un nivel de salida de 2V


entre las dos salidas; los mdulos de recepcin reconocen el nivel de 200mV
como seal vlida.

La asignacin tensin de diferencia al estado lgico se define del modo siguiente:

1 Lgico = A - B < -0,3V = MARK = OFF

0 Lgico = A - B > +0,3V = SPACE = ON

12
INTERFACES W & T. [INTERNET] [consultado 25 jun. 2007] disponible en:
<http://www.wut.de/e-6wwww-11-apes-000.php3>

16
En conexiones RS485 es necesario un final de cable con redes de terminacin
para obligar al nivel de pausa en el sistema de Bus en los tiempos en los que no
est activo ningn transmisor de datos.

En la instalacin tiene que cuidarse de la polaridad correcta de los pares de


cables, puesto que una polaridad falsa lleva a una inversin de las seales de
datos. Especialmente en dificultades en relacin con la instalacin de nuevos
terminales cada bsqueda de error debera comenzarse con el control de la
polaridad del Bus.

2.3.3 Mdems Comtech EF Data

En la figura 10, se presenta un diagrama simplificado de un mdem satelital, con sus


componentes bsicos y los parmetros principales que pueden ser configurados
desde el panel frontal de un Comtech EF Data CDM 550. En la figura 10 se
representan los bloques y parmetros de un mdem satelital.

MODEM SATELITAL (MOdulador / DEModulador)

Figura 10. Diagrama bsico de un mdem satelital

Los mdems involucrados en el presente anteproyecto son los de referencia Comtech


EF Data CDM 550, en la figura 11, dirigido especialmente para las redes de
INTELSAT, pero su aplicacin es funcional en redes satelitales abiertas y privadas.
Sus principales caractersticas en trminos generales son:

17
Ofrecen velocidades de transmisin variables desde 64 Kbps hasta 10 Mbps13.
Modulacin en los modos de: BPSK, QPSK, Offset QPSK, 8-QPSK, y 16-QAM.
Codificador en los tipos: Viterbi, Secuencial, Concatenado Reed-Solomon (RS),
y Producto Turbo Cdigo (TPC).
Opciones variadas de FEC, corrector de errores hacia delante (Foward Error
Correction).
Diferentes tipos de interfaces incorporadas en el equipo, para el ingreso y
salida de los datos de banda base.
Cubrimiento simultaneo del rango de las frecuencias en IF de 70 Mhz y
140 Mhz. (52 88 Mhz y 104 176 Mhz.).
Panel frontal con un displey VDF y teclado para configuracin y control
completo en forma local, tambin incluye la interface para el acceso remoto.
Unidad compacta que slo consume tpicamente 25 vatios.

Los mdems Comtech EF Data pueden controlarse remotamente mediante la


interfaz elctrica RS-485 o RS-232. En dicha modalidad, el mdem se configura
como DCE y la unidad de control remota como DTE.

La interface elctrica o es un mutilbus EIA-485 para el control de muchos


dispositivos, o una conexin de EIA-232 (para el mando de un solo dispositivo), y
el dato se transmite en la forma de serial asncrona, usando los caracteres ASCII.
El control y el estado de la informacin se transmiten en paquetes, de longitud
variable, de acuerdo con la estructura y al protocolo14.

Figura 11. Vista frontal del mdem Comtech EF Data CDM 550

13
Comtech EF Data, EF Data Part Number ds-cdm550.doc [Internet] [consultado 24 jun. 2007]
8/23/2005 disponible en : <www.comtechefdata.com>
14
Comtech EF Data, EF Data Part Number ds-cdm570/570L.doc [Internet] [consultado 24 jun.
2007] disponible en : <www.comtechefdata.com>

18
3. METODOLOGA

3.1 ENFOQUE DE LA INVESTIGACIN

El anteproyecto se edificar en el marco de la investigacin emprico-analtica,


teniendo como premisa el conocimiento prctico, la fundamentacin tcnica a
travs del estudio universitario y experiencia en la operacin y mantenimiento de
enlaces satelitales.

3.2 LNEA DE INVESTIGACIN DE LA UNIVERSIDAD DE SAN BUENAVENTURA

De acuerdo con los lineamientos y el enfoque temtico que la Universidad de San


Buenaventura, sede Bogot, le da a este tipo de trabajos, se determina que la lnea
de investigacin, del proyecto se enmarca dentro de lo siguiente:

La lnea: Tecnologas actuales y sociedad, ya que los tcnicos e ingenieros


operadores de los sistemas de telecomunicaciones de TelefnicaTelecom
podrn utilizar la gestin de los equipos mdems obteniendo mejores facilidades
en el desempeo de sus labores. La sublnea: el trabajo involucra Procesamiento
de seales digitales y/o analgicas para la comunicacin, control y seleccin de
los diferentes dispositivos a travs de un sistema de control central. Campo:
Comunicaciones, porque con el SGMS se desea implementar una gestin remota
utilizando interfaces de comunicacin duplex, dispuestas para enviar y recibir
informacin procedente de un conjunto de mdems.

3.4 HIPTESIS

Con la implementacin del sistema de gestin de mdems satelitales SGMS,


mostrado en la figura 13, se resolver lo planteado en la descripcin y formulacin
del problema. El diseo del sistema estar integrado por dos mdulos bsicos: el
mdulo hardware y el mdulo software:

19
Figura 12. Esquema generalizado del SGMS

3.5 MDULO HARDWARE

El modulo hardware esta constituido bsicamente por la interfaz RS-232 del puerto
serial del computador conectado al convertidor RS-485, que permite establecer La
comunicacin entre el elemento de gestin central y el grupo de mdems
seleccionados, aislando los dems equipos involucrados en el enlace satelital,
tales, como el Up Converter, Down Converter y los amplificadores de potencia.

Un adaptador de interface, (conversor RS-232/485) permitir el intercambio de


informacin entre el computador central y con los diferentes bastidores que se
encuentra instalados desde donde se van a seleccionar los mdems para
establecer la conexin a travs del bus de comunicaciones.

20
3.6 MDULO SOFTWARE

Esta compuesto de una interfaz grfica de usuario amigable, que utilizando una
aplicacin orientada a objetos y manejada por eventos, interacta internamente
con un gestor de base de datos intercambiando informacin transparente al
usuario. En su diseo se har nfasis en su simplicidad presentando un nmero
reducido de objetos a fin de que el usuario se sienta cmodo en su operacin, sin
limitar su funcionalidad. La idea del diseo es ofrecer una muy completa
herramienta de gestin en formularios simples diferenciando de otras herramientas
similares donde el operador tiene que hacer esfuerzos por entender su contenido
inhabilitndolo en muchas ocasiones a realizar sencillas acciones de operacin.

3.7 FUNCIONES DEL SISTEMA

Mediante los dos mdulos se permitir a sus usuarios realizar las siguientes tareas:

Cambiar parmetros de configuracin de los mdems como: frecuencia de


operacin, velocidad de la portadora, cdigo de correccin de errores, nivel
de transmisin de la portadora, fuentes de reloj y tipos de interface.
Realizar operaciones de control del mdem como activacin/ desactivacin
de su portadora, estado del circuito aleatorizador, enmascaramiento,
reconocimiento y clareado de alarmas.
Mostrar en tiempo real el estado de operacin de cada uno de los mdems.
Ofrecer variados tipos de informe, programados por el usuario, para la
obtencin de estadsticas de operacin. Tpicamente se podrn obtener
historiales de niveles de Eb/No de cada uno de los enlaces, nmero de
alarmas con fecha y hora de inicio y terminacin, y niveles de tasas de error
antes y despus del sistema de correccin de errores.
Acceder a una base de datos para obtener una informacin, transparente
al usuario, relacionada con la gestin y monitoreo de los mdems.

Toda esta informacin ser desplegada en una Interfaz grfica de usuario, que
podr ser instalada en un computador con mnimos requerimientos de hardware
los cuales se resumen en la tabla 1.

21
Tabla 1. Configuracin mnima del computador

Procesador IBM Compatible Pentium o superior


Memoria RAM 512 MB
Espacio libre en disco duro 20 MB
Unidad de CD ROM Incorporada.
Puerto serial Incorporado.
Sistema operativo Windows XP.

3.8 VARIABLES

3.8.1 Independientes

Frecuencia
Tipo de modulacin
Nivel de Potencia
Tipo de FEC
Cantidad de dispositivos a controlar.

3.8.2 Dependientes

Visualizacin del estado de los mdems.


Implementacin adicional de hardware y software.

22
4. PRESENTACIN Y ANLISIS DE RESULTADOS

Mediante la interpretacin de las facilidades de interaccin que proveen los


mdems Comtech EF Data 550, en su cdigo de protocolos, fue posible integrar
el mdulo de hardware y de software para obtener un sistema de gestin de
mdems satelitales SGMS, con el cual, se tiene el acceso remoto de mltiples
dispositivos, en forma rpida a travs de una sencilla y amigable interfaz grfica
desarrollada en Visual Basic, a diferencia de la situacin actual en que el operador
de la red, debe dirigirse al saln de equipos, localizar los bastidores, ubicar el
mdem especifico a verificar dentro del bastidor, para luego desplazarse por el
teclado frontal del mdem hasta el men o tem objetivo de la consulta.

Desde el SGMS, se pueden cambiar los parmetros de funcionamiento del


mdem de acuerdo a las necesidades del usuario tales como: el tipo de interface,
el cdigo de correccin de errores o FEC, las frecuencias de operacin en
transmisin y en recepcin, la velocidad de datos de la portadora, el nivel de
potencia de salida del modulador, el reloj de sincronizacin del enlace y la
inversin del espectro.

La versatilidad en la implementacin del sistema logra dar al operador de la red,


facilidades en la realizacin de las rutinas de mantenimiento, como la evaluacin
de las caractersticas de desempeo de los mdem activos, parmetro que se
obtiene de RX Eb/No, lectura que es registrada y evaluada una vez a la semana
por el personal de operacin y mantenimiento.

Es de anotar tambin, que desde la gestin se pueden generar pruebas de retorno


o loops, en la modalidad de loop de banda base, loop digital, loop de IF y loop de
RF para verificar el funcionamiento local del mdem o incluirlo para prueba en el
enlace satelital. Tambin es posible generar una portadora de prueba sin modular
desde el mdem hacia el satlite, en el evento de ajustes del enlace con el
proveedor del segmento satelital o en procesos de instalacin de una nueva
estacin de la red satelital.

Con la versin 1.0 del SGMS se consigue mejor eficiencia en la supervisin y


mantenimiento de los enlaces satelitales, lo cual redunda en la prestacin de un
buen servicio de telecomunicaciones a los clientes de los 53 enlaces actuales del
sistema satelital SCPC.

23
5. DESARROLLO INGENIERIL

El Sistema de Gestin de Mdem Satelital SGMS se desarroll aprovechando las


facilidades que ofrece la interface de conexin M&C en la parte posterior del
mdem Comtech EF Data CDM 550 y el cdigo de comandos dispuestos para
sta misma interface, y as acceder a la gestin de los mdems que estn en
servicio y agrupados en cinco bastidores del saln de equipos del Telepuerto POP
102. Los bastidores son llamados 1L, 1M, 2C, 2D, y 2M, de acuerdo a su posicin
dentro del saln de equipos. En la tabla No.2 se relacionan los mdems asignados
por cada bastidor.

Tabla 2. Distribucin de los mdems en los bastidores

Cliente Direccin Bastidor Cliente Direccin Bastidor


LA ARANDIA 1 1M PUERTO NIO 39 2D
GAORI 2 1M CARTAGO 40 2D
BASE GAORI 3 1M POMPANO 41 2D
DIAN SAN 1M 2D
ANDRES 4 CAPACHOS 1 42
GAORI 1 5 1M CAPACHOS 2 43 2D
CARMEN DE 1M 2D
BOLIVAR 6 MAGANGUE 44
SAN ANDRES 7 1M RIOHACHA 45 2D
BALLENAS 8 1M COCOM FFAA 46 2C
SAHAGUN 9 1M LIBRE 47 2C
PALOMINO 10 1M LIBRE 48 2C
SAN ANDRES 11 1M SAMACA 49 2C
1M SAN JOSE 2C
OROCUE 12 GUAVIARE 50
GIGANTE 13 1M LIBRE 51 2C
PUERTO GAITAN 14 1M LIBRE 52 2C
LETICIA 15 1M LIBRE 53 2C
BETANIA 16 1L LIBRE 54 2C
LA PALMA 17 1L LIBRE 55 2C
IBAGUE 18 1L SUESCA 56 2C
DORADA 19 1L GIRARDOT 57 2C
LA VEGA 20 1L LIBRE 58 2C
IPIALES 21 1L LIBRE 59 2C
PUERTO SALGAR 22 1L LIBRE 60 2C

24
Cliente Direccin Bastidor Cliente Direccin Bastidor
TIBU 23 1L LIBRE 61 2M
ORITO 24 1L LIBRE 62 2M
CALI 25 1L LIBRE 63 2M
SAN JOSE 1L
GUAVIARE 26 ENTRE RIOS 64 2M
LEGUIZAMO 27 1L BK RIOHACHA 65 2M
SANTA ANA 28 1L INTERFUERZAS SAI 66 2M
LA ESTRELLA 29 1L LIBRE 67 2M
NEIVA 30 1L LIBRE 68 2M
ALIZALES 31 2D LIBRE 69 2M
2D
ROSAL 32 LIBRE 70 2M
FUSAGASUGA 33 2D LIBRE 71 2M
GUAVIO 34 2D LIBRE 72 2M
SAI AEROPUERTO 35 2D LIBRE 73 2M
SAI MUELLE 36 2D LIBRE 74 2M
GALAPA 37 2D LIBRE 75 2M
GUALANDAY 38 2D

En cada mdem se debe habilitar su acceso remoto de comunicaciones,


configurndolo a travs de su panel frontal, y asignando una nica direccin
dentro de la red, adems se selecciona el tipo de interface que va a utilizar, y la
velocidad de datos (baud rate).

En el mdem CDM 550 se puede seleccionar una de tres tipos de interfaces de


comunicacin: RS232, RS485-2W y RS485-4W, en nuestro proyecto utilizamos la
interface de comunicaciones RS485-4W, debido a que debemos conectar
mltiples dispositivos e independizar la transmisin de datos de la recepcin (4W).

El tratamiento de la informacin desde y hacia los mdems, se realiza a travs de


un controlador que en este caso es un PC, con puerto de comunicacin serial
asincrnica y la interface es RS232.

Como los mdems utilizan interface RS485-4W y el controlador RS232,


colocamos en el medio un Conversor de interface RS232 a RS485-4W.

25
5.1 MODULO DE HARDWARE

Se determin la utilizacin del conversor RS-232/485 de referencia 485 TBLED


(mostrado en las figuras del Anexo D) para configurar el bus mltiple y acceder a
la gestin de los mdems.

La interface RS-485 proporciona una poderosa herramienta de comunicacin para


el control y monitoreo de los parmetros de los equipos mdems Comtech EF
Data CDM 550. Un protocolo de comunicaciones (relacionados en el Anexo C) es
suministrado por la unidad, el cual permite el acceso total a cada una de las
funciones del mdem.

En la comunicacin full dplex con la interface RS-485 hay dos pares de hilos:
separados, aislados, diferenciados, e independientes para el manejo de los datos
seriales en las dos direcciones

Desde el PC se envan los datos a los mdems, en el modo de transmisin, va


uno de los pares de la interface. Todos los dispositivos son conectados a este
par y todos reciben los datos simultneamente desde el controlador. El
controlador es el nico dispositivo con manejo en lnea conectado a este par, es
decir que el mdem designado slo tiene la lnea de recepcin conectada.

En la otra direccin, sobre el otro par, cada mdem designado tiene un manejador
de lnea tri-estado conectado y el controlador tiene un lnea de recepcin
conectada. Todos los manejadores de lnea se mantienen en el modo de alta
impedancia hasta que solamente un dispositivo es autorizado por el controlador
para poder transmitir.

Desde el SGMS se ha previsto un direccionamiento (vase Tabla No.2) para todos


los mdems existentes y tambin para los que se puedan adicionar en futuro al
sistema, es de anotar, que cada mdem tiene una nica direccin, y cada vez que
el controlador la transmite, la direccin del dispositivo como destinatario es
incluida en la trama de paquetes de datos. Todos los mdems reciben el paquete,
pero solo el direccionado lo contestar. El mdem habilita la salida a su
controlador de lnea y transmite su paquete de datos de retorno al PC, en la otra
direccin, el par fsicamente est separado.

26
La red de gestin instalada con la interface RS-485 en el sistema de gestin de
mdems satelitales SGMS, facilita mezcla de protocolos de comunicaciones, con
la configuracin de los 4 hilos para datos. En este tipo de acceso a los equipos,
es necesario que dentro de la red un nodo sea el maestro y los dems dispositivos
sean esclavos15. Para sta implementacin el PC es el maestro y los mdems los
esclavos.

La comunicacin bidireccional en el sistema se efecta desde SGMS hacia todos


los mdems y desde ellos nicamente hacia el PC o nodo maestro. La respuesta
de informacin de datos de un nodo esclavo al maestro nunca va a ser escuchada
por otro dispositivo esclavo, ni tampoco se pueden comunicar los nodos esclavos
entre s.

En la figura 13, se muestran los detalles de conexin del bus multinodo del SGMS
a los mdem Comtech EF Data 550, por medio del conector DB9 de M&C y la
ilustracin de un conversor de interface RS-232 a RS-485, elemento bsico para el
diseo e implementacin del sistema de gestin a partir de los protocolos
propietarios del fabricante y la interaccin con la interfaz grafica.

15
B&B Electronics, Manufacturing Company [Internet] [consultado 30 ago. 2007] Disponible en :
< http://www.bb-elec.com/tech_articles/rs422_485_app_note/overview.asp#rs485>

27
Figura 13. Conexin para el acceso remoto mdem Comtech EF Data 550

El manual del mdem CDM 550, provee la informacin del protocolo de


comunicacin para acceso remoto. A continuacin se describe como est
conformada la estructura del paquete, y el anexo C, muestra los cdigos de
instruccin.

Como se dijo anteriormente, la interface elctrica permite conexin RS485-4W (es


posible conectar mltiples dispositivos) y la configuramos a una velocidad de 9600
baudios. Los datos son transmitidos en forma serial asincrnica usando caracteres
ASCII. El estado y control de la informacin es transmitida en paquetes de longitud
variable de acuerdo con la estructura y el protocolo que se definir ms adelante.

5.1.2 Protocolo bsico para el mdem CDM 550

En el modo RS-485 todos los datos son transmitidos como caracteres en forma
serial asincrnica. En este caso el formato del carcter asincrnico es fijado a 8
bits de datos, un bit de parada y sin paridad. La velocidad de datos puede variar
entre 50 y 19200 baudios. Todos los datos son transmitidos por paquetes.

28
Estructura del Paquete

El paquete est compuesto por siete secciones y cada mensaje que se enva
desde el controlador (PC), hacia los mdem o viceversa, es el que se debe
interpretar para realizar la instruccin solicitada.

El siguiente cuadro muestra la estructura del paquete que viaja en sentido del PC
hacia Dispositivos:

Start of Target Address Instruction Code Qualifier Optional End of Packet


Packet Address De-limiter Code Arguments
< (4 characters) ASCII code (3 characters) (= or ? ) (n Carriage
ASCII code 47 (1 ASCCII code 61 characters) Return ASCCI
60 (1 character) or 63 code 13
character) (1 character) (1 character)

Ejemplo:

< 0245 / TFQ = 70.5000 {CR}

Inicio de Delimitador Cdigo Fin de paquete


paquete de direccin calificador

Direccin Cdigo de Argumento


del modem instruccin

El ejemplo anterior nos muestra una comunicacin del PC al mdem con direccin
245, y le est ordenando que coloque la frecuencia de transmisin en 70.5 Mhz

El siguiente cuadro muestra la estructura del paquete que viaja en sentido del los
mdem hacia el PC:

Start of Target Address Instruction Code Qualifier Optional End of Packet


Packet Address De-limiter Code Arguments
> (4 characters) ASCII code (3 characters) (= , ?,!,or * ) (From 0 to n Carriage
ASCII code 47 (1 ASCCII code characters) Return Line
62 (1 character) 61,63,33 or 42 Feed
character) (1 character) ASCCI code
13,10
(2 characters)

29
Ejemplo:

> 0245 / TFQ = 70.5000 {CR} {LF}

Inicio de Delimitador Cdigo Fin de paquete


paquete de direccin calificador

Direccin Cdigo de Argumento


del modem instruccin

El ejemplo anterior muestra una comunicacin de respuesta del mdem 245


al PC, indicando la nueva frecuencia configurada.

A continuacin detallamos cada una de los segmentos del paquete de


comunicacin

Inicio de Paquete

Controlador a Dispositivos: Es el caracter < (cdigo ASCII 61)


Dispositivos a Controlador: Es el caracter > (cdigo ASCII 62)

El inicio del paquete es usado para proveer una indicacin del inicio del paquete,
estos dos caracteres no aparecen en ninguna otra parte del mensaje.

Direcciones

Hasta 9999 dispositivos pueden ser direccionados. En la interface RS-232 este


valor es siempre 0. Con la interface RS-485 se permiten un rango de direcciones
entre 1 y 9999. Las direcciones son programadas usando el teclado del panel
frontal del mdem.

30
NOTA: El Controlador enva el paquete con la direccin del mdem (destino del
paquete). Cuando el mdem responde, la direccin usada es la misma para
indicarle al Controlador la fuente del paquete.

Cdigo de Instruccin

Es una secuencia de tres caracteres alfabticos, que identifican la presentacin de


la instruccin en el mensaje, teniendo algn significado con el parmetro que se
especifica, por ejemplo TFQ, para frecuencia de transmisin, RMS, para
recepcin del tipo de modulacin, etc.

Cdigo calificador

Este es un solo carcter que califica el cdigo de la instruccin, utilizado en la


definicin del protocolo de informacin desde el controlador hacia los mdems y
viceversa. Los procesos en del calificador obedece a las siguientes reglas:

1) Controlador hacia el dispositivo, nicamente los valores permitidos son:

= (cdigo ASCII 61)


? (Cdigo ASCII 63)

Por ejemplo en un mensaje del controlador al dispositivo TFQ?, significara


que el mdem debe retornar el valor actual de la frecuencia de transmisin.

2) Dispositivo hacia el controlador, permite los siguientes valores:

= (cdigo ASCII 61)


? (cdigo ASCII 63)
! (cdigo ASCII 33)
* (cdigo ASCII 42)

Ejemplo con TFQ?, Indica que hubo un error en el mensaje enviado por el
controlador (no hay argumentos en el mensaje)

31
Argumentos del Mensaje

Los argumentos no son requeridos para todos los paquetes. Los argumentos son
cdigos ASCII, para los caracteres del 0 al 9 (ASCII 48 a 57), periodo (ASCII 46)
coma (ASCII 44).

Fin de Paquete

Controlador a dispositivos: Este es el carcter Carriage Return (cdigo ASCII 13)


Dispositivos a Controlador: Son dos caracteres seguidos Carriage Return, y Line
Feed (cdigo ASCII 13, y cdigo 10.) Los dos caracteres indican una terminacin
valida del paquete.

Lo anterior que tiene que ver con la recoleccin de informacin de los mdem, es
lo que consideramos modulo hardware, la segunda fase del proyecto es el modulo
de software que a continuacin se describe.

Presentamos el diagrama de flujo en donde se plasma el procedimiento de


funcionamiento del sistema de gestin SGMS

32
Diagramas de flujo del programa

33
%

"

$
%

34
!&

! '

$ )

!&
*
+

Figura 14. Diagramas de flujo del programa

35
5.2 MODULO DE SOFTWARE

Actualmente tenemos 53 mdems a gestionar (53 enlaces satelitales), y se tienen


5 bastidores los cuales pueden alojar un mximo de 15 circuitos (mdems) cada
uno. Para tener un control de cada uno de estos enlaces se emple la asignacin
secuencial de direccionamiento segn la cual un mdem siempre va a tener una
direccin fija aunque su asignacin lgica cambie, por ejemplo el mdem nmero
3 del primer bastidor siempre ir a tener la direccin fsica 3 aunque su asignacin
pueda variar, es decir en algn momento podr ser asignado al cliente San Jos
del Guaviare y en otro momento a otro cliente.

Si un mdem presenta falla o sus recursos son liberados, su direccin fsica


asociada queda disponible, pero sta nunca cambiar, el empleo de la asignacin
secuencial de direccionamiento es uno de los pilares del sistema SGMS y de l se
deriva gran parte de la lgica empleada en su programacin.

Por conveniencia y facilidad de conexiones entre los bastidores y el mdulo


hardware, se ha acordado mantener sta asignacin secuencial respecto a la
posicin de los mdem en los bastidores, sin embargo es posible, aunque no
recomendable, modificar el esquema de direccionamiento dentro de bastidores
pero no entre bastidores.

Se ha creado una base de batos con los 53 circuitos y los siguientes campos
Nombre del circuito, direccin, nmero de cliente para mayor informacin ver tabla
3. Esta base de datos interacta con el programa, para intercambio de informacin
cuando se requiera y es transparente al usuario, es decir el programa utilizado
tiene la facilidad para realizar los cambios y actualizaciones de la base de datos
sin que el usuario se percate.

La distribucin de los circuitos y su direccin, se ha dado inicialmente de acuerdo


a la disposicin ya existente de los mdems en los 5 bastidores que los alojan.

36
Tabla 3. Base se datos de los circuitos

Consecutivo Grupo NomCli Direccin Bastidor Estado


1 0 LA ARANDIA 1 1M Rojo
6 1 GAORI 4 1M Gris
7 1 BASE GAORI 13 1M Gris
8 1 DIAN SAN ANDRES 20 1L Gris
9 1 GAORI 1 25 1L Gris
13 2 CARMEN DE BOLVAR 3 1M Gris
18 3 SAN ANDRES 2 1M Gris
22 4 BALLENAS 6 1M Gris
24 4 SAHAGUN 9 1M Gris
25 4 PALOMINO 18 1L Gris
29 5 SAN ANDRES 8 1M Gris
35 6 OROCUE 11 1M Verde
36 6 GIGANTE 32 2D Gris
37 6 PUERTO GAITAN 22 1L Gris
41 7 LETICIA 12 1M Gris
46 8 BETANIA 52 2C Gris
47 8 LA PALMA 54 2C Verde
52 9 IBAGUE 33 2D Gris
53 9 DORADA 35 2D Gris
55 9 LA VEGA 41 2D Gris
60 10 IPIALES 34 2D Gris
64 11 PUERTO SALGAR 36 2D Gris
65 11 TIBU 39 2D Gris
66 11 ORITO 40 2D Gris
71 12 CALI 37 2D Gris
78 13 SAN JOS GUAVIARE 42 2D Gris
79 13 LEGUIZAMO 43 2D Gris
80 13 SANTA ANA 44 2D Gris
81 13 LA ESTRELLA 55 2C Gris
85 14 NEIVA 16 1L Gris
90 15 ALIZALES 17 1L Gris
95 16 ROSAL 24 1L Gris
100 17 FUSAGASUGA 21 1L Gris
106 18 GUAVIO 23 1L Gris
110 19 SAI AEROPUERTO 46 2C Gris
111 19 SAI MUELLE 47 2C Gris
112 19 GALAPA 48 2C Gris

37
Consecutivo Grupo NomCli Direccin Bastidor Estado
113 19 GUALANDAY 49 2C Gris
114 19 PUERTO NIO 50 2C Gris
115 19 CARTAGO 51 2C Gris
120 20 POMPANO 53 2C Gris
122 21 CAPACHOS 1 65 2M Gris
123 21 CAPACHOS 2 64 2M Gris
171 2 MAGANGUE 5 1M Gris
172 4 RIOHACHA 7 1M Gris
173 1 COCOM FFAA 10 1M Gris
174 50 LIBRE 14 1M Gris
175 50 LIBRE 15 1M Gris
176 16 SAMACA 62 2M Gris
177 16 SAN JOSE GUAVIARE 19 1L Gris
179 50 LIBRE 26 1L Gris
180 50 LIBRE 27 1L Gris
181 50 LIBRE 28 1L Gris
182 50 LIBRE 29 1L Gris
183 50 LIBRE 30 1L Gris
184 8 SUESCA 31 2D Verde
185 9 GIRARDOT 38 2D Gris
186 50 LIBRE 45 2D Gris
187 50 LIBRE 56 2C Gris
188 50 LIBRE 57 2C Gris
189 50 LIBRE 58 2C Gris
190 50 LIBRE 59 2C Gris
191 50 LIBRE 60 2C Gris
192 5 ENTRE ROS 61 2M Gris
193 19 BK RIOHACHA 63 2M Gris
194 1 INTERFUERZAS SAI 66 2M Gris
195 50 LIBRE 67 2M Gris
196 50 LIBRE 68 2M Gris
197 50 LIBRE 69 2M Gris
198 50 LIBRE 70 2M Gris
199 50 LIBRE 71 2M Gris
200 50 LIBRE 72 2M Gris
201 50 LIBRE 73 2M Gris
202 50 LIBRE 74 2M Gris
203 50 LIBRE 75 2M Gris

38
En la base de datos se han asignado un nmero por cliente, para poder
identificarlo en el programa, por ejemplo el cliente Promigas cuenta con 4 circuitos
satelitales en Ballenas, Sahagn, Palomino, y Riohacha, este cliente es
identificado en la base de datos con el nmero 4, y as los dems clientes. En la
tabla 4, se muestran los clientes con el nmero asignado.

Tabla 4. Asignacin de grupo por cliente

Grupo Nombre Grupo


0 EJERCITO
1 ETB
2 MUTUAL SER
3 PROACTIVA
4 PROMIGAS
5 MOVISTAR
6 ENERCOM
7 BANCO GANADERO
8 CODENSA
9 BANCO DE COLOMBIA
10 EXPRESO BOLIVARIANO
11 BANCO DE COLOMBIA
12 COOPETROL
13 EMTELCO
14 BANCO POPULAR
15 BBVA
16 ECOPETROL
17 SALUDCOOP
18 IMPORT SYSTEM
19 EGEMSA
20 TEXACO
21 POMPANO
22 REPSOL
50 LIBRE

39
El modulo de software se implement con Visual Basic, programa de Microsoft
versin 6.0 de 32 bits16. Visual Basic es un lenguaje de programacin que se ha
diseado para facilitar el desarrollo de aplicaciones en un entorno grafico (GUI-
GRAPHICAL USER INTERFACE) Como Windows 98, Windows NT o superior.

Visual Basic es un lenguaje de fcil aprendizaje pensado tanto para


programadores principiantes como expertos, guiado por eventos, y centrado en un
motor de formularios que facilita el rpido desarrollo de aplicaciones grficas. Su
sintaxis, derivada del antiguo BASIC, ha sido ampliada con el tiempo al agregarse
las caractersticas tpicas de los lenguajes estructurados modernos. Posee varias
bibliotecas para manejo de bases de datos, pudiendo conectar con cualquier base
de datos a travs de ODBC17 (Informix, DBase, Access, MySQL, SQL Server,
PostgreSQL, etc) a travs de ADO.

El diseo del modulo de software del SGMS es una aplicacin completa,


concebida para que el usuario del sistema interacte en forma sencilla y fcil
operacin, durante las funciones de monitoreo, control y configuracin de los
mdems satelitales EF Data Comtech CDM 550.

El mdulo software del sistema SGMS esta constituido por una interfaz grfica de
usuario GUI (Graphic User Interface) la cual interacta con una base de datos.

La base de datos, transparente al usuario, fue diseada a partir del motor de


Access y enlazada a la GUI mediante objetos de enlace de datos exclusivos del
programa Visual Basic, manteniendo de esta forma total independencia con el
usuario.

A continuacin se muestra en la figura 15 el diagrama de bloques, del flujo de


datos de informacin y de comunicacin entre los principales componentes del
sistema de la gestin.

16
Curso Bsico de Visual Basic [Internet] [consultado 19 sept. 2007] Disponible en:
<http://www.elgille.info/vb/cursos-vb/basico/basico47.htm>
17
Monografas [Internet] [consultado 5 oct. 2007] Disponible en:
<http://www.monografias.com/cgi-bin/search.cgi/query=desarrollo&?intersearch>

40
DIAGRAMA DE FLUJO DE DATOS EN EL SGMS

Modem 1
SGMS
Modem 2
M
O
Modem 3
D
E
M
S
Modem 22

Modem 37
BASE DE DATOS

Modem n

Figura 15. Flujo de la informacin en el SGMS

5.2.1 Ventana Principal

La interface grafica comienza con una ventana principal en donde se han reunido
todos circuitos de la red en grupos y cada grupo es un cliente.

La ventana principal del Sistema de Gestin de Mdems Satelitales SGMS se


dise emulando una red de telecomunicaciones configurada en Estrella, que se
caracteriza por tener comunicaciones punto a punto desde una cabecera central
hacia diferentes regiones, separadas geogrficamente. Una vez iniciado el
programa en sta ventana, su diseo de visualizacin es posible cambiarlo a
entera disposicin del usuario ya que cualquier grupo de elementos puede ser
traslado de lugar con solo arrastrar el Mouse sobre cualquiera de ellos, sin que se
afecte el funcionamiento en el sistema.

La configuracin en Estrella del SGMS es anloga a la red de enlaces satelitales


que tiene el sistema de comunicaciones que posee Telefnica Telecom en el

41
Telepuerto de la calle 102 con autopista norte en Bogot D.C. y objetivo de
implementacin de ste trabajo.

En la figura 16 se muestra la grafica de la ventana principal del SGMS.

42
Figura 16. Ventana principal del SGMS

En la ventana principal adems se creo una barra de herramientas en la parte


superior del formulario y una barra de progreso que indica en que momento el
sistema se encuentra explorando el estado de todos los mdem involucrados en la
red, estas funciones son explicadas en detalle mas adelante.

El sistema de gestin arranca en el momento de dar clic en el botn iniciar


programa de la barra de herramientas, previamente se ha enlazado el programa
con la base de datos Access, en donde se han creado los 53 circuitos con sus
direcciones, y asociados a estos, los nombres de los circuitos de cada cliente.

Lo primero que realiza el programa en la exploracin de los mdems de la red, es


el modo de operacin por defecto y esta basado en la repeticin de ciclos de
exploracin.

43
Un ciclo de exploracin es el resultado de enviar a cada uno de los mdems
involucrados en el sistema, un comando de requerimiento de su estado de
funcionamiento, evaluar su respuesta y actualizar tanto la GUI como la base de
datos.

El ciclo de exploracin tiene una frecuencia de repeticin de aproximadamente


cuatro (4) segundos (50 ms, tiempo espera de respuesta por mdem * 75 mdems
= 3.75 segundos) y puede ser interrumpido por cualquiera de los dos siguientes
eventos:

Activacin del Terminal de configuracin.


Activacin al modo monitor y configuracin.

En el modo de exploracin el sistema de gestin enva a cada uno de los mdems


activos de la red el comando FLT (Fault and Status), en donde el mdem retorna
los cdigos de las fallas presentes y estado para la unidad (hardware), trafico
transmitido, y trafico recibido. El programa reconoce los mdem que se
encuentran activos en el sistema SGMS, como resultado de la informacin que es
entregada por la rutina leer clientes activos.

La rutina leer clientes activos bsicamente se genera al inicio del programa y


antes de la exploracin de los mdems de la red, lo que pretende esta rutina es
verificar en la base de datos cuales mdems (direcciones) se encuentran libres
para que el comando FLT (Fault and Status) solo sea enviado a los mdems en
servicio y no a los 75 que es la capacidad mxima de mdems en la red,
reduciendo de esta manera el tiempo de exploracin.

La rutina Leer_clientes_activos realiza las siguientes tareas:

Establece enlace con la base de datos.


Verifica uno a uno el contenido del campo Grupo de sus registros y asigna
un valor lgico verdadero aquellos registros con valores de Grupo validos y
un valor lgico falso a aquellos registros con valores de Grupo con cdigo
especial de clientes_no_activos.

La ubicacin fsica de los bastidores en el saln de equipos esta relacionada a uno


de los dos transpondedores asignados, por lo tanto es muy posible que en un

44
bastidor haya direcciones fsicas libres o disponibles, stas direcciones se
consideran clientes_no_activos y se les asigna un cdigo especial en el campo
Grupo de la base de datos (direccin libre con numero de grupo 50).

Una vez terminada la rutina Leer_clientes_activos se inicia el ciclo de exploracin


que consiste como ya se explic en enviar un comando de requerimiento de
estado a cada uno de los mdem activos. La rutina actualiza en tiempo real una
barra de desplazamiento para que el usuario pueda observar el avance del ciclo y
lleva un control de los mdem evaluados lo que le permite comenzar un nuevo
ciclo despus de recibir respuesta del ltimo mdem activo.

Cuando el sistema enva el comando, simultneamente se habilita un


temporizador con el cual determina si existe comunicacin con el mdem, si sta
no fue satisfactoria, el sistema informa al usuario colocando el elemento en color
gris (color del nombre del cliente en la ventana principal), indicando su
desconexin del sistema, si por el contrario hay comunicacin con el mdem, la
informacin que recibe el SGMS es evaluada y el mdem aparecer en color rojo
si el equipo presenta alarma o si est en condiciones normales se indicara con el
color verde. Toda esta rutina se repite para cada uno de los mdem activos en el
sistema con periodo aproximado de 4 segundos por ciclo y durante el cual la
informacin general de todos los mdems es actualizada.

La informacin es recibida por el sistema y es analizada en el programa en los


siguientes tems:

Fallo de unidad, fallas generales, fuentes de alimentacin, memorias,


sintetizador etc.
Fallo de trfico de transmisin, reloj o sincronizacin de transmisin, IF,
FIFO, AIS (Indicacin de alarma) etc.
Fallo de trfico en recepcin, sincronizacin del demodulador, AIS, nivel de
Eb/No etc.

En caso de encontrar falla o anomalas en alguno de stos grupos, el sistema de


gestin SGMS, muestra una indicacin visual al usuario cambiando el color del
grupo de mdems y la frecuencia con que cambie de color es proporcional al
nmero de elementos que presenta la falla.

45
Como resumen de la exploracin podemos decir que al iniciarse el programa, una
seal de exploracin es emitida hacia todo el conjunto de mdems
determinndose en forma inmediata cuales equipos estn habilitados actualmente,
aquellos que respondan en su mensaje que poseen alguna alarma se indicaran
en color rojo, los que indiquen normalidad en su enlace, se presentaran en verde
y los que no envan ninguna respuesta hacia el SGMS, se mostrarn en gris. Si la
indicacin en rojo se mantiene por ms tiempo, es sinnimo de que existe una
buena cantidad de mdems alarmados dentro del grupo del cliente y con sta
misma premisa se entender la aparicin del grupo en color verde los que
indiquen normalidad y en gris aquellos que no estn comunicados con el sistema
SGMS.

5.2.2 Requerimiento de interrupcin de exploracin

Ante un requerimiento de interrupcin el sistema de gestin SGMS, cambia del


modo de exploracin al de monitor y configuracin, es decir que, al dar doble clic
izquierdo en algn elemento de la ventana cliente, el programa suspende la
exploracin y queda habilitado para continuar con la ejecucin del monitoreo y de
la configuracin de los parmetros del mdem.

Si fue posible el acceso al modo de configuracin y culminada sta tarea, al


retornar al modo de exploracin este ciclo contina en el punto donde fue
interrumpido, es de anotar que el requerimiento de exploracin nicamente
responde a aquellos elementos que se encuentren habilitados por el sistema,
mediante su comprobacin previa de la continuidad de comunicacin de gestin
propia del SGMS.

En el modo de configuracin, el programa dispone de dos niveles se seguridad


para el acceso de los operadores del sistema:

Nivel de seguridad bajo, en el cual no es necesario autenticarse y se ofrece


al usuario la funcin de monitoreo, de los registros de configuracin
actuales de los equipos, pero no le permite la modificacin de ningn
parmetro. sin embargo tiene la opcin de actualizar la informacin general,
leer el registro de alarmas y eventos almacenados, teniendo la posibilidad
de refrescar su informacin o borrarlos si el usuario lo desea, accin que
no representa problemas para el funcionamiento normal de los mdem
activos. La ventana de monitoreo se muestra en la Figura. 17.

46
Figura 17. Ventana de monitor

Para modificar un parmetro es necesario validar el segundo nivel de


seguridad, que se puede acceder haciendo doble clic en cualquiera de los
elementos que muestran informacin de configuracin, se debe autenticar
el ingreso mediante la clave respectiva, para realizar los cambios que se
deseen. En la figura 18, se presenta la ventana de validacin del ingreso al
modo de configuracin

47
Figura 18. Ventana de validacin de ingreso

Al habilitarse ste nivel en cualquiera de los elementos, el sistema abre una


nueva ventana donde se muestra el valor actual del parmetro y mediante
la simulacin virtual del panel frontal del mdem Comtech EF DATA CDM
550, se puede cambiar el nuevo valor operacional del parmetro. La
ventana de configuracin se observa en la figura 19.

48
Figura 19. Ventana de configuracin

Para mostrar y/o modificar los valores de todos los parmetros que se tienen en
la ventana de configuracin es necesario encadenarlos en una serie de comandos,
pues uno slo no trae toda la informacin que all se despliega. Para sta tarea se
utiliz la tcnica de concatenacin de los comandos, segn la cual el subsiguiente
comando se enva nicamente cuando se verifica que el anterior se ha recibido y
se ha procesado en el sistema.

El SGMS utiliza la concatenacin con los siguientes comandos:

MGC = Configuracin Global


BER = Nivel de la Tasa de Error de Bitios en recepcin
AGC = Recepcin del nivel de entrada en el demodulador
NUE = Nmero de eventos almacenados sin leer

49
FLT = Fallas y estado
TST = Modo de prueba del mdem
Eb/No = Recepcin del nivel de la Energa por Bitios, en dB.

Solo al terminar ste ltimo comando se abre la ventana de configuracin;


utilizando esta tcnica se garantiza que los datos que all aparecen son los que
corresponden a la informacin en tiempo real que contiene el mdem, proceso que
se repite cada vez que se actualiza la informacin.

Cada uno de los comandos enviados por el sistema de gestin SGMS tiene
asociado un procedimiento que se ejecuta con los siguientes pasos:

1. comprobacin de la respuesta, monitorendose la actividad en el puerto de


comunicaciones
2. asignacin del valor de inters del mensaje recibido a una variable
determinada
3. evaluacin y visualizacin de la variable
4. enva el siguiente comando de concatenacin

En el proceso de configuracin de un parmetro del mdem, si el valor


suministrado no corresponde a los valores operacionales del mdem, el sistema
de gestin SGMS ignora estos cambios, pues no son valores vlidos para los
parmetros del equipo. Si por el contrario, el valor ingresado est dentro de los
valores umbrales establecidos por el fabricante, el mdem tomar ste valor y el
programa lo reflejara la posicin respectiva del elemento en la ventana de
configuracin.

Adems en la ventana de configuracin hay disponible un cuadro de dialogo,


desde donde se pueden establecer pruebas locales de los mdems en diferentes
tipos de enlaces de retorno o bucles.

Ventana de grupo adicionar/borrar.

El botn permite adicionar un nuevo mdem al grupo al SGMS, en cual podemos


programar el nombre del cliente, ubicar de manera inmediata el bastidor en donde
es posible instalarlo y tambin inscribir la direccin con la cual el sistema de
gestin lo podr acceder en forma remota.

50
En este punto la informacin que aparece en la ventana AGREGAR es producto
de la consulta del programa a la base de datos Access, de donde se tomaran las
direcciones que se encuentren libres y el bastidor correspondiente a dichas
direcciones.

En la figura 20 se muestra la ventana adicionar un nuevo cliente al sistema de


gestin.

Figura 20. Ventana adicionar cliente

En el sistema de gestin tambin es posible eliminar algn registro de un cliente,


cuando se haya cancelado previamente su servicio en la red satelital, en este
momento el programa interacta de nuevo con la base de datos Access, elimina el
registro del circuito borrado, y libera su direccin. En la grafica de la figura 21, se
ilustra la ventana de eliminacin, cuando el usuario del sistema debe realizar la
cancelacin de un registro.

51
Figura 21. Ventana eliminar cliente

5.2.3 Barra de herramientas

En la pantalla de inicio o ventana principal anteriormente mencionamos las


secciones que la componan, ya se hablo de la seccin en donde se encuentran
inscritos todos los clientes ahora hablaremos de los elementos que componen la
barra de herramientas

Iniciar Programa. mediante ste control se da el arranque del programa, el


usuario tiene el control total del sistema y es quien determina y decide
cuando arrancar el funcionamiento de la gestin.

Terminal. con este control es posible enviar y recibir informacin de la


configuracin de los parmetros de los mdems en un nivel bajo de
programacin de tal forma que el ingeniero operador o el administrador del
sistema tenga una herramienta til para tener la facilidad de realizar
pruebas a nivel bajo mediante el sistema de gestin de mdems satelitales
SGMS. La ventana terminal tiene un acceso llamado Manual CDM-550,
que permite al usuario autorizado consultar el manual del mdem Comtech
CDM-550, donde se encuentran todas las caractersticas de funcionamiento
del mdem, lo mismo que toda la informacin de los comandos para el
acceso y la informacin detallada para discriminar y traducir cada uno de
los protocolos de comunicacin.

52
En la figura 22 se muestra la ventana de Terminal en el SGMS, en la parte
superior izquierda de la ventana se encuentra el acceso al manual del
mdem, lo cual se especifica con ms detalle en el manual de usuarios que
se puede consultar en el Anexo E.

Figura 22. Ventana Terminal

Acerca de al ingresar a este control se despliega la versin del


programa que se diseo indicando su caracterstica, su propsito y la
informacin de los autores. la ventana correspondiente se muestra en la
figura 23.

53
Figura 23. Ventana Acerca de

Salir: permite suspender el funcionamiento de la aplicacin y finalizar su


operacin.

Barra de estado de Exploracin. Esta indicacin grfica y dinmica


permite visualizar al usuario, en la ventana principal, que el sistema SGMS
se encuentra en funcionamiento, garantizando que toda la informacin se
est actualizando desde los equipos a travs del Conversor de interfaz RS-
232/RS-485 y el bus mltiple instalado para el acceso remoto. A
continuacin se muestra la barra de indicacin del estado de exploracin
del sistema en la figura 24.

Figura 24. Barra de exploracin

54
Finalmente presentamos una visin general del funcionamiento del Sistema de
Gestin de mdem Satelital SGMS.

El sistema de gestin funciona bsicamente en tres modos:

Modo Exploracin
Modo Configuracin
Modo Terminal

5.2.4 Modo Exploracin

Es el modo de operacin por defecto y esta basado en la repeticin de ciclos de


exploracin.

Un ciclo de exploracin es el resultado de enviar a cada uno de los mdems


involucrados en el sistema, un comando de requerimiento de su estado de
funcionamiento, evaluar su respuesta y actualizar tanto la GUI como la base de
datos. Tiene una frecuencia de repeticin de aproximadamente cuatro (4)
segundos (50 ms, tiempo espera de respuesta por mdem * 75 mdems = 3.75
segundos) y puede ser interrumpido por cualquiera de los dos siguientes eventos:

Activacin del Terminal de configuracin.


Activacin al modo monitor y configuracin.

5.2.5 Modo Configuracin

Al entrar en este punto del programa, se tienen todos los parmetros actuales con
cuales esta configurado el mdem, sta condicin slo se permite al usuario
observar la programacin en tiempo real que se tiene en el equipo al que se ha
accedido, mas no permite realizar ningn cambio a los datos que posee el mdem.

Si se requiere hacer alguna modificacin en los parmetros del mdem EF Data


CDM 550, el sistema solicita una validacin de acceso a un nivel superior
mediante una contrasea; en este punto se pueden modificar todos los parmetros
del mdem elegido. Una vez el usuario termina una sesin de configuracin, el
sistema SGMS regresa automticamente al Modo de Exploracin.

55
Los parmetros del mdem Comtech EF Data CDM 550 se resumen en la figura
25 donde se muestra el rbol del men principal del equipo.

Figura 25. rbol de men principal

56
5.2.6 Modo Terminal

Ms que un modo de operacin este modo es una gran herramienta de ingeniera


que permite a usuarios privilegiados enviar y evaluar comandos en bajo nivel.

Terminal es una emulacin del Hiperterminal de Windows, en donde podemos


comunicarnos con cualquier dispositivo a travs de puerto serial del PC. Terminal
nos permite llegar a un mdem especfico, utilizando el protocolo utilizado por los
mdem Comtech CDM-550, con su estructura definida de paquetes.

Desde Terminal podemos acceder a algunos parmetros que no se encuentran en


la gestin de los mdems, como por ejemplo actualizar la fecha y hora del mdem,
identificar el nombre de circuito etc.

Por tanto la persona que va verificar un mdem mediante esta facilidad debe
conocer ms a fondo los comandos y protocolos para acceder a los parmetros
del equipo y discriminar la informacin que enva el dispositivo como respuesta al
comando enviado.

57
6. CONCLUSIONES

La experiencia laboral en telecomunicaciones y los conocimientos obtenidos en la


Universidad de San Buenaventura a lo largo de la carrera de ingeniera
electrnica, fueron la energa bsica para el emprendimiento, la implementacin y
culminacin satisfactoria del Sistema de Gestin de Mdems Satelitales SGMS,
dirigido a la supervisin de la red red satelital de Telefnica Telecom del
Telepuerto POP 102 de Bogot.

Las interrupciones de servicio inesperadas debidas a fallos de los enlaces, pueden


ser costosas para Telefnica Telecom en el sentido de perder clientes o recibir
penalizaciones, ya que se ha pactado con el cliente tiempos de respuesta a las
interrupciones del servicio de 2 a 4 horas, para la solucin de la falla; la
implementacin del sistema de gestin SGMS reduce sustancialmente los tiempos
de respuesta de una eventual falla de los enlaces, pues reporta en tiempo real los
eventos de la red y con la recoleccin de datos como lecturas de desempeo, se
puede reforzar la importancia de anticiparse a los problemas y corregirlos
(degradamiento de los enlaces satelitales), realzando la necesidad de tener un
monitoreo fiable de la red.

Durante la implementacin del proyecto se presentaron dificultades en desarrollo


de la programacin en Visual Basic para concatenar el arreglo de los comandos
del protocolo del mdem con los objetos y la propiedad de la aplicacin para
manejar los eventos, situacin que fue poco a poco superada en las consultas
efectuadas en los libros especializados, en la WEB y con un asesor de
programacin experto en Visual. Esencialmente los inconvenientes que se
tuvieron durante el trabajo correspondieron al mdulo de software, reseados en
ste prrafo, para el mdulo de hardware se cont con la suficiente informacin
dispuesta por el fabricante del mdem en su pagina WEB y en el manual del
equipo mdem Comtech EF Data CDM 550.

Ante la limitante de la compaa para el ingreso de personal ajeno al saln de


equipos de los mdems en el Telepuerto, no fue posible conseguir un permiso
para ilustar a los docentes de la Universidad de San Buenaventura, los
dispositivos en funcionamiento con la implementacin diseada para su gestin,
pero se facilit el prstamo y la disponibilidad de cinco mdems para efectuar
durante la sustentacin del trabajo, la demostracin del funcionamiento del SGMS
en forma de laboratorio y con los instrumentos de medida necesarios en
comprobacin de la funcionalidad del sistema.

58
7. RECOMENDACIONES

A la Universidad de San Buenaventura, continuar con el impulso a los estudiantes


en la utilizacin de programas y aplicaciones recientes en las reas tecnolgicas,
auspiciando de sta forma el emprendimiento en la realizacin de proyectos
importantes para el desarrollo de procesos industriales y domsticos.
Adicionalmente profundizar mediante cursos especializados la continuidad en el
mejoramiento de la experticia del alumnado y disminuir las falencias al momento
de emprender los proyectos finales en las respectivas facultades.

A los usuarios del sistema con el fin de prevenir y evitar la posible manipulacin
errnea de la gestin o la interrupcin de los enlaces satelitales de los clientes, se
recomienda que las personas que vayan a utilizar el Sistema de Gestin de
Mdems Satelitales SGMS, conozcan el funcionamiento de un mdem operando
en una red satelital, que tengan conocimiento en telecomunicaciones, que
previamente hayan consultado y se hayan enterado del funcionamiento de la
herramienta mediante el Manual de usuario del SGMS para acceder sin riesgos al
sistema de gestin y a la red de mdems.

Para mejorar la eficiencia del sistema, hacia futuro, ste trabajo se le puede dar
continuidad mejorando su diseo con una interfaz para el protocolo de Internet IP
y para poder realizar gestin de los dispositivos mediante la conectividad en red,
usando protocolos como HTTP, SNMP o TELNET, que ofrecen gran seguridad y
control en las instrucciones transmitidas, as mismo tener la posibilidad de asociar
sta gestin a las ya existentes, en el centro principal de supervisin de las redes
de Telefnica Telecom, para obtener mejores resultados en la atencin de fallas y
en la labores de operacin y mantenimiento.

Con la homologacin del acceso remoto que poseen los productos EF-Data
Comtech, es posible adicionar a la gestin los dems elementos del enlace
satelital como LNA, SSPA, y Transceiver, ya que poseen el mismo protocolo de
comunicacin.

59
BIBLIOGRAFA

CORNELL, Gary. Manual de Visual Basic para Windows 95. 1996. Primera
edicin, editorial Mc Graw Hill.

HERMAN, Mark Steven. La Escencia de Visual Basic 4. 1996. Segunda edicin,


editorial Prentice Hall Hispanoamericana.

TOMASI Wayne. Sistemas de comunicaciones electrnicas. 2001 Cuarta edicin,


editorial Pearson Education.

ANDITEL, Manual de entrenamiento red Domsat. Junio 4 de 2004, p.3.

COMTECH EF DATA, Manual de la interface CiM-25, rev.3 julio 21 de 2004, p.


1~4.

INTELSAT, Tecnologa digital de telecomunicaciones por satlite, revisin 3,


editorial INTELSAT, abril de 1999.

INTELSAT, Manual de tecnologa de estaciones terrenas, revisin 5 editorial


INTELSAT, junio de 1999.

INSTITUTO COLOMBIANO DE NORMAS TCNICAS Y CERTIFICACIN.


Normas Colombianas para la presentacin de tesis de grado. Bogot: ICONTEC.,
2006, (NTC 1486 quinta actualizacin, 1487 segunda actualizacin, 1160 segunda
actualizacin, 1308 segunda actualizacin, 1307 segunda actualizacin). Impreso
por Legis S.A. Bogot, D.C. Enero de 2006.

BIBLIOGRAFA WEB

Newpoint. [INTERNET] Disponible en: <http://www.newpoint.com.com>

Wikipedia [INTERNET] Disponible en:


<http://es.wikipedia.org/wiki/Internet_por_sat%C3%A9lite>

ComStream. [INTERNET] Disponible en:


<http://www. fi.uba.ar/materias/6679/mextra/Present_Modem_Coms.pdf>

Ministerio de Comunicaciones [INTERNET] Disponible en:


<http://www.mincomunicaciones.gov.co>

60
Universidad de Almera [INTERNET] Disponible en:
http://www.ace.ual.es/~vruiz/docencia/redes/apuntes/html/node67.html

Comtech EF Data [INTERNET] Disponible en: www.comtechefdata.com

B&B Electronics, Manufacturing Company [INTERNET] Disponible en:


http://www.bb-elec.com/tech_articles/rs422_485_app_note/overview.asp#rs485

Curso Bsico de Visual Basic [INTERNET] Disponible en:


http://www.elgille.info/vb/cursos-vb/basico/basico47.htm

Monografas [INTERNET] Disponible en:


http://www.monografias.com/cgi-bin/search.cgi/query=desarrollo&?intersearch

61
ANEXOS

62
Anexo A. Cdigo de la programacin de Visual Basic del SGMS

FORMULARIO DE CLIENTES

Dim BotOp As Single


Dim RegDel As String
Dim Bastidor As String
Dim TFQ As String
Dim TDR As String
Dim TFT As String
Dim TCR As String
Dim TMD As String
Dim TPL As String
Dim TXO As String
Dim RFQ As String
Dim RDR As String
Dim RFT As String
Dim RCR As String
Dim RMD As String
Dim ITF As String
Dim FRM As String
Dim IPD As String
Dim TSI As String
Dim TCK As String
Dim TSC As String
Dim RDS As String
Dim RSI As String
Dim RSW As String
Dim RCK As String
Dim RBS As String
Dim EBN As String
Dim BER As String
Dim AGC As String
Dim NUE As String
Dim EAL(4) As String
Dim FLT(5) As String
Dim Palabra(3)
Dim TST As String
Sub ProTST()
frmEstado.cboTest.Enabled = True
TST = Mid(MenRx(2), 3, 1)
If TST = "0" Then
frmEstado.cboTest.Text = "Normal"
ElseIf TST = "1" Then
frmEstado.cboTest.Text = "IF"
ElseIf TST = "2" Then
frmEstado.cboTest.Text = "Digital"
ElseIf TST = "3" Then
frmEstado.cboTest.Text = "I/O"
ElseIf TST = "4" Then

63
frmEstado.cboTest.Text = "TX CW"
ElseIf TST = "5" Then
frmEstado.cboTest.Text = "TX-1,0"
ElseIf TST = "6" Then
frmEstado.cboTest.Text = "RF"
End If
If Bandera = False Then
frmEstado.cboTest.Enabled = False
End If
MSComm1.Output = "<" & Direccion & "/EBN?" & vbCrLf
CMe = 1
NuMe = 3
CoEn = "EBNO"
End Sub
Sub ProFLT()
Dim EsCl As String
If BanExp = True Then
FLT(0) = Mid(MenRx(2), 3, 1)
FLT(1) = Mid(MenRx(2), 4, 1)
FLT(2) = Mid(MenRx(2), 5, 1)
If FLT(0) = "0" And FLT(1) = "0" And FLT(2) = "0" Then
EsCl = "Verde"
ElseIf FLT(0) <> "0" Or FLT(1) <> "0" Or FLT(2) <> "0" Then
EsCl = "Rojo"
End If
frmGr.Timer1.Enabled = False
frmGr.dtaCli.Recordset.MoveFirst
While (Not frmGr.dtaCli.Recordset.EOF)
If frmGr.dtaCli.Recordset("Direccion") = DirVal Then
ColGr = frmGr.dtaCli.Recordset("Grupo")
frmGr.dtaCli.Recordset.Edit
frmGr.dtaCli.Recordset("Estado") = EsCl
frmGr.dtaCli.Recordset.Update
If EsCl = "Verde" Then
frmGr.lblGr(ColGr).BackColor = &HC000&
ElseIf EsCl = "Rojo" Then
frmGr.lblGr(ColGr).BackColor = &HFF&
End If
End If
frmGr.dtaCli.Recordset.MoveNext
Wend
NCG = 0
Y=1
frmGr.dtaCli.Recordset.MoveFirst
While (Not frmGr.dtaCli.Recordset.EOF)
If frmGr.dtaCli.Recordset("Grupo") = Gr Then
NCG = NCG + 1
NC(Y) = frmGr.dtaCli.Recordset("NomCli")
EsCli(Y) = frmGr.dtaCli.Recordset("Estado")
Y=Y+1
End If
frmGr.dtaCli.Recordset.MoveNext
Wend
For X = 0 To NCG - 1

64
If EsCli(X + 1) = "Verde" Then
frmCli.lblCli(X).BackColor = &HC000&
ElseIf EsCli(X + 1) = "Rojo" Then
frmCli.lblCli(X).BackColor = &HFF&
ElseIf EsCli(X + 1) = "Gris" Then
frmCli.lblCli(X).BackColor = &HC0C0C0
End If
Next X
DirVal = DirVal + 1
Explorar
Exit Sub
End If
FLT(0) = Mid(MenRx(2), 3, 1)
FLT(1) = Mid(MenRx(2), 4, 1)
FLT(2) = Mid(MenRx(2), 5, 1)
If FLT(0) = "0" Then
frmEstado.lstUnit.AddItem "No faults "
ElseIf FLT(0) = "1" Then
frmEstado.lstUnit.AddItem "Power supply fault, 5 volts"
ElseIf FLT(0) = "2" Then
frmEstado.lstUnit.AddItem "Power supply fault, 12 volts"
ElseIf FLT(0) = "3" Then
frmEstado.lstUnit.AddItem "Power supply fault, -5 volts"
ElseIf FLT(0) = "4" Then
frmEstado.lstUnit.AddItem "Power supply fault, 18 volts"
ElseIf FLT(0) = "5" Then
frmEstado.lstUnit.AddItem "Power supply fault, -12 volts"
ElseIf FLT(0) = "6" Then
frmEstado.lstUnit.AddItem "RAM load fail"
ElseIf FLT(0) = "7" Then
frmEstado.lstUnit.AddItem "Tx synthesiser lock"
ElseIf FLT(0) = "8" Then
frmEstado.lstUnit.AddItem "Rx synthesiser"
ElseIf FLT(0) = "9" Then
frmEstado.lstUnit.AddItem "Power cal Checksum error"
ElseIf FLT(0) = "A" Then
frmEstado.lstUnit.AddItem "FPGA main chain load fail"
ElseIf FLT(0) = "B" Then
frmEstado.lstUnit.AddItem "Turbo FPGA load fail"
End If
If FLT(1) = "0" Then
frmEstado.lstTx.AddItem "Tx traffic OK"
ElseIf FLT(1) = "1" Then
frmEstado.lstTx.AddItem "No clock from terrestrial interface"
ElseIf FLT(1) = "2" Then
frmEstado.lstTx.AddItem "Tx FIFO slip"
ElseIf FLT(1) = "3" Then
frmEstado.lstTx.AddItem "AIS detected on incoming data"
ElseIf FLT(1) = "4" Then
frmEstado.lstTx.AddItem "AUPC upper limit reached"
End If
If FLT(2) = "0" Then
frmEstado.lstRx.AddItem "Rx traffic OK "
ElseIf FLT(2) = "1" Then

65
frmEstado.lstRx.AddItem "Demodulator unlocked"
ElseIf FLT(2) = "2" Then
frmEstado.lstRx.AddItem "AGC Alarm - signal level too high"
ElseIf FLT(2) = "3" Then
frmEstado.lstRx.AddItem "Frame sync lost"
ElseIf FLT(2) = "4" Then
frmEstado.lstRx.AddItem "Buffer Underflow"
ElseIf FLT(2) = "5" Then
frmEstado.lstRx.AddItem "Buffer Overflow"
ElseIf FLT(2) = "6" Then
frmEstado.lstRx.AddItem "AIS detected on incoming data"
ElseIf FLT(2) = "7" Then
frmEstado.lstRx.AddItem "Eb/No threshold exceeded"
End If
MSComm1.Output = "<" & Direccion & "/TST?" & vbCrLf
CMe = 1
NuMe = 3
CoEn = "TST"
End Sub

Sub ProCTFQ()
MSComm1.Output = "<" & Direccion & "/MGC?" & vbCrLf
CMe = 1
NuMe = 13
CoEn = "MGC"
End Sub

Sub ProCAE()
MSComm1.Output = "<" & Direccion & "/RNE?" & vbCrLf
CMe = 1
NuMe = 13
CoEn = "RNE"
End Sub

Sub ProRNE()
EAL(0) = Mid(MenRx(2), 4, 5) & MenRx(3) & Mid(MenRx(4), 1, 2)
EAL(1) = Mid(MenRx(4), 4, 5) & MenRx(5) & Mid(MenRx(6), 1, 2)
EAL(2) = Mid(MenRx(6), 4, 5) & MenRx(7) & Mid(MenRx(8), 1, 2)
EAL(3) = Mid(MenRx(8), 4, 5) & MenRx(9) & Mid(MenRx(10), 1, 2)
EAL(4) = Mid(MenRx(10), 4, 5) & MenRx(11) & Mid(MenRx(12), 1, 2)
For i = 0 To 4
j=0
If Mid(EAL(i), 1, 1) = "F" Then
Palabra(j) = "FLT "
ElseIf Mid(EAL(i), 1, 1) = "C" Then
Palabra(j) = "OK "
ElseIf Mid(EAL(i), 1, 1) = "I" Then
Palabra(j) = "INFO"
End If
j=j+1
Palabra(j) = Mid(EAL(i), 4, 2) & "/" & Mid(EAL(i), 6, 2) & "/" & Mid(EAL(i), 8, 2)
j=j+1
Palabra(j) = Mid(EAL(i), 10, 2) & ":" & Mid(EAL(i), 12, 2) & ":" & Mid(EAL(i), 14, 2)
j=j+1

66
If Mid(EAL(i), 2, 1) = "1" Then
If Mid(EAL(i), 3, 1) = 0 Then
Palabra(j) = "No Fault"
ElseIf Mid(EAL(i), 3, 1) = "1" Then
Palabra(j) = "Power supply fault, 5 volts"
ElseIf Mid(EAL(i), 3, 1) = "2" Then
Palabra(j) = "Power supply fault, 12 volts"
ElseIf Mid(EAL(i), 3, 1) = "3" Then
Palabra(j) = "Power supply fault, -5 volts"
ElseIf Mid(EAL(i), 3, 1) = "4" Then
Palabra(j) = "Power supply fault, 18 volts"
ElseIf Mid(EAL(i), 3, 1) = "5" Then
Palabra(j) = "Power supply fault, -12 volts"
ElseIf Mid(EAL(i), 3, 1) = "6" Then
Palabra(j) = "RAM Load Fail"
ElseIf Mid(EAL(i), 3, 1) = "7" Then
Palabra(j) = "TX Synthesiser lock"
ElseIf Mid(EAL(i), 3, 1) = "8" Then
Palabra(j) = "RX Synthesiser"
ElseIf Mid(EAL(i), 3, 1) = "9" Then
Palabra(j) = "Power cal Checksum error"
ElseIf Mid(EAL(i), 3, 1) = "A" Then
Palabra(j) = "FPGA Main Chain Load Fail"
ElseIf Mid(EAL(i), 3, 1) = "B" Then
Palabra(j) = "Turbo FPGA Load Fail"
End If

ElseIf Mid(EAL(i), 2, 1) = "2" Then


If Mid(EAL(i), 3, 1) = 0 Then
Palabra(j) = "RX Traffic OK"
ElseIf Mid(EAL(i), 3, 1) = 1 Then
Palabra(j) = "Demodulator Unlocked"
ElseIf Mid(EAL(i), 3, 1) = 2 Then
Palabra(j) = "AGC Alarm"
ElseIf Mid(EAL(i), 3, 1) = 3 Then
Palabra(j) = "Frame Sync Lost"
ElseIf Mid(EAL(i), 3, 1) = 4 Then
Palabra(j) = "Buffer Underflow"
ElseIf Mid(EAL(i), 3, 1) = 5 Then
Palabra(j) = "Buffer Overflow"
ElseIf Mid(EAL(i), 3, 1) = 6 Then
Palabra(j) = "AIS Detected on Incoming Data"
ElseIf Mid(EAL(i), 3, 1) = 7 Then
Palabra(j) = "Eb/No threshold exceeded"
End If

ElseIf Mid(EAL(i), 2, 1) = "3" Then


If Mid(EAL(i), 3, 1) = 0 Then
Palabra(j) = "TX Traffic OK"
ElseIf Mid(EAL(i), 3, 1) = 1 Then
Palabra(j) = "No Clock from terrestrial interface"
ElseIf Mid(EAL(i), 3, 1) = 2 Then
Palabra(j) = "TX FIFO Slip"
ElseIf Mid(EAL(i), 3, 1) = 3 Then

67
Palabra(j) = "AIS detected on incoming data"
ElseIf Mid(EAL(i), 3, 1) = 4 Then
Palabra(j) = "AUPC upper limit reached"
End If

ElseIf Mid(EAL(i), 2, 1) = "4" Then


If Mid(EAL(i), 3, 1) = 0 Then
Palabra(j) = "Power Off"
ElseIf Mid(EAL(i), 3, 1) = 1 Then
Palabra(j) = "Power ON"
ElseIf Mid(EAL(i), 3, 1) = 2 Then
Palabra(j) = "Lock Cleared"
ElseIf Mid(EAL(i), 3, 1) = 3 Then
Palabra(j) = "Global Config Change"
ElseIf Mid(EAL(i), 3, 1) = 4 Then
Palabra(j) = "Redundancy Config Change"
End If
End If
If Palabra(1) = "00/00/00" Then
Palabra(0) = " "
Palabra(1) = " "
Palabra(2) = " "
Palabra(3) = " "
End If
frmEstado.lslAlar.AddItem Palabra(0) & " " & Palabra(1) & " " & Palabra(2) & " " & Palabra(3)
Next i
MSComm1.Output = "<" & Direccion & "/NUE?" & vbCrLf
CMe = 1
NuMe = 3
CoEn = "NUE"
End Sub

Sub ProNUE()
NUE = Mid(MenRx(2), 3, 2)
frmEstado.lblNuer = NUE
MSComm1.Output = "<" & Direccion & "/FLT?" & vbCrLf
CMe = 1
NuMe = 4
CoEn = "FLT"
BanExp = False
End Sub

Sub ProAGC()
AGC = Mid(MenRx(2), 3, 2)
frmEstado.lblAGCr = AGC
MSComm1.Output = "<" & Direccion & "/NUE?" & vbCrLf
CMe = 1
NuMe = 3
CoEn = "NUE"
End Sub

Sub ProBER()
BER = Mid(MenRx(2), 3, 5)
If BER = "99999" Then

68
frmEstado.lblBERr = "UNLOCKED"
ElseIf BER <> "99999" Then
frmEstado.lblBERr = BER
End If
MSComm1.Output = "<" & Direccion & "/AGC?" & vbCrLf
CMe = 1
NuMe = 3
CoEn = "AGC"
End Sub
Sub ProEBNO()
EBN = Mid(MenRx(2), 3, 4)
frmEstado.lblEBNr = EBN & " dB"
frmCli.Hide
frmEstado.Show
End Sub

Sub ProMGC()
frmEstado.lblInG1R.Caption = frmCli.Caption
frmEstado.lblInG2R.Caption = frmCli.lblCli(Elim).Caption
TFQ = Mid(MenRx(2), 4, 5) & Mid(MenRx(3), 1, 2)
TDR = Mid(MenRx(3), 4, 5) & Mid(MenRx(4), 1, 2)
TFT = Mid(MenRx(4), 3, 1)
TCR = Mid(MenRx(4), 4, 1)
TMD = Mid(MenRx(4), 5, 1)
TSI = Mid(MenRx(4), 6, 1)
TSC = Mid(MenRx(4), 7, 1)
TPL = Mid(MenRx(4), 8, 1) & Mid(MenRx(5), 1, 3)
TCK = Mid(MenRx(5), 4, 1)
TXO = Mid(MenRx(5), 5, 1)
RFQ = Mid(MenRx(5), 7, 2) & Mid(MenRx(6), 1, 5)
RDR = Mid(MenRx(6), 7, 2) & Mid(MenRx(7), 1, 5)
RFT = Mid(MenRx(7), 6, 1)
RCR = Mid(MenRx(7), 7, 1)
RMD = Mid(MenRx(7), 8, 1)
RSI = Mid(MenRx(8), 1, 1)
RDS = Mid(MenRx(8), 2, 1)
RSW = Mid(MenRx(8), 3, 2)
RCK = Mid(MenRx(8), 5, 1)
RBS = Mid(MenRx(9), 2, 1)
ITF = Mid(MenRx(9), 3, 1)
FRM = Mid(MenRx(9), 4, 1)
IPD = Mid(MenRx(9), 6, 1)
frmEstado.lblTFQr = TFQ & " Mhz"
frmEstado.lblTDRr = TDR & " Kbps"
If TFT = "0" Then
frmEstado.lblTFTr = "Ninguno"
ElseIf TFT = "1" Then
frmEstado.lblTFTr = "Viterbi"
ElseIf TFT = "2" Then
frmEstado.lblTFTr = "Secuencial"
End If
If TCR = "1" Then
frmEstado.lblTCRr = "1/2"
ElseIf TCR = "3" Then

69
frmEstado.lblTCRr = "3/4"
ElseIf TCR = "7" Then
frmEstado.lblTCRr = "7/8"
ElseIf TCR = "0" Then
frmEstado.lblTCRr = " "
End If
If TMD = "1" Then
frmEstado.lblTMDr = "BPSK"
ElseIf TMD = "2" Then
frmEstado.lblTMDr = "QPSK"
ElseIf TMD = "3" Then
frmEstado.lblTMDr = "OQPSK"
End If
If TSI = "0" Then
frmEstado.lblTSIr = "OFF"
ElseIf TSI = "1" Then
frmEstado.lblTSIr = "ON"
End If
If TSC = "0" Then
frmEstado.lblTSCr = "OFF"
ElseIf TSC = "1" Then
frmEstado.lblTSCr = "ON"
End If
frmEstado.lblTPLr = " - " & TPL & " dBm"
If TCK = "1" Then
frmEstado.lblTCKr = "Internal"
ElseIf TCK = "2" Then
frmEstado.lblTCKr = "External"
ElseIf TCK = "3" Then
frmEstado.lblTCKr = "Loop Timed"
End If
If TXO = "0" Then
frmEstado.lblTXOr = "OFF"
ElseIf TXO = "1" Then
frmEstado.lblTXOr = "ON"
End If
frmEstado.lblRFQr = RFQ & " Mhz"
frmEstado.lblRDRr = RDR & " Kbps"
If RFT = "0" Then
frmEstado.lblRFTr = "Ninguno"
ElseIf RFT = "1" Then
frmEstado.lblRFTr = "Viterbi"
ElseIf RFT = "2" Then
frmEstado.lblRFTr = "Secuencial"
End If
If RCR = "1" Then
frmEstado.lblRCRr = "1/2"
ElseIf RCR = "3" Then
frmEstado.lblRCRr = "3/4"
ElseIf RCR = "7" Then
frmEstado.lblRCRr = "7/8"
ElseIf RCR = "0" Then
frmEstado.lblRCRr = " "
End If

70
If RMD = "1" Then
frmEstado.lblRMDr = "BPSK"
ElseIf RMD = "2" Then
frmEstado.lblRMDr = "QPSK"
ElseIf RMD = "3" Then
frmEstado.lblRMDr = "OQPSK"
End If
If RSI = "0" Then
frmEstado.lblRSIr = "OFF"
ElseIf RSI = "1" Then
frmEstado.lblRSIr = "ON"
End If
If RDS = "0" Then
frmEstado.lblRDSr = "OFF"
ElseIf RDS = "1" Then
frmEstado.lblRDSr = "ON"
End If
frmEstado.lblRSWr = "+/- " & RSW
If RCK = "0" Then
frmEstado.lblRCKr = "Buffer OFF"
ElseIf RCK = "1" Then
frmEstado.lblRCKr = "Buffer ON"
End If
If RBS = "1" Then
frmEstado.lblRBSr = "+/- 256 Bits"
ElseIf RBS = "2" Then
frmEstado.lblRBSr = "+/- 512 Bits"
ElseIf RBS = "3" Then
frmEstado.lblRBSr = "+/- 1024 Bits"
ElseIf RBS = "4" Then
frmEstado.lblRBSr = "+/- 2048 Bits"
ElseIf RBS = "5" Then
frmEstado.lblRBSr = "+/- 4096 Bits"
End If
If ITF = "2" Then
frmEstado.lblITFr = "V.35"
ElseIf ITF = "3" Then
frmEstado.lblITFr = "RS-232"
End If
If FRM = "0" Then
frmEstado.lblFRMr = "UNFRAMED"
ElseIf FRM = "1" Then
frmEstado.lblFRMr = "FRAMED"
End If
If IPD = "5" Then
frmEstado.lblIPDr = "50 Ohms"
ElseIf IPD = "7" Then
frmEstado.lblIPDr = "75 Ohms"
End If
MSComm1.Output = "<" & Direccion & "/BER?" & vbCrLf
CMe = 1
NuMe = 4
CoEn = "TBER"
End Sub

71
Private Sub cboAddBas_Click()
Bastidor = cboAddBas.Text
cboAddDir.Enabled = True
frmGr.dtaCli.Recordset.MoveFirst
While (Not frmGr.dtaCli.Recordset.EOF)
If frmGr.dtaCli.Recordset("Bastidor") = Bastidor And frmGr.dtaCli.Recordset("NomCli") = "LIBRE"
Then
cboAddDir.AddItem frmGr.dtaCli.Recordset("Direccion")
End If
frmGr.dtaCli.Recordset.MoveNext
Wend
End Sub

Private Sub cmdAdd_Click()


fraAdd.Visible = True
lbladd5.Caption = frmCli.Caption
txtAdd.SetFocus
cboAddBas.Enabled = True
End Sub

Private Sub cmdAddAcep_Click()


frmGr.dtaCli.Recordset.MoveFirst
While (Not frmGr.dtaCli.Recordset.EOF)
If frmGr.dtaCli.Recordset("Direccion") = cboAddDir.Text Then
frmGr.dtaCli.Recordset.Edit
frmGr.dtaCli.Recordset("Grupo") = Gr
frmGr.dtaCli.Recordset("NomCli") = txtAdd
frmGr.dtaCli.Recordset.Update
End If
frmGr.dtaCli.Recordset.MoveNext
Wend
LeerCliAct
Actualizar
txtAdd = " "
cboAddBas.Text = " "
cboAddDir.Text = " "
cboAddDir.Clear
fraAdd.Visible = False
End Sub

Private Sub cmdAddCan_Click()


cboAddBas.Text = " "
cboAddDir.Clear
txtAdd = " "
fraAdd.Visible = False
End Sub

Private Sub cmdCanDel_Click()


lblDel2.Caption = " "
fraDel.Visible = False
End Sub

72
Private Sub cmdDel_Click()
Dim Resp As String
Resp = MsgBox("Esta a punto de borrar un registro. Desea continuar", 36)
If Resp = vbYes Then
frmGr.dtaCli.Recordset.MoveFirst
While (Not frmGr.dtaCli.Recordset.EOF)
If frmGr.dtaCli.Recordset("NomCli") = RegDel Then
frmGr.dtaCli.Recordset.Edit
frmGr.dtaCli.Recordset("NomCli") = "LIBRE"
frmGr.dtaCli.Recordset("Grupo") = 50
frmGr.dtaCli.Recordset("Estado") = "Gris"
frmGr.dtaCli.Recordset.Update
End If
frmGr.dtaCli.Recordset.MoveNext
Wend
LeerCliAct
Actualizar
lblDel2.Caption = " "
fraDel.Visible = False
Exit Sub
ElseIf Resp = vbNo Then
lblDel2.Caption = " "
fraDel.Visible = False
End If
End Sub

Private Sub Form_Load()


MSComm1.PortOpen = True
End Sub

Private Sub lblCli_Click(Index As Integer)


HabExp = False
If BotOp = 1 Then
ElseIf BotOp = 2 Then
HabExp = True
fraDel.Visible = True
lblDel2.Caption = lblCli(Elim)
RegDel = lblDel2.Caption
End If
End Sub

Private Sub lblCli_DblClick(Index As Integer)


frmGr.dtaCli.Recordset.MoveFirst
While (Not frmGr.dtaCli.Recordset.EOF)
If frmGr.dtaCli.Recordset("Grupo") = Gr And frmGr.dtaCli.Recordset("NomCli") = lblCli(Elim) Then
Direccion = frmGr.dtaCli.Recordset("Direccion")
End If
frmGr.dtaCli.Recordset.MoveNext
Wend
MSComm1.Output = "<" & Direccion & "/MGC?" & vbCrLf
CMe = 1
NuMe = 13
CoEn = "MGC"
End Sub

73
Private Sub lblCli_MouseDown(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y
As Single)
BotOp = Button
End Sub

Private Sub lblCli_MouseMove(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y


As Single)
Elim = Index
Cliente = Elim
End Sub

Private Sub MSComm1_OnComm()


MenRx(CMe) = MSComm1.Input
CMe = CMe + 1
If CMe = NuMe Then
If CoEn = "MGC" Then
ProMGC
ElseIf CoEn = "EBNO" Then
ProEBNO
ElseIf CoEn = "TBER" Then
ProBER
ElseIf CoEn = "AGC" Then
ProAGC
ElseIf CoEn = "NUE" Then
ProNUE
ElseIf CoEn = "FLT" Then
ProFLT
ElseIf CoEn = "RNE" Then
ProRNE
ElseIf CoEn = "CAE" Then
ProCAE
ElseIf CoEn = "TST" Then
ProTST
ElseIf CoEn = "CTFQ" Then
ProCTFQ
ElseIf CoEn = "CTDR" Then
ProCTFQ
ElseIf CoEn = "CTFT" Then
ProCTFQ
ElseIf CoEn = "CTMD" Then
ProCTFQ
ElseIf CoEn = "CTCR" Then
ProCTFQ
ElseIf CoEn = "CTCK" Then
ProCTFQ
ElseIf CoEn = "CTXO" Then
ProCTFQ
ElseIf CoEn = "CTSI" Then
ProCTFQ
ElseIf CoEn = "CTSC" Then
ProCTFQ
ElseIf CoEn = "CTPL" Then
ProCTFQ
ElseIf CoEn = "CRFQ" Then

74
ProCTFQ
ElseIf CoEn = "CRDR" Then
ProCTFQ
ElseIf CoEn = "CRFT" Then
ProCTFQ
ElseIf CoEn = "CRMD" Then
ProCTFQ
ElseIf CoEn = "CRCR" Then
ProCTFQ
ElseIf CoEn = "CRSI" Then
ProCTFQ
ElseIf CoEn = "CRDS" Then
ProCTFQ
ElseIf CoEn = "CRCK" Then
ProCTFQ
ElseIf CoEn = "CRBS" Then
ProCTFQ
ElseIf CoEn = "CITF" Then
ProCTFQ
ElseIf CoEn = "CIPD" Then
ProCTFQ
ElseIf CoEn = "CFRM" Then
ProCTFQ
ElseIf CoEn = "CRSW" Then
ProCTFQ
ElseIf CoEn = "CTST" Then
ProCTFQ
End If
End If
End Sub

FORMULARIO ESTADO

Dim VDisp As String


Dim CoDig As Single
Dim VDig(10) As String
Dim Enviar As String
Dim ConPos As Single
Dim ConDec As Single
Dim BanEsp(1) As Boolean

Private Sub cboTest_Click()


If cboTest.Text = "Normal" Then
frmCli.MSComm1.Output = "<" & Direccion & "/TST=0" & vbCrLf
ElseIf cboTest.Text = "IF" Then
frmCli.MSComm1.Output = "<" & Direccion & "/TST=1" & vbCrLf
ElseIf cboTest.Text = "Digital" Then
frmCli.MSComm1.Output = "<" & Direccion & "/TST=2" & vbCrLf
ElseIf cboTest.Text = "I/O" Then
frmCli.MSComm1.Output = "<" & Direccion & "/TST=3" & vbCrLf
ElseIf cboTest.Text = "TX CW" Then

75
frmCli.MSComm1.Output = "<" & Direccion & "/TST=4" & vbCrLf
ElseIf cboTest.Text = "TX 1,0" Then
frmCli.MSComm1.Output = "<" & Direccion & "/TST=5" & vbCrLf
ElseIf cboTest.Text = "RF" Then
frmCli.MSComm1.Output = "<" & Direccion & "/TST=6" & vbCrLf
End If
CoEn = "CTST"
CMe = 1
NuMe = 3
End Sub

Private Sub cmdAc_Click()


frmCli.MSComm1.Output = "<" & Direccion & "/MGC?" & vbCrLf
CMe = 1
NuMe = 13
CoEn = "MGC"
End Sub

Private Sub cmdActu_Click()


frmCli.MSComm1.Output = "<" & Direccion & "/NUE?" & vbCrLf
CMe = 1
NuMe = 3
CoEn = "NUE"
End Sub

Private Sub cmdAlar_Click()


frmCli.MSComm1.Output = "<" & Direccion & "/RNE?" & vbCrLf
CMe = 1
NuMe = 13
CoEn = "RNE"
End Sub

Private Sub cmdBorrar_Click()


lslAlar.Clear
frmCli.MSComm1.Output = "<" & Direccion & "/CAE=" & vbCrLf
CMe = 1
NuMe = 3
CoEn = "CAE"
End Sub

Private Sub cmdClear_Click()


lstUnit.Clear
lstTx.Clear
lstRx.Clear
End Sub

Private Sub cmdClr_Click()


lblDig(CoDig).BackColor = &H8000000F
CoDig = 0
lblDig(CoDig).BackColor = &HFFFFC0
fraConf1.Visible = False
End Sub

Private Sub cmdClr1_Click()

76
lblDisp(CoDig).BackColor = &H8000000F
fraConf2.Visible = False
lblDisp(2).Visible = True
End Sub

Private Sub cmdClr3_Click()


lblDis(CoDig).BackColor = &H8000000F
fraConf3.Visible = False
End Sub

Private Sub cmdDn_Click()


If VDig(CoDig) > 0 Then
VDig(CoDig) = VDig(CoDig) - 1
lblDig(CoDig).Caption = VDig(CoDig)
End If
End Sub

Private Sub cmdEnt_Click()


If CoEn = "CTFQ" Then
VDig(2) = "."
Enviar = VDig(0) & VDig(1) & VDig(2) & VDig(3) & VDig(4) & VDig(5) & VDig(6)
frmCli.MSComm1.Output = "<" & Direccion & "/TFQ=" & Enviar & vbCrLf
ElseIf CoEn = "CTDR" Then
VDig(3) = "."
Enviar = "0" & VDig(0) & VDig(1) & VDig(2) & VDig(3) & VDig(4) & VDig(5) & VDig(6)
frmCli.MSComm1.Output = "<" & Direccion & "/TDR=" & Enviar & vbCrLf
ElseIf CoEn = "CTPL" Then
VDig(5) = "."
Enviar = VDig(3) & VDig(4) & VDig(5) & VDig(6)
frmCli.MSComm1.Output = "<" & Direccion & "/TPL=" & Enviar & vbCrLf
ElseIf CoEn = "CRFQ" Then
VDig(2) = "."
Enviar = VDig(0) & VDig(1) & VDig(2) & VDig(3) & VDig(4) & VDig(5) & VDig(6)
frmCli.MSComm1.Output = "<" & Direccion & "/RFQ=" & Enviar & vbCrLf
ElseIf CoEn = "CRDR" Then
VDig(3) = "."
Enviar = "0" & VDig(0) & VDig(1) & VDig(2) & VDig(3) & VDig(4) & VDig(5) & VDig(6)
frmCli.MSComm1.Output = "<" & Direccion & "/RDR=" & Enviar & vbCrLf
ElseIf CoEn = "CRSW" Then
Enviar = VDig(5) & VDig(6)
frmCli.MSComm1.Output = "<" & Direccion & "/RSW=" & Enviar & vbCrLf
End If
CMe = 1
NuMe = 3
lblDig(CoDig).BackColor = &H8000000F
CoDig = 0
lblDig(CoDig).BackColor = &HFFFFC0
fraConf1.Visible = False
BanEsp(0) = False
BanEsp(1) = False
End Sub

77
Private Sub cmdEnt1_Click()
Dim ValCod As Single
If CoEn = "CTFT" Then
frmCli.MSComm1.Output = "<" & Direccion & "/TFT=" & CoDig & vbCrLf
ElseIf CoEn = "CTMD" Then
frmCli.MSComm1.Output = "<" & Direccion & "/TMD=" & CoDig + 1 & vbCrLf
ElseIf CoEn = "CTCR" Then
If CoDig = 0 Then
ValCod = CoDig + 1
ElseIf CoDig = 1 Then
ValCod = 3
ElseIf CoDig = 2 Then
ValCod = 7
End If
frmCli.MSComm1.Output = "<" & Direccion & "/TCR=" & ValCod & vbCrLf
ElseIf CoEn = "CTCK" Then
frmCli.MSComm1.Output = "<" & Direccion & "/TCK=" & CoDig + 1 & vbCrLf
ElseIf CoEn = "CTXO" Then
frmCli.MSComm1.Output = "<" & Direccion & "/TXO=" & CoDig & vbCrLf
lblDisp(2).Visible = True
ElseIf CoEn = "CTSI" Then
frmCli.MSComm1.Output = "<" & Direccion & "/TSI=" & CoDig & vbCrLf
lblDisp(2).Visible = True
ElseIf CoEn = "CTSC" Then
frmCli.MSComm1.Output = "<" & Direccion & "/TSC=" & CoDig & vbCrLf
lblDisp(2).Visible = True
ElseIf CoEn = "CRFT" Then
frmCli.MSComm1.Output = "<" & Direccion & "/RFT=" & CoDig & vbCrLf
ElseIf CoEn = "CRMD" Then
frmCli.MSComm1.Output = "<" & Direccion & "/RMD=" & CoDig + 1 & vbCrLf
ElseIf CoEn = "CRCR" Then
If CoDig = 0 Then
ValCod = CoDig + 1
ElseIf CoDig = 1 Then
ValCod = 3
ElseIf CoDig = 2 Then
ValCod = 7
End If
frmCli.MSComm1.Output = "<" & Direccion & "/RCR=" & ValCod & vbCrLf
ElseIf CoEn = "CRSI" Then
frmCli.MSComm1.Output = "<" & Direccion & "/RSI=" & CoDig & vbCrLf
lblDisp(2).Visible = True
ElseIf CoEn = "CRDS" Then
frmCli.MSComm1.Output = "<" & Direccion & "/RDS=" & CoDig & vbCrLf
lblDisp(2).Visible = True
ElseIf CoEn = "CRCK" Then
frmCli.MSComm1.Output = "<" & Direccion & "/RCK=" & CoDig & vbCrLf
lblDisp(2).Visible = True
ElseIf CoEn = "CITF" Then
frmCli.MSComm1.Output = "<" & Direccion & "/ITF=" & CoDig + 1 & vbCrLf
ElseIf CoEn = "CIPD" Then
If CoDig = 0 Then
ValCod = 5
ElseIf CoDig = 1 Then

78
ValCod = 7
End If
frmCli.MSComm1.Output = "<" & Direccion & "/IMP=" & ValCod & vbCrLf
ElseIf CoEn = "CFRM" Then
frmCli.MSComm1.Output = "<" & Direccion & "/FRM=" & CoDig & vbCrLf
lblDisp(2).Visible = True
End If
CMe = 1
NuMe = 3
For w = 0 To 2
lblDisp(w).BackColor = &H8000000F
Next w
fraConf2.Visible = False
End Sub

Private Sub cmdEnt3_Click()


Print CoDig
frmCli.MSComm1.Output = "<" & Direccion & "/RBS=" & CoDig + 1 & vbCrLf
CMe = 1
NuMe = 3
fraConf3.Visible = False
End Sub

Private Sub cmdL_Click()


If CoDig > 0 Then
lblDig(CoDig).BackColor = &H8000000F
lblDig(CoDig - 1).BackColor = &HFFFFC0
CoDig = CoDig - 1
End If
End Sub

Private Sub cmdL1_Click()


If CoDig > 0 Then
lblDisp(CoDig).BackColor = &H8000000F
lblDisp(CoDig - 1).BackColor = &HFFFFC0
CoDig = CoDig - 1
End If
End Sub

Private Sub cmdL3_Click()


If CoDig > 0 Then
lblDis(CoDig).BackColor = &H8000000F
lblDis(CoDig - 1).BackColor = &HFFFFC0
CoDig = CoDig - 1
End If
End Sub

Private Sub cmdLoop_Click()


If Bandera = True Then
cboTest.Enabled = True
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
End Sub

79
Private Sub cmdR_Click()
If CoDig < 6 Then
lblDig(CoDig).BackColor = &H8000000F
lblDig(CoDig + 1).BackColor = &HFFFFC0
CoDig = CoDig + 1
End If
End Sub

Private Sub cmdR1_Click()


If CoDig < ConPos Then
lblDisp(CoDig).BackColor = &H8000000F
lblDisp(CoDig + 1).BackColor = &HFFFFC0
CoDig = CoDig + 1
End If
End Sub

Private Sub cmdR3_Click()


If CoDig < 4 Then
lblDis(CoDig).BackColor = &H8000000F
lblDis(CoDig + 1).BackColor = &HFFFFC0
CoDig = CoDig + 1
End If
End Sub

Private Sub cmdUp_Click()


If BanEsp(0) = True Then
GoTo Especial1
ElseIf BanEsp(1) = True Then
GoTo Especial2
End If
If CoDig <> ConDec Then
If VDig(CoDig) < 9 Then
VDig(CoDig) = VDig(CoDig) + 1
lblDig(CoDig).Caption = VDig(CoDig)
End If
End If
Exit Sub
Especial1:
If CoDig = 3 Or CoDig = 4 Or CoDig = 6 Then
If VDig(CoDig) < 9 Then
VDig(CoDig) = VDig(CoDig) + 1
lblDig(CoDig).Caption = VDig(CoDig)
End If
End If
Exit Sub
Especial2:
If CoDig = 5 Or CoDig = 6 Then
If VDig(CoDig) < 9 Then
VDig(CoDig) = VDig(CoDig) + 1
lblDig(CoDig).Caption = VDig(CoDig)
End If
End If

End Sub

80
Private Sub cmdVolver_Click()
cboTest.Enabled = False
cmdLoop.Enabled = True
fraConf1.Visible = False
fraConf2.Visible = False
fraConf3.Visible = False
Bandera = False
lslAlar.Clear
frmEstado.Caption = "MODO MONITOR"
lstUnit.Clear
lstTx.Clear
lstRx.Clear
HabExp = True
Explorar
Hide
End Sub

Private Sub Form_Load()

End Sub

Private Sub lblFRMr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 1
lblDisp(0).Caption = "UNFRAMED"
lblDisp(1).Caption = "FRAMED"
lblDisp(2).Visible = False
If lblFRMr.Caption = "UNFRAMED" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblFRMr.Caption = "FRAMED" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CFRM"
End Sub

Private Sub lblIPDr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 1
lblDisp(0).Caption = "50 Ohms"
lblDisp(1).Caption = "75 Ohms"
lblDisp(2).Visible = False
If lblIPDr.Caption = "50 Ohms" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0

81
ElseIf lblIPDr.Caption = "75 Ohms" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CIPD"
End Sub

Private Sub lblITFr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 2
lblDisp(0).Caption = "RS-422"
lblDisp(1).Caption = "V.35"
lblDisp(2).Caption = "RS-232"
If lblITFr.Caption = "RS-422" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblITFr.Caption = "V.35" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
ElseIf lblITFr.Caption = "RS-232" Then
lblDisp(2).BackColor = &HFFFFC0
CoDig = 2
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CITF"
End Sub

Private Sub lblRBSr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = False
fraConf3.Visible = True
lblDis(0).Caption = "+/- 256 Bits"
lblDis(1).Caption = "+/- 512 Bits"
lblDis(2).Caption = "+/- 1024 Bits"
lblDis(3).Caption = "+/- 2048 Bits"
lblDis(4).Caption = "+/- 4096 Bits"
If lblRBSr.Caption = "+/- 256 Bits" Then
lblDis(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblRBSr.Caption = "+/- 512 Bits" Then
lblDis(1).BackColor = &HFFFFC0
CoDig = 1
ElseIf lblRBSr.Caption = "+/- 1024 Bits" Then
lblDis(2).BackColor = &HFFFFC0
CoDig = 2
ElseIf lblRBSr.Caption = "+/- 2048 Bits" Then

82
lblDis(3).BackColor = &HFFFFC0
CoDig = 3
ElseIf lblRBSr.Caption = "+/- 4096 Bits" Then
lblDis(4).BackColor = &HFFFFC0
CoDig = 4
End If
CoEn = "CRBS"
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
End Sub

Private Sub lblRCKr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 1
lblDisp(0).Caption = "OFF"
lblDisp(1).Caption = "ON"
lblDisp(2).Visible = False
If lblRCKr.Caption = "Buffer OFF" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblRCKr.Caption = "Buffer ON" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CRCK"
End Sub

Private Sub lblRCRr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 2
lblDisp(0).Caption = "1/2"
lblDisp(1).Caption = "3/4"
lblDisp(2).Caption = "7/8"
If lblRCRr.Caption = "1/2" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblRCRr.Caption = "3/4" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
ElseIf lblRCRr.Caption = "7/8" Then
lblDisp(2).BackColor = &HFFFFC0
CoDig = 2
End If
CoEn = "CRCR"
ElseIf Bandera = False Then
frmPassword.Show vbModal

83
End If
End Sub

Private Sub lblRDRr_DblClick()


If Bandera = True Then
fraConf1.Visible = True
fraConf2.Visible = False
CoDig = 0
VDisp = lblRDRr.Caption
For w = 1 To 7
lblDig(w - 1) = Mid(VDisp, w, 1)
VDig(w - 1) = Val(lblDig(w - 1))
Next w
CoEn = "CRDR"
ConDec = 3
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
End Sub

Private Sub lblRDSr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 1
lblDisp(0).Caption = "OFF"
lblDisp(1).Caption = "ON"
lblDisp(2).Visible = False
If lblRDSr.Caption = "OFF" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblRDSr.Caption = "ON" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CRDS"
End Sub

Private Sub lblRFQr_DblClick()


If Bandera = True Then
fraConf1.Visible = True
fraConf2.Visible = False
CoDig = 0
VDisp = lblRFQr.Caption
For w = 1 To 7
lblDig(w - 1) = Mid(VDisp, w, 1)
VDig(w - 1) = Val(lblDig(w - 1))
Next w
CoEn = "CRFQ"
ConDec = 2
ElseIf Bandera = False Then

84
frmPassword.Show vbModal
End If
End Sub

Private Sub lblRFTr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 2
lblDisp(0).Caption = "Ninguno"
lblDisp(1).Caption = "Viterbi"
lblDisp(2).Caption = "Secuencial"
If lblRFTr.Caption = "Ninguno" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblRFTr.Caption = "Viterbi" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
ElseIf lblRFTr.Caption = "Secuencial" Then
lblDisp(2).BackColor = &HFFFFC0
CoDig = 2
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CRFT"
End Sub

Private Sub lblRMDr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 2
lblDisp(0).Caption = "BPSK"
lblDisp(1).Caption = "QPSK"
lblDisp(2).Caption = "OQPSK"
If lblRMDr.Caption = "BPSK" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblRMDr.Caption = "QPSK" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
ElseIf lblRMDr.Caption = "OQPSK" Then
lblDisp(2).BackColor = &HFFFFC0
CoDig = 2
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CRMD"
End Sub

85
Private Sub lblRSIr_DblClick()
If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 1
lblDisp(0).Caption = "OFF"
lblDisp(1).Caption = "ON"
lblDisp(2).Visible = False
If lblRSIr.Caption = "OFF" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblRSIr.Caption = "ON" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CRSI"
End Sub

Private Sub lblRSWr_Click()


If Bandera = True Then
fraConf1.Visible = True
fraConf2.Visible = False
CoDig = 0
BanEsp(1) = True
VDisp = lblRSWr.Caption
For w = 1 To 7
lblDig(w - 1) = Mid(VDisp, w, 1)
VDig(w - 1) = Val(lblDig(w - 1))
Next w
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CRSW"
End Sub

Private Sub lblTCKr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 2
lblDisp(0).Caption = "Internal"
lblDisp(1).Caption = "External"
lblDisp(2).Caption = "Lopp Timed"
If lblTCKr.Caption = "Internal" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblTCKr.Caption = "External" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
ElseIf lblTCKr.Caption = "Loop Timed" Then
lblDisp(2).BackColor = &HFFFFC0

86
CoDig = 2
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CTCK"
End Sub

Private Sub lblTCRr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 2
lblDisp(0).Caption = "1/2"
lblDisp(1).Caption = "3/4"
lblDisp(2).Caption = "7/8"
If lblTCRr.Caption = "1/2" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblTCRr.Caption = "3/4" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
ElseIf lblTCRr.Caption = "7/8" Then
lblDisp(2).BackColor = &HFFFFC0
CoDig = 2
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CTCR"
End Sub

Private Sub lblTDRr_DblClick()


If Bandera = True Then
fraConf1.Visible = True
fraConf2.Visible = False
CoDig = 0
VDisp = lblTDRr.Caption
For w = 1 To 7
lblDig(w - 1) = Mid(VDisp, w, 1)
VDig(w - 1) = Val(lblDig(w - 1))
Next w
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CTDR"
ConDec = 3
End Sub

Private Sub lblTFQr_DblClick()


If Bandera = True Then
fraConf1.Visible = True
fraConf2.Visible = False
CoDig = 0

87
VDisp = lblTFQr.Caption
For w = 1 To 7
lblDig(w - 1) = Mid(VDisp, w, 1)
VDig(w - 1) = Val(lblDig(w - 1))
Next w
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CTFQ"
ConDec = 2
End Sub

Private Sub lblTFTr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 2
lblDisp(0).Caption = "Ninguno"
lblDisp(1).Caption = "Viterbi"
lblDisp(2).Caption = "Secuencial"
If lblTFTr.Caption = "Ninguno" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblTFTr.Caption = "Viterbi" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
ElseIf lblTFTr.Caption = "Secuencial" Then
lblDisp(2).BackColor = &HFFFFC0
CoDig = 2
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CTFT"
End Sub

Private Sub lblTMDr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 2
lblDisp(0).Caption = "BPSK"
lblDisp(1).Caption = "QPSK"
lblDisp(2).Caption = "OQPSK"
If lblTMDr.Caption = "BPSK" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblTMDr.Caption = "QPSK" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
ElseIf lblTMDr.Caption = "OQPSK" Then
lblDisp(2).BackColor = &HFFFFC0
CoDig = 2
End If

88
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CTMD"
End Sub

Private Sub lblTPLr_DblClick()


If Bandera = True Then
fraConf1.Visible = True
fraConf2.Visible = False
CoDig = 0
BanEsp(0) = True
VDisp = lblTPLr.Caption
For w = 1 To 7
lblDig(w - 1) = Mid(VDisp, w, 1)
VDig(w - 1) = Val(lblDig(w - 1))
Next w
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CTPL"
ConDec = 2
End Sub

Private Sub lblTSCr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 1
lblDisp(0).Caption = "OFF"
lblDisp(1).Caption = "ON"
lblDisp(2).Visible = False
If lblTSCr.Caption = "OFF" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblTSCr.Caption = "ON" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CTSC"
End Sub

Private Sub lblTSIr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 1
lblDisp(0).Caption = "OFF"
lblDisp(1).Caption = "ON"
lblDisp(2).Visible = False
If lblTSIr.Caption = "OFF" Then

89
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblTSIr.Caption = "ON" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CTSI"
End Sub

Private Sub lblTXOr_DblClick()


If Bandera = True Then
fraConf1.Visible = False
fraConf2.Visible = True
ConPos = 1
lblDisp(0).Caption = "OFF"
lblDisp(1).Caption = "ON"
lblDisp(2).Visible = False
If lblTXOr.Caption = "OFF" Then
lblDisp(0).BackColor = &HFFFFC0
CoDig = 0
ElseIf lblTXOr.Caption = "ON" Then
lblDisp(1).BackColor = &HFFFFC0
CoDig = 1
End If
ElseIf Bandera = False Then
frmPassword.Show vbModal
End If
CoEn = "CTXO"
End Sub

FORMULARIO GRUPOS

Dim Ind As Single

Private Sub cmdSalir_Click()


End
End Sub

Private Sub Form_Load()


For i = 0 To 21
lblGr(i).BackColor = &H808080
Next i
Shape1.BackColor = &H808080
BanAc = False
End Sub

90
Private Sub fraPrincipal_DragDrop(Source As Control, X As Single, Y As Single)
imgGr(Ind).Move X + 400, Y - 700
lblGr(Ind).Move X, Y
line1(Ind).X2 = X + 727
line1(Ind).Y2 = Y + 150
End Sub

Private Sub imgGr_DblClick(Index As Integer)


Gr = Index
Actualizar
End Sub

Private Sub imgGr_MouseMove(Index As Integer, Button As Integer, Shift As Integer, X As Single,


Y As Single)
Ind = Index
End Sub

Private Sub lblGr_DblClick(Index As Integer)


Gr = Index
Actualizar
End Sub

Private Sub lblGr_MouseMove(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y


As Single)
Ind = Index
End Sub

Private Sub Timer1_Timer()


Dim ColGr As Single
frmGr.dtaCli.Recordset.MoveFirst
While (Not frmGr.dtaCli.Recordset.EOF)
If frmGr.dtaCli.Recordset("Direccion") = DirVal Then
ColGr = dtaCli.Recordset("Grupo")
frmGr.dtaCli.Recordset.Edit
frmGr.dtaCli.Recordset("Estado") = "Gris"
frmGr.dtaCli.Recordset.Update
lblGr(ColGr).BackColor = &H808080
End If
frmGr.dtaCli.Recordset.MoveNext
Wend
DirVal = DirVal + 1
Timer1.Enabled = False
Explorar
End Sub

Private Sub Toolbar1_ButtonClick(ByVal Button As ComctlLib.Button)


Select Case Button
Case Is = "Iniciar Programa"
Shape1.BackColor = &HC000&
LeerCliAct
Xa = 1
DirVal = 1
HabExp = True
Explorar

91
Button.Enabled = False
Toolbar1.Buttons("Ter").Enabled = True
Case Is = "Terminal"
frmPass.Show vbModal
Case "Acerca de"
Print "Informar acerca de"
Case "Salir"
Dim Resp As String
Resp = MsgBox("Esta seguro que desea salir del Sistema de Gestin", 36)
If Resp = vbYes Then
End
ElseIf Resp = vbNo Then
End If
End Select
End Sub

FORMULARIO PASSWORD 1

Private Sub cmdPassAc_Click()


If txtPass.Text = txtPass.Tag Then
txtPass = ""
frmCli.MSComm1.PortOpen = False
frmTerminal.MsComm2.PortOpen = True
HabExp = False

frmPass.Hide
frmTerminal.Show vbModal
ElseIf txtPass.Text <> txtPass.Tag Then
MsgBox " Contrasea Invalida", vbCritical, "SGMS Aviso del Sistema"
txtPass = ""
txtPass.SetFocus
End If
End Sub

Private Sub cmdPassCan_Click()


txtPass = ""
txtPass.SetFocus
frmPass.Hide
End Sub

Private Sub Form_Load()

End Sub

FORMULARIO PASSWORD 2

Private Sub cmdAceptar_Click()


If txtPassword.Text = txtPassword.Tag Then
Bandera = True

92
txtPassword = ""
frmPassword.Hide
frmEstado.Caption = "MODO CONFIGURACION"
frmEstado.cboTest.Enabled = True
frmEstado.cmdLoop.Enabled = False
frmCli.MSComm1.Output = "<" & Direccion & "/LRS=1" & vbCrLf

ElseIf txtPassword.Text <> txtPassword.Tag Then


Bandera = False
frmEstado.Caption = "MODO MONITOR"
MsgBox " Contrasea Invalida", vbCritical, "SGMS Aviso del Sistema"
txtPassword = ""
txtPassword.SetFocus
End If
End Sub

Private Sub cmdCancelar_Click()


txtPassword = ""
txtPassword.SetFocus
frmPassword.Hide
End Sub

FORMULARIO TERMINAL

Dim MenRx(100) As String


Dim Mensaje As String
Dim X As Single
Dim MenTx As String

Private Sub cmdEnviar_Click()


X=1
MsComm2.Output = txtEnviar.Text & vbCrLf
End Sub

Private Sub cmdNuevo_Click()


txtEnviar = " "
lstVer.Clear
End Sub

Private Sub cmdSalir_Click()


If MsComm2.PortOpen = True Then
MsComm2.PortOpen = False
End If
frmCli.MSComm1.PortOpen = True
HabExp = True
Explorar
txtEnviar = " "
lstVer.Clear
Hide
frmGr.Show
End Sub

93
Private Sub cmdVer_Click()
For i = 1 To 13
lstVer.AddItem MenRx(i)
Next i
End Sub

Private Sub Form_Load()

End Sub

Private Sub MsComm2_OnComm()


MenRx(X) = MsComm2.Input
X=X+1
End Sub

MODULO

Public Gr As Single
Public NCG As Single
Public NC(100) As String
Public Cliente As Single
Public MenRx(20) As String
Public Elim As Single
Public CMe As Single
Public NuMe As Single
Public CoEn As String
Public Bandera As Boolean
Public Direccion As Single
Public CliAct(75) As Boolean
Public BanExp As Boolean
Public DirVal As Single
Public EsCli(20) As String
Public HabExp As Boolean
Public BanAc As Boolean
Dim Xa As Single

Sub Explorar()
If HabExp = True Then
Inicio:
If DirVal < 75 Then
If CliAct(DirVal) = True Then
frmCli.MSComm1.Output = "<" & DirVal & "/FLT?" & vbCrLf
CMe = 1
NuMe = 4
CoEn = "FLT"
BanExp = True
frmGr.Timer1.Enabled = True
frmGr.ProgressBar1.Value = Xa
Xa = Xa + 1
ElseIf CliAct(DirVal) = False Then
DirVal = DirVal + 1

94
frmGr.ProgressBar1.Value = Xa
Xa = Xa + 1
GoTo Inicio
End If
ElseIf DirVal = 75 Then
DirVal = 1
Xa = 1
Explorar
End If
ElseIf HabExp = False Then
Exit Sub
End If
End Sub
Sub LeerCliAct()
frmGr.dtaCli.Recordset.MoveFirst
While (Not frmGr.dtaCli.Recordset.EOF)
If frmGr.dtaCli.Recordset("Grupo") <> 50 Then
CliAct(frmGr.dtaCli.Recordset("Direccion")) = True
ElseIf frmGr.dtaCli.Recordset("Grupo") = 50 Then
CliAct(frmGr.dtaCli.Recordset("Direccion")) = False
End If
frmGr.dtaCli.Recordset.MoveNext
Wend
End Sub

Sub Actualizar()
NCG = 0
Y=1
frmGr.dtaCli.Recordset.MoveFirst
While (Not frmGr.dtaCli.Recordset.EOF)
If frmGr.dtaCli.Recordset("Grupo") = Gr Then
NCG = NCG + 1
NC(Y) = frmGr.dtaCli.Recordset("NomCli")
EsCli(Y) = frmGr.dtaCli.Recordset("Estado")
Y=Y+1
End If
frmGr.dtaCli.Recordset.MoveNext
Wend
For X = 0 To 9
frmCli.imgCli(X).Visible = False
frmCli.lblCli(X).Visible = False
Next X
For X = 0 To NCG - 1
frmCli.imgCli(X).Visible = True
frmCli.lblCli(X).Visible = True
Next X
For X = 0 To NCG - 1
frmCli.lblCli(X).Caption = NC(X + 1)
If EsCli(X + 1) = "Verde" Then
frmCli.lblCli(X).BackColor = &HC000&
ElseIf EsCli(X + 1) = "Rojo" Then
frmCli.lblCli(X).BackColor = &HFF&
ElseIf EsCli(X + 1) = "Gris" Then
frmCli.lblCli(X).BackColor = &HC0C0C0

95
End If
Next X
frmCli.Caption = frmGr.lblGr(Gr)
frmCli.Show
End Sub

96
Anexo B. Cdigos y protocolos de los parmetros del modem Comtech

Parameter Command Arguments for Description of arguments Response to Query Response to query
Type (InstructionC Command or (note that all arguments are ASCII numeric codes, Command (target to controller) (Instruction (target to controller)
ode and Response to that is,codes between 48 and 57)
ASCII Code and
qualifier) Query qualifier)
Tx TFQ= 8 bytes Command or Query. TFQ= (message ok) TFQ? TFQ=xxx.xxxx (same
Frequency Tx Frequency, 52 MHz to 88 MHz, (70 MHz band) or 104 TFQ? (received ok, format as command
MHz to 176 MHz, (140 MHz band). but invalid arguments arguments)
Resolution = lOOHz. found)
Example: TFQ=072.9876 (70 MHz option) TFQ* (message ok,
TFQ=148.0000 (140 MHz option) but
not permitted in
Note: Querying ' Options Fitted'(using EID?) will indicate current
mode)
if unit is 70 MHz or 140 MHz IF band
the
Tx TDR= 8 bytes Command or Query. TDR= (message ok) TDR? TDR=xxxx.xxx
Data Rate Tx Data rate, in kbps, between 2.4 kbps and 2048 kbps. TDR? (received ok, (same as command
format
Resolution = 1 bps. but invalid arguments arguments)
Example: TDR=2047.999 (which is 2047.999 kbps) found)
TFQ* (message ok,
but
not permitted in
current
mode)
Tx TFT= 1 byte, value Command or Query. TFT= (message ok) TFT? TFT=x
FEC Type 0ofthrough 8 Tx FEC coding type, where: TFT? (received ok, (same format as
0 = None (uncoded - no FEC) but invalid argument command arguments)
1 = Viterbi found)
2 = Sequential TFT* (message ok, but
3 = Viterbi + Reed-Solomon not permitted in
4 = Sequential + Reed-Solomon current
mode)
5 = Rate 3/4 QPSK Turbo (S/W Version < 1.15)
6 = Rate 21 /44 BPSK Turbo (S/W Version > 1.14)
7 = Rate 5/16 BPSK Turbo (S/W Version > 1.14)
8 = Rate 3/4 OQPSK Turbo (S/W Version > 1.18)
All other codes invalid.
Example: TFT=1 (which is Viterbi coding)
Note: If the RS Codec option is not installed, and the
argument
3 or 4 is used, the target will return TFT?
If the Turbo Codec option is not installed, and the
argument
or greater5is used, the target will return TFT? Use EID?
to
query the options fitted.
Values 5 - 8 may affect TCR and TMD.

97
Parameter Command Arguments for Description of arguments Response to Command Query Response to query
Type (InstructionC Command or (note that all arguments are ASCII numeric codes, (target to controller) (Instruction (target to
ode and Response to that is,codes between 48 and 57)
ASCII Code and controller)
qualifier) Query qualifier)
Tx TCR= 1 byte, value Command or Query. TCR= (message ok) TCR? TCR=x
FEC Code of
1,3, 7, 8 or 9 Tx FEC Code rate, where: TCR? (received ok, (same format as
Rate 1 = Rate 1/2 but invalid argument command argument)
3 = Rate 3/4 (must be set for Rate 3/4 Turbo) found)
7 = Rate 7/8 TCR* (message ok, but
8 = Rate 21/44 (must set for Rate 21/44 Turbo)* not permitted in current
9 = Rate 5/16 (must set for Rate 5/16 Turbo)* mode - for example if
All other codes invalid. Turbo is selected, and
Example: TCR=1 (which is Rate 1/2) either 1/2 or 7/8 is
* Only valid for S/W > 1.14 and EID =5500xx requested)
As a Query, returns 0 if Uncoded is selected for FEC.
Setting 8 or 9 may affect TFT and TMD.
Tx Modulation TMD= 1 byte, value of Command or Query. TMD= (message ok) TMD? TMD=x
Type 1 or 2 or 3 Tx Modulation type, where: TMD? (received ok, (same format as
1 = BPSK (must be set for Rate 21/44 or 5/16 Turbo but invalid argument command argument)
2mode)
= QPSK (must be set for Rate 3/4 Turbo QPSK mode) found)
3 = OQPSK (must be set for Rate 3/4 Turbo OQPSK TMD* (message ok, but
mode)
All other codes invalid. not permitted in current
Example: TMD=2 (which is QPSK) mode)
Tx Spectrum TSI= 1 byte, value of Command or Query. TSI= (message ok) TSI? TSI=x
Invert Oorl Tx Spectrum Invert selection, where: TSI? (received ok, but (same format as
0 = Normal, invalid arg. found) command argument)
1 = Tx Spectrum Inverted TSI* (message ok, but
All other codes invalid. not permitted in current
Example:TSI=O (which is normal) mode)
Tx TSC= 1 byte, value of Command or Query. TSC= (message ok) TSC? TSCS=x
Scrambler Oorl Tx Scrambler state, where: TSC? (received ok, (same format as
0 = Off but invalid argument command argument)
1 = On (V.35 in transparent mode, synchronous in found)
framed
mode TSQ* (message ok, but
All other codes invalid. not permitted in current
Example: TSC=1 (which is scrambler On) mode)
Tx Power Level TPL= 4 bytes Command or Query. TPL= (message ok) TPL? TPL=xx.x
Tx Output power level between 0 and -20 dBm (minus TPL? (received ok, (same format as
sign
assumed). Example: TPL=13.4 (which is-13.4 dBm) but invalid arguments command
found) arguments)
TPL* (message ok, but

98
Parameter Command Arguments for Description of arguments Response to Query Response to query
Type (InstructionC Command or (note that all arguments are ASCII numeric codes, Command (target to controller) (Instruction (target to
ode and Response to that is,codes between 48 and 57)
ASCII Code and controller)
qualifier) Query qualifier)
Tx Clock TCK= 1 byte, value Command or Query. TCK= (message ok) TCK? TCK=x
Source of
1,2 or 3 Tx Clock source, where: TCK? (received ok, (same format as
1 = Internal but invalid argument command argument)
2 = External found)
3 = Loop timed (use Rx satellite clock) TCK* (message ok,
All other codes invalid. but
not permitted in
Example: TCK=2 (which is External Clock) current
mode)
Tx Carrier TXO= 1 byte, value Command or Query. TXO= (message ok) TXO? TXO=x
On/Off State of 1 or 2
0, Tx Carrier On/Off state, where: TXO? (received ok, (Note that 2 is not a
0 = Off due to front panel or rem. control command but invalid argument valid argument when
1 =On found) used as a command)
2 = Off due to ext H/W Tx Carrier Off command (not a TXO* (message ok,
valid
argument when used as a command) but
All other codes not permitted in
invalid.
Example: TXO=1 (which is Tx Carrier On) current
mode)
Rx RFQ= 8 bytes Command or Query. RFQ= (message ok) RFQ? RFQ=xxx.xxxx
Frequency Rx Frequency, 52 MHz to 88 MHz, (70 MHz band) or 104 RFQ? (received ok, (same
format as command
MHz to 176 MHz (140 MHz band). but invalid arguments arguments)
Resolution = 100 Hz. found)
Example: RFQ=143.4567 (which is 143.4567 MHz) RFQ* (message ok,
Note: Querying ' but
Options Fitted'(using EID?) will indicate not permitted in
if unit is 70 MHz or 140 MHz IF band
the current
mode)
RxData RDR= 8 bytes Command or Query. RDR= (message ok) RDR? RDR=xxxx .xxx
Rate Rx Data rate, in bps, between 2.4 kbps and 2048 kbps. RDR? (received ok, (same format as
Resolution = 1 bps. but invalid arguments command
Example: RDR=002.400 (which is 2.4 kbps) found) arguments)
RDR* (message ok,
but
not permitted in
current
mode

99
Parameter Command Arguments for Description of arguments Response to Query Response to query
Type (InstructionC Command or (note that all arguments are ASCII numeric codes, that is, Command
(target to (Instructio (target to controller)
ode and Response to ASCII codes between 48 and 57) controller) n
Code and
qualifier) Query qualifier)
Rx FECType RFT= 1 byte, value Command or Query. RFT= (message ok) RFT? RFT=x
0ofthrough 8 Rx FEC decoding type, where: RFT? (received ok, (same format as
0 = None (uncoded - no FEC) but invalid argument command arguments)
1 = Viterbi found)
2 = Sequential RFT* (message ok,
3 = Viterbi + Reed-Solomon but permitted in
not
4 = Sequential + Reed-Solomon current
mode)
5 = Rate 3/4 QPSK Turbo (S/W Version < 1.15)
6 = Rate 21 /44 BPSK Turbo (S/W Version > 1.14)
7 = Rate 5/16 BPSK Turbo (S/W Version > 1.14)
8 - Rate 3/4 OQPSK Turbo (S/W Version > 1.18)
All other codes invalid.
Example: RFT=1 (which is Viterbi coding)
Note: If the RS Codec option is not installed, and the
argument
3 or 4 is used, the target will return RFT? If the Turbo Codec
option is not installed, and the argument 5 or greater is used,
the target will return RFT? Use EID? to query the options
Values 5-8 may affect RCR or RMD.
RxFEC RCR= 1 byte, value of Command or Query. RCR= (message ok) RCR? RCR=x
Code Rate 1,3, 7, 8 or 9 Rx FEC Code rate, where: RCR? (received ok, (same format as
1 = Rate 1/2 but invalid argument command argument)
3 = Rate 3/4 (must be set for Rate 3/4 Turbo) found)
7 = Rate 7/8 RCR* (message ok,
8 = Rate 21/44 (must set for Rate 21/44 Turbo)* but permitted in
not
9 = Rate 5/16 (must set for Rate 5/16 Turbo)* current
mode
All other codes invalid.
Example: RCR=1 (which is Rate 1/2)
* Only valid for S/W Version >1.14.
As a Query, returns 0 if Uncoded is selected for FEC. Setting
8
or 9 may affect RFT and RMD.
Rx Modulation RMD= 1 byte, value of Command or Query. RMD= (message ok) RMD? RMD=x
Type 1,2 or 3 Rx Modulation type, where: RMD? (received ok, (same format as
1 = BPSK (must be set for Rate 21/44 or 5/16 Turbo) but invalid argument command argument)
2 = QPSK (must be set for Rate 3/4 Turbo QPSK mode) found)
3 = OQPSK (must be set for Rate 3/4 Turbo OQPSK mode) RMD* (message ok,
All other codes invalid. but permitted in
not
Example: RMD=1 (BPSK) current
mode)

100
Parameter Command Arguments for Description of arguments Response to Query Response to query
Type (InstructionC Command or (note that all arguments are ASCII numeric codes, Command
(target to controller) (Instruction (target to
ode and Response to that is,codes between 48 and 57)
ASCII Code and controller)
qualifier) Query qualifier)
Rx Spectrum RSI= 1 byte, value of Command or Query. RSI= (message ok) RSI? RSI=x
Invert Oorl Rx Spectrum Invert selection, where: RSI? (received ok, (same format as
0 = Normal but invalid argument command argument)
1 = Rx Spectrum Inverted found)
All other codes invalid. RSI* (message ok, but
not permitted in
current
mode)
Rx RDS= 1 byte, value of Command or Query. RDS= (message ok) RDS? RDS=x
Descrambler Oorl Rx De-scrambler state, where: RDS? (received ok, (same format as
0 = Off but invalid argument command argument)
1 = On (V.35 in unframed mode, synchronous in framed found)
mode
All other codes invalid. RDS* (message ok,
Example: RDS=1 (which is de-scrambler On) but
not permitted in
current
mode)
Rx Demod Acq RSW= 2 bytes, Command or Query. RSW= (message ok) RSW? RSW=xx
Sweep Width numerical Rx acquisition sweep range of demodulator, in kHz, RSW? (received ok, (same format as
ranging
from 1 kHz to 30 kHz. but invalid arguments command
Example: RSW=09 (which is 9 kHz) found) arguments)
RSW* (message ok,
but
not permitted in
current
mode)
Rx Clock Mode RCK= 1 byte, value of Command or Query. RCK= (message ok) RCK? RCK=x
Oorl Rx Clock mode, where: RCK? (received ok, (same format as
0 = Buffer disabled but invalid argument command argument)
1 = Buffer enabled found)
All other codes invalid. RCK* (message ok,
Example: RCK=0 (which is buffer disable) but
not permitted in
current
mode)
Eb/No Alarm EBA= 4 bytes, Command or Query. EBA= (message ok) EBA? EBA=xx.x
Point numerical Eb/No alarm point, with a range of Eb/No between 0 and EBA? (received ok, (same format as
16 Resolution 0.1 dB.
dB. but invalid arguments command
Example: EBA=12.3 (which is Eb/No = 12.3 dB) found) arguments)
Rx Buffer Size RBS= 1 byte, value Command or Query. RBS= (message ok) RBS? RBS=x
of
1,2,3,4 or 5 Rx buffer size, where: RBS? (received ok, (same format as
1 = +/- 256 bits but invalid argument command argument)
2 = +/-512 bits found)
3=+/-1024 bits RBS* (message ok,
but
101
Parameter Command Arguments for Description of arguments Response to Query Response to query
Type (InstructionC Command or (note that all arguments are ASCII numeric codes, Command (target to controller) (Instruction (target to controller)
ode and Response to that is,codes between 48 and 57)
ASCII Code and
qualifier) Query qualifier)
Unit ITF= 1 byte, value of Command or Query. ITF= (message ok) ITF? ITF=x
Interface 1,2 or 3 Terrestrial interface type, where: ITF? (received ok, but (same format
Type 1 = EIA-422/EIA530 DCE, invalid args found) as command
2 = V.35DCE ITF* (message ok, but argument)
3 = EIA-232 (sync). not permitted in
All other codes invalid. Example: ITF=2 (V.35) current
mode)
Unit Framing FRM= 1 byte, value Command or Query. FRM= (message ok) FRM? FRM=x
Mode of
Oorl Unit operating mode, where FRM? (received ok, (same format as
0 = Unframed - transparent (distant-end M&C not but invalid argument command argument)
possible)
1 = Framed (EDMAC distant-end M&C possible) found)
Example: FRM=1 (which is framed) FRM* (message ok,
but
not permitted in
current
mode)
Unit Test TST= 1 byte, value 0 = Normal TST= (message ok) TST? TST=x
Mode of
0,1,2,3,4 or 5 1 = IF loopback TST? (received ok, (same format as
2 = Digital loopback but invalid argument command argument)
3 = I/O loopback found)
4 = Tx CW TST* (message ok, but
5 = Tx Alternating 1,0 pattern not permitted in
6 = RF loopback current
mode)
All other codes invalid. Example TST=4 (which is
transmit
CW)
Unit IF IMP= 1 byte, value of Command or Query. IMP= (message ok) IMP? IMP=x
Impedance 5 or 7 IF interface impedance, where: IMP? (received ok, (same format as
5 = 50 ohms but invalid argument command argument)
7 = 75 ohms found)
All other codes invalid. Example IMP=7 (75 ohms)
Unit Alarm MSK= 5 bytes, each Command or Query. MSK= (message ok) MSK? MSK=abcde
Mask with a value of 0 Alarm mask conditions, in the form abcde, where: MSK? (received ok, (same format as
orl a = mask Tx AIS alarm, b = mask Rx AGC alarm but invalid arguments command arguments)
c = mask buffer alarms, d = mask Rx AIS alarm found)
e = mask Eb/No alarm MSK* (message ok,
but
Setting any of these bytes to 0 unmasks alarm, setting to not permitted in
1
masks them. Example: MSK=01011 current
mode)

102
Parameter Command Arguments for Description of arguments Response to Query Response to query
Type (InstructionC Command or (note that all arguments are ASCII numeric codes, that Command
(target to controller) (Instruction (target to
ode and Response to is,
ASCII codes between 48 and 57) Code and controller)
qualifier) Query qualifier)
EDMAC Slave ESA= 4 bytes, Command or Query. ESA= (message ok) ESA? ESA=xxxx
Address numerical EDMAC Slave Address - sets the range of addresses of ESA? (received ok, (same format as
distant-
end units (modems or transceivers) which this unit will but invalid arguments command
forward messages for. Only values which are integer found) arguments)
multiples
often are permitted. (0010, 0020, 0030, 0040 etc.) ESA* (message ok, but
Example: ESA=0890 not permitted in current
Important Note: Setting the value of the EDMAC Slave mode - for example if
Address to 0000 disables this function. Setting a valid ESA= is sent to a
address
here will automatically define the unit as being an EDMAC distant-
end slave unit)
Master.
This command is only valid for an EDMAC master.
When used as a Query, it may be sent to an EDMAC
slave, will respond with the appropriate address.
which
Circuit ID string CID= 24 bytes, Command or Query. CID= (message ok) CID? CID=xxxxxxxx
ASCII Sets or queries the user-defined Circuit ID string, which is CID? (received ok, xxxxxxxxxxxxxxx
a
fixed length of 24 characters. but invalid arguments (same format as
Valid characters include: found) command
Space ( ) * + - , . / 0-9 and A-Z. arguments)
Outdoor Unit ODU= 1 byte, value Command or Query. ODU= (message ok) ODU? ODU=x
Comms of
Oorl Enables or disables communication, via an FSK serial ODU? (received ok, (same format as
link, a Comtech Transceiver (Outdoor unit).
with but invalid arguments command
0 = disabled found) arguments)
1 = enabled ODU* (message ok, but
Example: ODU=0 not permitted in current
mode)
AUPC AUP= 1 byte, value Command or Query. AUP= (message ok) AUP? AUP=x
Enable of
Oorl Enables or disables AUPC (Automatic Uplink Power AUP? (received ok, (same format as
Control).
0 = disabled 1 = enabled but invalid arguments command
Example: AUP=0 found) arguments)
Note: Framing must be selected for the AUPC feature to AUP* (message ok, but
work.
If AUPC is selected when Framing is disabled, AUP* will not permitted in current
be
returned mode)

103
Parameter Command Arguments Description of arguments Response to Query Response to query
Type (InstructionC for
Command or (note that all arguments are ASCII numeric codes, Command
(target to controller) (Instruction (target to
ode and Response to that is,codes between 48 and 57)
ASCII Code and controller)
qualifier) Query qualifier)
AUPC APP= 6 bytes, Command or Query. APP= (message ok) APP? APP=abc.cd
Parameter Defines AUPC (Automatic Uplink Power Control) APP? (received ok, (same format as
s operating Has the form abc.cd Where:
parameters. but invalid arguments command
a = Define action on max power condition: found) arguments)
0 = do nothing 1 = generate TX alarm APP* (message ok,
b = Define action on remote demod unlock: but
not permitted in
0 = go to nominal power 1 = go to max power current
mode)
c.c = Target Eb/No value, in dB, for remote demod
d = Maximum increase in Tx Power permitted, in dB
Example: APP= 015.67

Remote N/A 4 bytes, Query only. (AUPC feature) N/A REB? REB=xx.x
Eb/No numerical Returns the value of Ebi/No of the remote demod, if (see description for
Framing
is enabled. details of
Returns 99.9 if demod is unlocked. arguments)
Returns xx.x if Framing is not enabled.
Range: between 2 and 16dB. Resolution 0.2 dB.
Example: REB=12.4 (which is Eb/No = 12.4 dB)
For values > 16.0 dB, the reply will be REB=16.0
Tx Power N/A 3 bytes, Query only. (AUPC feature) N/A PLI? PLI=x.x
level numerical Returns the increase in Tx power level, in dB (from the (see description for
Increase nominal setting) due to the action of AUPC. details of
Returns x.x if AUPC is not enabled. arguments)
Example: PLI=2.3

104
Parameter Command Arguments for Description of arguments Response to Command Query Response to query

Type (InstructionC Command or (note that all arguments are ASCII numeric codes, that is, (target to controller) (Instruction (target to controller)
ode and Response to ASCII codes between 48 and 57) Code and
qualifier) Query qualifier)
Global MGC= 78 bytes, with Command or Query. Global configuration of unit, in the form: MGC= (message ok) MGC? MGC=FFF.FFFFDDD.
Configuration numerical FFF.FFFFDDDD.DDDGRMVSPP.PCX MGC? (received ok, DDDRMVSPP.PCXfff.
entries, fixed fff.ffffdddd.dddgrmvswwctt.tblOTZAAAAAUEEEEBYYY.Y but invalid arguments ffffddd.dddrmvswwctt.t
value entries, YW, where: found) blOTZAAAAAUEEEE
and delimiters F = Tx Frequency - same as TFQ= (8 bytes) BYY
D = Tx Data Rate - same as TDR= (8 bytes) Y.YYW
G = Tx FEC Coding type - same as TFT= (1 byte) (same format as
R = Tx FEC Code Rate - same as TCR= (1 byte) command arguments)
M = Tx Modulation - same as TMD= (1 byte)
V = Tx Spectrum Invert - same as TSI= (1 byte)
S = Tx Scrambler State - same as TSC= (1 byte)
P = Tx Power Level - same as TPL= (4 bytes)
C = Tx Clock Source - same as TCK= (1 byte)
X = Tx Carrier Status - same as TXO= (1 byte)
f = Rx Frequency - same as RFQ= (8 bytes)
d = Rx Data Rate - same as RDR= (8 bytes)
g = Rx FEC Decoding type - same as RFT= (1 byte)
r = Rx FEC Code Rate - same as RCR= (1 byte)
m = Rx Modulation - same as RMD= (1 byte)
v = Rx Spectrum Invert - same as RSI= (1 byte)
s = Rx De-scrambler - same as RDS= (1 byte)
w= Rx Sweep Width - same as RSW= (2 bytes)
c = Rx Clock Mode - same as RCK= (1 byte)
t = Eb/No Alarm Point - same as EBA= (4 bytes)
b = Rx Buffer Size - same as RBS= (1 byte)
I = Unit Interface Type - same as ITF= (1 byte)
O =Unit Framing Mode - same as FRM= (1 byte)
T = Unit Test Mode - same as TST= (1 byte)
Z = Unit IF Impedance - same as IMP= (1 byte)
A = Alarm Mask - same as MSK= (5 bytes)
U= ODU Comms - same as ODU= (1 byte)
B= AUPC enable - same as AUP= (1 byte)
Y = AUPC setup - same as APP= (6 bytes)
W =Stats log interval- same as SSI (1 byte)
Example:
MGC=074.56780064.0001720112.720082.65430
128.0002320116109.81211100000102361115.659

105
Parameter Command Arguments for Description of arguments Response to Query Response to query
Type (InstructionC Command or (note that all arguments are ASCII numeric codes, that Command (target to controller) (Instruction (target to controller)
ode and Response to is,
ASCII codes between 48 and 57) Code and
qualifier) Query qualifier)
Config Store CST= 1 byte, Forces the unit to store the current modem configuration in CST= (message ok) CST?n, Return the same
numerical, 0 to 9 Configuration Memory location defined by the one byte CST? (received ok, where format
astheMGC with
argument (0 to 9). but invalid arguments n is 0 to 9 the form:
Example CST=4 (Store current config in location 4) found) CST?0, or CST= for a valid
WARNING: Use with caution! If the location already CST? 1, or config, and CST*
contains
data it will be automatically overwritten. If in doubt, query CST?2, or where no valid config is
the
location first. CST?3, or found in that n
CST?4, or
CST?5, or
CST?6, or
CST?7, or
CST?8, or
CST?9
Config Load CLD= 1 byte, Command only. CLD= (message ok) N/A N/A
numerical, 0 to 9 Forces the unit to retrieve the Configuration Memory CLD? (message
location by the one byte argument (0 to 9). and to re-
defined received
ok, but an invalid
program
the unit with that stored configuration. argument was found,
CST* (message ok, but
the requested location
does not contain a valid
configuration)
Re-center Buffer RCB= None Command only. RCB= (message ok) N/A N/A
Forces the unit to re-center the receive
plesiochronous/doppler
buffer.
This command takes no arguments.
lOdB ATS= 1 byte, value of FACTORY USE ONLY ATS= (message ok) ATS? ATS=n
attenuator Oorl Modulator output lOdB attenuator setting, where ATS? (received ok, but where n is 0
set 0 = no attenuation invalid arguments or 1
1 = 10 dB attenuation found)(message ok, but
ATS*
Example: ATS=0 not permitted in current
(Used for power-level calibration) mode)

106
Command Arguments Description of arguments (note
Query
Parameter (Instruction for Command that all arguments are ASCII Response to Command Response to query (target to
(Instruction Code
Type C ode and or Response numeric codes, that is, ASCII (target to controller) controller)
and qualifier)
qualifier) to Query codes between 48 and 57)
Power level DAC set DAC= 4 bytes, FACTORY USE ONLY Modulator DAC= (message ok) DAC? DAC? DAC=xxxx
numeric power output DAC setting. An (received ok, but invalid where xxxx is a value
al argument between 0000 and 4095 arguments found) DAC* between 0000 and
is required Example: DAC=1287 (message ok, but not 4095
(Used for power-level calibration) permitted in current mode)

Write EWR= 7 bytes Command only. FACTORY USE EWR= (message ok) EWR? N/A N/A
EEPROM ONLY A command in the form (received ok, but invalid
Value ddd,aaa, where ddd is a single byte arguments found) EWR*
data value between 0 and 255, and (message ok, but not
aaa is a starting address (in the range permitted in current mode)
0 - 127) within the serial EEPROM,
where the data is to be written.
Example: EWR=127,104 means write
Set RTC DAY= 6 bytes, Command or query A command in DAY= (message ok) DAY? DAY? DAY=xxxxxx
Date numeric the form ddmmyy, where; dd = day (received ok, but invalid (same format as command
al of the month, between 01 and 31, arguments found) DAY* arguments)
mm = month of the year, between (message ok, but not
01 and 12 and yy = year, between permitted in current mode)
97 and 96 (1997 to 2000, then 2000
to 2096) Example: DAY=240457
Set RTC TIM= 6 bytes, Command or query A command in TIM= (message ok) TIM? TIM? TIM=xxxxxx (same format as
Time numeric the form hhmmss, indicating the time (received ok, but invalid command arguments)
al from midnight, where hh = hours, arguments found) TIM*
between 00 and 23; mm = minutes, (message ok, but not
between 00 and 59, and ss = permitted in current mode)
seconds, between 00 and 59
Example: TIM=231259 would be 23
Clear All Stored CAE= None Command only CAE= (message ok) N/A N/A
Events Instructs the
unit to clear all
Stored Events

107
Parameter Command Arguments Description of arguments Response to Query Response to query
Type (InstructionC for
Command or (note that all arguments are ASCII numeric codes, that Command
(target to controller) (Instruction (target to controller)
ode and Response to is,
ASCII codes between 48 and 57) Code and
qualifier) Query qualifier)
Set Statistics SSI= 1 byte, Command or Query. SSI= (message ok) SSI? SSI=x (see
Sample Interval numerical Used to set the sample interval for the Statistics Logging SSI? (received ok, description
for details of
Function. but invalid arguments argument)
SSI=x, where x = 0 to 9 in 10 minute steps. Note: setting found)
this
parameter to 0 disables the statistics logging function. SSI* (message ok, but
Example: SSI=3 means 30 minutes not permitted in
current
mode)
Clear All Stored CAS= None Command only CAS= (message ok) N/A N/A
Statistics Instructs the unit to clear all Stored Statistics
This command takes no arguments.

Retrieve next 5 N/A 75 bytes Query only N/A RNE? RNE={CR}ABCddmm


unread Stored Unit returns the oldest 5 Stored Events which have not yet yyhhmmss {CR} ABCdd
Events been read over the remote control. Reply format: {CR} Sub- mmyyhhmmss {CR} AB
body {CR} Sub-body {CR} Sub-body {CR} Sub-body {CR} Sub- Cddmmyyhhmmss {CR
body, where Sub-body= } ABCddmmyyhhmmss
ABCddmmyyhhmmss, {CR} ABCddmmyyhhm
A being the fault/clear indicator. mss
F=Fault (see description for
C=Clear details of arguments)
I=Info
B being the fault type where:
l=Unit
2=Rx Traffic
3=Tx Traffic
4=Power on/off, or log cleared
and C being the fault code, as defined under the ' FLT'
message
table entry, except Info codes, which are: 0=power off,
l=power on, 2=log cleared, 3=global config change, and
4=
redundancy config change. If there are no new events, the
unit
replies with RNE? If there are less than 5 events to be
retrieved, the remaining positions are padded with zeros.
Retrieve N/A 2 bytes, Query only. N/A NUE? NUE=xx (see
Number
ofunread numerical Unit returns the number of Stored Events which remain description for details
Stored Events unread,
in the form xx. Note: This means unread over the remote of arguments)
control - viewing the stored events from the front panel of
the
modem does not affect this value. Example reply: NUE=98

108
Parameter Command Arguments Description of arguments Response to Query Response to query
Type (InstructionC for
Command or (note that all arguments are ASCII numeric codes, that Command
(target to controller) (Instruction (target to controller)
ode and Response to is,
ASCII codes between 48 and 57) Code and
qualifier) Query qualifier)
Retrieve next 5 N/A 130 bytes Query only N/A RNS? RNS={CR}AA.ABB.B
unread Stored Unit returns the oldest 5 Stored Statistics which have not C.CD.Dddmmyyhhmm
Statistics yet read over the remote control. Reply format:
been ss{CR}AA.ABB.BC.C
{CR} Sub-body {CR} Sub-body {CR} Sub-body {CR} Sub- D.Dddmmyyhhmmss {
body {CR} Sub-body, where Sub-body= CRJAA.ABB.BC.CD.
AA.ABB.BC.CD.Dddmmyyhhmmss, Dddmmyyhhmmss {CR
AA.A = Minimum Eb/No during sample period. } AA. ABB .BC.CD .Ddd
BB.B = Average Eb/No during sample period. mmyyhhmmss {CR} AA
C.C = Max. Tx Power Level Increase during sample .ABB.BC.CD.Dddmmy
period.
D.D = Average Tx Power Level Increase during sample yhhmmss (see
period.
ddmmyyhhmmss = date/time stamp. description for details
If there are no new events, the unit replies with RNS? If of arguments)
thereless than 5 statistics to be retrieved, the remaining
are
positions
are padded with zeros.

Retrieve N/A 3 bytes, Query only. N/A NUS? NUS=xxx (see


Number unread
of numerical Unit returns the number of Stored Statistics which remain description for details
Stored
Statistics unread, in the form xxx. Note: This means unread over the of arguments)
remote control - viewing the stored events from the front
panel
of the modem does not affect this value. Example reply:
NUS=198

Rx Eb/No N/A 4 bytes, Query only. N/A EBN? EBN=xx.x (see


numerical Unit returns the value of Ebi/No, between 0 and 16dB. description for details
Resolution 0.1 dB. Returns 99.9 if demod is unlocked. of arguments)
Example: EBN=12.3 (which is Eb/No = 12.3 dB) For values
greater than 16.0 dB, the reply will be EBN=+016.
RX Coarse AGC N/A 2 bytes, Query only. N/A AGC? AGC=xx (see
numerical Unit returns the vaue of Coarse AGC setting, between 0 description for details
and 99 AGC=76
Example: of arguments
Rx Freq N/A 5 bytes, Query only. N/A RFO? RFO=nxx.x (see
Offset 1st, + or-, Unit returns the value of freq. offset of the carrier being description for details
next 4 bytes demodulated. Values range from 0 to 30 kHz, 100 Hz of arguments)
numerical resolution.Example: RFO=+02.3 (offset is +2.3 kHz)
Returns
99999 if the demod is unlocked.

109
Parameter Command Arguments for Description of arguments Response to Query Response to query
Type (InstructionC Command or (note that all arguments are ASCII numeric codes, that Command (target to controller) (Instruction (target to controller)
ode and Response to is,
ASCII codes between 48 and 57) Code and
qualifier) Query qualifier)
RxBER N/A 5 bytes Query only. N/A BER? BER=a.bEc
Unit returns the value of the estimated corrected BER in the (see description for
form a.b x lOexp-c. Fist and second bytes are value, 3rd and details of arguments)
4th bytes are the exponent. Returns 99999 if demod is
unlocked.
Example: BER=4.8E3 (BER is 4.8 x 10-3)
Redundancy N/A 1 byte, value of Query only. N/A RED? RED=x (see
State Oorl Returns the redundancy state of the unit, where: description for details
0 = Off Line (forced into standby by 1 :N or 1:1 Switch) 1 = On of arguments)
Line (normal). All other codes invalid. Example: RED=1 (On
Line)
Local/Remote LRS= 1 byte, value of Command or query (Command only if S/W > 1.13) LRS= LRS? LRS=x (see
Status Oorl As a query, returns the local/remote status of the unit, where: (message ok) description for details
0 = local of arguments)
1= remote
When used as a comand, uses the same codes for an
argument.
Example: LRS=1 (unit is in remote mode)
Extended Serial ESN= 9 bytes Command portion is FACTORY USE ONLY. Used to set or ESN= (message ok) ESN? ESN=xxxxxxxxx (see
Number numerical Query the unit' s 9 digit serial number. description for details
Unit returns its S/N, in the form xxxxxxxxx. of arguments)
Example: ESN=123451765 (S/W Version > 1.16)
Equipment N/A 6 bytes, Query only. N/A EID? EID=aaaabc (see
ID numerical Unit returns the equipment identification, and the options description for details
fitted, in the form aaaabc, where: of arguments)
aaaa defines the Modem model number. Example:
2550 is CDM-550T, no Reed-Solomon or Turbo
3550 is CDM-550T with Reed-Solomon Codec
4550 is CDM-550T with Turbo Codec fitted (Rate 3/4 QPSK
only - S/W Version less than 1.15)
5550 is CDM-550T with Turbo Codec fitted (Rate 3/4 QPSK,
plus Rate 21/44 and Rate 5/16 BPSK)
b defines the IF band, with 1 = 70MHz, 2 = 140MHz
c defines RX only, with 1 = RX/TX, 2 = RX only.
Example: EID=455011 (CDM-550T, Rate 3/4 Turbo Codec,
70 MHz band, RX/TX)

110
Parameter Command Arguments for Description of arguments Response to Query Response to query
Type (InstructionC Command or (note that all arguments are ASCII numeric codes, Command (target to controller) (Instruction (target to
ode and Response to that is,codes between 48 and 57)
ASCII Code and controller)
qualifier) Query qualifier)
Faults N/A 5 bytes, Query only. Unit returns the current fault and status codes N/A FLT? FLT=abcde (see
and first 3 bytes for Unit (hardware), Tx Traffic and Rx Traffic, in the form
the description for
Status alpha- abcde, where: details
of arguments
numerical
4th and 5th a = Unit fault status, b = Tx Traffic status,
bytes, value of c = Rx Traffic Status, d = Change in Fault Status since
0
orl last
(0 =poll
none, 1 = change), e = Change in Unit Configuration
since last poll (0 = none, 1 = change)
Unit faults:
0 = No faults
1 = Power supply fault, 5 volts
2 = Power supply fault, 12 volts
3 = Power supply fault, -5 volts
4 = Power supply fault, 18 volts
5 = Power supply fault, -12 volts
6 = RAM load fail
7 = Tx synthesiser lock
8 = Rx synthesiser
9 = Power cal Checksum error
A = FPGA main chain load fail
B = Turbo FPGA load fail
Tx Traffic status:
0 = Tx traffic OK
1 = No clock from terrestrial interface
2 = Tx FIFO slip
3 = AIS detected on incoming data
4 = AUPC upper limit reached
Rx Traffic status:
0 = Rx Traffic OK
1 = Demodulator unlocked
2 = AGC Alarm - signal level too high
3 = Frame sync lost (Reed-Solomon or EDMAC)
4 = Buffer Underflow
5 = Buffer Overflow
6 = AIS detected on incoming data
7 = Eb/No threshold exceeded

111
Anexo C. Conversor RS-232/485. Modelo 485TBLED

CONVERSOR RS-232 A RS-485


The 485TBLED converts unbalanced, full-duplex RS-232 signals to
balanced, full or half-duplex RS-422 or RS-485 signals. RS-485 is an
enhanced version of the RS-422 Standard. It allows multiple drivers and
receivers on a two-wire or four-wire system.

The RS-232 port, configured as a DCE port, has a female DB25


connector with pins 2 (TD input), 3 (RD output), and 7 (Signal Ground)
supported. Pins 4 (RTS) and 5 (CTS) are tied together, and pins 6
(DSR), 8 (CD), and 20 (DTR) are also tied together. Pins 1 (Frame
Ground) and 7 (Signal Ground) are connected straight through to the
RS-485 terminal blocks. The RS-485 terminal blocks support Transmit Data (A-) and (B+), Receive Data (A-)
and (B+), Frame Ground, Signal Ground, and +12 VDC input. See Schematic.

LEDs
The 485TBLED has two LEDs: a Transmit Data LED to show when the RS-485 driver is enabled and a
Receive Data LED showing data appearing at pin 3 of the RS-232 port. These are very useful for determining if
data is getting through the converter. Note that the TD LED indicates that the RS-485 driver is enabled. Data
must be present on pin 2 of the RS-232 side for data to be transmitted out of the RS-485 side. If no data is
present, no data will be transmitted even though the TD LED is illuminated.

Flow Control
The 485TBLED uses two different methods to enable the RS-
485 driver, either by toggling Request to Send (pin 4) of the
RS-232 side, or by automatic sensing of the data on Transmit
Data (pin 2) of the RS-232 side. This option is user selectable
by setting pushon jumpers located next to the terminal
blocks. See Fig. 1.
Removing both sets of jumpers completely can also
constantly enable the RS-485 driver and receiver. This
makes the 485TBLED act like an RS-422 converter.

Baud Rate
There is a timing component on the converter, a resistor R9, see Fig. 1. This component is part of the
automatic sensing circuit, and affects the baud rate at which the converter can be used in a two-wire setup.
This component, is factory selected to allow the converter to run at 9600 baud or higher. With this component,
the RS-485 driver will shut off approximately 1ms after the last character has been sent. If you need to change
the 485TBLED to a baud rate other than 9600 baud, you can change this component. To change the baud
rate, remove R9 and add through hole component R14, see Table 1.

Figure 2 shows how to interconnect two RS-485 converters using 4-Wire and 2- Wires.

112
The Echo jumper is used in the two-wire mode, and allows you to prevent data being sent from the RS-232
port from being echoed back to the RS-232 port. Up to 32 receivers can be driven by any one RS-485 driver,
allowing you to put to gether large systems with many drop points. If you are using termination resistors, they
should be located at opposite ends of the system.

Proper operation of any RS-485 system requires the presence of a return path. The RS-485 Standard
recommends that a third wire be used for this. For safety, a 100 ohm resistor should be connected between
Signal Ground and the "reference wire" at every drop point. While it may be possible to interconnect Signal
Grounds directly, this is not recommended due to the danger of circulating currents possibly being present.

No wire type or maximum run length is listed in the RS-485 Standard. However, the RS-422 Standard (which is
very similar) recommends number 24AWG twisted pair telephone cable with a shunt capacitance of 16
picofarads per foot, and no more than 4000 feet of distance.

Specifications: Dimensions: 2.14 x 3.32 x .725 (54.5 x 84.34 x 18.43mm)


Supply Voltage: 9 14 Vdc Temperature Range: 0 C 70 C
Data Rate: Up to 115.2 kbps Connector: DB25 Female on RS-232 side

113
114
Anexo D. Manual de usuario del SGMS

SISTEMA DE GESTION DE MODEM SATELITAL SGSM


MANUAL DE USUARIO

El sistema de Gestin de los mdems satelitales EF-Data Comtech CDM 550,


permite interactuar con cada uno de los mdems que forma parte de un enlace
satelital, permitiendo visualizar el estado general, monitoreando y cambiando, los
parmetros de operacin.

El manual de usuario, permite guiar al operador en el manejo bsico y claro del


gestor, asumiendo que el operador del SGMS, tenga los conocimientos bsicos
sobre comunicaciones y en especial el papel que juega un modem dentro de un
enlace de comunicaciones satelital.

El programa SGMS es un ejecutable llamado SGSM_VER1.0.exe.

Configuracin mnima del computador:

Procesador IBM Compatible Pentium o superior


Memoria RAM 512 MB
Espacio libre en disco duro 20 MB
Unidad de CD ROM Incorporada.
Puerto serial Incorporado.
Sistema operativo Windows XP.

Al dar doble click en el ejecutable aparecer la pantalla principal del SGMS, como
se muestra en la figura 1.

115
Figura 1.

En esta pantalla principal aparecen 4 opciones en la barra de herramientas as:

Iniciar programa

Terminal (deshabilitado)

Acerca de

Salir

Iniciar programa: Permite arrancar el programa, por lo que se inicia la


exploracin del estado de los mdems y se habilita el Terminal.

Terminal: Es una herramienta de ingeniera, diseada para personal experto, que


permite la comunicacin con un modem en especial para visualizar y configurar
algunos parmetros especficos del modem.

116
Acerca de: Presenta informacin relevante acerca de la versin y creadores.

Salir: Permite cerrar de la aplicacin.

Barra de progreso Estado de Exploracin: Bajo el titulo de Sistema de


Gestin de Modem Satelital, aparece una barra de progreso que indica la
exploracin realizada para el total de los mdems.

Clientes: Siguiendo con la pantalla inicial, se tiene una gran red tipo estrella, que
ilustra de manera sencilla, los clientes que se tienen conectados en toda la red
SCPC.

Luego de que hemos presentado la pantalla inicial, el siguiente paso es hacer


CLICK en el icono Inicial Programa. Este es el punto donde comienza la
exploracin del sistema hacia todos los mdems de los clientes involucrados, y se
habilita el icono de Terminal, para su ejecucin. Ver figura 2.

Figura 2.

117
La exploracin de los mdems se visualiza como se dijo anteriormente con la
barra de progreso Estado de Exploracin y cada seccin de la barra indica que
se ha explorado un modem. El resultado de la exploracin de cada modem,
entrega en la pantalla de los clientes un color de acuerdo a su estado de
operacin, as:

Color verde: Modem normal

Color Rojo: Modem alarmado

Color Gris: No hay comunicacin con el modem

Esta pantalla permite ver en tiempo real al operador o personal de Gestin, el


estado de operacin de los mdems, y por ende el estado del enlace satelital de
cada uno de los clientes de la red.

Si aparece una indicacin de alarma en uno de los clientes de la red, el operador


puede en este momento acceder al icono del cliente, en donde aparecer el grupo
de estaciones.

El sistema se dise para mostrar en la pantalla por grupo de clientes, ejemplo el


cliente Texaco tiene 7 estaciones remotas SCPC, distribuidas en San Andrs,
Galapa, Gualanday, Riohacha etc.; el cliente Saludcoop tiene 3 estaciones SCPC
en el Rosal, Samac, y Guaviare.

El diseo por grupo de clientes permite mostrar en forma ordenada un pequeo


grupo de iconos en la pantalla de los clientes, evitando as visualizar demasiados
elementos en la pantalla principal o de clientes.

Elegir un Cliente: Si se requiere elegir un cliente de la pantalla principal se hace


DOBLE CLICK DERECHO sobre el nombre del cliente y aparecer una nueva
pantalla donde aparecen los enlaces de dicho cliente como se muestra en la figura
3.

118
Figura3.

En la pantalla aparece entonces el nombre del cliente, y sus enlaces asociados;


cada icono representa un modem con el nombre correspondiente del enlace.

En este punto el operador tiene la opcin de ingresar a la configuracin del


modem que elija haciendo DOBLE CLICK IZQUIERDO en label con el nombre
del enlace, para verificar su configuracin y alarmas, CLICK DERECHO, para
eliminar un enlace, o agregar un nuevo enlace Agregar Cliente.

Configurar Modem: Al hacer DOBLE CLICK IZQUIERDO se ingresa al modo


monitor, en donde se indica la configuracin del modem elegido, para su revisin.
En este punto la exploracin de los modem se detiene.

Eliminar Cliente: Se elige eliminar cliente haciendo CLICK DERECHO en el


nombre del enlace; aparecer una ventana con dos opciones que indica
ELIMINAR o CANCELAR, si decide ELIMINAR, aparece un mensaje de
advertencia y debe confirmar si desea eliminar el modem, en caso afirmativo el
cliente es eliminado del grupo, por el contrario CANCELAR, normaliza la ventana
de cliente. La figura 4. Muestra la ventana.

119
Figura 4.

Agregar Nuevo Cliente: En la parte inferior derecha de la ventana del grupo


cliente, ver figura 5, aparece el botn AGREGAR CLIENTE, al hacer CLICK
sobre el, aparece una nueva ventana con tres lneas de entrada de informacin,
como se muestra en la figura 5.

Nombre cliente: Se debe ingresar el nombre del nuevo enlace


Seleccione bastidor: Aparecen los nombres de los bastidores
disponibles en la red
Direccin: Permite seleccionar una direccin disponible del bastidor elegido

120
Figura 5.

Luego de completar la informacin del nuevo enlace, y hacer CLICK en


ACEPTAR, el nuevo circuito es creado y aparecer en el grupo del cliente.
Tambin una vez se han llenado los tres campos para el nuevo enlace, se tiene la
posibilidad de cancelar la operacin, oprimiendo el botn CANCELAR.

Modo Configuracin: La pantalla inicial aparece en modo monitor que permite


observar la configuracin actual del modem seleccionado (ver figura 6). La
pantalla muestra 8 recuadros distribuidos as:

En la parte superior central se muestra el cliente y circuito


TRANSMISION, muestra los parmetros de transmisin del modem
RECEPCION, muestra los parmetros de recepcin del modem
INTERFACE, muestra los parmetros bsicos de interface y trama
MONITOR, indica bsicamente la calidad del enlace
BUCLE, realiza diferentes tipos de prueba del modem
ALARMAS PRESENTES, indica si existe en el momento alguna alarma
ALARMAS ALMACENADAS, muestra los eventos almacenados con fecha y
hora

121
Figura 6

Hasta este punto la informacin que aparece en esta pantalla solo permite ver la
configuracin; si se desea cambiar algn parmetro del modem seleccionado se
debe hacer DOBLE CLICK sobre alguno de los valores del modem, como
respuesta a este evento aparecer una solicitud de Password, que validar o no el
acceso a los cambios en la configuracin. La figura 7, muestra la ventana de
Password.

122
Figura 7

Luego de la validacin, se pueden cambiar todos los parmetros del modem


seleccionado.

Al hacer DOCLE CLICK en el valor del parmetro, aparecer una ventana que
desplegar el valor actual del dato en un display y permitir los cambios a travs
de flechas validando con ENTER o cancelando con CLEAR, en forma similar a
como se hace en el modem. La figura 8 muestra la ventana.

Figura 8

Cuando el parmetro es de seleccin se mostrar la siguiente ventana de la figura


9.

123
Figura 9

Existe una forma de realizar pruebas con el modem seleccionado a travs del
recuadro BUCLES, cuando se selecciona la lnea correspondiente, aparecen las
opciones disponibles y se puede seleccionar el tipo de prueba que se requiera. La
figura 10, muestra el recuadro de pruebas.

Figura 10

Terminal : La ventana TERMINAL se accesa desde la pantalla inicial haciendo


CLICK sobre el botn Terminal. Por ser esta una herramienta donde se debe tener
mayor conocimiento del modem y comandos de control remoto, se solicita un
Password de nivel superior. La ventana de Password se muestra en la figura 11.

124
Figura 11

La pantalla TERMINAL nos permite direccionar cualquiera de los mdems de la


red y solicitar cualquier tipo de cambio en su configuracin, adems de verificar los
valores de versin, ajuste de hora y fecha, identificacin del circuito etc., del
modem direccionado.

Terminal: es una herramienta ingenieril, que permite la comunicacin con los


comandos bsicos del modem para acceso remoto.

Figura 12

125
Terminal: Tiene un acceso llamado Manual CDM-550, que permite al usuario
autorizado consultar el manual del modem Comtech CDM-550. La ventana de
ayuda se puede ver en la figura 13.

Figura 13

Finalmente el acceso a TERMINAL detiene la exploracin de los modem, debido a


que desde esta ventana se puede direccionar y visualizar cualquier modem de la
red, por lo que se debe tener en cuenta que no habr actualizacin de los mdems
durante el tiempo que se encuentre en esta ventana.

Esperamos que este manual sea claro para el operador, sin embargo cualquier
duda favor contactar a sus creadores.

RAUL ROJAS MEDINA


CESAR HERNAN BOHORQUEZ MAHECHA

126
Anexo E. Carta viabilidad de la empresa Telefnica Telecom

127

También podría gustarte