Re: AS400 profile API

[Simon Coulter <shc@xxxxxxxxxxxxxxxxx>]

On 05/05/2005, at 3:56 AM, DRootes@xxxxxxxx wrote:

> I'm trying to get either the QSYGETPH API or the QsyGetProfileHandle 
> API
> to work and not having much luck.  No matter what I send to them I get
> back a null value.  I've tried using CL and RPG but am having no real
> luck.  Does anyone have any examples from their own usage?  I've 
> looked at
> the security API manual but other than listing the parms, it's not much
> help.

First: What error message is returned in the error code data structure? 
Read the message and follow its recovery steps.

Second: What release of OS/400 are you using? On 530 IBM completely 
stuffed the interface to the QSYGETPH API by requiring parameters that 
were previously optional--but only if special values were not specified 
for UID or PWD in which case the required parameters are not allowed to 
be specified. They should just ignore them when inappropriate. I'm sure 
someone had a reason for this behavioural change but I cannot fathom 
it. It seems stupid to me.

On 440 and 450 the 5th and 6th parameters don't exist. On 510 and above 
you can specify the actual length and the CCSID of the password if 
using QPWDLVL of 2 or 3 but otherwise the 5th and 6th parameters are 
optional and can be specified or omitted as you please. On 530 and 
above you must NOT specify parameters 4 and 5 if UID is *CURRENT, but 
you MUST specify them in all other cases.

So make sure you comply with the rules for your version of OS/400 and 
check what error message is returned. If the error doesn't make sense 
them provide the message details and example code of your call (and 
prototype definitions) in your next append.

Regards,
Simon Coulter.
--------------------------------------------------------------------
   FlyByNight Software         AS/400 Technical Specialists

   http://www.flybynight.com.au/
   Phone: +61 3 9419 0175   Mobile: +61 0411 091 400        /"\
   Fax:   +61 3 9419 0175                                   \ /
                                                             X
                 ASCII Ribbon campaign against HTML E-Mail  / \
--------------------------------------------------------------------