object FViewUnits: TFViewUnits
  Width = 359
  Height = 480
  ElementFont = efCSS
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  ParentFont = False
  OnCreate = WebFormCreate
  object lblEntries: TWebLabel
    Left = 54
    Top = 46
    Width = 43
    Height = 13
    Caption = 'lblEntries'
    ElementFont = efCSS
    HeightStyle = ssAuto
    HeightPercent = 100.000000000000000000
    Visible = False
    WidthPercent = 100.000000000000000000
  end
  object dblUnitsList: TWebDBListControl
    Left = 50
    Top = 146
    Width = 263
    Height = 237
    ElementID = 'units_dbl_unit_list'
    HeightStyle = ssAuto
    HeightPercent = 100.000000000000000000
    WidthPercent = 100.000000000000000000
    ChildOrder = 3
    DefaultItemClassName = 'list-group-item p-1 border-0'
    DefaultItemLinkClassName = 'list-group-link'
    ElementFont = efCSS
    ElementListClassName = 'list-group list-group-flush border-0'
    Items = <>
    Style = lsListGroup
    DataSource = wdsUnits
    ItemTemplate = 
      '<div class="list-section-header small fw-semibold bg-body-second' +
      'ary text-dark rounded-1 px-2 mb-1">(%DistrictHeader%)</div><div ' +
      'class="card border shadow-sm">  <div class="card-body py-2 px-3 ' +
      'd-flex gap-2">    <div class="flex-grow-1">      <div class="fw-' +
      'bold text-uppercase small">(%UnitName%)&nbsp;-&nbsp;(%Status%)</' +
      'div>      <div class="small text-body-secondary mb-1">(%Location' +
      '%)</div>      <div class="small">(%CallType%)</div>      <hr cla' +
      'ss="unit-divider my-1" style="width: 80px; margin-left: 0" />   ' +
      '   <div class="small officer1">(%Officer1%)</div>      <div clas' +
      's="small officer2">(%Officer2%)</div>    </div>    <div class="d' +
      '-flex flex-column justify-content-center gap-1">      <button ty' +
      'pe="button" class="btn btn-primary btn-sm btn-unit-details" data' +
      '-unitid="(%UnitId%)">Details</button>      <button type="button"' +
      ' class="btn btn-primary btn-sm btn-unit-map" data-unitid="(%Unit' +
      'Id%)">Map</button>    </div>  </div></div>'
    ListSource = wdsUnits
  end
  object wdsUnits: TWebDataSource
    AutoEdit = False
    DataSet = xdwdsUnits
    Left = 156
    Top = 410
  end
  object xdwdsUnits: TXDataWebDataSet
    Connection = DMConnection.ApiConnection
    Left = 260
    Top = 412
    object xdwdsUnitsDistrictHeader: TStringField
      FieldName = 'DistrictHeader'
    end
    object xdwdsUnitsUnitId: TStringField
      FieldName = 'UnitId'
    end
    object xdwdsUnitsUnitName: TStringField
      FieldName = 'UnitName'
    end
    object xdwdsUnitsLocation: TStringField
      FieldName = 'Location'
    end
    object xdwdsUnitsStatus: TStringField
      FieldName = 'Status'
    end
    object xdwdsUnitsOfficer1: TStringField
      FieldName = 'Officer1'
    end
    object xdwdsUnitsOfficer2: TStringField
      FieldName = 'Officer2'
    end
    object xdwdsUnitsCallType: TStringField
      FieldName = 'CallType'
    end
  end
  object xdwcUnits: TXDataWebClient
    Connection = DMConnection.ApiConnection
    Left = 58
    Top = 410
  end
end
