I need to extract specific numbers from a variable (cmaeno). Some records have one number, others have multiple numbers I need. The numbers that I need are in the "( )" :     I do not no where to start syntax wise.  Any help would be greatly appreciated. ... View more

Hello, I'm creating subject profiles and I want to know how to apply the subject (patient) id into all proc reports in one ODS pdf output.  Right now there are only 20 subjects and I manually enter them at the top (highlighted in pink) to make one sas program for all subjects.  I would like to have one program to run all subject profiles.  I did make a global program that runs all the individual subject profiles, but this study is growing and I would like something simplier.  Any help is greatly appreciated.  Here is my code:   %let ptno = 018 -1007; %let subj = where patient="&ptno"; goptions device=actximg; ods listing close; options orientation=landscape; ods pdf file="&path_out\patient profiles_018-1007_&rundate..pdf" style=conatus; proc report data=ae01 nowd headskip split='\'; title4 height=10pt justify=left "Subject &ptno" height=10pt justify=center 'Adverse Events'; column patient aeno path aeterm aestdat aesttim aeendat aeentim aeser_display aesev_display aerel1_display aerel2_display aeacn3_display aeacnoth_display aeout_display; &subj; define patient / style=[just=c vjust=t cellwidth=20mm] display "Subject ID" ; define aeno / order noprint; define path / style=[just=l vjust=t cellwidth=20mm] display "Path"; define aeterm / style=[just=l vjust=t cellwidth=50mm] order id; define aestdat / style=[just=c vjust=t cellwidth=25mm] page; define aesttim / style=[just=c vjust=t cellwidth=25mm]; define aeendat / style=[just=c vjust=t cellwidth=25mm]; define aeentim / style=[just=c vjust=t cellwidth=25mm]; define aeser_display / style=[just=c vjust=t cellwidth=25mm] display "Serious AE\ (SAE)" page; define aesev_display / style=[just=l vjust=t cellwidth=25mm] display "Severity"; define aerel1_display / style=[just=l vjust=t cellwidth=25mm] display "Relationship\ to Toca 511"; define aerel2_display / style=[just=l vjust=t cellwidth=25mm] display "Relationship\ to Toca FC"; define aeacn3_display / style=[just=l vjust=t cellwidth=45mm] display "Action Taken\ to Treat Event" page; define aeacnoth_display / style=[just=l vjust=t cellwidth=45mm] display "Other, Action Taken"; define aeout_display / style=[just=l vjust=t cellwidth=50mm] display "Outcome"; run; proc report data=toc6.ae1a nowd headskip split='\'; title4 height=10pt justify=left "Subject &ptno" height=10pt justify=center 'Adverse Events - Fever'; column patient path ae1stdat ae1sttim ae1endat ae1entim ae1yn1_display ae1res2_display ae1resu2_display ae1et_display ae1etoth_display; &subj; define patient / style=[just=c vjust=t cellwidth=20mm] display "Subject ID" ; define path / style=[just=l vjust=t cellwidth=20mm] display "Path" order id; define ae1stdat / style=[just=c vjust=t cellwidth=25mm]; define ae1sttim / style=[just=c vjust=t cellwidth=25mm]; define ae1endat / style=[just=c vjust=t cellwidth=25mm]; define ae1entim / style=[just=c vjust=t cellwidth=25mm]; define ae1yn1_display / style=[just=l vjust=t cellwidth=25mm] display "Patient's Temperature Recorded?"; define ae1res2_display / style=[just=l vjust=t cellwidth=25mm] display "Highest Temperature Start to End"; define ae1resu2_display / style=[just=l vjust=t cellwidth=25mm] display "Unit"; define ae1et_display / style=[just=l vjust=t cellwidth=50mm] display "Etiology"; define ae1etoth_display / style=[just=l vjust=t cellwidth=50mm]; run; ods pdf close; ods listing; ... View more

I'm exporting to an .xlsx file and spaces are being removed.   Here's what I get when I first open the file:     Here's what I get when I remove the "Wrap Text" and expand-to-fit the columns.     Here's my code: data ae0302; set ae0301; if aeongyn='' then ls03chk1="Ongoing is missing"; else ls03chk1=''; if aeoutcm='' then ls03chk2="Outcome is missing"; else ls03chk2=''; if (ls03chk1='' or ls03chk2='') and aeongyn='No' and (aeoutcm='Not Resolved' or aeoutcm='Unknown') then ls03chk3="Outgoing and Outcome do not match"; if (ls03chk1='' or ls03chk2='') and aeongyn='Yes' and (aeoutcm='Resolved' or aeoutcm='Resolved with sequelae' or aeoutcm='Death') then ls03chk3="Outgoing and Outcome do not match"; else ls03chk3=''; if ls03chk2='' and (aeoutcm='Not Resolved' or aeoutcm='Unknown') and aeendate ne '' then ls03chk4="AE not resolved or unknown and end date is recorded"; if ls03chk2='' and (aeoutcm='Resolved' or aeoutcm='Resolved with sequelae' or aeoutcm='Death') and aeendate='' then ls03chk4="AE resolved or death and end date is missing"; else ls03chk4=''; run; data ls0301; format ls03er $255.; set ae0302; by subjid; ls03er=catx(', ', ls03chk1, ls03chk2, ls03chk3, ls03chk4); drop ls03chk1 ls03chk2 ls03chk3 ls03chk4; label ls03er='Error Message'; run; data list03; format ls03er; merge ds02 ls0301 (in=ls03); by subjid; if ls03=1; run; %let rundate = %SYSFUNC(today(),yymmddn8.); ods excel file="&path2\03 - ae outcomes_&rundate..xlsx"; ods excel options (embedded_titles='yes' sheet_name="Listing 03"); proc report data=list03; run; ods excel close; ods listing; Any help would be greatly appreciated.   Thank you. ... View more

Here are the tables I'm merging:   Table_1 A B C1 D1 1 a abc 123 1 a def 456 2 b ghi 789 2 b jkl 987 3 c mno 654     Table_2 A B C2 D2 1 a pqr 321 2 b vwx 543   Here is my syntax   data merge_1_2; format A B C1 C2 D1 D2; merge Table_1  Table_2; by A B; run;   Here is my result:   A B C1 C2 D1 D2 1 a abc pqr 123 321 1 a def pqr 456 321 2 b ghi vwx 789 543 2 b jkl vwx 987 543 3 c mno   654     Now the question.  How do I get rid of the duplicate values in column C2 and D2?  I want my merged table to look like this:   A B C1 C2 D1 D2 1 a abc pqr 123 321 1 a def   456   2 b ghi vwx 789 543 2 b jkl   987   3 c mno   654     Thank you, Armando ... View more