[prev in list] [next in list] [prev in thread] [next in thread] 

List:       sas-l
Subject:    Left-Justified Footnote Macro
From:       Paul McDonald <paul_mcdonald () AMERITECH ! NET>
Date:       1999-10-29 22:28:50
[Download RAW message or body]

%macro lfoot (num, message) /des='Left-justified footnote' ;
   %local num message mlength ps blenght ;

   %let mlength = %length(&message) ;
   %let ls      = %scan(%sysfunc(getoption(ls, keyword)), 2, =) ;
   %let blength = %eval(&ls-&mlength) ;
   %put mlength = &mlength ls = &ls blength = &blength ;

   footnote&num "&message%sysfunc(repeat(%str( ), &blength))" ;
%mend lfoot ;

[prev in list] [next in list] [prev in thread] [next in thread]