Date:         Wed, 2 Nov 2005 09:01:53 -0800
Reply-To:     "data _null_;" <datanull@GMAIL.COM>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         "data _null_;" <datanull@GMAIL.COM>
Organization: http://groups.google.com
Subject:      Re: generating patient list
Comments: To: sas-l@uga.edu
In-Reply-To:  <1130945949.127291.178790@g43g2000cwa.googlegroups.com>
Content-Type: text/plain; charset="iso-8859-1"

How about making the pid after making a randomized plan.  I used PROC
PLAN with 4 treatments in blocks of 5 to get to 20 subjects per site.

proc plan noprint seed=23456;
   factors site=100 ordered block=5 ordered trtgrp=4 random;
   output out=work.plan;
   run;
   quit;
data work.plan;
   set work.plan;
   pid = put(site,z3.)||'-'||put(_n_,z4.);
   run;
proc print;
   run;