Date:         Mon, 23 Feb 2004 18:36:11 -0500
Reply-To:     Don Stanley <don_stanley@PARADISE.NET.NZ>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         Don Stanley <don_stanley@PARADISE.NET.NZ>
Subject:      Re: Revisiting Page X of Y
Comments: To: Prasad Ravi <jmt_mtf@YAHOO.COM>

Feel free to amend this as you desire, I also have a datestamp in the
footer.

This is designed to be used in-stream, ie within another SAS statement.
Although I have given a sample call using a footnote, it also works in
Titles and may work in other places.

Don

%macro pagenum ;
%let mydate = %sysfunc(max("&sysdate9"d,-99999),worddatx21.) ;
%let mydate = %sysfunc(trim(&mydate)) ;
         "{\b0\i0\fc\fs19 &mydate}"
         '{\line\b0\i0\fc\fs19 Page}\~'
         '{\b0\i0\fc\fs19\chpgn}'
         '\~{\b0\i0\fc\fs19 of}\~'
         '{\field{\*\fldinst{\b0\i0\fc\fs19 NUMPAGES \\*MERGEFORMAT}}}'
%mend pagenum ;

Sample Call

footnote j=l %pagenum j=r "Program ID: Report4" ;

On Mon, 23 Feb 2004 15:10:47 -0800, Jeff Morison <jmt_mtf@YAHOO.COM> wrote:

>  I have 76 pages SAS output generated from PROC
>REPORT(summary table), I was wondering if there is a
>tool out there who can share with me to put Page X of
>Y on those pages.
>
>Thanks,
>Jeff.
>
>__________________________________
>Do you Yahoo!?
>Yahoo! Mail SpamGuard - Read only the mail you want.
>http://antispam.yahoo.com/tools