%let dir=C:\b\SAS-X405.5 ;  * root directory ;

*-------------------------------------------------------;

%let prg=&dir\prg ;         * program subdirectory ;
%let sub=&dir\sub;          * subdir containing autoloaded macros ;
%let dat=&dir\data ;        * data subdirectory ;
%let rpt=&dir\rpt ;         * reports and outputs subdirectory ;

*-------------------------------------------------------;
%let outfile="&rpt\BP-corr-wndos.txt" ;   * output file for corr triangle ;

%let odsgpath="&rpt";                     * ods graphics output dir ;
%let odspath="&rpt";                      * ods html output dir ;
%let odsbody="BP-corr-wndos.html";        * ods html output;

%let inset=bpset1 ;         * input data set;
%let inset=bpsetdtkg;

libname corral "&dat" ;


proc printto ; run ;
options missing=. ;

title Blood Pressure Correlations YOO;

proc corr noprint data=corral.&inset out=outset;
run;

ods html
  path=&odspath
  gpath=&odsgpath
  body=&odsbody
  ;
goptions device=gif;

ods graphics on;
proc corr data=corral.&inset plots=scatter;
  *plots=matrix ;
  *plots=scatter;
run;
ods graphics off;
ods html close;

data outset2 (drop=_TYPE_ );
  set outset (firstobs=4);
  format _numeric_ 5.2 ;
run;

proc printto print=&outfile ;      * direct output to file ;
run;

proc print data=outset2 noobs;
run;


proc printto; run;