require_once $base_path . "/redcap_connect.php";
require_once $base_path . '/plugins/includes/functions.php';
require_once APP_PATH_DOCROOT . '/ProjectGeneral/header.php';
/**
 * restricted use
 */
$allowed_pids = array('26');
REDCap::allowProjects($allowed_pids);
Kint::enabled($enable_kint);
/**
 * project metadata
 */
global $Proj;
$baseline_event_id = $Proj->firstEventId;
$plugin_title = "Derive flags for labs with deltas greater than their thresholds";
/**
 * plugin title
 */
echo "<h3>$plugin_title</h3>";
/**
 * MAIN
 */
if ($debug) {
	$timer['main_start'] = microtime(true);
}
set_deltas($subjects, $debug);
if ($debug) {
	$timer['main_end'] = microtime(true);
	$init_time = benchmark_timing($timer);
	echo $init_time;
}
     /*case 'inr':*/
 /*case 'inr':*/
 case 'hcv_rna_results':
     $debug = false;
     set_svr_dates($record, $debug);
     standardize_lab_form($instrument, $project_id, $record, $redcap_event_name, $debug);
     if ($debug) {
         $timer['main_end'] = microtime(true);
         error_log(benchmark_timing($timer));
     }
     break;
 case 'chemistry':
     $debug = false;
     standardize_lab_form($instrument, $project_id, $record, $redcap_event_name, $debug);
     set_crcl($record, $event_id, 'abstracted', $debug);
     set_deltas($record, $debug);
     set_egfr($record, $event_id, 'abstracted', $debug);
     if ($debug) {
         $timer['main_end'] = microtime(true);
         error_log(benchmark_timing($timer));
     }
     break;
 case 'fibrosis_staging':
 case 'cirrhosis':
     $debug = false;
     set_cirrhosis($record, $debug);
     if ($debug) {
         $timer['main_end'] = microtime(true);
         error_log(benchmark_timing($timer));
     }
     break;