<% $col = 1 $linkcounter=1 $nbr_per_col=4 $nbr_per_col_min=5 $nbr_col=4 $add_extra_link=0 $force_break=0 $odd_nbr=0 QUERY Brand() DO IF $Brand.Numrows THEN IF $nbr_col THEN $nbr_per_col=$Numrows/$nbr_col /*Code to avoid extra columns*/ IF $Numrows%$nbr_col THEN $nbr_per_col=$nbr_per_col+1 $odd_nbr=1 ENDIF $nbr_per_col=$[I]nbr_per_col IF $nbr_per_col<$nbr_per_col_min THEN $nbr_per_col=$nbr_per_col_min ENDIF /*Handle Corner case (avoid to few columns)*/ IF ($Numrows%$nbr_per_col==0) AND $odd_nbr THEN $add_extra_link=1 $nbr_per_col=$nbr_per_col-1 ENDIF ENDIF%>

<%ENDIF DISPLAY $Level=0%>
• <%IF $Level>0 THEN PRINT ' ' x $Level ENDIF%> $*name
<%$last=$Level /*Logic for adding the column break*/ IF $force_break OR ($linkcounter%$nbr_per_col==0 AND $linkcounter<$Brand.Numrows) THEN IF NOT $add_extra_link THEN $col=$col+1 PRINT '

' $force_break=0 ELSE /*Handle Corner case (avoid to few columns)*/ $add_extra_link=0 $force_break=1 $linkcounter=$linkcounter-1 ENDIF ENDIF $linkcounter=$linkcounter+1 NEXTROW IF $Numrows THEN%>

<%ENDIF ENDQUERY%>