Discussion :

[fabius36]

Bonjour à tous.

Alors voila, j'aurais voulu savoir comment il fallait faire pour avoir le nom du programme sur notre écran SDA.

Je m'explique, j'ai un menu général , avec des options etc.... j'en sélectionne une ca m'ouvre un autre menu, et sur cet écran, j'ai en haut a gauche le nom de l'utilisateur , a droit la date et l'heure . Avec les mots clés *user *date *time bien sur .

Mais j'aurais voulu avoir en dessous de user le nom du programme qui fonctionne derriere. par exemple cet écran fait référence a un programme RPG ou CL pour fonctionner . J'espère que vous voyez ce que je veux dire.

J'arrive a le faire en RPG, mais en CL je ne sais pas comment procéder.(A part mettre une variable avec une valeur par défaut mais ce n'est pas terrible)

Si quelqu'un peut m'aider, je serais très content

Si vous voulez plus de precision, n'hésitez pas à me demander.

D'avance merci
Coordialement.

[Hédhili Jaïdane]

Bonjour à tous.
...
J'arrive a le faire en RPG, mais en CL je ne sais pas comment procéder.(A part mettre une variable avec une valeur par défaut mais ce n'est pas terrible)

Bonjour.

Je ne sais pas comment tu as fait en RPG, tu fais la même chose en CL.

Personnellement je le fais pour le Cobol et le CL, quand un format d'écran peut être utilisé par plusieurs programmes, je mets dans le champ de l'écran prévu à cet effet, le nom du programme qui l'utilise en plus des autres informations d'identification (user, date, entreprise, application, etc...) comme pour les états d'ailleurs.

Dans le CL, quand tu fais ton DCLF, tous les champs du format sont implicitement déclarés. Donc tu remplis en dur (ou en paramètre) ta zone (PROG par exemple) du format écran par un CHGVAR avant de faire le SNDF ou le SNDRCVF.

J'espère avoir compris ce que tu voulais et que j'y ai répondu.

[K2R400]

Regarde ceci : http://www.itjungle.com/fhg/fhg042104-story03.html

[fabius36]

Regarde ceci : http://www.itjungle.com/fhg/fhg042104-story03.html

Merci a toi

J'arrive avec ceci à afficher le nom de mon programme ... mais seulement lorsque celui ci tombe en erreur. Par exemple je l'ai fais sur un programme de calculette ... et des que j'ai une erreur, par exemple je rentre un mauvais code opération(+, *) je mets une lettre, j'ai un message pour me dire entrer un bon code opération et la le nom de mon programme s'affiche.

J'ai deja fais un pas en avant ... me reste plus qu'a l'afficher des que mon écran apparait.

Si vous avez encore des idées ... je suis encore prenneur

Merci à Hédhili Jaïdane et K2R400 pour vos réponses

[FORMULARY]

Vous avez du oublier le sndpgmmsg.

Code :

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

1
2
3
SNDPGMMSG 'XXX' TOMSGQ(*SAME) MSGTYPE(*INFO)
RCVMSG PGMQ(*SAME) MSGTYPE(*INFO) SENDER(&SENDER)
CHGVAR &PGMNAME %SST(&SENDER 56 10)