Re: qsh error: how to turn off the error screen?

[Patrick L Archibald <Patrick.Archibald@xxxxxxxxxxxxx>]

Great find! Thanx for sharing!  PLA

albert_dalmau@roca.net wrote:

> Hello Dan,
> I Have had the same problem and Stefan Lorei solved to me this summer.
> Thanks a lot Stefan. Now I can help Dan.
> With this example your output will be disabled:
>
>             PGM
>
>             DCL        VAR(&QSHCMD) TYPE(*CHAR) LEN(1000)
>             DCL        VAR(&CLASSP) TYPE(*CHAR) LEN(1000)
>
>             CHGVAR     VAR(&CLASSP) +
>                          VALUE(".:/:/QIBM/ProdData/Http/Public/jt400+
>                          /lib/jt400Access.zip:/QIBM/ProdData/Http/Pu+
>                          blic/jt400/lib/jt400.jar")
>             ADDENVVAR  ENVVAR(CLASSPATH) VALUE(&CLASSP)
>             MONMSG     MSGID(CPFA980) EXEC(DO)
>             CHGENVVAR  ENVVAR(CLASSPATH) VALUE(&CLASSP)
>             ENDDO
>
>             ADDENVVAR  ENVVAR(QIBM_QSH_CMD_OUTPUT) VALUE(NONE)
>             MONMSG     MSGID(CPFA980) EXEC(DO)
>             CHGENVVAR  ENVVAR(QIBM_QSH_CMD_OUTPUT) VALUE(NONE)
>             ENDDO
>
>             ADDENVVAR  ENVVAR(QIBM_MULTI_THREADED) VALUE('Y')
>             MONMSG     MSGID(CPFA980) EXEC(DO)
>             CHGENVVAR  ENVVAR(QIBM_MULTI_THREADED) VALUE('Y')
>             ENDDO
>
>             CHGVAR     VAR(&QSHCMD) VALUE('java -Djava.version=1.2 +
>                          xvr.app.sip.ba.poolspa.data.as400.APIProduc+
>                          cionPedido')
>             QSH        CMD(&QSHCMD)
>
> END:        ENDPGM
>
> I hope that this can help you. Write me if you have some questions about
> this.
>
> Albert Dalmau (ROCA)
> albert_dalmau@roca.net
>
>
> _______________________________________________
> This is the Java Programming on and around the iSeries / AS400 (JAVA400-L) mailing list
> To post a message email: JAVA400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/java400-l
> or email: JAVA400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/java400-l.