#hl7-v2 #intersystems-ensemble
#hl7-v2 #intersystems-ансамбль
Вопрос:
Чтобы избежать использования EVNgrp из-за проблем со схемой, у меня есть этот код, который предназначен для добавления сегмента PID и PD1 к ADR ^A19. По какой-то причине он этого не делает. Любая помощь, пожалуйста?
If $Length(source.Primary.PID) {
Set oSeg=##class(EnsLib.HL7.Segment).ImportFromString(source.Primary.PID)
Do target.AppendSegment(oSeg)
}
If $Length(source.Primary.PD1) {
Set oSeg=##class(EnsLib.HL7.Segment).ImportFromString(source.Primary.PD1)
Do target.AppendSegment(oSeg)
}
Ответ №1:
Я обнаружил, что проблема была вызвана проблемой окружающей среды, которая была решена, и теперь код работает нормально. Спасибо всем за вашу помощь.