concept TestScript {
  S scriptName, comments;
  bool active;
  S botLine1, userLine1;
  S botLine2, userLine2;
  S botLine3, userLine3;
  S botLine4, userLine4;
  S botLine5, userLine5;
}

sclass TestScripting { 
  sS serveTestScriptingAdmin(S uri, SS params) {
    S nav = p(ahref(rawBotLink(dbBotID), "Main admin") + " | " + ahref(baseLink + "/testscripts", "Test scripts admin"));
    
    HCRUD_Concepts<HandoverConfig> data = new HCRUD_Concepts<>(TestScript);

    HCRUD crud = new(rawLink("testscripts"), data) {
      S frame(S title, S contents) {
        ret hhtml(hhead_title_htmldecode(title) + hbody(
          hsansserif() + hcss_responstable()
          + nav + h1(title)
          + contents));
      }
    };
    crud.cmdsLeft = true;
    crud.tableClass = "responstable";
    ret crud.renderPage(params);
  }
}