<?php
    $conn=odbc_connect('tam','','');
	if (!$conn)
	{exit("Connection Failed: " . $conn);}
	$sql_first="SELECT DISTINCT(REC) FROM POLICY p INNER JOIN INS i ON i.REC=LEFT(p.POL_IDX, 7) AND i.KEY=p.PC WHERE p.TYPE IN ('PROF', 'PROO') AND p.EXP>'10/09/99' GROUP BY i.REC";
	$rs_first=odbc_exec($conn,$sql_first);
	while (odbc_fetch_row($rs_first)) { ?>
        <tr> 
            <?php 
			$rec=odbc_result($rs_first,"REC");
            echo "<td><a href=\"update.php?code={$rec}\">{$rec}</a></td>";
            ?>
        </tr>
        <?php }
    odbc_close($conn); ?>

DECLARE	@dt char(8)
SET	@dt = '03/24/A5'

select	Convert(smalldatetime, 
		LEFT(@dt, 6) +
		Convert(Char(4),
			CASE SUBSTRING(@dt, 7, 1)
				WHEN 'A' THEN 2000
				WHEN 'B' THEN 2010
				WHEN 'C' THEN 2020
				WHEN 'D' THEN 2030
				WHEN 'E' THEN 2040
				WHEN 'F' THEN 2050
				WHEN 'G' THEN 2060
				WHEN 'H' THEN 2070
				WHEN 'I' THEN 2080
			END + Convert(smallint, RIGHT(@dt, 1))
		)
	)

$sql_first="SELECT DISTINCT(REC) FROM POLICY p INNER JOIN INS i ON i.REC=LEFT(p.POL_IDX, 7) AND i.KEY=p.PC WHERE p.TYPE IN ('PROF', 'PROO') AND Convert(smalldatetime, 
		LEFT(p.EXP, 6) +
		Convert(Char(4),
			CASE SUBSTRING(p.EXP, 7, 1)
				WHEN 'A' THEN 2000
				WHEN 'B' THEN 2010
				WHEN 'C' THEN 2020
				WHEN 'D' THEN 2030
				WHEN 'E' THEN 2040
				WHEN 'F' THEN 2050
				WHEN 'G' THEN 2060
				WHEN 'H' THEN 2070
				WHEN 'I' THEN 2080
			END + Convert(smallint, RIGHT(p.EXP, 1))
		)
	)
   >=GETDATE() GROUP BY i.REC";