SDHL7 ;SLC/AGP - RTC Order HL7 receiver;11:53 AM 19 Jun 2017
Source file <SDHL7.m>
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 |
Package | Total | Caller Graph |
---|---|---|
Kernel | 1 | ^ORD(101 |
Scheduling | 1 | SD RECEIVE OR |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(MSG) | ; -- main entry point for OR RECEIVE where MSG contains HL7 msg
|
|
ENX | ;
|
|
MSA(RESULT,X,SEG,ERROR) | ;
|
|
MSH(RESULT,X,SEG,ERROR) | ;
|
|
ARQ(RESULT,X,SEG,ERROR) | ;
|
|
AIL(RESULT,X,SEG,ERROR) | ;
|
|
AIG(RESULT,X,SEG,ERROR) | ;
|
|
NTE(RESULT,X,SEG,ERROR) | ;
|
|
PID(RESULT,X,SEG,ERROR) | ;
|
|
PV1(RESULT,X,SEG,ERROR) | ; -- Gets Patient location info.
; may not be needed for scheduling |
|
FMDATE(Y) | ; -- Convert HL7 date/time to FM format
|
|
REJECT(RESULT) | ;
; SHOW TO USER ; RESULT("REJECTION ERROR") |
|
VALIDATE(RESULT,ERROR) | ;
|
|
VALDDIS(RESULT,ERROR) | ; VALIDATE A DISCONTINUE REQUEST
|
|
DISCONT(RESULT,ERROR) | ;
|
|
SAVEREC(RESULT,ERROR) | ;
|
|
SENDFAIL(ERROR,RESULT) | ;
|
|
SENDOK(RESULT) | ;
|
|
UPSTAT(ORDIEN,STATUS) | ;
|
|
UNESC(STR) | ;
|
Name | Field # of Occurrence |
---|---|
C^%DTC | SAVEREC+49 |
$$GET1^DIQ | SAVEREC+38 |
$$UNESC^ORHLESC | UNESC+2 |
ARCLOSE^SDECAR | DISCONT+14 |
ARSET^SDECAR2 | SAVEREC+83 |
GETSTC^SDECCON | SAVEREC+63 |
$$FMTHL7^XLFDT | SENDFAIL+5, SENDOK+2, UPSTAT+4 |
$$HL7TFM^XLFDT | MSH+2, ARQ+6, FMDATE+1 |
$$NOW^XLFDT | SENDFAIL+5, SENDOK+2, UPSTAT+4 |
MSG^XQOR | SENDFAIL+8, SENDOK+4, UPSTAT+6 |
FileNo | Call Tags |
---|---|
^DGEN(27.11 - [#27.11] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | SAVEREC+15, SAVEREC+31 |
^DPT - [#2] | SAVEREC+37, SAVEREC+53 |
^SD(409.1 - [#409.1] | SAVEREC+58, SAVEREC+59 |
^TMP($J | EN+16* |
Name | Line Occurrences |
---|---|
$$UNESC | NTE+1 |
@( | EN+11 |
DISCONT | EN+19 |
ENX | EN+12, EN+13, EN+14, EN+16, EN+20, EN+24 |
REJECT | EN+12 |
SAVEREC | EN+23 |
SENDFAIL | EN+14, EN+20, EN+24 |
SENDOK | EN+25 |
VALDDIS | EN+18 |
VALIDATE | EN+22 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACTION | EN+1~, ARQ+3* |
AIG | EN+1~ |
AIL | EN+1~ |
APPTCHG | SAVEREC+6~, SAVEREC+7*, SAVEREC+8*, SAVEREC+9 |
APPTIEN | DISCONT+4~, DISCONT+6*, DISCONT+7*, DISCONT+8, DISCONT+10, SAVEREC+10 |
ARCINP | DISCONT+4~, DISCONT+14 |
ARCINP(1 | DISCONT+10* |
ARCINP(2 | DISCONT+11* |
ARCINP(3 | DISCONT+12* |
ARCINP(4 | DISCONT+13* |
ARCLE | DISCONT+4~, DISCONT+6*, DISCONT+16*, DISCONT+17 |
ARCRET | DISCONT+4~, DISCONT+6*, DISCONT+14, DISCONT+16 |
ARINP | SAVEREC+6~, SAVEREC+83 |
ARINP(1 | SAVEREC+10* |
ARINP(10 | SAVEREC+28* |
ARINP(11 | SAVEREC+31* |
ARINP(12 | SAVEREC+33*, SAVEREC+35* |
ARINP(13 | SAVEREC+38* |
ARINP(14 | SAVEREC+40*, SAVEREC+44* |
ARINP(15 | SAVEREC+45* |
ARINP(16 | SAVEREC+46* |
ARINP(18 | SAVEREC+57*, SAVEREC+59* |
ARINP(19 | SAVEREC+55* |
ARINP(2 | SAVEREC+13* |
ARINP(20 | SAVEREC+41*, SAVEREC+51* |
ARINP(21 | SAVEREC+65* |
ARINP(22 | SAVEREC+61* |
ARINP(23 | SAVEREC+67* |
ARINP(26 | SAVEREC+70* |
ARINP(27 | SAVEREC+81* |
ARINP(28 | SAVEREC+73* |
ARINP(3 | SAVEREC+15* |
ARINP(5 | SAVEREC+17* |
ARINP(6 | SAVEREC+19* |
ARINP(7 | SAVEREC+21* |
ARINP(8 | SAVEREC+23*, SAVEREC+24* |
ARINP(9 | SAVEREC+26* |
ARQ | EN+1~ |
ARSETE | SAVEREC+6~, SAVEREC+7*, SAVEREC+85*, SAVEREC+86, SAVEREC+88 |
ATYPIEN | SAVEREC+6~, SAVEREC+7*, SAVEREC+58*, SAVEREC+59*, SAVEREC+60, SAVEREC+61 |
CC | SAVEREC+76~, SAVEREC+78*, SAVEREC+79 |
>> CHGREQ | VALIDATE+1*, VALIDATE+42*, VALIDATE+43, VALIDATE+44 |
>> CLNIEN | VALIDATE+1*, VALIDATE+19*, VALIDATE+20, VALIDATE+21 |
COUNT | SAVEREC+6~, SAVEREC+7* |
DATE | EN+1~, ARQ+4*, ARQ+6 |
DDDT | SAVEREC+6~, SAVEREC+7*, SAVEREC+47*, SAVEREC+49 |
DT | DISCONT+13, SAVEREC+15, SAVEREC+23 |
DUZ(2 | SENDFAIL+5, SENDOK+2, UPSTAT+4 |
>> EBIEN | VALIDATE+1*, VALIDATE+11*, VALIDATE+12, VALIDATE+13, VALDDIS+6*, VALDDIS+7, VALDDIS+8 |
ENTER | EN+1~ |
ERROR | EN+1~, EN+2*, EN+4*, EN+6*, EN+7, EN+14, EN+18, EN+19, EN+20, EN+22 , EN+23, EN+24, MSA~, MSH~, ARQ~, AIL~, AIG~, NTE~, PID~, PV1~ , VALIDATE~, VALIDATE+4*, VALIDATE+5*, VALIDATE+8*, VALIDATE+9*, VALIDATE+12*, VALIDATE+13*, VALIDATE+16*, VALIDATE+17*, VALIDATE+20* , VALIDATE+21*, VALIDATE+24*, VALIDATE+25*, VALIDATE+31*, VALIDATE+34*, VALIDATE+35, VALIDATE+38*, VALIDATE+40*, VALIDATE+43*, VALIDATE+48* , VALIDATE+50*, VALIDATE+51, VALDDIS~, VALDDIS+3*, VALDDIS+4*, VALDDIS+7*, VALDDIS+8*, DISCONT~, DISCONT+17*, SAVEREC~ , SAVEREC+86*, SENDFAIL~, SENDFAIL+6 |
FAILMSA | EN+1~, EN+7*, EN+12, MSA+2* |
FREQ | EN+1~, ARQ+7*, ARQ+8 |
HASMSA | EN+1~, EN+7*, EN+9*, EN+13 |
>> I | SAVEREC+48* |
INST | EN+1~, AIG+1~, AIG+3*, AIG+4 |
>> INTERV | VALIDATE+28*, VALIDATE+33 |
MARDDS | SAVEREC+6~, SAVEREC+7*, SAVEREC+50*, SAVEREC+51 |
MSG | EN~, EN+3 |
MSH | EN+1~, EN+5*, EN+6 |
NODE | EN+1~, EN+8*, AIG+1~, AIG+4*, AIG+5 |
NUM | EN+1~, ARQ+7*, ARQ+8 |
>> NUMAPP | VALIDATE+1*, VALIDATE+27*, VALIDATE+29, VALIDATE+30, VALIDATE+32 |
NXT | EN+1~ |
ORDIEN | VALIDATE+1*, VALIDATE+23*, VALIDATE+24, VALIDATE+25, UPSTAT~, UPSTAT+1 |
>> OREMSG(3 | SENDFAIL+7* |
PAT | EN+1~ |
>> PATIEN | VALIDATE+1*, VALIDATE+15*, VALIDATE+16, VALIDATE+17 |
>> PCE | SAVEREC+37*, SAVEREC+38 |
PID | EN+1~ |
PR | SAVEREC+76~, SAVEREC+79*, SAVEREC+80 |
>> PREREQ | SAVEREC+77*, SAVEREC+80*, SAVEREC+81 |
PTIEN | SAVEREC+6~, SAVEREC+7*, SAVEREC+12*, SAVEREC+13, SAVEREC+37, SAVEREC+53 |
PV1 | EN+1~ |
>> REQIEN | VALIDATE+46*, VALIDATE+47, VALIDATE+49, VALDDIS+2*, VALDDIS+3, VALDDIS+4 |
RESULT | EN+1~, EN+12, EN+14, EN+18, EN+19, EN+20, EN+22, EN+23, EN+24, EN+25 , MSA~, MSH~, ARQ~, AIL~, AIG~, NTE~, PID~, PV1~, REJECT~, VALIDATE~ , VALDDIS~, DISCONT~, SAVEREC~, SENDFAIL~, SENDOK~ |
RESULT( | ARQ+3* |
RESULT("APPT | TYPE" , ARQ+2* |
RESULT("CHANGE" | VALIDATE+42, SAVEREC+5, SAVEREC+8 |
RESULT("CLINIC" | AIL+1*, VALIDATE+19, SAVEREC+19, SAVEREC+63 |
RESULT("COMMENT" | NTE+1*, VALIDATE+40, SAVEREC+33, SAVEREC+35 |
RESULT("DISCONTINUE" | EN+18, EN+22, DISCONT+9 |
RESULT("ENTER | ED BY" , ARQ+10*, VALIDATE+11, VALDDIS+6, DISCONT+12, SAVEREC+21 |
RESULT("INTERVAL" | ARQ+8*, VALIDATE+28, SAVEREC+45, SAVEREC+49 |
RESULT("MSG D | ATE/TIME" , MSH+2* |
RESULT("MSG I | D" , MSH+1*, SENDFAIL+5, SENDOK+2, UPSTAT+4 |
RESULT("NEW O | RDER" , SAVEREC+5 |
RESULT("NLT" | ARQ+5*, VALIDATE+37, VALIDATE+38, SAVEREC+34, SAVEREC+69, SAVEREC+70 |
RESULT("NUMBE | R APPT" , ARQ+8*, VALIDATE+27, SAVEREC+42, SAVEREC+43, SAVEREC+46, SAVEREC+48 |
RESULT("ORDER | IEN" , ARQ+1*, VALIDATE+23, SAVEREC+72, SAVEREC+73 |
RESULT("PATIENT" | PID+1*, VALIDATE+15, SAVEREC+12 |
RESULT("PREREQ" | AIG+2*, AIG+5*, SAVEREC+75, SAVEREC+78, SAVEREC+79 |
RESULT("REJEC | TION ERROR" , EN+16, MSA+2* |
RESULT("REQ F | ILE IEN" , EN+16, ARQ+1*, VALIDATE+46, VALDDIS+2, DISCONT+7, SAVEREC+88*, SENDOK+3, UPSTAT+5 |
RESULT("RTC D | ATE" , ARQ+6*, VALIDATE+3, SAVEREC+23, SAVEREC+30, SAVEREC+47 |
RESULT("SIGNE | D BY" , ARQ+9*, VALIDATE+7, SAVEREC+28 |
>> RTCD | VALIDATE+1*, VALIDATE+3*, VALIDATE+4, VALIDATE+5 |
>> RTCDTI | SAVEREC+30*, SAVEREC+31 |
>> SBIEN | VALIDATE+1*, VALIDATE+7*, VALIDATE+8, VALIDATE+9 |
SCPER | SAVEREC+6~, SAVEREC+7*, SAVEREC+53*, SAVEREC+54, SAVEREC+55, SAVEREC+56 |
SDATE | SAVEREC+6~, SAVEREC+7*, SAVEREC+49*, SAVEREC+50 |
SDEMSG | SENDFAIL+3~, SENDFAIL+8 |
SDEMSG(1 | SENDFAIL+5* |
SDEMSG(2 | SENDFAIL+6* |
SDMSG | EN+1~, EN+3*, EN+4, EN+5, EN+7, EN+8, AIG+3, AIG+4, SENDOK+1~, SENDOK+4 , UPSTAT+3~, UPSTAT+6 |
SDMSG(1 | SENDOK+2*, UPSTAT+4* |
SDMSG(2 | SENDOK+3*, UPSTAT+5* |
SEG | EN+1~, EN+8*, EN+9, EN+10*, EN+11, MSA~, MSA+1, MSA+2, MSH~, MSH+1 , MSH+2, ARQ~, ARQ+1, ARQ+2, ARQ+3, ARQ+4, ARQ+7, ARQ+9, ARQ+10, AIL~ , AIL+1, AIG~, AIG+2, NTE~, NTE+1, PID~, PID+1, PV1~ |
SETRET | SAVEREC+6~, SAVEREC+7*, SAVEREC+83, SAVEREC+85 |
SIGN | EN+1~ |
STATUS | UPSTAT~, UPSTAT+2 |
STCREC | SAVEREC+6~, SAVEREC+7*, SAVEREC+63, SAVEREC+64, SAVEREC+65 |
STR | UNESC~, UNESC+2 |
>> TIME | ARQ+4*, ARQ+5, ARQ+6 |
U | ARQ+2, ARQ+6, AIG+2, AIG+5, PID+1, DISCONT+2*, DISCONT+12, DISCONT+17, SAVEREC+2*, SAVEREC+12 , SAVEREC+19, SAVEREC+21, SAVEREC+28, SAVEREC+37, SAVEREC+63, SAVEREC+65, SAVEREC+86 |
X | EN+1~, EN+7*, EN+8, MSA~, MSH~, ARQ~, AIL~, AIG~, AIG+3, AIG+4 , NTE~, PID~, PV1~, SAVEREC+49 |
>> X1 | SAVEREC+49* |
>> X2 | SAVEREC+49* |
Y | FMDATE~, FMDATE+1, SAVEREC+15*, SAVEREC+31* |