RE: [Security400] RTVUSRPRF/CRTUSRPRF problem withINLMNU*SIGNOFFandINLPGM *NONE

[qsrvbas@xxxxxxxxxxxx (Tom Liotta)]

I also agree, though there are least two _possible_ alternatives to QCMDEXC or 
QCAPCMD.

First is to use REXX rather than CL -- which gives a similar result to the 
QCMDEXC use in some ways anyway.

Second is to issue the CRTUSRPRF but specifying *NONE as a single value for 
each qualified parameter that allows it. Then have a series of CHGUSRPRFs that 
each only set a specific parameter value. The first would set a qualified 
INLPGM *IF* it should be other than *NONE. The second would change ATNPGM *IF* 
it wasn't *NONE... etc.

Not pretty, I know, but it actually might be less coding and less error prone 
especially during any future maintenance.

Tom Liotta

"Elvis Budimlic" wrote:

>I agree with Phil.  
>You are either going to have different paths for special values (don't
>recommend it, lots of code) or build the command string piecewise and
>use QCMDEXC to perform the CRTUSRPRF.
>
>-----Original Message-----
>
>It may be that the VCP for CRTUSRPRF doesn't like an entry for the LIB
>part of these parms, when the program part is *NONE.
>
>Although the error doesn't show it, I think this is the issue;
>
>For example INLPGM(*NONE    /       ) is what the VCP doesn't like being
>passed, instead of INLPGM(*NONE) for the cases where a special value
>(i.e. *NONE) is allowed for a parameter.
>
>If you prompt a working command that uses *NONE and do a F14, you'll see
>what I mean.
>
>HTH,
>
>--phil
>
>
>_______________________________________________
>This is the Security Administration on the AS400 / iSeries (Security400) 
>mailing list
>To post a message email: Security400@xxxxxxxxxxxx
>To subscribe, unsubscribe, or change list options,
>visit: http://lists.midrange.com/mailman/listinfo/security400
>or email: Security400-request@xxxxxxxxxxxx
>Before posting, please take a moment to review the archives
>at http://archive.midrange.com/security400.
>
>


-- 
Tom Liotta
The PowerTech Group, Inc.
19426 68th Avenue South
Kent, WA 98032
Phone  253-872-7788 x313
Fax    253-872-7904
http://www.powertechgroup.com


__________________________________________________________________
McAfee VirusScan Online from the Netscape Network.
Comprehensive protection for your entire computer. Get your free trial today!
http://channels.netscape.com/ns/computing/mcafee/index.jsp?promo=393397

Get AOL Instant Messenger 5.1 free of charge.  Download Now!
http://aim.aol.com/aimnew/Aim/register.adp?promo=380455