<%IF 0!='<>' AND ''!='<>' THEN%> <%$Data.Row_eo='even'%> <%FETCH SPLIT('<>') DISPLAY IF $name THEN $label=CALL GET('Shop.label_vselect'+$name) $vselect=CALL GET('vselect'+$name) IF $label AND $vselect THEN IF $Data.Row_eo=='even' THEN $Row_eo='odd' ELSE $Row_eo='even' ENDIF%> <%ENDIF ENDIF NEXTROW ENDFETCH%>
$label <%PRINT FORMAT("s$Shop.vselect"+$name+"_values", $vselect)%>
<%ENDIF%>