Advertisement
Comment trouver l'adresse IP de ma session
Voici comment connaître l'adresse ip de votre session :
PGM
DCL VAR(&RET) TYPE(*CHAR) LEN(900)
DCL VAR(&DEV) TYPE(*CHAR) LEN(10)
RTVJOBA JOB(&DEV)
CALL PGM(QSYS/QDCRDEVD) PARM(&RET X'0384' + 'DEVD0600' &DEV X'00000000')
SNDPGMMSG MSG('VOTRE ADRESSE IP EST + :' *BCAT %SST(&RET 878 15))
ENDPGM

Remarque :

Vous pouvez faire une commande MyIP qui appellera le programme précédent. Attention au programme lorsque vous compilez.

CMD PROMPT('Afficher mon adresse IP')

 
 
[ Retour ]