RE: [WEB400] Checkbox naming and reference

["Don Freeman" <DFreeman@xxxxxxxxxxxxxxx>]

B.C.> 2nd parameter of zhbGetVar (if using CGIDEV2)

I believe you've got it!  I didn't even see this parm, (this project has been 
an on-the-job training exercise). OK back to work to try this out.  Thanks... 


-----Original Message-----
From: web400-bounces@xxxxxxxxxxxx [mailto:web400-bounces@xxxxxxxxxxxx]On
Behalf Of Bob Cozzi
Sent: Thursday, January 22, 2004 11:12 AM
To: 'Web Enabling the AS400 / iSeries'
Subject: RE: [WEB400] Checkbox naming and reference


This is going to be a pain but...
Only checked, checkboxes are returned via CGI.
Therefore you either (A) have to assign each a unique name and check for
that name in your GetInput routine, or assign each one a unique value (using
the same name for all of them) and then get the checkbox's value via the
"index entry" on the QzhbCGIParse procedure or the 2nd parameter of
zhbGetVar (if using CGIDEV2) or cgiGetVar() (if using the CGILIB in the RPG
ToolKit).

-Bob Cozzi


-----Original Message-----
From: web400-bounces@xxxxxxxxxxxx [mailto:web400-bounces@xxxxxxxxxxxx] On
Behalf Of Don Freeman
Sent: Thursday, January 22, 2004 12:36 PM
To: Web Enabling the AS400 / iSeries
Subject: [WEB400] Checkbox naming and reference

I have a variable number of checkboxes I am displaying in the /$section
generated by an RPG program.  The number of checkboxes is unknown until
program execution.  My problem is how do I reference each checkbox to see if
it is checked and what the value is of that checkbox:
----------------------------------------------
The HTML section looks like this:
   <tr>
     <td><div align="left"><font color="white">*</font>Contact
Type:</div></td>
     <td><div align="left">
/$ContTypList
         <INPUT TYPE=CHECKBOX 
                NAME="/%vdBoxNbr%/" 
                VALUE="/%vdContTypVal%/" 
                /%vdContTypChecked%/>/%vdContTypDsp%/<BR>
/$ContTypListX
                    <input type="hidden" name="ChkBoxTotal"
value="/%vdChkBoxTotal%/">
                    <!-- the above holds the number of checkboxes actually
generated -->
     </td>
   </tr>

-----------------------------------------------
This is one example of what the generated HTML in the section could look
like in one of many circumstances:

   <tr>
     <td><div align="left"><font color="white">*</font>Contact
Type:</div></td>
     <td><div align="left">
         <INPUT TYPE=CHECKBOX NAME="1" VALUE="*ALL" >All Contact Types<BR>
         <INPUT TYPE=CHECKBOX NAME="2" VALUE="COM MGR" checked>Compliance
Manager<BR>
         <INPUT TYPE=CHECKBOX NAME="3" VALUE="REG MGR" >Regional Manager<BR>
         <INPUT TYPE=CHECKBOX NAME="4" VALUE="GEN MGR" checked>General
Manager<BR>
         <input type="hidden" name="ChkBoxTotal" value="4">
     </td>
   </tr>
-----------------------------------------------
As you can see I now have the number of checkboxes available to me for any
looping that may be needed but I still don't know how I am going to test
each one within the loop.  

If I code (forgetting about the loop for now): 

  If (vdBoxNbr = '1') and (vdContTypChecked = 'checked'); 
     DBfield1 = vdContTypVal;
  EndIf; 

How do I reference vdContTypChecked and vdContTypVal so that I can be sure
that they are the ones associated with the first checkbox (vdBoxNbr = '1'),
and so on through checkbox #4?  


_______________________________________________
This is the Web Enabling the AS400 / iSeries (WEB400) mailing list
To post a message email: WEB400@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/web400.


_______________________________________________
This is the Web Enabling the AS400 / iSeries (WEB400) mailing list
To post a message email: WEB400@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/web400.