filename tabl_out "C:\location\demo.rtf";  /*recfm=v lrecl=32767*/;
title;
ods listing close;
ods escapechar="^";
ods rtf file="C:\location\demo.rtf" ;
proc print data=sashelp.cars(where=(type="SUV") keep=Make Model Type Invoice);
run;
run;
ods rtf close;
/*ods html close;*/
ods listing;


%let outputlocation=C:\location\Narrative_SampleN.rtf;
filename product "&outputlocation.";
filename tabl_out "C:\location\demo.rtf";
ods listing ;

%let t1=SCS Content Generation;
%let t12=------------------------------------------------------------;
%let t2=_____________________________________________________________;
%let t3="Distribution Limited to %sysfunc(byte(174)) goto; Personnel","Created On %sysfunc(date(),monname.),%sysfunc(date(),day.).";
%let z = %nrstr(goto newline;);
%let y = %sysfunc(byte(219));

proc stream outfile=product RESETDELIM = "goto"  quoting = single;
BEGIN
&t1. 
&z.
&t12.
&z.
&z.
&z.
goto; %include tabl_out; &z.
;;;;
run;