;d8aa63eed0084ac0

[If:c.==.'']
  ;Get a list of all the events
  [QueryODBCSource]
  DSNString=DSN=hunt_housing;UID=visprod;PWD=ragtop;
  String=select * from events where complex_code='aeda0c68d0634f57'

  [If:num_rows==1]
    [SourceDataToFormData]

    [MakeVariable]
    Variable=%c
    UseFieldValue=code

    [FormData]
    c=%c
  [Else:]
    [If:num_rows==0]
      [MakeStringVariable]
      Variable=#content
      String=<font face="verdana, arial, sans-serif" size="1" color="#336699"><b>There are currently no events.</b></font><br><br>

      [OutputFormData]
      TplFile=events.tpl

      [Exit]
    [EndIf:]

    ;Output a list of events
    [SourceDataToString]
    String=<!-- begin --><font face="verdana, arial, sans-serif" size="1" color="#336699"><b><font size="2"><a href="events.ssd?c=<!-- code -->"><!-- event_title --></a></font></b></font><br><br><!-- end -->
    Variable=#content

    [OutputFormData]
    TplFile=events.tpl

    [Exit]
  [EndIf:]
[EndIf:]

[AppendTemplateToVariable]
Template=select * from events where code=#c alpha#
Variable=#get_event

[QueryODBCSource]
DSNString=DSN=hunt_housing;UID=visprod;PWD=ragtop;
String=#get_event

[If:num_rows==0]
  [MakeStringVariable]
  Variable=#content
  String=<font face="verdana, arial, sans-serif" size="1" color="#336699"><b>The requested event is invalid.</b></font>

  [OutputFormData]
  TplFile=events.tpl

  [Exit]
[EndIf:]

[MakeStringVariable]
Variable=#content
InputFile=template_events.tpl

[SourceDataToFormData]

;Get all the images
[AppendTemplateToVariable]
Template=select code, caption from event_images where event_code=#c alpha#
Variable=#get_images

[QueryODBCSource]
DSNString=DSN=hunt_housing;UID=visprod;PWD=ragtop;
String=#get_images

[If:num_rows!=0]
  [SourceDataToString]
  String=#content
  BlockName=images
[Else:]
  [RemoveTemplateBlock]
  BlockName=images
  String=#content
[EndIf:]

[FormDataToString]
String=#content

[OutputFormData]
TplFile=events.tpl