Re: validity checker program

[Vanja Jovic <vanja@xxxxxxxxx>]

Antje,

actually, depending of what exactly you want to achieve, you might not
have to handle all the parms. Validity checking program will receive, as
much input parms as you define. If you don't care about parameters, if
you just want to prevent specific group of users from using CHGOBJ, your
validity checking program might be as simple as something like:

RTVUSRPRF USRPRF(&USER)

IF &USER = ...
        SNDPGMMSG <explain why>
        SNDPGMMSG MSGID(CPF0002) MSGF(QCPFMSG) MSGTYPE(*ESCAPE)

You can find more information in CL Programming reference.

Vanja Jovic,
Canada


Antje Waelde wrote:
> 
> Hello All,
> 
> I want to restrict the CHGJOB-command.
> For this I have looked at the archive and found a tip to use a validity 
>checker
> program, but I also read, that it is difficult to handle all the parms.
> 
> I have never before wrote a validity checker-program and in the books I found
> nothing that would help me.
> 
> Can anyone help ?
> 
> Antje Waelde
> 
> ******************************************
> Antje Waelde
> Duravit AG
> 
> Werderstr. 36
> D-78132 Hornberg
> fon +49 7833 70 0
> fax +49 7833 70289
> internet http://www.duravit.de
> mailto:antje.waelde@duravit.de
> ******************************************
> 
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: david@midrange.com
> +---

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---