PK.VITLSET,
S(0)^/START,
@HDR,
@OPEN.NUR,
@VITALSET,
@TRLR,
END;

HDR
"<?xml version="_D(34)_1.0_D(34)_" ?>"^!,
"<ReplyMessage>"^!,
"<TransactionId>0</TransactionId>"^!,
"<Status>Success</Status>"^!,
"<StatusDescription>Step returned a Success status.</StatusDescription>"^!,
"<Payload>"^!,
"<CodeSets>"^!

TRLR
"</CodeSets>"^!,
"</Payload>"^!,
"</ReplyMessage>"^!

OPEN.NUR
@misdir,
O(&,@misdict),
@pkdir

VITALSET
"<CodeSet>"^!,
"<CodeSetNumber>264</CodeSetNumber>"^!,
"<Codes>"^!,
""^ggv,
DO{+/CONF[.vitals.queries][ggv]^ggv "got one",
   IF{&GGV[ggv]|1;ggv}^disp,
   IF{ggv=/CONF[.vitals.bp.query] "blood pressure gets special handling",
      "split bp query into systolic and diastolic",
         ggv^tmpggv,
         disp^tmpdisp,
         tmpggv_":S"^ggv,tmpdisp_"(S)"^disp,@VITAL.DEF,
         tmpggv_":D"^ggv,tmpdisp_"(D)"^disp,@VITAL.DEF,
         tmpggv^ggv;
      "otherwise, just emit this query",
         @VITAL.DEF}},
"</Codes>"^!,
"<Key>"_/START_"</Key>"^!,
"</CodeSet>"^!

VITAL.DEF
"<Code>"^!,
"<Display><![CDATA["_(disp)_"]]></Display>"^!,
"<Mnemonic><![CDATA["_(ggv)_"]]></Mnemonic>"^!,
"<Meaning><![CDATA["_(ggv)_"]]></Meaning>"^!,
"</Code>"^!
