Re: RTV???? command question

[Neil Palmer <neilp@xxxxxxxxxxx>]

Cleaning up the joblog, or destroying evidence as the police might call it
?   ;-)

...Neil





"Simon Coulter" <shc@flybynight.com.au>



        To:     midrange-l@midrange.com
        cc:
        Subject:        Re: RTV???? command question



Hello Jeff,

You wrote:
>/* MOVE TO PARMS - THE MCH3601 IS FOR A NULL PTR.  IF THE COMMAND */
>/*                 DID NOT REQUEST A PARTICULAR VARIABLE, THE     */
>/*                 MCH3601 WILL OCCUR.                            */
>              CHGVAR     VAR(&IPNAME) VALUE(&RIPNAME)
>              MONMSG     MSGID(MCH3601)

You should also remove the MCH3601 message from the joblog.  There is no
point in
cluttering the joblog with unnecessary messages.  That is the difference
between a
good programmer and a merely competent one.  You should be coding:

              CHGVAR     VAR(&IPNAME) VALUE(&RIPNAME)
              MONMSG     MSGID(MCH3601) EXEC(DO)
                                 RCVMSG     MSGTYPE(*EXCP)
              ENDDO
or
              MONMSG     MSGID(MCH3601) EXEC(RCVMSG MSGTYPE(*EXCP))


<< big snip of a very nice RPG code sample here >>  ;-)

Regards,
Simon Coulter.