Class TVisionPrescriptionDispense
Unit
bsFhir_stu3
Declaration
type TVisionPrescriptionDispense = class(TBackboneElement)
Description
An authorization for the supply of glasses and/or contact lenses to a patient.
Hierarchy
Overview
Methods
Properties
Description
Methods
|
constructor Create; override; |
|
Properties
|
property product : TCodeableConcept read Getproduct write Setproduct; |
Identifies the type of vision correction product which is required for the patient.
|
|
property eye : string read Geteye write Seteye; |
The eye for which the lens applies.
|
|
property eyeElement : TVisionEyes read GeteyeElement write SeteyeElement; |
|
|
property sphere : Double read Getsphere write Setsphere; |
Lens power measured in diopters (0.25 units).
|
|
property sphereElement : Tdecimal read GetsphereElement write SetsphereElement; |
|
|
property cylinder : Double read Getcylinder write Setcylinder; |
Power adjustment for astigmatism measured in diopters (0.25 units).
|
|
property cylinderElement : Tdecimal read GetcylinderElement write SetcylinderElement; |
|
|
property axis : integer read Getaxis write Setaxis; |
Adjustment for astigmatism measured in integer degrees.
|
|
property axisElement : Tinteger read GetaxisElement write SetaxisElement; |
|
|
property prism : Double read Getprism write Setprism; |
Amount of prism to compensate for eye alignment in fractional units.
|
|
property prismElement : Tdecimal read GetprismElement write SetprismElement; |
|
|
property base : string read Getbase write Setbase; |
The relative base, or reference lens edge, for the prism.
|
|
property baseElement : TVisionBase read GetbaseElement write SetbaseElement; |
|
|
property add : Double read Getadd write Setadd; |
Power adjustment for multifocal lenses measured in diopters (0.25 units).
|
|
property addElement : Tdecimal read GetaddElement write SetaddElement; |
|
|
property power : Double read Getpower write Setpower; |
Contact lens power measured in diopters (0.25 units).
|
|
property powerElement : Tdecimal read GetpowerElement write SetpowerElement; |
|
|
property backCurve : Double read GetbackCurve write SetbackCurve; |
Back curvature measured in millimeters.
|
|
property backCurveElement : Tdecimal read GetbackCurveElement write SetbackCurveElement; |
|
|
property diameter : Double read Getdiameter write Setdiameter; |
Contact lens diameter measured in millimeters.
|
|
property diameterElement : Tdecimal read GetdiameterElement write SetdiameterElement; |
|
|
property duration : TQuantity read Getduration write Setduration; |
The recommended maximum wear period for the lens.
|
|
property color : string read Getcolor write Setcolor; |
Special color or pattern.
|
|
property colorElement : Tstring read GetcolorElement write SetcolorElement; |
|
|
property brand : string read Getbrand write Setbrand; |
Brand recommendations or restrictions.
|
|
property brandElement : Tstring read GetbrandElement write SetbrandElement; |
|
|
property note : TAnnotationArray read GetnoteArray; |
Notes for special requirements such as coatings and lens materials.
|
Generated by PasDoc 0.15.0.
|