} /** * add baseline HCV RNA */ if (isset($hcvrna_data[$subject_id])) { foreach ($hcvrna_data[$subject_id] AS $hcvrna_event) { if ($hcvrna_event['hcv_lbblfl'] == 'Y') { d($hcvrna_event); $data_row['Baseline ' . get_element_label('hcv_lbstresn')] = $hcvrna_event['hcv_lbstresn'] != '' ? quote_wrap($hcvrna_event['hcv_lbstresn']) : blanks(); } elseif ($hcvrna_event['hcv_im_lbblfl'] == 'Y') { d($hcvrna_event); $data_row['Baseline ' . get_element_label('hcv_lbstresn')] = $hcvrna_event['hcv_im_lbstresn'] != '' ? quote_wrap($hcvrna_event['hcv_im_lbstresn']) : blanks(); } } } else { $data_row['Baseline ' . get_element_label('hcv_lbstresn')] = blanks(); } /** * create csv row from $data_row and add to $table_csv */ $table_csv .= implode(',', $data_row) . "\n"; } $headers = implode(',', $header_array) . "\n"; d($headers); d($table_csv); if (!$debug) { create_download($lang, $app_title, $userid, $headers, $user_rights, $table_csv, '', $parent_chkd_flds, $project_id, $export_filename, $debug); } else { $timer['main_end'] = microtime(true); $init_time = benchmark_timing($timer); echo $init_time;
if (isset($egfr_data[$subject_id])) { foreach ($egfr_data[$subject_id] AS $egfr_event) { if ($egfr_event['egfr_lbblfl'] == 'Y') { if ($subjects != '') { d($egfr_event); } $data_row['Baseline ' . get_element_label('egfr_lborres')] = $egfr_event['egfr_lborres'] != '' ? quote_wrap($egfr_event['egfr_lborres']) : blanks(); } elseif ($egfr_event['egfr_im_lbblfl'] == 'Y') { if ($subjects != '') { d($egfr_event); } $data_row['Baseline ' . get_element_label('egfr_lborres')] = $egfr_event['egfr_im_lborres'] != '' ? quote_wrap($egfr_event['egfr_im_lborres']) : blanks(); } } } else { $data_row['Baseline ' . get_element_label('egfr_lborres')] = blanks(); } /** * create csv row from $data_row and add to $table_csv */ $table_csv .= implode(',', $data_row) . "\n"; } $headers = implode(',', $header_array) . "\n"; d($headers); d($table_csv); if (!$debug) { create_download($lang, $app_title, $userid, $headers, $user_rights, $table_csv, '', $parent_chkd_flds, $project_id, $export_filename, $debug); } else { $timer['main_end'] = microtime(true); $init_time = benchmark_timing($timer); echo $init_time;
d($misc_event); if ($misc_event['hcvgt_s_lborres'] != 'NOT_AVAILABLE' && $misc_event['hcvgt_s_lborres'] != '') { $misc_event['hcvgt_lborres'] = $misc_event['hcvgt_lborres'] . $misc_event['hcvgt_s_lborres']; } $data_row[get_element_label('hcvgt_lborres')] = $misc_event['hcvgt_lborres'] != '' ? quote_wrap($misc_event['hcvgt_lborres']) : quote_wrap('--'); $data_row[get_element_label('hcv_suppfa_hcvout')] = $misc_event['hcv_suppfa_hcvout'] != '' ? quote_wrap($misc_event['hcv_suppfa_hcvout']) : quote_wrap('--'); $data_row[get_element_label('cirr_suppfa_cirrstat')] = $misc_event['cirr_suppfa_cirrstat'] != '' ? quote_wrap($misc_event['cirr_suppfa_cirrstat']) : quote_wrap('--'); $data_row[get_element_label('dcp_mhoccur')] = $misc_event['dcp_mhoccur'] != '' ? quote_wrap($misc_event['dcp_mhoccur']) : quote_wrap('--'); $data_row[get_element_label('livr_mhoccur')] = $misc_event['livr_mhoccur'] != '' ? quote_wrap($misc_event['livr_mhoccur']) : quote_wrap('--'); } } else { $data_row[get_element_label('hcvgt_lborres')] = quote_wrap('--'); $data_row[get_element_label('hcv_suppfa_hcvout')] = quote_wrap('--'); $data_row[get_element_label('cirr_suppfa_cirrstat')] = quote_wrap('--'); $data_row[get_element_label('dcp_mhoccur')] = quote_wrap('--'); $data_row[get_element_label('livr_mhoccur')] = quote_wrap('--'); } /** * create csv row from $data_row and add to $table_csv */ $table_csv .= implode(',', $data_row) . "\n"; } $headers = implode(',', $header_array) . "\n"; d($headers); d($table_csv); if (!$debug) { create_download($lang, $app_title, $userid, $headers, $user_rights, $table_csv, '', $parent_chkd_flds, $project_id, $export_filename, $debug); } else { $timer['main_end'] = microtime(true); $init_time = benchmark_timing($timer); echo $init_time;