<prog condition="SEL_CARD == 'vw'">
<table width="100%">
<td>
Below are the defined views available.  Selecting one here causes all other selection pages
to act accordingly....
Do we want to be able to provide a definition of the view?
<br>
<?sql declare vw cursor for
	select distinct flagvalue4, flagvalue3
		from lkflag
		where flagtype='View' order by flagvalue3>
<?sql open vw>
<?sql fetch vw into :ViewType, :Flagvalue3>
<prog repeat="until not found">
<input type=submit value="&ViewType;" command="SEL_VIEW=ViewType;SEL_CARD='ind'">
<?sql fetch vw into :ViewType, :Flagvalue3>
</prog>
<?sql close vw>
</td>
</table>
</prog>

