                           A S K C A T


      Questa routine puo' essere richiamata da un programma Cobol o 
Assembler in MVS; verifica la presenza di una determinata entrata nel
catalogo VSAM o ICF; in altre parole, fornendogli in input il nome fisico
di un file VSAM, se il file e' effettivamente esistente, ritorna alcune
caratteristiche del file stesso, quali la lunghezza record e l'eventuale
lunghezza e posizione della chiave. Se non esiste (o se non e' un file 
VSAM) invece la routine finisce con un return code diverso da 0.

      Per richiamare la routine in COBOL:

      CALL 'ASKCAT' USING RC DSNAME LRECL KEYLEN RKP

      con le variabili cosi' definite:

          RC         PIC    S9(7)   COMP.
          DSNAME     PIC     X(44).
          LRECL      PIC    S9(7)   COMP.
          KEYLEN     PIC    S9(7)   COMP.
          RKP        PIC    S9(7)   COMP.

      in cui:
      RC:      al ritorno al chiamante contiene il return code (vedi
               oltre)
      DSNAME:  nome fisico del file (o della entrata che si cerca in
               catalogo)
      LRECL:   lunghezza del record (0, se il file non esiste o se
               l'entrata cercata non e' un nome Cluster o un nome di
               una parte dati di un file VSAM)
      KEYLEN:  lunghezza della chiave se il file e' un KSDS; e' uguale a
               0 se l'entrata cercata e' un ESDS
      RKP:     offset della chiave se il file e' un KSDS;



      Per richiamare la routine in ASSEMBLER:

      CALL ASKCAT,(RC,DSNAME,LRECL,KEYLEN,RKP),VL

      con le variabili cosi' definite:

      RC       DS     F
      DSNAME   DS     CL44
      LRECL    DS     F
      KEYLEN   DS     F
      RKP      DS     F

  Gli errori che la routine restituisce nella variabile RC sono:
          1 : il nome file e' la parte dati di un file VSAM
              (i valori sono comunque restituiti)
          2 : il nome file e' la parte indici di un file VSAM
          3 : il nome file e' un upgrade set
         20 : il nome file e' inesistente su catalogo
         32 : il nome file e' un NONVSAM o un GDG
       altro: vedi i return code della macro SHOWCAT

Nota:
    in MVS la ricerca viene fatta secondo quanto e' specificato nella
scheda JOBCAT o secondo quanto e' specificato negli ALIAS in Master
Catalog.

    Non si puo' usare questa routine in un programma CICS.

