topic Re: Add new column in proc report in New SAS User

Add new column in proc report

mmea — Fri, 18 Dec 2020 11:49:29 GMT

Hi. with this code I made a proc report:

ods pdf notoc file="F:\Brugere\MMEA\hej.pdf" ;
proc report data=pdf1 nowd;
column teststed analysebeskrivelse dato Ledigtid;
define teststed/display;
define Ledigtid/ display;
compute Ledigtid;
    if Ledigtid = ">10%" then call define(_col_,"style","style={background=green}");
	if Ledigtid = "<10%" then call define(_col_,"style","style={background=red}"); 
endcomp;

run;

ods pdf close;

This code gives me this report (I have just cut out a small piece):

Is there a way to make new columns called fx "XX" and "YY". Column "XX" should contain all the values and colors of "Ledigtid" for those in "analysebeskrivelse" or "Teststed" who has the characters 'Nære kontakter' in the name. Anything else should be in "YY".

So i want the colors green and red match with the new columns I want to make based on the names from Teststed.

Does it make sense?

I hope so 🙂

Re: Add new column in proc report

PaigeMiller — Fri, 18 Dec 2020 11:52:05 GMT

Can you please provide a larger screen capture so I can read the text? It's too small right now.

Re: Add new column in proc report

mmea — Fri, 18 Dec 2020 11:53:53 GMT

Re: Add new column in proc report

PaigeMiller — Fri, 18 Dec 2020 12:29:58 GMT

Untested code

ods pdf notoc file="F:\Brugere\MMEA\hej.pdf" ;
proc report data=pdf1 nowd;
column teststed analysebeskrivelse dato Ledigtid xx;
define teststed/display;
define Ledigtid/ display;
define xx/computed;
compute Ledigtid;
    if Ledigtid = ">10%" then call define(_col_,"style","style={background=green}");
	if Ledigtid = "<10%" then call define(_col_,"style","style={background=red}"); 
endcomp;
compute xx;
    if find(teststed,'Nære kontakter')>0 or find(analysebeskrivelse,'Nære kontakter')>0 then do;

        xx=ledigtid;
        if Ledigtid = ">10%" then call define(_col_,"style","style={background=green}");
	    if Ledigtid = "<10%" then call define(_col_,"style","style={background=red}"); 
    end;
endcomp;
run;

ods pdf close;

YY would be similar, so its a homework assignment for you.

Re: Add new column in proc report

mmea — Fri, 18 Dec 2020 12:34:38 GMT

thank you so much.

For YY then I should say if not "Nære kontakter"? I am quite new in SAS

Re: Add new column in proc report

mmea — Fri, 18 Dec 2020 12:37:53 GMT

I fixed it!

The only thing is that the text ">10%" etc. do not come with just the color

Re: Add new column in proc report

PaigeMiller — Fri, 18 Dec 2020 12:50:48 GMT

Show us the code you used. Please paste your code as text into the box that appears when you click on the "running man" icon.

Re: Add new column in proc report

mmea — Fri, 18 Dec 2020 12:53:07 GMT

ods pdf notoc file="F:\Brugere\MMEA\hey1.pdf" ;
proc report data=pdf1 nowd;
column teststed analysebeskrivelse dato Ledigtid Nærekontakter åbnetesttilbud;
define teststed/display;
define Ledigtid/ display;
define Nærekontakter/computed;
define åbnetesttilbud/computed;
compute Ledigtid;
    if Ledigtid = ">10%" then call define(_col_,"style","style={background=green}");
	if Ledigtid = "<10%" then call define(_col_,"style","style={background=red}"); 
endcomp;
compute Nærekontakter;
    if find(teststed,'Nære kontakter')>0 or find(analysebeskrivelse,'Nære kontakter')>0 then do;

        Nærekontakter=ledigtid;
        if Ledigtid = ">10%" then call define(_col_,"style","style={background=green}");
	    if Ledigtid = "<10%" then call define(_col_,"style","style={background=red}"); 
    end;
endcomp;
compute åbnetesttilbud;
if find(analysebeskrivelse,'Virustest')>0  then do;

        åbnetesttilbud=ledigtid;
        if Ledigtid = ">10%" then call define(_col_,"style","style={background=green}");
	    if Ledigtid = "<10%" then call define(_col_,"style","style={background=red}"); 
	

    end;
endcomp;

run;

ods pdf close;

I added the XX (called nære kontakter) and YY (åbne testetilbud)

I now get two new columns with the matching color basedon ledigtid, but i still want the text "<10%" etc in the new columns

Re: Add new column in proc report

PaigeMiller — Fri, 18 Dec 2020 13:08:48 GMT

Probably my mistake, I think you should have

compute Nærekontakter/character;

and

compute åbnetesttilbud/character;

If I may be so bold as to suggest a style improvement — I find that colors red and green are too bold and too overwhelming and makes the text hard to read. (Maybe you feel the same, or maybe not ... its a personal thing, I guess). So I use the following

"style={background=lightmoderategreen}"

and

"style={background=lightmoderatered}"

which makes a better looking output, in my opinion.

Re: Add new column in proc report

mmea — Fri, 18 Dec 2020 14:10:48 GMT

Thank you so much it worked!

Do you know if you can add to you code, that you before running the PDF you want to remove some of the columns?

proc report data=pdf1 nowd;
column teststed analysebeskrivelse dato Ledigtid Nærekontakter åbnetesttilbud;
define teststed/display;
define Ledigtid/ display;
define Nærekontakter/computed;
define åbnetesttilbud/computed;
compute Ledigtid;
    if Ledigtid = ">10%" then call define(_col_,"style","style={background=green}");
	if Ledigtid = "<10%" then call define(_col_,"style","style={background=red}"); 
endcomp;
compute Nærekontakter/character;
    if find(teststed,'Nære kontakter')>0 or find(analysebeskrivelse,'Nære kontakter')>0 then do;

        Nærekontakter=ledigtid;
        if Ledigtid = ">10%" then call define(_col_,"style","style={background=green}");
	    if Ledigtid = "<10%" then call define(_col_,"style","style={background=red}"); 
    end;
endcomp;
compute åbnetesttilbud/character;
if find(analysebeskrivelse,'Virustest')>0  then do;

        åbnetesttilbud=ledigtid;
        if Ledigtid = ">10%" then call define(_col_,"style","style={background=green}");
	    if Ledigtid = "<10%" then call define(_col_,"style","style={background=red}"); 
	

    end;
endcomp;
run;

I use ledigtid and analysebeskrivelse in my statements, but I dont want them in my final report. Can I remove them?

Re: Add new column in proc report

PaigeMiller — Fri, 18 Dec 2020 14:27:07 GMT

define ledigtid/noprint;