*************************************************************************************************;
*        CLIENT:  ModernaTX, Inc.
*      PROTOCOL:  mRNA-1273-P301
*       PURPOSE:  Create Table 14.3.1.1.1.1
*   INPUT FILES:  ADaM datasets
*  OUTPUT FILES:  t140301010101.rtf
*   USAGE NOTES:
*************************************************************************************************;
*  Copyright 2020 PPD
*  All Rights Reserved.
*************************************************************************************************;
 
%isetup;
%include "martz_default.sas";
%include "mclopper.sas";
 
%let _default_trtvar = trt01an;
%let _default_below_bign = n (%);
%let popfl = SAR1FL;
%let in_data = ADAR;
%let cohortn = ;
 
%let where= &popfl.='Y' and ATPTREF='Vaccination 1' and ATOXGRN>.
			and PARAMCD in ('PAIN','ERYTHDIA','SWELLDIA','LYMPH','FEVER','HEADACHE','FATIGUE',
			'MYALGIA','ARTHRALG','NAUSEA','CHILLS');
%let _default_blank_for_zero_denom=No;
 
%macro blankprogram;
%clopper(datain=&in_data., vac=('Vaccination 1'), sar=SAR1FL, sec='AR', dataout=CI_AR);
%clopper(datain=&in_data., vac=('Vaccination 1'), sar=SAR1FL, sec='LAR', dataout=CI_LAR);
%clopper(datain=&in_data., vac=('Vaccination 1'), sar=SAR1FL, sec='SAR', dataout=CI_SAR);
%mend blankprogram;
 
%include "mt1403010101_sar_bygrade.sas";
 
%if %symexist(g_outtype)=0 %then %do;
%mr_odsout;
	%report_table(column1_label=Solicited Adverse Reaction$  Category$    Grade);
%mr_odsclose;
%end;