MAGT7SB ;WOIFO/MLH/PMK - telepathology - create HL7 message to DPS - segment build - OBR ; 24 Jul 2013 8:23 PM
Source file <MAGT7SB.m>
Package | Total | Call Graph |
---|---|---|
Health Level Seven | 2 | SET^HLOAPI SETCE^HLOAPI4 |
Imaging | 2 | $$NPNAME^MAG7UNM $$CALLBACK^MAGT7SO |
VA FileMan | 1 | $$GET1^DIQ |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
OBRSEG(SEGELTS,FILE,LRSS,IENS,ACNUMB) | ; FUNCTION - main entry point - create an OBR segment
|
|
TESTLKUP(LABDATA,LABTEST) | ; lookup the test - called by MAGVIM02 as well
|
|
FileNo | Call Tags |
---|---|
^LAB(60 - [#60] | GET1^DIQ |
Name | Line Occurrences |
---|---|
TESTLKUP | OBRSEG+25 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACNUMB | OBRSEG~, OBRSEG+22, OBRSEG+53 |
COLLECTOR | OBRSEG+30~, OBRSEG+34*, OBRSEG+35 |
ERRSTAT | OBRSEG+12~*, OBRSEG+18, OBRSEG+21, OBRSEG+24, OBRSEG+29, OBRSEG+37, OBRSEG+40*, OBRSEG+41, OBRSEG+48, OBRSEG+49* , OBRSEG+51, OBRSEG+61 |
FILE | OBRSEG~ |
FILE("0" | OBRSEG+34 |
FILE("ORDERED | TEST" , TESTLKUP+2, TESTLKUP+4 |
FILE("PROCEDU | RE IEN" , TESTLKUP+11, RE NAME" , TESTLKUP+12 |
FILE(0 | OBRSEG+38 |
FLDCALBKPHN | OBRSEG+8~*, OBRSEG+49 |
FLDCOLLECTOR | OBRSEG+6~*, OBRSEG+35 |
FLDDXSERVID | OBRSEG+9~*, OBRSEG+57 |
FLDORDPVDR | OBRSEG+7~*, OBRSEG+39, OBRSEG+42, OBRSEG+43, OBRSEG+44, OBRSEG+45 |
FLDPLORDNO | OBRSEG+4~*, OBRSEG+22 |
FLDSETID | OBRSEG+3~*, OBRSEG+19 |
FLDUNIVSVCID | OBRSEG+5~*, OBRSEG+27 |
ID | OBRSEG+52~, OBRSEG+53*, OBRSEG+57 |
IENS | OBRSEG~, OBRSEG+34, OBRSEG+38, TESTLKUP+1~, TESTLKUP+2*, TESTLKUP+3, TESTLKUP+4 |
LABDATA | OBRSEG+25, OBRSEG+34, TESTLKUP~, TESTLKUP+2, TESTLKUP+4 |
LABTEST | OBRSEG+1~, OBRSEG+25, OBRSEG+27, TESTLKUP~, TESTLKUP+4*, TESTLKUP+5, TESTLKUP+6, TESTLKUP+7 |
LABTEST("ID" | TESTLKUP+6*, TESTLKUP+10, TESTLKUP+11* |
LABTEST("SYSTEM" | OBRSEG+26* |
LABTEST("TEXT" | TESTLKUP+7*, TESTLKUP+12* |
LRSS | OBRSEG~ |
ORDPVDRNAM | OBRSEG+11~, OBRSEG+40 |
ORDPVDRNAM("FAMILY" | OBRSEG+43 |
ORDPVDRNAM("GIVEN" | OBRSEG+44 |
ORDPVDRNAM("MIDDLE" | OBRSEG+45 |
ORDPVDRNO | OBRSEG+10~, OBRSEG+38*, OBRSEG+39, OBRSEG+40, OBRSEG+42, OBRSEG+49 |
SEGELTS | OBRSEG~, OBRSEG+14!, OBRSEG+16, OBRSEG+19, OBRSEG+22, OBRSEG+27, OBRSEG+35, OBRSEG+39, OBRSEG+42, OBRSEG+43 , OBRSEG+44, OBRSEG+45, OBRSEG+49, OBRSEG+57 |
SETID | OBRSEG+2~*, OBRSEG+19 |