Je suis un petit nouveau avec ce langage, et on m'a demandé un petit programme.
Le but étant de récupérer la valeur VOL d'un CHKTAP dans une variable, afin d'utiliser cette variable, pour savoir si la bande de sauvegarde du jour est bien insérée, et surtout si c'est bien la bonne ...
Je pense que c'est assez simple pour vous, mais moi je me prends un peu la tête....
Dans mon programme je cherche à faire:
CHKTAP DEV(TAPVRT01) VOL(&VOL)
En déclarant au préalable ma variable évidemment.
S'il n'y a pas de cartouches dans le lecteur:
MONMSG MSGID(CPF6760) EXEC(CALL PGM(HL/ENVMAIL1))
S'il y en a une, je check que ce soit bien celle du jour:
IF COND((&JOUR *EQ '*MON') *AND (&VOL *EQ +
'SAVPLU')) THEN(GOTO CMDLBL(ENDPGM))
ELSE CMD(CALL PGM(HL/ENVMAIL))
S'il n'y a pas de cartouches je reçoit bien un mail.
Par contre je reçoit aussi le mail me disant que ce n'est pas la cartouche du jour.
S'il y a une cartouche avec un nom de volume qui n'a rien à voir, je ne reçoit pas le premier mail (pas de cartouches), mais je reçoit l'autre.
Si la bonne cartouche est insérée, c'est exactement la même chose.
Je pense que je ne récupère pas la valeur VOL de mon CHKTAP....