Archives par mot-clé : MAP

CICS Cours

CICS – SEND MAP

La commande SEND MAP envoie les données de sortie formatées à un terminal. Il est également utilisé pour envoyer la map au terminal central à partir du programme d’application.

Syntaxe:

Vous trouverez ci-dessous la syntaxe de la commande CICS SEND MAP.

EXEC CICS SEND
   MAP('nom-map')
   MAPSET('nom-mapset')
   [FROM(zone-donnee)]
   [LENGTH(valeur-donnee)]
   [DATAONLY]
   [MAPONLY]
   [FREEKB]
   [FRSET]
   [ERASE/ERASEAUP]
   [CURSOR]
END-EXEC.

Voyons les paramètres utilisés dans la commande SEND MAP.

  • MAP(‘nom-map’)
    Spécifie le nom de la carte à utiliser.
  • MAPSET(‘nom-mapset’)
    Spécifie le nom du mapset à utiliser. Il est nécessaire sauf si le nom de l’ensemble de maps est le même que le nom de la map
  • FROM(zone-donnee)
    Spécifie la zone de données contenant les données à traiter.
  • LENGTH(valeur-donnee)
    Spécifie la longueur des données à formater en tant que valeur binaire de demi-mot. Si la zone de données qui envoie la map est plus longue que les données à mapper, LENGTH doit être spécifié.
  • MAPONLY
    Spécifie que seules les données par défaut de la carte doivent être écrites.
  • DATAONLY
    Spécifie que seules les données du programme d’application doivent être écrites (c’est-à-dire que seules les données de votre programme sont envoyées à l’écran). Toutes les données ou tous les attributs par défaut de la map sont ignorés.
  • FREEKB
    Le clavier doit être déverrouillé après l’écriture des données à l’écran. Si FREEKB n’est pas ajouté, le clavier reste verrouillé.
  • FRSET
    Flag Reset désactive la balise de données modifiée (MDT) dans l’octet d’attribut pour tous les champs de l’écran avant que ce que vous envoyez y soit placé.
  • ERASE
    Ceci est utilisé pour effacer la map à l’écran lors de l’envoi d’une map.
  • ERASEAUP
    Ceci est utilisé pour effacer la valeur précédente sur l’écran lors de l’envoi de données uniquement.
  • CURSOR
    Ceci est utilisé pour positionner le curseur sur l’écran. Le curseur est défini en déplaçant -1 sur la partie L du champ, puis en envoyant la map.

Exemple:

L’exemple suivant vous montre comment envoyer la map uniquement à l’écran.

EXEC CICS
    SEND MAP('nom-map')
         MAPSET('nom-mapset')
         FROM(MAPNOMO)
         ERASE
END-EXEC.

L’exemple suivant vous montre comment envoyer des données uniquement à l’écran à partir de la variable ‘MAPNOMO’.

EXEC CICS
    SEND MAP('nom-map')
         MAPSET('nom-mapset')
         FROM(MAPNOMO)
         DATAONLY
END-EXEC.
CICS Cours

CICS – RECEIVE MAP

La commande RECEIVE MAP est utilisée pour extraire des données d’entrée d’un terminal dans une zone de données dans un programme d’application pour traitement.

Syntaxe:

Vous trouverez ci-dessous la syntaxe de la commande CICS RECEIVE MAP.

EXEC CICS RECEIVE
   MAP('nom-map')
   MAPSET('nom-mapset')
   [INTO(zone-donnee)]
   [FROM(zone-donnee)]
   [LENGTH(valeur-donnee)]
END-EXEC.

Voyons les paramètres utilisés dans la commande RECEIVE MAP.

  • MAP(‘nom-map’)
    Spécifie le nom de la map à utiliser.
  • MAPSET(‘nom-mapset’)
    Spécifie le nom du mapset à utiliser. Il est nécessaire sauf si le nom de l’ensemble de maps est le même que le nom de la map.
  • INTO(zone-donnee)
    Spécifie la zone de données dans laquelle les données mappées doivent être écrites. Si ce champ n’est pas spécifié, le nom par défaut est le nom de la map suffixé par un I.
  • FROM(zone-donnee)
    Spécifie la zone de données contenant les données à mapper par une commande RECEIVE MAP.
  • LENGTH(valeur-donnee)
    Spécifie la longueur des données à formater en tant que valeur binaire de demi-mot. Elle ne doit pas dépasser la longueur de la zone de données FROM.

Exemple:

L’exemple suivant vous montre comment recevoir les données d’entrée dans le champ ‘MAPNOMI’.

EXEC CICS RECEIVE
           MAP('nom-map')
           MAPSET('nom-mapset')
           INTO(MAPNOMI)
END-EXEC.