>
> I can get a select list to work using the vars @STATE_ABBREVIATIONS,
> @STATE_NAMES which are retrieved from %STATES. To retrieve a value from
> this hash I would enter:
> $STATES{'NY'}{'name'} or $STATES{'NY'}{'code'}...
>
> If I don't care about the list order then the following works fine:
>
> <SELECT NAME="state">
> <OPTION VALUE="[+ $STATE_ABBREVIATIONS[$row]
> +]">$STATE_NAMES[$row]</OPTION>
> </SELECT>
>
> If I attempt to re-oder the state abbreviations the abbreviations are
> ordered properly but they, of course, do not correlate to the correct
> state.
>
> I attempted to do: $STATES{$STATE_ABBREVIATIONS[$row]} for the list
> display name but it came back empty.
Should work as long as $STATES{$STATE_ABBREVIATIONS[$row]} doesn't return
undef
Shouldn't it be $STATES{$STATE_ABBREVIATIONS[$row]}{name} ?
> Can something like this be done by
> HTMLEmbperl or do I have to handle this myself?
Here is what I would do
[- @STATE_ABBREVIATIONS = sort keys %STATES -]
<SELECT NAME="state">
<OPTION VALUE="[+ $abr=$STATE_ABBREVIATIONS[$row]+]">[+
$STATES{$abr}{name}+]</OPTION>
</SELECT>
Gerald
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
