function ADD_SELECTION ($type, $DEFAULT, $prefix="", $id="0") {
$OUT = '';
function ADD_SELECTION ($type, $DEFAULT, $prefix="", $id="0") {
$OUT = '';
// This is a yes/no selection only!
if ($id > 0) $prefix .= "[".$id."]";
$OUT .= " <select name=\"".$prefix."\" class=\"register_select\" size=\"1\">\n";
// This is a yes/no selection only!
if ($id > 0) $prefix .= "[".$id."]";
$OUT .= " <select name=\"".$prefix."\" class=\"register_select\" size=\"1\">\n";
if (($DEFAULT > $minYear) && ($DEFAULT >= $YEAR)) {
for ($idx = $YEAR; $idx < ($YEAR + 11); $idx++) {
$OUT .= "<option value=\"".$idx."\"";
if (($DEFAULT > $minYear) && ($DEFAULT >= $YEAR)) {
for ($idx = $YEAR; $idx < ($YEAR + 11); $idx++) {
$OUT .= "<option value=\"".$idx."\"";
// Construct year selection list
for ($idx = $minYear; $idx <= $YEAR; $idx++) {
$OUT .= "<option value=\"".$idx."\"";
// Construct year selection list
for ($idx = $minYear; $idx <= $YEAR; $idx++) {
$OUT .= "<option value=\"".$idx."\"";
for ($idx = 0; $idx < 60; $idx+=5) {
if (strlen($idx) == 1) $idx = "0".$idx;
$OUT .= "<option value=\"".$idx."\"";
for ($idx = 0; $idx < 60; $idx+=5) {
if (strlen($idx) == 1) $idx = "0".$idx;
$OUT .= "<option value=\"".$idx."\"";
for ($idx = 0; $idx < 24; $idx++) {
if (strlen($idx) == 1) $idx = "0".$idx;
$OUT .= "<option value=\"".$idx."\"";
for ($idx = 0; $idx < 24; $idx++) {
if (strlen($idx) == 1) $idx = "0".$idx;
$OUT .= "<option value=\"".$idx."\"";
$OUT .= " <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_ye\" size=\"1\">\n";
for ($idx = 0; $idx <= 10; $idx++) {
$OUT .= " <option class=\"mini_select\" value=\"".$idx."\"";
$OUT .= " <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_ye\" size=\"1\">\n";
for ($idx = 0; $idx <= 10; $idx++) {
$OUT .= " <option class=\"mini_select\" value=\"".$idx."\"";
$OUT .= " <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_we\" size=\"1\">\n";
for ($idx = 0; $idx <= 4; $idx++) {
$OUT .= " <option class=\"mini_select\" value=\"".$idx."\"";
$OUT .= " <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_we\" size=\"1\">\n";
for ($idx = 0; $idx <= 4; $idx++) {
$OUT .= " <option class=\"mini_select\" value=\"".$idx."\"";
$OUT .= " <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_da\" size=\"1\">\n";
for ($idx = 0; $idx <= 31; $idx++) {
$OUT .= " <option class=\"mini_select\" value=\"".$idx."\"";
$OUT .= " <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_da\" size=\"1\">\n";
for ($idx = 0; $idx <= 31; $idx++) {
$OUT .= " <option class=\"mini_select\" value=\"".$idx."\"";
$OUT .= " <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_ho\" size=\"1\">\n";
for ($idx = 0; $idx <= 23; $idx++) {
$OUT .= " <option class=\"mini_select\" value=\"".$idx."\"";
$OUT .= " <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_ho\" size=\"1\">\n";
for ($idx = 0; $idx <= 23; $idx++) {
$OUT .= " <option class=\"mini_select\" value=\"".$idx."\"";
$OUT .= " <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_mi\" size=\"1\">\n";
for ($idx = 0; $idx <= 59; $idx++) {
$OUT .= " <option class=\"mini_select\" value=\"".$idx."\"";
$OUT .= " <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_mi\" size=\"1\">\n";
for ($idx = 0; $idx <= 59; $idx++) {
$OUT .= " <option class=\"mini_select\" value=\"".$idx."\"";
$OUT .= " <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_se\" size=\"1\">\n";
for ($idx = 0; $idx <= 59; $idx++) {
$OUT .= " <option class=\"mini_select\" value=\"".$idx."\"";
$OUT .= " <td align=\"center\"><select class=\"mini_select\" name=\"".$prefix."_se\" size=\"1\">\n";
for ($idx = 0; $idx <= 59; $idx++) {
$OUT .= " <option class=\"mini_select\" value=\"".$idx."\"";