class V1Queries(settings:InterfaceSettings) {
  val client = new OAuth2HttpClient(settings, "VersionOne-ClarityOne/1.0")

  def allMembers() = {
    val response = client.DoHttp("query.v1", """
      from: Member
      select:
        - Name
        - from: OwnedWorkitems:PrimaryWorkitem
          select:
            - Number
            - Description
            - Name
            - Estimate
      """)
    for {
      Some(L(resultsets)) <- List(JSON.parseFull(response.getBody()))
      L(resultset) <- resultsets
        M(result) <- resultset
          S(memberName) = result("Name")
          L(ownedWorkitems) = result("OwnedWorkitems:PrimaryWorkitem")
            M(workitem) <- ownedWorkitems
              S(itemName) = workitem("Name")
              S(description) = workitem("Description")
              S(itemNumber) = workitem("Number")
              D(estimate) = workitem("Estimate")
    } yield {
      (memberName, itemNumber, itemName, estimate, description)
    }
  }

}