*     ISAYUD.SIS
*
*     DEFINICIONES DE LOS ARCHIVO DE AYUDAS QUE SE PUEDE USAR POR LOS
*     SISTEMAS DE LA INSTALACION :
*
*     AYUDA POR VARIABLE (AYUDAV)
*     QUE CONTIENE LOS TEXTOS  PARA LA AYUDA DE CADA CAMPO DE LA DBD.
*     LAS LLAVES SON NOMBRE  Y  PROGRAMA, SI ESTA ULTIMA ES BLANCO SE
*     ASUME QUE ES UNA AYUDA  GENERAL  DE  LA  VARIABLE,  ES DECIR SE
*     PUEDE USAR EN TODOS LOS PROGRAMAS.
*
*     AYUDA POR AREA (AYUDAA).
*     CONTIENE LOS TEXTOS PARA LA AYUDA DE CADA AREA DE CADA PROGRAMA
*     Y POR LO TANTO ESTO ES LA LLAVE.
*
*     AYUDA POR PROGRAMA (AYUDAP).
*     CONTIENE  LOS  TEXTOS  PARA  LA  EXPILACION  DE  QUE  HACE CADA
*     PROGRAMA PARA LAS AYUDAS EN LOS MENU. LA LLAVE ES EL PROGRAMA
*
*     EN CUALQUIER CASO SI EL REGISTRO NO EXISTE, ES POR QUE NO TIENE
*     AYUDA
*----------
*   AYUDA  POR  VARIABLE  Y  PROGRAMA
*----------
ARCHIVO    AYUDAV 0   1 ' ' 'AYUDA POR VARIABLE Y PROGRAMA' 0
RECURRENTE        0 500 M 0 'AYUDA POR VARIABLE Y PROGRAMA' *
*
NOM-VAR     'NOMBRE DE VARIABLE' * R0 LL1 X 30 MAYUSCULAS
INI-PRO     'PROGRAMA'           * R0 LL1 X  4 M
TEXTO-AYUDA 'TEXTO DE AYUDA'     * R0 S T AREA 12 3 DIP 1 3 DII 0 6 6
*----------
*  AYUDA  POR  AREA  Y  PROGRAMA
*----------
ARCHIVO AYUDAA 0   1   ' ' 'AYUDA POR AREA Y PROGRAMA' 0
RECURRENTE     0 500 M 0   'AYUDA POR AREA Y PROGRAMA' *
*
NUM-AREA  'NUMERO DE AREA'  'AREA'      R0 LL1 N1 0 MX 'ZZZ9'
IGUAL      AYUDAV           INI-PRO     R0 LL1
IGUAL      AYUDAV           TEXTO-AYUDA R0   S
*----------
* AYUDA  POR  PROGRAMA
*----------
ARCHIVO    AYUDAP 0    1    ' ' 'AYUDA POR PROGRAMA' 0
RECURRENTE        0  200 M 0    'AYUDA POR PROGRAMA' *
*
IGUAL      AYUDAV  INI-PRO      R0 LL1
IGUAL      AYUDAV  TEXTO-AYUDA  R0   S
*----------
  AREA
*
  REN-CE           *  *  R0  S  N1 0
  COL-CE           *  *  R0  S  N1 0
  REN-AYUDA        *  *  R0  S  N1 0
  COL-AYUDA        *  *  R0  S  N1 0
  TOT-REN-DISP     *  *  R0  S  N1 0
  TOT-REN-AYUDA    *  *  R0  S  N1 0
  TOT-COL-AYUDA    *  *  R0  S  N1 0
  CAR-TEX          *  *  R0  S  N2 0
  AYUDA-TEXTO      *  *  R0  S  T AREA 5 DII 0 5 6 DIP 1 4
  CONDICION-AYUDA  *  *  R0  S  N1 0
  NUMERO-DE-ACCION *  *  R0  S  N1 0
