This should for a base ten only...

hth

mc

Mike Church
Technical Support Manager
Information Services
Our Lady of Bellefonte Hospital
Saint Christopher Drive
Ashland, Kentucky 41101
-----------------------------------
Phone : (606)833-3727
Pager : (606)327-0965
   Fax : (606)833-3342
-----------------------------------
   Alternate e-mail : [log in to unmask]
-----------------------------------
 MY URL: http://members.tripod.com/mike_church/
OLBH: http://www.olbh.com
-----------------------------------
Daily Quote: Few are those who see with their own eyes and feel with their
own hearts. - Albert Einstein


;---------------------------------
; Pass 1 : create subfile with data
;---------------------------------

can clear
set default

acc pat-encounter

def ln-cnt num*5 = 1

set subfile name file1 size 50000

report summary & ;
 ln-cnt sub noreset  & ;
 pat-acct-nbr

set report limit 100

go

;---------------------------------
; Pass 2 : report
;---------------------------------

can clear
set default

acc *file1

set report dev printer

def sel-key char*1 = (ascii(ln-cnt,6))[6:1]

sort on sel-key

report & ;
 sel-key & ;
 ln-cnt & ;
 pat-acct-nbr

footing at sel-key skip page

set report limit 100

go



-----Original Message-----
From: Jean Huot [mailto:[log in to unmask]]
Sent: Friday, August 04, 2000 5:32 PM
To: [log in to unmask]
Subject: [HP3000-L] Powerhouse Quiz - Stumbling block.


 Here is the problem.

Take a quiz report which has x lines to be reported. amongst 10 people.  It
is not known ahead of time what the value of x will be, but is dependant
upon how many records will be selected.  The report is to be split evenly
amongst the employees.  The idea behind this is:  each reported line
statement is a file an agent has to work on.  To split the work evenly
amongst 10 people, I have to split the report from the work that needs to be
carried on.

Any bright idea floating around???

Jean Huot
Northern Credit Bureaus Inc.