%include "e:\SDDC\patient_profile.sas";
%let path=c:\Public\StatGraph\Pharma\;
libname cdisc "&path.Data3";
title;

%MMSStyle; 

ods listing close; 

options stimer fullstimer nodate nonumber;
*options nomprint;
*options mprint;

/* PDF */ 
%include "e:\SDDC\patient_profile.sas";
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'");
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", path=&path);
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", path=&path, style=MMS);

/* RTF */ 
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", destination=rtf);
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", path=&path, destination=rtf);
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", path=&path, style=MMS, destination=rtf);

/* TAGSETS.RTF */ 
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", destination=Tagsets.Rtf, extension=rtf);
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", path=&path, destination=Tagsets.Rtf, extension=rtf);
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", path=&path, style=MMS, destination=Tagsets.Rtf, extension=rtf);

/* HTML */ 
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", destination=html);
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", path=&path, destination=html);
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", path=&path, style=MMS, destination=html);

/* ZIP */
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", packagename=PatientProfilePackagePDF);
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", path=&path, packagename=PatientProfilePackagePDF);
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", path=&path, style=MMS, packagename=PatientProfilePackagePDF);
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", path=&path, style=MMS, packagename=PatientProfilePackageHTML,destination=html);
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", path=&path, style=MMS, packagename=PatientProfilePackageRTF,destination=tagsets.rtf, extension=rtf);
 
/* SELECT */
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", path=&path, style=MMS, select="AE CM"));

/* NEWFILE */ 
%include "e:\SDDC\patient_profile.sas";
%patient_profile(libref=cdisc, subjid="usubjid in ('01-701-1115', '01-701-1015')", path=&path, style=MMS, newfile=none);

/* WHERE */
%patient_profile(libref=cdisc, subjid="usubjid='01-701-1115'", where="ARMCD ne 'Scrnfail'", packagename=StudyParticipants);

/* ALL */ 
%patient_profile(libref=cdisc, style=MMS, newfile=none);
%patient_profile(libref=cdisc);
%patient_profile(libref=cdisc, packagename=PatientProfilePackagePDF);
%patient_profile(libref=cdisc, where="ARMCD ne 'Scrnfail'", packagename=StudyParticipants);

