E' stato trovato che la procedura "Random" non funziona correttamente.
E' stata effettuato una modifica dove la call all'API CEERAN0 è stata
sostrituita con una call all'API Qc3GenPRNs .
Questa modifica è effettiva dal rilascio CGIDEV2 del 18 Aprile 2012.
Utilizzare il comando CGIDEV2/RELEASED per stabilire la data del
rilascio installato.
Chi non voless re-installare CGIDEV2, può effettuare il fix nel modo
seguente:
1-Sostituire CGIDEV2/QRPGLESRC membro XXXRANDOM
con il sorgente alla pagina
http://www.easy400.net/easy400sources/cgidev2/qrpglesrc/xxxrandom.txt
.
2-ADDLIBLE LIB(CGIDEV2)
3-CRTRPGMOD MODULE(CGIDEV2/XXXRANDOM) SRCFILE(CGIDEV2/QRPGLESRC)
DBGVIEW(*SOURCE)
4-UPDSRVPGM SRVPGM(CGIDEV2/CGISRVPGM2) MODULE(CGIDEV2/XXXRANDOM)
Giovanni B. Perotti