u4.91.21 Procédure IMPR_JEVEUX#

Syntaxe#

Détail de la syntaxe
IMPR_JEVEUX(
    ◆ ENTITE = / "DISQUE",
               / "MEMOIRE",
               / "REPERTOIRE",
               / "OBJET",
               / "ATTRIBUT",
               / "SYSTEME",
               / "ENREGISTREMENT",
    # Si: (equal_to("ENTITE", 'OBJET'))
        ◇ NOMOBJ = text,
        ◇ NUMOC = int,
        ◇ NOMOC = text,
    # Si: (equal_to("ENTITE", 'ATTRIBUT'))
        ◇ NOMOBJ = text,
        ◇ NOMATR = / "$$DESO",
                   / "$$IADD",
                   / "$$IADM",
                   / "$$NOM",
                   / "$$LONG",
                   / "$$LONO",
                   / "$$LUTI",
                   / "$$NUM",
    # Si: (equal_to("ENTITE", 'SYSTEME'))
        ◆ CLASSE = / "G",
                   / "V",
        ◇ NOMATR = / "$$CARA",
                   / "$$IADD",
                   / "$$GENR",
                   / "$$TYPE",
                   / "$$MARQ",
                   / "$$DOCU",
                   / "$$ORIG",
                   / "$$RNOM",
                   / "$$LTYP",
                   / "$$LONG",
                   / "$$LONO",
                   / "$$DATE",
                   / "$$LUTI",
                   / "$$HCOD",
                   / "$$INDX",
                   / "$$TLEC",
                   / "$$TECR",
                   / "$$IADM",
                   / "$$ACCE",
                   / "$$USADI",
    # Si: (equal_to("ENTITE", 'REPERTOIRE'))
        ◇ CLASSE = / "G",
                   / "V",
                   / " " (par défaut),
    # Si: (equal_to("ENTITE", 'DISQUE'))
        ◇ CLASSE = / "G",
                   / "V",
                   / " " (par défaut),
    # Si: (equal_to("ENTITE", 'ENREGISTREMENT'))
        ◇ CLASSE = / "G" (par défaut),
                   / "V",
        ◆ NUMERO = int,
        ◇ INFO = / 1 (par défaut),
                 / 2,
    ◇ IMPRESSION = _F(
         ◇ NOM = text,
         ◇ UNITE = unit,
      ),
    ◇ COMMENTAIRE = text,
)


◆ : obligatoire
◇ : optionnel
⟐ : présent par défaut
& : ensemble
/ : un seul parmi
| : plusieurs choix possibles

Opérandes#

Opérande ENTITE#

Les valeurs possibles de ENTITE sont :

  • “OBJET” : Appel à JEIMPO, JEPRAT (valeurs d’un objet, …),

  • “ATTRIBUT” : Appel à JEIMPA (attributs d’un objet ou d’une collection),

  • “SYSTEME” : Appel à JEPRAT (attributs d’une collection ou objets système),

  • “MEMOIRE” : Appel à JEIMPM (état de la mémoire),

  • “REPERTOIRE” : Appel à JEIMPR (répertoire d’une ou plusieurs classes),

  • “DISQUE” : Appel à JEIMPD (objets écrits sur disque),

  • “ENREGISTREMENT” : Appel à JEPREN (contenu des enregistrements du fichier associé à la base).

Les possibilités offertes par les différentes routines d’impression sont décrites dans le fascicule : Gestion mémoire JEVEUX [D6.02.01].

Si ENTITE=”OBJET” :

  • NOMOBJ : Nom d’objet simple ou nom de collection.

  • NOMOC : Nom d’objet de collection.

  • NUMOC : Numéro d’objet de collection.

Si ENTITE=”ATTRIBUT” :

  • NOMOBJ : Nom d’objet simple ou de collection.

  • NOMATR : Nom d’attribut sur 8 caractères pour:

    • une collection : $$DESO, $$IADD, $$IADM, $$NOM, $$LONG, $$LONO, $$LUTI, $$NUM.

Si ENTITE=”SYSTEME” :

  • NOMATR : Nom d’attribut sur 8 caractères pour:

    • le système : $$CARA, $$IADD, $$GENR, $$TYPE, $$MARQ, $$DOCU, $$ORIG, $$RNOM, $$LTYP, $$LONG, $$LONO, $$DATE, $$LUTI, $$HCOD, $$INDX, $$TLEC, $$TECR, $$IADM, $$ACCE, $$USADI.

  • CLASSE : Nom de la classe associée à une ou plusieurs bases de valeurs (“G”,”V”). Pour l’entité “SYSTEME” ce mot clé est obligatoire. Pour les entités “REPERTOIRE” et “DISQUE”, on imprime par défaut ce qui concerne toutes les bases ouvertes.

Opérande NUMERO#

Permet de préciser le numéro de l’enregistrement dont le contenu doit être examiné.

Opérande INFO#

Permet de préciser le niveau des impression à effectuer.

INFO=1 on se contente d’imprimer la liste des noms des objets JEVEUX présents sur l’enregistrement.

INFO=2 on imprime en plus le contenu de l’enregistrement. Cette impression est réalisée au format entier, le stockage de l’image de la mémoire JEVEUX étant réalisé sous ce type, il est donc impossible d’interpréter les autres types.

Opérandes IMPRESSION et UNITE#

Le mot-clé facteur IMPRESSION permet de choisir le fichier ou l’unité logique d’impression des informations.

  • NOM : Nom interne de fichier, vaut “MESSAGE” ou “RESULTAT”.

  • UNITE : Numéro d’unité logique.

Opérande COMMENTAIRE#

Texte apparaissant comme titre des impressions demandées.

Exemple d’utilisation#

IMPR_JEVEUX(ENTITE="OBJET", NOMOBJ="00000001.NOMMAI")

# ----------------------------------------------------------------------------------------------
# Commande #0003, ligne 1
IMPR_JEVEUX(ENTITE='OBJET',
            NOMOBJ='00000001.NOMMAI')


  ECRITURE DE L'OBJET : "00000001.NOMMAI         "

JEIMPA  IMPRESSION DES ATTRIBUTS DE >00000001.NOMMAI         <

CLAS    G
GENR    N
TYPE    K
LTYP               8
DOCU
DATE               0
NOMMAX            19
NOMUTI            19
LONO              63
IADM    ************
IADD               0
LADD               0
USAGE   U D



  CONTENU DE L'OBJET : "00000001.NOMMAI         "

 IMPRESSION SEGMENT DE VALEURS >00000001.NOMMAI                 <
 >>>>>
      1 - >M1      <>M2      <>M3      <>M4      <>M5      <>M6      <>M7      <
      8 - >M8      <>M9      <>M10     <>M11     <>M12     <>M13     <>M14     <
     15 - >M15     <>M16     <>M17     <>M18     <>M19     <


  FIN DE L'OBJET : "00000001.NOMMAI         "

# Mémoire (Mo) :   974.18 /   913.89 /   209.19 /   185.02 (VmPeak / VmSize / Optimum / Minimum)
# Fin commande #0003   user+syst:        0.00s (syst:        0.00s, elaps:        0.00s)
# ----------------------------------------------------------------------------------------------