Quick_EDH : Programme de contrôle de la licence

RPG (3 et 4, free), CL, SQL, etc...
Répondre
xsammy123
Messages : 4
Enregistré le : mar. 01 oct. 2019, 13:08:08

Quick_EDH : Programme de contrôle de la licence

Message par xsammy123 »

Bonjour à toutes et tous,

Je souhaite avoir votre aide sur un programme que je souhaite mettre en place. Mais comme je ne suis pas du tout programmeur/développeur. Si quelqu'un m'aider. Voici le source. Merci.

PGM
DCL &MSGID *CHAR LEN(7)
DCL &KEYERR *CHAR LEN(70)

ADDLIBLE LIB(PMEDH)
MONMSG MSGID(CPF0000)
ADDLIBLE LIB(PMEDHTOOLS)
MONMSG MSGID(CPF0000)

PMEDH/PMSYSCOD OPT(*CHK) PRD(13)
RCVMSG MSG(&KEYERR) MSGID(&MSGID)

IF COND(%SST(&MSGID 1 5) *NE 'SYSEC03') THEN(GOTO CMDLBL(ENDPGM))

SNDPGMMSG MSG(&MSGID *BCAT &KEYERR ) MSGTYPE(*INFO) TOMSGQ(MYLIB/MYMSGQ)

ENDPGM : ENDPGM

nbonnet
Messages : 198
Enregistré le : mar. 11 sept. 2018, 08:20:13
Localisation : Lyon

Re: Quick_EDH : Programme de contrôle de la licence

Message par nbonnet »

Bonjour,

Il faut créer un membre source (ie un membre dans un fichier source, par convention QCLSRC).
Puis compiler ce source par la commande CRTBNDCL, ce qui créé le programme.

Maintenant, difficile d'en dire plus : je ne connais pas les outils maison, ni les noms de bibliothèques, fichiers etc ...
Nathanaël

xsammy123
Messages : 4
Enregistré le : mar. 01 oct. 2019, 13:08:08

Re: Quick_EDH : Programme de contrôle de la licence

Message par xsammy123 »

nbonnet a écrit :
mer. 08 déc. 2021, 09:22:39
Bonjour,

Il faut créer un membre source (ie un membre dans un fichier source, par convention QCLSRC).
Puis compiler ce source par la commande CRTBNDCL, ce qui créé le programme.

Maintenant, difficile d'en dire plus : je ne connais pas les outils maison, ni les noms de bibliothèques, fichiers etc ...
Bonjour,
Merci pour votre réponse, le membre est créé, j'ai testé le programme, je n'ai pas d'erreur mais de mémoire, je crois que l'alerte survient 7 jours avant expiration, peut-être pour ça que je ne vois pas le code SYSSEC3 dans le DSPLOG;

Cdty,

Répondre