#def cdromList($cdroms, $default="")
<select name="cdrom" id="cdromlist">
  <option #slurp
#if $default then '' else 'selected'
 value="">None</option>
  #for $cdrom in $cdroms
  <option #slurp
#if $default == $cdrom.cdrom_id then 'selected' else ''
 value="$cdrom.cdrom_id">
    $cdrom.description
  </option>
  #end for
</select>
#end def

#def vmTypeList($default=None)
#for $vmtype in sorted($sipb_xen_database.Type.select(), key=lambda x: x.description)
<label>
   <input #slurp
#if $default == $vmtype then 'checked' else ''
 type="radio" name="vmtype" value="${vmtype.type_id}">${vmtype.description}</input>
</label>
#end for
#end def

#def addError(txt)
#if $varExists('txt')
#set global $error_text = $error_text + '----\n' + $txt
#else
#set global $error_text = $txt
#end if
#end def

#def errorRow($value, $err)
#if $err and $err.err_field == $value
<tr>
<td class="error" colspan="2">${str($err)}</td>
</tr>
#end if
#end def

$full_body