'
+ 'Patient: ' + Patient.Name + ' | '
+ '' + Patient.SSN + ' | '
-{ TODO -oRV -cWVEHR Long Age : Changed to use long age }
- //+ 'Age: ' + IntToStr(Patient.Age) + ' | '
- + 'Age: ' + GetPatientBriefAge(Patient.DFN) + ' | '
-{}
+ + 'Age: ' + IntToStr(Patient.Age) + ' | '
+ '