...
Imports DemoLoopFunctions, iso_21090_datatypes, HL7_v2_VMR_V1
Context SinglePatient
"Past history includes: " +
GetCDDisplayNamesFromSequenceObsAsString(Self.observations->select(o|o.observationCode.code="439401001"))
+ '.'
The result is here:

Image Added