source: extensions/net.sf.basedb.reggie/trunk/resources/samplereportgenerator.jsp @ 1732

<%@ page
  pageEncoding="UTF-8"
  session="false"
  import="net.sf.basedb.core.User"
  import="net.sf.basedb.core.DbControl"
  import="net.sf.basedb.core.SessionControl"
  import="net.sf.basedb.core.Application"
  import="net.sf.basedb.clients.web.Base" 
  import="net.sf.basedb.clients.web.extensions.ExtensionsControl"
%>
<%@ taglib prefix="base" uri="/WEB-INF/base.tld" %>
<%@ taglib prefix="p" uri="/WEB-INF/path.tld" %>
<%
final SessionControl sc = Base.getExistingSessionControl(request, true);
final String ID = sc.getId();
final float scale = Base.getScale(sc);
final String home = ExtensionsControl.getHomeUrl("net.sf.basedb.reggie");
DbControl dc = null;
try
{
  dc = sc.newDbControl();
  final User user = User.getById(dc, sc.getLoggedInUserId());
  %>
<base:page type="default" >
<base:head scripts="ajax.js" styles="path.css">
  <link rel="stylesheet" type="text/css" href="css/reggie.css">
  <script language="JavaScript" src="reggie.js" type="text/javascript" charset="UTF-8"></script>
    
    
  <script language="JavaScript">
  var currentStep = 1;
  var debug = false;
  var numCols;
  var unknownSite = 0;
  var unknownCreation;
  
  var month=new Array(12);
    month[0]="Jan";
    month[1]="Feb";
    month[2]="Mar";
    month[3]="Apr";
    month[4]="May";
    month[5]="Jun";
    month[6]="Jul";
    month[7]="Aug";
    month[8]="Sep";
    month[9]="Oct";
    month[10]="Nov";
    month[11]="Dec";
  
  var intervalIsValid = true;
  
  function goNext()
  {
    if (currentStep == 1)
    {
      gotoStep2();
    }
  }
  
  function gotoStep2()
  {
    var frm = document.forms['reggie'];
    frm.reporttype.disabled = true;
    if (frm.reporttype[frm.reporttype.selectedIndex].value == 'samplecount')
    {
      Main.show('sampleCountSection');
    }
    else if (frm.reporttype[frm.reporttype.selectedIndex].value == 'consentcount')
    {
      Main.show('consentCountSection');
    }
        
    Main.show('gocreate');    
    Main.hide('gonext');
    frm.fromdate.focus();
    currentStep = 2;
  }
  
  function dateOnChange()
  {
    var frm = document.forms['reggie'];   
    var fdate;
    var tdate;
    
    intervalIsValid = false;
    setInputStatus('displayInterval','','valid');
    if (frm.fromdate.value != null && frm.fromdate.value != '')
    {
      frm.fromdate.value = autoFillDate(frm.fromdate.value);      
      if (!Dates.isDate(frm.fromdate.value, 'yyyyMMdd'))
      {
        setInputStatus('displayInterval','Not a valid from-date', 'invalid');
        return;
      }
      else
      {
        fdate = frm.fromdate.value;
        fdate = new Date(fdate.substr(0,4), parseInt(fdate.substr(4,2), 10)-1, fdate.substr(6,2));
      }
    }
    
    if (frm.todate.value != null && frm.todate.value != '')
    {
      frm.todate.value = autoFillDate(frm.todate.value);
      if (!Dates.isDate(frm.todate.value, 'yyyyMMdd'))
      {
        setInputStatus('displayInterval', 'Not a valid to-date', 'invalid');
        return;
      }
      else
      {
        tdate = frm.todate.value;
        tdate = new Date(tdate.substr(0,4), parseInt(tdate.substr(4,2), 10)-1, tdate.substr(6,2));
      }
    }
    
    if (tdate != null && fdate != null)
    {
      if (fdate > tdate)
      {
        setInputStatus('displayInterval', 'Invalid period', 'invalid')
        return;
      }     
    }
    intervalIsValid = true;
  }
  
  function goCreate()
  {
    if (!intervalIsValid) return;
    var cellElement = document.getElementById('reportcell');
    var frm = document.forms['reggie'];   
    frm.fromdate.disabled = true;
    frm.todate.disabled = true;
    frm.viewtype.disabled = true;
    Main.hide('gocreate');
    Main.show('reportSection');
    var reportType = frm.reporttype[frm.reporttype.selectedIndex].value;    
    var url = 'SampleReport.servlet?ID=<%=ID%>&cmd='+reportType;    
    
    if (reportType == 'samplecount')
    {     
      if (frm.fromdate.value != null) url += '&fdate='+frm.fromdate.value;
      if (frm.todate.value != null) url += '&tdate='+frm.todate.value;
      if (frm.viewtype.value != null) url += '&vtype='+frm.viewtype.value;
    }
    var request = Ajax.getXmlHttpRequest();
    request.open("GET", url, false);
    request.send(null);
    
    if (debug) Main.debug(request.responseText);    
    var response = JSON.parse(request.responseText);  
    if (response.status != 'ok')
    {
      setFatalError(response.message);
      return false;
    }
    var report = response.report;
    var reportTable;
    
    if (report != null)
    {
      if ('samplecount' == reportType)
      {     
        reportTable = createSampleCountReport(report);
      }
      else if ('consentcount' == reportType)
      {     
        reportTable = createConsentCountReport(report);
      }
    }
    else
    {
      var messageCell = getTableCellElement('No values could be found during given period', 'reportheader');
      var messageRow = document.createElement('tr');
      messageRow.appendChild(messageCell);      
      var messageTable = getReportTable();
      messageTable.appendChild(messageRow);
      reportTable = messageTable;     
    }
    setInnerHTML('reportcell', '');
    cellElement.appendChild(reportTable);
    var summaryList = document.createElement('ul');
    if (unknownSite == null) unknownSite = 0;
    if (unknownCreation == null) unknownCreation = 0;
    if ('samplecount' == reportType)
    {     
      summaryList.appendChild(getListElement(unknownSite + ' specimens registered to unknown sites.'));
      summaryList.appendChild(getListElement(unknownCreation + ' specimens without creation date. These are included in the \'Total\' column.'));
    }
    else if ('consentcount' == reportType)
    {
      var numDuplicates = 0;
      if (report != null)
      {
        var statistics = report.statistics;
        numDuplicates = statistics.duplicateKey;
      }
      if (numDuplicates == null)
      {
        numDuplicates = 0;
      }
      summaryList.appendChild(getListElement(unknownSite + ' consents registered to unknown sites.'));
      summaryList.appendChild(getListElement(unknownCreation + ' consents without known date.'));
      summaryList.appendChild(getListElement(numDuplicates + ' duplicates ignored.'));

      var patientsWithMultipleDates = statistics.patientsWithMultipleDatesKey;
      var counter = 0;
      for (var key in patientsWithMultipleDates)
      {
        counter++;
      }
      var patientsWithMultipleDatesText = counter + ' patients with multiple dates.';
      summaryList.appendChild(getListElement(patientsWithMultipleDatesText));
    }
    cellElement.appendChild(summaryList);
    if ('consentcount' == reportType)
    {
      // Add table with patients with consents with multiple dates
      var multipleDatesTable = createConsentTablePatientsWithMultipleDates(report);
      cellElement.appendChild(multipleDatesTable);
    }
    Main.show('gorestart');   
  }
  
  function createSampleCountReport(report)
  {
    var reportTable = getReportTable();
    var sdString = report.beginDate;
    var edString = report.endDate;
    var psdString = report.periodBeginDate;
    var ldString = report.latestDate;
    var startDate = new Date();
    startDate.setYear(sdString.substr(0,4));
    startDate.setMonth(sdString.substr(4,2)-1);
    startDate.setDate(sdString.substr(6));
    var endDate = new Date();
    endDate.setYear(edString.substr(0,4));
    endDate.setMonth(edString.substr(4,2)-1);
    endDate.setDate(edString.substr(6));
    var periodStartDate = new Date();
    periodStartDate.setYear(psdString.substr(0,4));
    periodStartDate.setMonth(psdString.substr(4,2)-1);
    periodStartDate.setDate(psdString.substr(6));
    var latestDate;
    if (ldString != null)
    {
      latestDate = new Date();
      latestDate.setYear(ldString.substr(0,4));
      latestDate.setMonth(ldString.substr(4,2)-1);
      latestDate.setDate(ldString.substr(6));
    }   
    
    var viewType = report.viewType;   
  
    var headerRow = document.createElement('tr');   
    var subHeaderRowYear = document.createElement('tr');
    var columnHeaderRow = document.createElement('tr');
    
    var headerText = '# Specimen by ';
    if (viewType == 'WEEK')
    { 
      var startWeek = getISOWeekNumber(periodStartDate);
      var endWeek = getISOWeekNumber(endDate);
      var tempDate = new Date(periodStartDate.getFullYear(), periodStartDate.getMonth(), periodStartDate.getDate()-periodStartDate.getDay()+1);
      numCols = 0;
      while (tempDate < endDate)
      {
        numCols++;
        tempDate.setDate(tempDate.getDate()+7);
      }
      headerText += 'week';
    }
    else if (viewType == 'MONTH')
    {
      numCols = (endDate.getFullYear()-periodStartDate.getFullYear())*12 + endDate.getMonth()-periodStartDate.getMonth()+1;
      headerText += 'month';
    }
    else if (viewType == 'QUARTER')
    {
      //First year
      numCols = 4 - Math.floor(periodStartDate.getMonth()/3);
      numCols += Math.floor(endDate.getMonth()/3)+1;
      if((endDate.getFullYear() - periodStartDate.getFullYear()) > 1)
      {
        numCols += 4 * (endDate.getFullYear() - periodStartDate.getFullYear()-1);
      }
      headerText += 'quarter';
    }
    else
    {
      numCols = endDate.getFullYear() - periodStartDate.getFullYear() + 1;
      headerText += 'year';
    }
      
    // Set table header
    headerText += ' (between ' + startDate.getFullYear()+'-';
    if ((startDate.getMonth()+1) < 10)
    {
      headerText += '0' + (startDate.getMonth()+1);
    }
    else
    {
      headerText += (startDate.getMonth()+1);
    }
    headerText += '-';
    if (startDate.getDate() < 10)
    {
      headerText += '0' + startDate.getDate();
    }
    else
    {
      headerText += startDate.getDate();
    }
    headerText += ' and ';
    headerText += endDate.getFullYear()+'-';
    if ((endDate.getMonth()+1) < 10)
    {
      headerText += '0' + (endDate.getMonth()+1);
    }
    else
    {
      headerText += (endDate.getMonth()+1);
    }
    headerText += '-';
    if (endDate.getDate() < 10)
    {
      headerText += '0' + endDate.getDate();
    }
    else
    {
      headerText += endDate.getDate();
    }
    headerText += ')';
    if (latestDate != null)
    {
      headerText += '\nLast registration ' + latestDate.getFullYear();
      headerText += '-';
      if ((latestDate.getMonth()+1) < 10)
      {
        headerText += '0';
      }
      headerText += (latestDate.getMonth()+1);
      headerText += '-';
      if (latestDate.getDate()<10)
      {
        headerText += '0';
      }
      headerText += latestDate.getDate();
    }   
    headerRow.appendChild(getTableCellElement(headerText, 'reportheader', (numCols+4)));
    
    // Sub headers
    // Only if each datacol is less then a year
    if (viewType != 'YEAR')
    {
      subHeaderRowYear.appendChild(getTableCellElement('', 'reportsubheader', 2));
      addYearSubHeaders(periodStartDate, endDate, subHeaderRowYear, viewType);      
      subHeaderRowYear.appendChild(getTableCellElement('', 'reportsubheader', 2));
    }   
          
    // Columnsheader    
    var siteHeader = getTableCellElement('Site', 'reportsubheader');      
    var startDateHeader = getTableCellElement('Start date','reportsubheader');
    columnHeaderRow.appendChild(siteHeader);
    columnHeaderRow.appendChild(startDateHeader); 
    
    if (viewType == 'MONTH') addMonthColumnHeaders(columnHeaderRow, periodStartDate);
    else if (viewType == 'WEEK') addWeekColumnHeaders(columnHeaderRow, periodStartDate);
    else if (viewType == 'QUARTER') addQuarterColumnHeaders(columnHeaderRow, periodStartDate);
    else if (viewType == 'YEAR') addYearSubHeaders(periodStartDate, endDate, columnHeaderRow, viewType);
    
    
    columnHeaderRow.appendChild(getTableCellElement('Sum', 'reportsubheader'));
    columnHeaderRow.appendChild(getTableCellElement('Total', 'reportsubheader'));

    // Build table      
    reportTable.appendChild(headerRow);
    reportTable.appendChild(subHeaderRowYear);
    reportTable.appendChild(columnHeaderRow);
          
    // Data rows      
    addDataRowsToTable(report, reportTable);
      
    // Add a row with the combined numbers for all sites for each period
    var sitesCombinedRow = document.createElement('tr');
    sitesCombinedRow.appendChild(getTableCellElement('Sites combined', 'colsummary'));
    sitesCombinedRow.appendChild(getTableCellElement('', 'colsummary'));
    // Get combined numbers for all sites for each period
    var statistics = report.statistics;
    var sitesCombined = statistics.sitesCombinedKey;    
    var sortedKeyArray = createSortedPeriodArray(report, numCols);
    var key;
    for (arrayIndex in sortedKeyArray)
    {
      key = sortedKeyArray[arrayIndex];
      var data = getJSONData(sitesCombined, key);
      // Add entry with sample sum for site for selected time period
      sitesCombinedRow.appendChild(getTableCellElement(data,'colsummary'));
    }
    // Get total number of samples for site for the selected time period
    var sum = statistics.sumKey;
    // Add entry with total number of samples for site for the selected time period
    sitesCombinedRow.appendChild(getTableCellElement(sum, 'colsummary'));
    // Get total number of samples for all sites, regardless of creation date
    var total = statistics.totalKey;
    // Add entry with total number of samples for all sites, regardless of creation date
    sitesCombinedRow.appendChild(getTableCellElement(total, 'colsummary'));
    reportTable.appendChild(sitesCombinedRow);  

    return reportTable;
  }
  
  function createConsentCountReport(report)
  {
    var reportTable = getReportTable();
/*
    var sdString = report.beginDate;
    var edString = report.endDate;
    var psdString = report.periodBeginDate;
    var ldString = report.latestDate;
    var startDate = new Date();
    startDate.setYear(sdString.substr(0,4));
    startDate.setMonth(sdString.substr(4,2)-1);
    startDate.setDate(sdString.substr(6));
    var endDate = new Date();
    endDate.setYear(edString.substr(0,4));
    endDate.setMonth(edString.substr(4,2)-1);
    endDate.setDate(edString.substr(6));
    var periodStartDate = new Date();
    periodStartDate.setYear(psdString.substr(0,4));
    periodStartDate.setMonth(psdString.substr(4,2)-1);
    periodStartDate.setDate(psdString.substr(6));
    var latestDate;
    if (ldString != null)
    {
      latestDate = new Date();
      latestDate.setYear(ldString.substr(0,4));
      latestDate.setMonth(ldString.substr(4,2)-1);
      latestDate.setDate(ldString.substr(6));
    }   
    
    var viewType = report.viewType; 
*/  
  
    var headerRow = document.createElement('tr');   
    var subHeaderRow = document.createElement('tr');
    var columnHeaderRow = document.createElement('tr');
    
    var numCols = 8;
    var numDecimals = 0;
    var headerText = '# Consent forms of different types for cases and blood samples';
    headerRow.appendChild(getTableCellElement(headerText, 'reportheader', (numCols+3)));
    
    // Subheader    
    subHeaderRow.appendChild(getTableCellElement('', 'reportsubheader'));
    subHeaderRow.appendChild(getTableCellElement('', 'reportsubheader'));
    
    //subHeaderRow.appendChild(getTableCellElement('Yes', 'reportsubheader'));
    subHeaderRow.appendChild(getTableCellElement('Yes', 'reportsubheader'));
    subHeaderRow.appendChild(getTableCellElement('Yes', 'reportsubheader'));
    subHeaderRow.appendChild(getTableCellElement('Yes', 'reportsubheader'));
    subHeaderRow.appendChild(getTableCellElement('No', 'reportsubheader'));
    subHeaderRow.appendChild(getTableCellElement('No', 'reportsubheader'));
    subHeaderRow.appendChild(getTableCellElement('Not asked', 'reportsubheader'));
    subHeaderRow.appendChild(getTableCellElement('Not asked', 'reportsubheader'));
    //subHeaderRow.appendChild(getTableCellElement('Other', 'reportsubheader'));
    subHeaderRow.appendChild(getTableCellElement('Missing', 'reportsubheader'));
    subHeaderRow.appendChild(getTableCellElement('', 'reportsubheader'));
    //subHeaderRow.appendChild(getTableCellElement('', 'reportsubheader'));

    // Columnsheader    
    var siteHeader = getTableCellElement('Site', 'reportsubheader');      
    var startDateHeader = getTableCellElement('Start date','reportsubheader');
    columnHeaderRow.appendChild(siteHeader);
    columnHeaderRow.appendChild(startDateHeader); 
    
    //columnHeaderRow.appendChild(getTableCellElement('Yes', 'reportsubheader'));
    columnHeaderRow.appendChild(getTableCellElement('date, PAT#', 'reportsubheader'));
    columnHeaderRow.appendChild(getTableCellElement('date, no PAT#', 'reportsubheader'));
    columnHeaderRow.appendChild(getTableCellElement('no date', 'reportsubheader'));
    columnHeaderRow.appendChild(getTableCellElement('date', 'reportsubheader'));
    columnHeaderRow.appendChild(getTableCellElement('no date', 'reportsubheader'));
    columnHeaderRow.appendChild(getTableCellElement('date', 'reportsubheader'));
    columnHeaderRow.appendChild(getTableCellElement('no date', 'reportsubheader'));
    //columnHeaderRow.appendChild(getTableCellElement('', 'reportsubheader'));
    columnHeaderRow.appendChild(getTableCellElement('', 'reportsubheader'));
    columnHeaderRow.appendChild(getTableCellElement('Sum', 'reportsubheader'));
    //columnHeaderRow.appendChild(getTableCellElement('Total', 'reportsubheader'));

    // Build table      
    reportTable.appendChild(headerRow);
    reportTable.appendChild(subHeaderRow);
    reportTable.appendChild(columnHeaderRow);
          
    // Data rows      
    addDataRowsToConsentTable(report, reportTable);
      
    // Add a row with the combined numbers for all sites for each period
    var sitesCombinedRow = document.createElement('tr');
    sitesCombinedRow.appendChild(getTableCellElement('Sites combined', 'colsummary'));
    sitesCombinedRow.appendChild(getTableCellElement('', 'colsummary'));
    // Get combined numbers for all sites for each period
    var sumKey = 'sumKey';
    var statistics = report.statistics;
    var sitesCombined = statistics.sitesCombinedKey;
    if (sitesCombined != null)
    {
      //data = getJSONDataRightPadded(sitesCombined, 'yes', sumKey, numDecimals);
      //sitesCombinedRow.appendChild(getTableCellElement(data, 'colsummary'));
      data = getJSONDataWithPercent(sitesCombined, 'yesPatient', sumKey, numDecimals);
      sitesCombinedRow.appendChild(getTableCellElement(data, 'colsummary'));
      data = getJSONDataWithPercent(sitesCombined, 'yesNoPatient', sumKey, numDecimals);
      sitesCombinedRow.appendChild(getTableCellElement(data, 'colsummary'));
      data = getJSONDataWithPercent(sitesCombined, 'yesNoDate', sumKey, numDecimals);
      sitesCombinedRow.appendChild(getTableCellElement(data, 'colsummary'));
      data = getJSONDataWithPercent(sitesCombined, 'no', sumKey, numDecimals);
      sitesCombinedRow.appendChild(getTableCellElement(data, 'colsummary'));
      data = getJSONDataWithPercent(sitesCombined, 'noNoDate', sumKey, numDecimals);
      sitesCombinedRow.appendChild(getTableCellElement(data, 'colsummary'));
      data = getJSONDataWithPercent(sitesCombined, 'notAsked', sumKey, numDecimals);
      sitesCombinedRow.appendChild(getTableCellElement(data, 'colsummary'));
      data = getJSONDataWithPercent(sitesCombined, 'notAskedNoDate', sumKey, numDecimals);
      sitesCombinedRow.appendChild(getTableCellElement(data, 'colsummary'));
      //data = getJSONDataWithPercent(sitesCombined, 'other', sumKey, numDecimals);
      //sitesCombinedRow.appendChild(getTableCellElement(data, 'colsummary'));
      data = getJSONDataWithPercent(sitesCombined, 'missing', sumKey, numDecimals);
      sitesCombinedRow.appendChild(getTableCellElement(data, 'colsummary'));
    }
    // Add entry with total number of consents with chosen restrictions
    data = getJSONData(sitesCombined, sumKey);
    sitesCombinedRow.appendChild(getTableCellElement(data, 'colsummary'));
/*
    // Add entry with total number of consents, regardless of restrictions
    data = getJSONData(sitesCombined, totalKey);
    sitesCombinedRow.appendChild(getTableCellElement(data, 'colsummary'));
*/
    reportTable.appendChild(sitesCombinedRow);  

    return reportTable;
  }
  
  function createConsentTablePatientsWithMultipleDates(report)
  {
    var multipleDatesTable = getReportTable();
    var headerRow = document.createElement('tr');   
    var columnHeaderRow = document.createElement('tr');
    
    // Table header
    var numCols = 3;
    var headerText = 'Consent forms with multiple dates for same patient';
    headerRow.appendChild(getTableCellElement(headerText, 'reportheader', numCols));
    
    // Columnsheader
    columnHeaderRow.appendChild(getTableCellElement('Patient ID', 'reportsubheader'));
    columnHeaderRow.appendChild(getTableCellElement('Date 1', 'reportsubheader'));
    columnHeaderRow.appendChild(getTableCellElement('Date 2', 'reportsubheader'));

    // Build table      
    multipleDatesTable.appendChild(headerRow);
    multipleDatesTable.appendChild(columnHeaderRow);
          
    // Data rows
    if (report != null)
    {
      var statistics = report.statistics;
      var sessionId = statistics.sessionIdKey;
      var patientsWithMultipleDates = statistics.patientsWithMultipleDatesKey;
      var patientnamePatientid = statistics.patientnamePatientidKey;
      for (var patientName in patientsWithMultipleDates)
      {
        var tableRow = document.createElement('tr');
        // Add patient name to table
        var patientIdStr = patientnamePatientid[patientName];
        var columnCell = document.createElement('td');
        var patientLinkStr = createLinkStr(patientName, patientIdStr, 'BIOSOURCE', 'View this sample', sessionId);
        var tableCol = createTableCellElementHtml(patientLinkStr, 'reportdata');
        tableRow.appendChild(tableCol);
        // Add dates to table in chronological order
        var dateSet = patientsWithMultipleDates[patientName];
        var dateStr1 = '';
        var dateStr2 = '';
        for (var key in dateSet)
        {
          var dateStr = dateSet[key];
          if (dateStr1 == '')
          {
            dateStr1 = dateStr;
          }
          else if (dateStr > dateStr1)
          {
            dateStr2 = dateStr;
          }
          else
          {
            dateStr2 = dateStr1;
            dateStr1 = dateStr;
          }
        }
        var dateCol = '';
        dateCol = getTableCellElement(dateStr1, 'reportdata');
        tableRow.appendChild(dateCol);
        dateCol = getTableCellElement(dateStr2, 'reportdata');
        tableRow.appendChild(dateCol);
        multipleDatesTable.appendChild(tableRow);
      }
    }

    return multipleDatesTable;
  }
  
  function addDataRowsToConsentTable(report, reportTable, numDecimals)
  {
    var sites = report.sites;   
    var statistics = report.statistics;
    unknownCreation = statistics.noDate;
    unknownSite = statistics.unknownSite;
    for (namePrefix in sites)
    {
      if (!sites.hasOwnProperty(namePrefix)) continue;        
      var site = sites[namePrefix];
      var siteName = site.name;       
      var year = site.startDate.substr(0,4);
      var month = site.startDate.substr(5,2);
      var date = site.startDate.substr(8,2);      
      var siteStartDate = new Date(year, month-1, date);
      
      var siteData = statistics[namePrefix];      
      var tableRow = document.createElement('tr');
      var tableCol = getTableCellElement(siteName, 'rowtitle');
      tableRow.appendChild(tableCol);
      tableRow.appendChild(getTableCellElement(year+'-'+(month)+'-'+date, 'reportdata'));
      //var currentDate = new Date(periodStartDate.getFullYear(), periodStartDate.getMonth(), periodStartDate.getDate());     
      var sumKey = 'sumKey';
      if (siteData != null)
      {
        //data = getJSONDataWithPercent(siteData, 'yes', sumKey, numDecimals);
        //tableRow.appendChild(getTableCellElement(data, 'reportdata'));
        data = getJSONDataWithPercent(siteData, 'yesPatient', sumKey, numDecimals);
        tableRow.appendChild(getTableCellElement(data, 'reportdata'));
        data = getJSONDataWithPercent(siteData, 'yesNoPatient', sumKey, numDecimals);
        tableRow.appendChild(getTableCellElement(data, 'reportdata'));
        data = getJSONDataWithPercent(siteData, 'yesNoDate', sumKey, numDecimals);
        tableRow.appendChild(getTableCellElement(data, 'reportdata'));
        data = getJSONDataWithPercent(siteData, 'no', sumKey, numDecimals);
        tableRow.appendChild(getTableCellElement(data, 'reportdata'));
        data = getJSONDataWithPercent(siteData, 'noNoDate', sumKey, numDecimals);
        tableRow.appendChild(getTableCellElement(data, 'reportdata'));
        data = getJSONDataWithPercent(siteData, 'notAsked', sumKey, numDecimals);
        tableRow.appendChild(getTableCellElement(data, 'reportdata'));
        data = getJSONDataWithPercent(siteData, 'notAskedNoDate', sumKey, numDecimals);
        tableRow.appendChild(getTableCellElement(data, 'reportdata'));
        //data = getJSONDataWithPercent(siteData, 'other', sumKey, numDecimals);
        //tableRow.appendChild(getTableCellElement(data, 'reportdata'));
        data = getJSONDataWithPercent(siteData, 'missing', sumKey, numDecimals);
        tableRow.appendChild(getTableCellElement(data, 'reportdata'));
        // Add column with summed values for site
        var siteSum = 0;
        if (siteData != null)
        {
          if (siteData[sumKey] != null)
          {
            siteSum = siteData[sumKey];
          }
        }
        tableRow.appendChild(getTableCellElement(siteSum, 'rowsummary'));
      }
/*
      // Add column with total number of samples for site, regardless of creation date
      var siteTotal = 0;
      if (siteData != null)
      {
        var totalKey = 'totalKey';
        if (siteData[totalKey] != null)
        {
          siteTotal = siteData[totalKey];
        }
      }
      tableRow.appendChild(getTableCellElement(siteTotal, 'rowsummary'));
*/
      reportTable.appendChild(tableRow);
    }
  }

  function createLinkStr(linkName, idStr, itemTypeStr, titleStr, sessionId)
  {
    var linkStr = '<span class="link" onclick="Main.itemOnClick(event, \'' + sessionId + '\', \'' + itemTypeStr + '\', ' + idStr + ', false)" title="' + titleStr + '">' + linkName + '</span>';
    return linkStr;
  }

  function createTableCellElementHtml(html, clazz, colspan, rowspan)
  {
    var htmlStr = new String(html);
    var cellElement = document.createElement('td');
    cellElement.innerHTML = htmlStr;
    cellElement.setAttribute('class', clazz);
    if (colspan != null) cellElement.setAttribute('colspan', colspan);
    if (rowspan != null) cellElement.setAttribute('rowspan', rowspan);
    
    return cellElement;
  }
  
  function getJSONDataWithPercent(jsonObject, key, sumKey, numDecimals)
  {
    var dataNum = getJSONData(jsonObject, key);
    var dataSum = getJSONData(jsonObject, sumKey);
    var dataPct = '0';
    if (dataSum != null || dataSum != 0)
    {
      dataPct = 100*dataNum/dataSum;
      dataPct = dataPct.toFixed(numDecimals);
    }
    var data = dataNum + ' (' + dataPct + '%)';
    return data;
  }

  function getJSONData(jsonObject, key)
  {
    var data = '';
    if (jsonObject != null)
    {
      if (jsonObject[key] != null)
      {
        data = jsonObject[key];
      }
    }
    else
    {
      data = 'jsonObject==null';
    }
    return data;
  }

  function addQuarterColumnHeaders(columnHeaderRow, startDate)
  {
    var currentDate = startDate;
    for (var i=0;i<numCols;i++)
    {
      var quarter = Math.floor(currentDate.getMonth()/3)+1;
      var columnText = 'Q'+quarter;
      var quarterHeader = getTableCellElement(columnText, 'reportsubheader');
      columnHeaderRow.appendChild(quarterHeader); 
      currentDate.setMonth(currentDate.getMonth()+3);     
    }
  }
  
  function addWeekColumnHeaders(columnHeaderRow, startDate)
  {
    var currentDate = startDate;
    var day = currentDate.getDay()-1;
    day = day>=0 ? day: day + 7;
    currentDate.setDate(currentDate.getDate()-day);
    for (var i=0;i<numCols;i++)
    {     
      var weekNum = getISOWeekNumber(currentDate);
      var columnText = weekNum;
      if (weekNum < 10) columnText = '0'+columnText;      
      columnHeaderRow.appendChild(getTableCellElement(columnText, 'reportsubheader'));
      currentDate.setDate(currentDate.getDate()+7);     
    }
  }
  
  function addMonthColumnHeaders(columnHeaderRow, startDate)
  {   
    var currentDate = new Date(startDate.getFullYear(), startDate.getMonth());
    for (var i=0;i<numCols;i++)
    {             
      var monthHeader = getTableCellElement(month[currentDate.getMonth()], 'reportsubheader');
      columnHeaderRow.appendChild(monthHeader);       
      currentDate.setMonth(currentDate.getMonth() +1);
    }   
  }
  
  function addYearSubHeaders(startDate, endDate, subHeaderRowYear, vt)
  {   
    var currentYear = startDate.getFullYear();  
    
    var columnCounter = 0;    
    do
    {
      var colspan;
      var headerText = currentYear;
      if (vt == "MONTH")
      {
        if (currentYear == startDate.getFullYear())
        {
          colspan =  11-startDate.getMonth()+1;
          if (endDate.getFullYear() == currentYear)
          {
            colspan = colspan - (11-endDate.getMonth());
          }
        }
        else if (currentYear == endDate.getFullYear()) 
          colspan = endDate.getMonth()+1;
        else
          colspan = 12;
      }
      else if (vt == "WEEK")
      { 
        if (startDate.getFullYear() == endDate.getFullYear())
        {
          colspan = numCols;
        }
        else if (currentYear == startDate.getFullYear())
        {
          var startWeek = getISOWeekNumber(startDate);
          var lastDay = new Date(startDate.getFullYear(), 11, 31);
          var endWeek = getISOWeekNumber(lastDay);
          if (endWeek == 1)
          {
            lastDay.setDate(lastDay.getDate()-7);
            endWeek = getISOWeekNumber(lastDay);
          }
          colspan = endWeek - startWeek +1;
        }
        else if (currentYear == endDate.getFullYear())
        {
          var endWeek = getISOWeekNumber(endDate);
          colspan = endWeek;
        }
        else
        {
          var dateInLastWeek = new Date(currentYear, 11, 31);
          var endWeek = getISOWeekNumber(dateInLastWeek);
          if (endWeek == 1)
          {
            dateInLastWeek.setDate(dateInLastWeek.getDate()-7);
            endWeek = getISOWeekNumber(dateInLastWeek);
          }
          colspan = endWeek;
        }               
      }
      else if (vt == "QUARTER")
      {
        if (currentYear == startDate.getFullYear())
        {
          if (startDate.getFullYear() == endDate.getFullYear())
          {
            colspan = Math.floor((endDate.getMonth()-startDate.getMonth())/3)+1;
          }
          else
          {
            colspan = Math.floor((11-startDate.getMonth())/3) +1;
          }
        }
        else if(currentYear == endDate.getFullYear())
        {
          colspan = Math.floor(endDate.getMonth()/3)+1;
        }
        else 
        {
          colspan = 4;
        }
      }
      else if (vt == "YEAR")
      {
        colspan = 1;        
      }
      columnCounter += colspan;           
      subHeaderRowYear.appendChild(getTableCellElement(headerText, 'reportsubheader', colspan));
    }while(!(++currentYear>endDate.getFullYear()));
  }
  
  function addDataRowsToTable(report, reportTable)
  {
    var fdString = report.beginDate;
    var ldString = report.endDate;
    var psdString = report.periodBeginDate;
    var startDate = new Date();
    startDate.setYear(fdString.substr(0,4));
    startDate.setMonth(fdString.substr(4,2)-1);
    startDate.setDate(fdString.substr(6));
    var endDate = new Date();
    endDate.setYear(ldString.substr(0,4));
    endDate.setMonth(ldString.substr(4,2)-1);
    endDate.setDate(ldString.substr(6));
    var periodStartDate = new Date();
    periodStartDate.setYear(psdString.substr(0,4));
    periodStartDate.setMonth(psdString.substr(4,2)-1);
    periodStartDate.setDate(psdString.substr(6));
    var viewType = report.viewType;   
    var sites = report.sites;   
    var statistics = report.statistics;
    unknownCreation = statistics.noDate;
    unknownSite = statistics.unknownSite;
    for (namePrefix in sites)
    {
      if (!sites.hasOwnProperty(namePrefix)) continue;        
      var site = sites[namePrefix];
      var siteName = site.name;       
      var year = site.startDate.substr(0,4);
      var month = site.startDate.substr(5,2);
      var date = site.startDate.substr(8,2);      
      var siteStartDate = new Date(year, month-1, date);
      
      var siteData = statistics[namePrefix];      
      var tableRow = document.createElement('tr');
      var tableCol = getTableCellElement(siteName, 'rowtitle');
      tableRow.appendChild(tableCol);
      tableRow.appendChild(getTableCellElement(year+'-'+(month)+'-'+date, 'reportdata'));
      var currentDate = new Date(periodStartDate.getFullYear(), periodStartDate.getMonth(), periodStartDate.getDate());     
      var columnCounter = 0;
      do
      { 
        var data = 0;
        var keyIndex;
        var yearIndex = currentDate.getFullYear();
        
        if (viewType == 'YEAR')
        {
          keyIndex = yearIndex;
          if (siteData != null)
          {
            if (siteData[keyIndex] != null) data = siteData[keyIndex];
          }
          if ( (currentDate.getFullYear() < siteStartDate.getFullYear()))
          {
            data = '';
          }
          currentDate.setFullYear(currentDate.getFullYear()+1);
        }
        else if (viewType == 'QUARTER')
        {
          var qIndex = Math.floor(currentDate.getMonth()/3) + 1;
          var startQuarter = Math.floor(siteStartDate.getMonth()/3)+1;
          keyIndex = yearIndex + '' + qIndex;
          if (siteData != null)
          {
            if (siteData[keyIndex] != null) data = siteData[keyIndex];            
          }         
          if ( (currentDate.getFullYear() <= siteStartDate.getFullYear()) && qIndex<startQuarter)
          {
            data = '';
          }
          currentDate.setMonth(currentDate.getMonth()+3);         
        }
        else if (viewType == 'MONTH')
        {
          var monthIndex = currentDate.getMonth()+1;
          var rowFill = monthIndex < 10 ? '0' : '';
          keyIndex = yearIndex + rowFill + monthIndex;
          if (siteData != null)
          {
            if (siteData[keyIndex] != null) data = siteData[keyIndex];
          }
          if (currentDate.getFullYear() <= siteStartDate.getFullYear() && (monthIndex-1) < siteStartDate.getMonth())
          {
            data = '';
          }
          
          
          currentDate.setMonth(currentDate.getMonth()+1);
        }
        else if (viewType == 'WEEK')
        {
          var weekIndex = getISOWeekNumber(currentDate);
          keyIndex = yearIndex + '' + weekIndex;
          if (siteData != null)
          {
            if (siteData[keyIndex] != null) data = siteData[keyIndex];
          }
          if (currentDate.getFullYear() <= siteStartDate.getFullYear() && getISOWeekNumber(currentDate) < getISOWeekNumber(siteStartDate))
          {
            data = '';
          }
          currentDate.setDate(currentDate.getDate()+7);
        }
        
        tableRow.appendChild(getTableCellElement(data, 'reportdata'));
        columnCounter++;        
      } while (columnCounter < numCols)
      // Add column with sample sum for site for the selected time period
      var siteSum = 0;
      if (siteData != null)
      {
        var sumSiteKey = 'sumSiteKey';
        if (siteData[sumSiteKey] != null)
        {
          siteSum = siteData[sumSiteKey];
        }
      }
      tableRow.appendChild(getTableCellElement(siteSum, 'rowsummary'));
      // Add column with total number of samples for site, regardless of creation date
      var siteTotal = 0;
      if (siteData != null)
      {
        var totalSiteKey = 'totalSiteKey';
        if (siteData[totalSiteKey] != null)
        {
          siteTotal = siteData[totalSiteKey];
        }
      }
      tableRow.appendChild(getTableCellElement(siteTotal, 'rowsummary'));
      reportTable.appendChild(tableRow);
    }
  }
  
  function createSortedPeriodArray(report, numberOfColumns)
  {
    var psdString = report.periodBeginDate;
    var periodStartDate = new Date();
    periodStartDate.setYear(psdString.substr(0,4));
    periodStartDate.setMonth(psdString.substr(4,2)-1);
    periodStartDate.setDate(psdString.substr(6));
    var viewType = report.viewType;   
    var sortedPeriodArray = Array(numberOfColumns);
    var currentDate = new Date(periodStartDate.getFullYear(), periodStartDate.getMonth(), periodStartDate.getDate());     
    var columnCounter = 0;
    do
    { 
      var keyIndex;
      var yearIndex = currentDate.getFullYear();
        
      if (viewType == 'YEAR')
      {
        keyIndex = yearIndex;
        currentDate.setFullYear(currentDate.getFullYear()+1);
      }
      else if (viewType == 'QUARTER')
      {
        var qIndex = Math.floor(currentDate.getMonth()/3) + 1;
        keyIndex = yearIndex + '' + qIndex;
        currentDate.setMonth(currentDate.getMonth()+3);         
      }
      else if (viewType == 'MONTH')
      {
        var monthIndex = currentDate.getMonth()+1;
        var rowFill = monthIndex < 10 ? '0' : '';
        keyIndex = yearIndex + rowFill + monthIndex;
        currentDate.setMonth(currentDate.getMonth()+1);
      }
      else if (viewType == 'WEEK')
      {
        var weekIndex = getISOWeekNumber(currentDate);
        keyIndex = yearIndex + '' + weekIndex;
        currentDate.setDate(currentDate.getDate()+7);
      }
      sortedPeriodArray[columnCounter] = keyIndex;
      columnCounter++;        
    } while (columnCounter < numberOfColumns)
    return sortedPeriodArray;
  }
  
  function getReportTable()
  {
      var reportTable = document.createElement('table');
      reportTable.setAttribute('class','reporttable');
      reportTable.setAttribute('border','1');     
      return reportTable;
  }
  
  function getTableCellElement(text, clazz, colspan, rowspan)
  {
    var cellElement = document.createElement('td');
    text = new String(text);    
    var textArray = text.split("\n");   
    if (textArray.length > 1)
    { 
      for (var i=0;i<textArray.length;i++)
      {       
        if (i>0)cellElement.appendChild(document.createElement('br'));
        cellElement.appendChild(document.createTextNode(textArray[i]));
      }     
    }
    else
    {
      cellElement.appendChild(document.createTextNode(text));
    }
    cellElement.setAttribute('class', clazz);
    if (colspan != null) cellElement.setAttribute('colspan', colspan);
    if (rowspan != null) cellElement.setAttribute('rowspan', rowspan);
    
    return cellElement;
  }
  
  function getListElement(itemText)
  {
    var listElement = document.createElement('li');
    var textNode = document.createTextNode(itemText);
    listElement.appendChild(textNode);
    return listElement;
  }

  /*
   * Get the ISO week number for a given date
   * 
   * Based on code at http://stackoverflow.com/questions/6117814/get-week-of-year-in-javascript-like-in-php
   */
  function getISOWeekNumber(date)
  {
    tmpDate = new Date(date);
    tmpDate.setHours(0,0,0);
    // Set to nearest Thursday: current date + 4 - current day number
    // Make Sunday day number 7
    tmpDate.setDate(tmpDate.getDate() + 4 - (tmpDate.getDay() || 7));
    // Get first day of year
    var yearStart = new Date(tmpDate.getFullYear(), 0, 1);
    // Calculate full weeks to nearast Thursday (86400000 = 24*60*60*1000 number of ms in a day)
    var weekNo = Math.ceil(( ( (tmpDate - yearStart) / 86400000) + 1)/7);
    return weekNo;
  }

  </script>
  
  
  </base:head>
  <base:body onload="init()">
    <p:path><p:pathelement 
      title="Reggie" href="<%="index.jsp?ID="+ID%>" 
      /><p:pathelement title="Report generator" 
      /></p:path>
    <div class="content">
    <%
    if (sc.getActiveProjectId() == 0)
    {
      %>
      <div class="messagecontainer note" style="width: 950px; margin-left: 20px; margin-bottom: 20px; margin-right: 0px; font-weight: bold; color: #cc0000;">
        No project has been selected. You may proceed with the report generation but 
        only your own items will be included in the report.
      </div>
      <%
    }
    %>
  
    <form name="reggie" onsubmit="return false;">
      <!-- 1. Report type-->
      <table border="0" cellspacing="0" cellpadding="0" class="stepform">
      <tr>
        <td rowspan="3" class="stepno">1</td>
        <td class="steptitle">Report type</td>
      </tr>
      <tr>
        <td class="stepfields">
          <table border="0" cellspacing="0" cellpadding="0" width="100%">
          <tr valign="top">
            <td class="prompt">Report</td>
            <td class="input">
              <select name="reporttype">
                <option value="samplecount" selected="yes">Sample count report</option>
                <option value="consentcount">Consent count report</option>
              </select>
            </td>
            <td class="status" id="report.status"></td>
            <td class="help">
              <span id="report.message" class="message" style="display: none;"></span>
              Select which report to generate.
            </td>
          </tr>
          </table>
        </td>
      </tr>
      </table>
      
      <div id="sampleCountSection" style="display:none;">
        <p></p>
        <!-- 2. Report parameters-->
        <table border="0" cellspacing="0" cellpadding="0" class="stepform">
        <tr>
          <td rowspan="3" class="stepno">2</td>
          <td class="steptitle">Report parameters</td>
        </tr>
        <tr>
          <td class="stepfields">
            <table border="0" cellspacing="0" cellpadding="0" width="100%">           
            <tr>
              <td valign="top" class="prompt">Report period</td>
              <td valign="top" class="input">
                From<input type="text" onChange="dateOnChange()" size=7 name="fromdate"/>&nbsp;
                To<input type="text" onChange="dateOnChange()" size=7 name="todate" />
              </td>
              <td valign="top" class="status" id="displayInterval.status"></td>
              <td class="help">
                <span id="displayInterval.message" class="message" style="display: none;"></span>
                Define which period the report should cover. Empty fields will include all tubes.<br>
              </td>
            </tr> 
            <tr>          
              <td valign="top" class="prompt">View type</td>
              <td valign="top" class="input">
                <select name="viewtype">
                  <option value="AUTO" selected="yes">Auto</option>
                  <option value="WEEK">Week</option>
                  <option value="MONTH">Month</option>
                  <option value="QUARTER">Quarter</option>
                  <option value="YEAR">Year</option>
                </select>
              </td>
              <td valign="top" class="status" id="displayViewType.status"></td>
              <td class="help">
                <span id="displayViewType.message" class="message" style="display: none;"></span>
                Auto will adjust the report depending on the size of the period.
                <ul>
                  <li>Period shorter then 3 months - specimens per week</li>
                  <li>Period shorter then 13 months - specimens per month</li>
                  <li>Period shorter then 3 year - specimens per quarter</li>
                  <li>Period is 3 year or greater - specimens per year</li>
                </ul>                 
              </td>
            </tr>
            </table>
          </td>
        </tr>
        </table>
      </div>
      
      <div id="consentCountSection" style="display:none;">
        <p></p>
        <!-- 2. Report parameters-->
        <table border="0" cellspacing="0" cellpadding="0" class="stepform">
        <tr>
          <td rowspan="3" class="stepno">2</td>
          <td class="steptitle">Report parameters</td>
        </tr>
        <tr>
          <td class="stepfields">
            <table border="0" cellspacing="0" cellpadding="0" width="100%">           
            <tr>
              <td valign="top" class="prompt">No report parameters</td>
              <td valign="top" class="input">
              </td>
              <td valign="top" class="status" id="displayInterval.status"></td>
              <td class="help">
                <span id="displayInterval.message" class="message" style="display: none;"></span>
                Consent report will be generated irrespective of date for consent.<br>
              </td>
            </tr> 
            </table>
          </td>
        </tr>
        </table>
      </div>
      
      <div id="reportSection" style="display:none;">
        <p></p>
        <table border="0" cellspacing="0" cellpadding="0" class="stepform">
        <tr>
          <td rowspan="3" class="stepno">3</td>
          <td class="steptitle">Generated report</td>
        </tr>
        <tr>
          <td id="reportcell" class="stepfields">
            <i>Generating report...</i>
          </td>
        </tr>
        </table>
      </div>  
      
      <div class="messagecontainer error" id="errorMessage" style="display: none; width: 950px; margin-left: 20px; margin-bottom: 0px;"></div>    
        
      <table style="margin-left: 20px; margin-top: 10px;" class="navigation">
        <tr>
          <td><base:button id="gocancel" title="Cancel" onclick="goRestart(false)" style="display: none;"/></td>
          <td><base:button id="gonext" title="Next" image="<%=home+"/images/gonext.png"%>" onclick="goNext(true)" /></td>
          <td><base:button id="gocreate" title="Generate" image="<%=home+"/images/gonext.png"%>" onclick="goCreate()" style="display: none;"/></td>         
          <td><base:button id="gorestart" title="Restart" image="<%=home+"/images/goback.png"%>" onclick="goRestart(true)" style="display: none;"/></td>
          <td id="gonext.message" class="message"></td>
        </tr>
      </table>      
    </form>
    </div>
    
  </base:body>
  </base:page>
  <%
}
finally
{
  if (dc != null) dc.close();
}
%>