0

为了避免由于架构问题而使用 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)
 }
4

1 回答 1

0

我发现该问题是由环境问题引起的,该问题已解决,代码现在可以正常工作。谢谢大家的帮助。

于 2020-11-29T21:15:16.663 回答