RE: Using CGIDEV2 - UpdHTMLVar proc

[Holden Tommy <Tommy.Holden@xxxxxxx>]

Look at the example program:
BOATSCH0 (yes that's a zero...)
in CGIDEV2/DEMOHTML

There is a <option> sample there...

Thanks,
Tommy Holden



-----Original Message-----
From: Tony Carolla [mailto:carolla@xxxxxxxxx]
Sent: Thursday, October 28, 2004 11:57 AM
To: RPG programming on the AS400 / iSeries
Subject: Using CGIDEV2 - UpdHTMLVar proc


I am trying to populate a <select> list with <option> values.  Within
the HTML template, I have the following:

<select size="1" name="WF_SiteID">
     /%WF_Sites%/
</select>

Inside the pgm, I set up a VARYING variable, and I am populating it
with each selection item using a DS:

D OptLn           DS                  Qualified
D  Chunk1                       15A   Inz('<option value="')
D  Site                          3A   Inz(*Blanks)
D  Chunk2                        2A   Inz('">')
D  SiteS                         3A   Inz(*Blanks)
D  Chunk4                        9A   Inz('</option>')

Each record in the file populates the two site fields in the DS, and
the DS gets added to the VARYING variable.

I then use UpdHTMLVar with the VARYING variable:

CallP updHTMLvar('WF_SITES':SelectOpts:InitHTMLVars);

The problem is that apparently, there is a max of 999 on a variable
length that gets sent to the web server.  The statement that replaces
the /%WF_Sites%/ variable always gets cut at 999.

Other solutions I have thought of:
  -Create 100 or so separate variables in the template, and within
the RPG, use a horrendously large select op to pin each successive
record into one of the templates (yukkk)
  -Use some other CGIDEV2 proc.

Has anybody else run into this?


-- 
"Enter any 11-digit prime number to continue..."
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.