Thank you, Toby.

I will use that dataset for PROC REPORT, and my idea is that I set the maximum observation numbers for each page, and in my code, I set it as 30. I believe that kind of data structure is necessary for my special purpose, and after running that macro, my report will have a page break in each treatment if the observation number satisfies the condition

if 30*(i-1) < obs <= 30 * i then page = i;

meanwhile, if we have a new treatment group, then we will also have another page break, i.e. starting a new page

Best regards, Amy

On 1/19/07, toby dunn <tobydunn@hotmail.com> wrote: > > Amy , > > I am still not sure what your desired output should even look like. Where > should the breaks be at your exmaple below doesnt give me any rules ad it > doesnt match one page per Treatment Group. > > But If I was to take a stab at it I would use By Group Processing. > > Data Have ; > Do TRT = 1 To 3 ; > Do Cnt = 1 To 40 ; > Output ; > End ; > End ; > Run ; > > > Options Nonumber NoByLine NoDate ; > > Title "For #ByVal1" ; > > Proc Print > Data = Have NoObs; > By Trt ; > Var Trt Cnt ; > Run ; > > > > > Toby Dunn > > To sensible men, every day is a day of reckoning. ~John W. Gardner > > The important thing is this: To be able at any moment to sacrifice that > which we are for what we could become. ~Charles DuBois > > Don't get your knickers in a knot. Nothing is solved and it just makes you > walk funny. ~Kathryn Carpenter > > > > > > > From: Amy Sun <tonyliang20032@GMAIL.COM> > Reply-To: Amy Sun <tonyliang20032@GMAIL.COM> > To: SAS-L@LISTSERV.UGA.EDU > Subject: Re: generating page numbers > Date: Thu, 18 Jan 2007 23:46:55 -0500 > > I want the page break for each treatment, if there is an easier way to do > that, it will be great, I am not sure if I can share the code with you. > > Thank you for your help. > > Amy > > On 1/18/07, toby dunn <tobydunn@hotmail.com> wrote: > > > >Amy , > > > >This may sound weird but why woudl you want to go through all this > trouble > >when there a multitude of easier ways to get page numbers now a days in > >SAS. > > Alot will depend on what format you want to print the data out > too. So > >if > >we knew that and what rules you want to put what observations to what > page > >we could offer better advice. > > > > > > > >Toby Dunn > > > >To sensible men, every day is a day of reckoning. ~John W. Gardner > > > >The important thing is this: To be able at any moment to sacrifice that > >which we are for what we could become. ~Charles DuBois > > > >Don't get your knickers in a knot. Nothing is solved and it just makes > you > >walk funny. ~Kathryn Carpenter > > > > > > > > > > > > > >From: Amy Sun <tonyliang20032@GMAIL.COM> > >Reply-To: Amy Sun <tonyliang20032@GMAIL.COM> > >To: SAS-L@LISTSERV.UGA.EDU > >Subject: generating page numbers > >Date: Thu, 18 Jan 2007 23:36:15 -0500 > > > >Hi, all; > > > >I want to generate the page number for a dataset, there are several > >treatment groups: 1, 2, 3. I want the final dataset will have the page > >number information for each treatment, the following is my expectation: > > > >trt obs newobs page > >1 1 1 1 > >........ > >1 30 30 1 > >1 31 31 2 > >..... > >1 40 40 2 > > > >2 1 41 3 > >........ > >2 30 70 3 > >2 31 71 4 > >..... > >2 40 80 4 > > > >3 1 81 5 > >........ > >3 30 110 5 > >3 31 111 6 > >..... > >3 40 120 6 > > > >I want to write a macro to present the above dataset, while something > >should > >be wrong with my following code > > > >data page (drop = obs); > >do trt = 1 to 3; > > do obs = 1 to 40; > > output; > > end; > >end; > >run; > > > >%macro pager(dsin =, var =); > >%global num0 maxobs num1; > > > >proc sort data = &dsin; > >by &var; > > > >data pp; > >set &dsin; > >by &var; > >if first.&var then obs = 0; > >obs + 1; > >newobs + 1; > > > >proc sql; > >create table er as > > select *, ceil(max(obs)/30) as pagen > > from pp > > group by &var; > >quit; > > > >proc sort data = er; > >by &var obs; > > > >proc sql noprint; > > select pagen into : num0 > > from er > > where obs = newobs; > > select max(newobs) into : maxobs > > from er > > where obs = newobs; > >quit; > > > >data total; > >set er; > >by &var; > >if first.&var then output; > > > >proc sql noprint; > > select sum(pagen) into : totalpage > > from total; > >quit; > > > >data er (drop = i); > >set er end = eof; > >if obs = newobs then do; > > do i = 1 to &num0; > > if 30 * (i-1) < obs <= 30*i then page = i; > > end; > >end; > >if eof then stop; > > > >%do; > >proc sql noprint; > > select pagen into : pagea > > from er > > where page ne . ; > >quit; > > > >%do j = 1 %to &pagea; > >proc sql noprint; > >select max(newobs) into : num1 > > from er > > where page ne . ; > > > >data er; > >set er; > >if newobs - obs = &num1 then do; > > if 30 * %eval(&j-1) < obs <= 30*%eval(&j) then page = > %eval(&num0 > >+ > >&j); > >end; > >%end; > > > >%end; > > > >proc sql noprint; > > select pagen into : num0 > > from er > > where page ne . ; > > select max(newobs) into : maxobs > > from er > > where page ne . ; > >quit; > > > >%mend; > >%pager(dsin = page, var = trt); > >proc print data = er; > >run; > > > >please take a look at my code. Thanks in advance for your suggestions. > > > >Best regards, > >Amy > > > >_________________________________________________________________ > >Search for grocery stores. Find gratitude. Turn a simple search into > >something more. > > > > > http://click4thecause.live.com/search/charity/default.aspx?source=hmemtagline_gratitude&FORM=WLMTAG > > > > > > _________________________________________________________________ > Type your favorite song. Get a customized station. Try MSN Radio powered > by Pandora. http://radio.msn.com/?icid=T002MSN03A07001 > >