Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
/* */ PGM DCL VAR(&DEVICE) TYPE(*CHAR) LEN(10) MONMSG MSGID(CPF0000) /* */ /* If a scan device transfer to QINTERW */ /* */ RTVJOBA JOB(&DEVICE) IF COND(%SST(&DEVICE 1 4) = 'SCAN') + THEN(DO) TFRJOB JOBQ(QINTERW) GOTO CMDLBL(@END) ENDDO //* */ /* If not apply default routing */ /* */ TFRJOB JOBQ(QINTER) RTGDTA('QCMDI') @END: ENDPGM
|AS400 DAYOFWEEK(GENERAL DATE)||12||425|
|iSeries change printer IP in Navigator||6||134|
|Export Data from AS400||29||791|
|Problem with a LIKE clause with a "*" inside in VB.Net accessing a DB2/400 table||7||109|