Previous Topic

Next Topic

Book Contents
Central Stratified randomization

The following example illustrates a randomization rule for a Central Stratified (Type 2) randomization scheme. In this example, the stratification is based on the patient's weight, as entered in the Demographics form in Visit 1. Based on the patient's weight, the InForm application gets the next sequence number from either the CS_WT150 or the CS_WT275 randomization source list.

Function GetRndSourceList()
wt = Patient.GetValueRF("0.Visit1.DEM.DEM.0.WEIGHT", "", 0,0,0)

IF (wt > 90 AND wt <= 150) THEN
GetRndSourceList = "CS_WT150"
ELSEIF (wt > 150 AND wt < 275) THEN
GetRndSourceList = "CS_WT275"
ELSE
GetRndSourceList = ""
END IF
End Function

'set properties
Randomization.SiteID = Patient.GetSiteID
Randomization.Type = 2
Randomization.Source = GetRndSourceList
Randomization.PatientID = Patient.GetID
Randomization.Revision = 0
'randomize the patient and return result
SeqNum = Randomization.GetNextKit(KitInfo)
Result.Result= SeqNum + " / " + KitInfo

Send Feedback