Hello, colleagues. I'm very sorry for the long absence but I guess I ought to give this case a closure. This is the solution that worked for me. data junk;
input randnum kit_number;
datalines ;
4 423
257 275
83 888
18 897
;
run; %macro M; local i; %do i = 1 %to 4; data temp; set junk; if _N_ = &i; call symput('randnum',randnum); call symput('kitnum',kit_number); run; data temp2; text = " ^n^n^n^n^n^n^n^n^n^n^n^n^n^n^n Investigation number №: ^S={font_weight=bold} XXXXXXXXXXX ^n^n ^S={font_weight=light}Randomization number: &randnum ^n^n Kit number: &kitnum"; run; proc report data=temp2 nowd noheader style(report)={rules=none frame=void} style(column)={font_size=14pt just=l}; run; ods startpage = now; %end; %mend M; options nodate nonumber byline orientation=portrait papersize=letter; ods escapechar = "^"; ods listing close; ods rtf file = "C:\Users\Username\contents.rtf" startpage=yes; %M; ods _all_ close; ods listing; The result is 4 pages in rtf file with similar content in the middle of each page. This will be used as contents for envelopes in the blinded randomization trial with appropriate data (150 pages) Thanks everyone for your input!
... View more