Knowledge Base

MarkOneTools · Marco Riva

Reperimento livello sistema operativo

markonetoolsmarco rivablog
In questo articolo vi propongo diversi metodi per reperire il livello di sistema operativo. API QSZRTVPR PGM DCL VAR(&RCVR) TYPE(*CHAR) LEN(128) DCL VAR(&RCVRLEN) TYPE *CHAR) LEN(4) VALUE(X'00000080') DCL VAR(&FORMAT) TYPE(*CHAR) LEN(8) VALUE('PRDR0100') DCL VAR(&PRDINFO) TYPE(*CHAR) LEN(27) + VALUE('*OPSYS *CUR 0000*CODE ') DCL VAR(&ERRCODE) TYPE(*CHAR) LEN(4) + VALUE(X'00000000') CALL PGM(QSYS/QSZRTVPR) PARM(&RCVR &RCVRLEN + &FORMAT &PRDINFO &ERRCODE) SNDPGMMSG MSGID(CPF9898) MSGF(QCPFMSG) MSGDTA('RELEASE + = ' *CAT %SST(&RCVR 20 6)) ENDPGM AREA DATI QSS1MRI PGM DCL VAR(&REL) TYPE(*CHAR) LEN(6) RTVDTAARA QGPL/QSS1MRI &REL /* RTVDTAARA QUSRSYS/QSS1MRI &REL */ SNDPGMMSG MSGID(CPF9898) MSGF(Q …

Riservato agli iscritti

Per leggere l'articolo completo serve un account Faq400: è gratuito e ti dà accesso anche a Willi, l'assistente AI, e a tutta la Knowledge Base.

Prova a chiederlo a Willi

Willi, l'assistente AI della community, risponde a queste domande usando questo articolo e le altre fonti Faq400. È gratuito: iscriviti e ricevi subito la risposta.

Chi legge questo, legge anche