Discussion :

[punkoff]

Bonjour,


Dans le rapport d'exécution d'un pgm lancé via un "SBMJOB" d'un CL on a beaucoup de message de type CPC2198.

Ce message est là pour information, et nous souhaiterions l'enlever des logs pour ce CL uniquement.

Alors d'après la commande DSPMSGD on peut voir que c'est un msg de niveau 93.

Donc je suppose qu'en stipulant un niveau de filtre inférieur ca nous l'enlèverai.

Mais je souhaiterai que le rapport du CL n'affiche pas ce msg uniquement (donc sans jouer sur la valeur du filtre).

Est-ce possible ?

[K2R400]

C'est un message de sévérité 0 et non 93 !!!!

[rcordonnier]

bonjour,

si tu ne veut plus voir le message il te suffit de le monitorer dans le cl
pour un message d'info gravité 0 je ne vois pas l'interet mais pourquoi pas.

monmsg cpc2198

a plus

[punkoff]

Bein c'est qu'il génère beaucoup de logs, genre 3k de pages tous les soirs.

Je vais essayer ceci, merci.

edit: en mettant monmsg cpc2198 avant ou après le call(pgm) ca ne marche pas, j'ai toujours mes logs floodé par ce message d'information.

[Hédhili Jaïdane]

Bonjour.

essaye de modifier le niveau de log pour le mettre à 0 ou 1 par exemple dans le SBMJOB : LOG(1 *jobd *jobd), sinon je ne vois pas.

[punkoff]

Salut, en fait c'est ce que je voulais évité de faire.

[Invité(e)]

Bein c'est qu'il génère beaucoup de logs, genre 3k de pages tous les soirs.

Je vais essayer ceci, merci.

edit: en mettant monmsg cpc2198 avant ou après le call(pgm) ca ne marche pas, j'ai toujours mes logs floodé par ce message d'information.

Bonjour,

.....

Dans le rapport d'exécution d'un pgm lancé via un "SBMJOB" d'un CL on a beaucoup de message de type CPC2198.

Ce message est là pour information, et nous souhaiterions l'enlever des logs pour ce CL uniquement.

punkoff, à mon avis la question n'est pas de savoir comment effacer ce message mais plutôt, comment faire en sorte qu'il ne s'affiche plus.

Le CPC2198 correspond à un changement de curlib. Si ce message apparait de nombreuses fois, à mon sens il y a un problème à ce niveau.
Tenter d'effacer ce message revient à prendre un médicament contre la douleur lorsqu'on a une plaie. Ne serait-il pas plus judicieux de soigner la plaie plutôt que de prendre de l'aspirine en attendant qu'elle disparaisse ?

Pourquoi ce message de changement de curlib apparait-il si souvent ?

C'est à mon sens la question que tu dois te poser en analysant le programme.

A+

[punkoff]

Bonjour,


En fait le changement de curlib est "voulu", c'est un programme qui doit comparer des informations sur différent schema.


Le trip c'est qu'il tourne sur 24 points différents donc ... 24 * 2k-3k pages de logs chaque soir !

C'est pour cela que je souhaitai savoir s'il existait une commande qui permettrai de ne pas afficher un message spécifique, autre que d'augmenter le filtre sur le niveau de log gardé.

[Hédhili Jaïdane]

Salut, en fait c'est ce que je voulais évité de faire.

Salut.
Si les messages d'information sont toujours les mêmes, autant les supprimer tous (ne pas les loguer).

[jump400]

Bjr,

le CPC2198 ne peut être monitoré car il est envoyé en "completion" (achèvement) et non pas en *Escape.
Les message monitorables d'une commande sont indiqué dans l'aide en ligne (F1) de chaque commande.
La solution "chirurgicale" pour n'enlever que ce message est :

• ajouter juste après chaque CHGCURLIB un RCVMSG pour récupérer le MSGID et la clé (KEYVAR) du dernier message reçu (avec RMV(*NO) pour ne pas le supprimer en même temps au cas ou ce ne serait pas le bon),
• tester si c'est bien le msgid CPC2198
• si c'est le bon message, faire un RMVMSG à l'aide de la clé

exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
DCL        VAR(&MSGID) TYPE(*CHAR) LEN(7) 
DCL        VAR(&MSGKEY) TYPE(*CHAR) LEN(4)
...//...
CHGCURLIB  CURLIB(*CRTDFT) 
RCVMSG     MSGQ(*PGMQ) MSGTYPE(*LAST) RMV(*NO) +   
             KEYVAR(&MSGKEY) MSGID(&MSGID)         
IF         COND(&MSGID *EQ 'CPC2198') THEN(RMVMSG +
             MSGQ(*PGMQ) MSGKEY(&MSGKEY))

[punkoff]

Oki, je vois merci bien.