What do I need to add here so that this line works?
put '%allProgForAcadDisplayInter(%bquote(' SMRPRLE_PROGRAM +(-1), SMRPRLE_PROGRAM_DESC +(-1) '))';
%global curProgram curProgramDesc;
%macro allProgForAcadDisplayInter(curProgram, curProgramDesc);
%let curProgram = &curProgram;
%put curProgram &curProgram;
%put curProgramDesc &curProgramDesc;
%mend;
%macro DisplayDemo();
proc sql;
create table AllProgramList (
SMRPRLE_PROGRAM varchar(100),
SMRPRLE_PROGRAM_DESC varchar(100)
);
insert into AllProgramList(SMRPRLE_PROGRAM, SMRPRLE_PROGRAM_DESC) values ("One", "Apple");
insert into AllProgramList(SMRPRLE_PROGRAM, SMRPRLE_PROGRAM_DESC) values ("Two", "Orange");
quit;
filename code temp;
data _null_; set AllProgramList;
file code;
put '%allProgForAcadDisplayInter(%bquote(' SMRPRLE_PROGRAM +(-1) '))';
put '%allProgForAcadDisplayInter(%bquote(' SMRPRLE_PROGRAM +(-1), SMRPRLE_PROGRAM_DESC +(-1) '))'; /*how can I make this line work*/
run;
%include code / source2;
%mend;
%DisplayDemo();
... View more
