Declaration

TRemPromptType = (ptComment, ptVisitLocation, ptVisitDate, ptQuantity,
                  ptPrimaryDiag, ptAdd2PL, ptExamResults, ptSkinResults,
                  ptSkinReading, ptLevelSeverity, ptSeries, ptReaction,
                  ptContraindicated, ptLevelUnderstanding, ptWHPapResult,
                  ptWHNotPurp);