RE: cgi-bin problem

You need a PTF.  I just went through this same problem on two boxes.  The
PTF number slips my mind (I don't memorize them like some folks here!  :)  )
but it is on the latest CUM tape for product 5769DG1.

Bradley V. Stone
Taylor Corporation - OASIS Programmer/Analyst   
bvstone@taylorcorp.com


> -----Original Message-----
> From: Joe Teff [SMTP:jteff19@idt.net]
> Sent: Friday, May 28, 1999 1:11 PM
> To:   MidrangeDotCom
> Subject:      cgi-bin problem
> 
> I have a cgi-bin written in rpg/ile and it is working with one exception.
> I only seem to be able to get one field returned.
> 
> I have a form that requires a Customer # and Password. The form causes
> a CL to execute on my AS/400 which in turn calls an rpg/ile program.
> 
> My rpg/ile program does a bound call to QtmhRdStin using 4 parameters,
> all of which are returned by the API:
> 
>    RCVDTA which contains 'CUST=5801&PW=abcABC123'
>    RCVDTALN which contains the length of RCVDTA (1024)
>    RCVVALLN which contains 24
>    QUSEC which is the errors ds
> 
> This looks great. I'm not sure why RCVVALLN is 24. I would have expected
> 22 instead.
> 
> I then do a bound call to QtmhCvtDb with 7 parameters of which the first 5
> are
> initialized prior to calling the API:
> 
>    DBFILE which contains the file name and library of a physical file that
> has
>                   the fields CUST and PW in it along with their
> definitions.
>    RCVDTA from the first API
>    RCVDTALN from the first API
>    FORMDS data area defined with reference to file named in DBFILE so
>                       it has CUST at 5,0 and PW at 10A.
>    DBFMTLN contains the length of FORMDS (15)
>    CVTRESP contains -4 after the API was called
>    QUSEC which is the error ds
> 
> When I look at the fields CUST and PW following the second API, CUST is
> equal to 05801 but PW is all blanks. Does anyone have any ideas why
> PW wouldn't contain the value 'abcABC123'? Thanks.
> 
> Joe Teff
> 
> +---
> | 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
+---