RE: Checkbox naming and reference

Don,

If I understand this from a simple viewpoint - 
all you need to do in your cgi-rpg is to build the
java script on the fly when you write out the html code,
at that point in time you will have the total number of 
check boxes.

I have one cgi-rpg that allows for a single button to 
check or un-check all the boxes, here is the script code:

   <SCRIPT LANGUAGE="JavaScript1.2">  
function CheckALL() {            
for (var j = 1; j <=6; j++)  {                        
box = eval("document.keys.SRPI" + j + "_C");                    
if (box.checked == false) box.checked = true;                   
   }                            
  }                             
                                
function UNCheckALL() {          
for (var j = 1; j <=6; j++)  {                        
box = eval("document.keys.SRPI" + j + "_C");                    
if (box.checked == true) box.checked = false;                   
   }                            
  }                             
                                
//   End  -->                   </SCRIPT>


In this example, there are only six boxes for checking/unchecking.
I build this part of the html page after I know how many boxes I have.

I also build the html for the check boxes with the variable name; in this
case of SRPI1_C to SRPI6_C.



HTH

Mark A. Manske



-----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.