* pagMichelle.prg define pagMichelle as Page RecordNo = 0 enddefine But to build the pageframe you can't just set the PageCount, you need to AddObject each page: * pageframe.Init set procedure to pagMichelle additive for i = 1 to 10 lcStr = "Page" + padl( i, '0', 2 ) this.AddObject( lcStr, "pagMichelle" ) with this.Pages[i] .Caption = trips.cName .RecordNo = recno() endwith skip 1 endfor>Hmmm... That's kind of the reverse of what I need. I don't want to go through the pages and assign them to records; I want to go through the records and assign them to pages.