qrp_report
Public
Source
xxxxxxxxxx %assignlabelvars(format=put(&secondstrat., $&secondstrat.fmt.), sortorder1 = , sortorder2=input(put(&secondstrat., &secondstrat.sort.),1.));***************************************************************************************************** PROGRAM OVERVIEW****************************************************************************************************** PROGRAM: t5tables_createdata.sas * Created (mm/dd/yyyy): 08/06/2021**--------------------------------------------------------------------------------------------------* PURPOSE: The macro produces tables for a Type 5 report* * Program inputs: * - agg_t5episdur.sas7bdat * - agg_t5disp.sas7bdat* - agg_t5dose.sas7bdat** Program outputs: * - 1 dataset per table in the format [TableID]_[StratificationOrder]* * PARAMETERS: * - dataset: aggregate dataset from %aggregate_report_tables* - whereclause: where clause to restrict input dataset* - catvar: variable that will be categorized* - countvar: metric counting counts* - cattableid: category table ID from TABLEFILE* - disttableid: distribution table ID from TABLEFILE* - catvarsort: variable on the input dataset containing category indicators* - createfootnote: Y/N indicator to create group-specific footnote table (for dose tables)* - dosevar: name of variable containing statistic names for dosing tables continuous metrics* - totalcountdosevar: name of variable containing counts for dosing tables continuous metrics* * Programming Notes: * - Censor tables are computed in a separate macro (censortable_createdata_t1t2t5.sas) * - 'overall' stratification is required for any additional stratification * - if CATVARSORT is specified, categories have already been computed in QRP, otherwise categories* must be specified in the TABLEFILE for category tables**--------------------------------------------------------------------------------------------------* CONTACT INFO: * Sentinel Coordinating Center* info@sentinelsystem.org****************************************************************************************************;%macro t5tables_createdata(dataset=, whereclause=, catvar=, countvar=, cattableid=, disttableid=, catvarsort=, createfootnote=, dosevar=, totalcountdosevar=); %put =====> MACRO CALLED: t5tables_createdata ; /*--------------------------------------------------------------------------------------------*/ /* Pre-processing steps: */ /* - Determine all levelIDs and stratifications requested */ /*--------------------------------------------------------------------------------------------*/ %let tablesub = ; %let tablesublist = ; /*Set &cattableid and &disttableid to missing if not requested*/ %let table = "&cattableid.","&disttableid."; data _tablecheck&cattableid. _tablecheck&disttableid.; set tablefile(where=(table in (&table.))); if table = "&cattableid" then output _tablecheck&cattableid.; if table = "&disttableid" then output _tablecheck&disttableid.; run; %isdata(dataset=_tablecheck&cattableid.); %if %eval(&nobs.<1) %then %do; %let cattableid = ; %end; %isdata(dataset=_tablecheck&disttableid.); %if %eval(&nobs.<1) %then %do; %let disttableid = ; %end; proc datasets nowarn noprint lib=work; delete _tablecheck:; quit; data tablefile; set tablefile; if tablesub = 'overall' then order_overall=0; else order_overall=1; run;