EDPCONV ;SLC/MKB - Process incoming mail to convert local ED Visits ;2/28/12 08:33am
Source file <EDPCONV.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 |
---|---|---|
Emergency Department Integration Software | 3 | EDPCONV1 EDPFMOVE EDPMAIL |
Name | Comments | DBIA/ICR reference |
---|---|---|
AREA(DIV) | ; -- Return #231.9 ien for DIVision (#4 ien)
|
|
VST(OLD) | ; -- Copy OLD(node) ER visit entry into ^EDP(230)
|
|
HIST(MVTI,LOG) | ; -- Copy OLD(MVTI) into ^EDP(230.1)
|
|
NEW(FILE,X) | ; -- Return ien of new entry in FILE
|
|
XREF(FILE,DA) | ; -- Set all xrefs for DA in FILE
|
|
PID(NM,ID) | ; -- Return brief id (L0000) for patient
|
|
TZONE(X) | ; -- Return #minutes local offset for time zone
|
|
ACU(X) | ; -- Return[/add] #233.1 ien for Acuity X
|
|
STS(X) | ; -- Return[/add] #233.1 ien for Status X
|
|
DEL(X) | ; -- Return[/add] #233.1 ien for Delay Reason X
|
|
ARR(X) | ; -- Return[/add] #233.1 ien for Arrival Mode X
|
|
DISP(X) | ; -- Return[/add] #233.1 ien for Disposition code X
|
|
LOC(X) | ; -- Return[/add] #231.8 ien for Location X
|
|
LCQ | ;exit
|
|
NOVALUE() | ||
ORDERS(LOG,NODE) | ; -- build Orders multiple
|
|
ICD | ; -- convert ICD codes to #80 iens
|
|
SHOWICD(BEG,END) | ; -- show Dx nodes from BEG to END
|
|
MARK(STN) | ; -- mark duplicate locations with correct ien,
; for repointing from STN to Institution ien set |
|
LOOP | ; -- loop through Log,History files and repoint if FIX node exists
|
|
DIK | ; -- remove duplicate entries from #231.8
|
Name | Field # of Occurrence |
---|---|
FILE^DICN | NEW+2, ORDERS+18 |
UPDATE^DIE | ACU+11, STS+12, DEL+12, ARR+9, DISP+16, LOC+18 |
^DIK | DIK+3 |
IX1^DIK | XREF+2 |
$$GET1^DIQ | ORDERS+8, ORDERS+10, ORDERS+11 |
$$ICDDX^EDPLEX | VST+19 |
$$ICDDX^ICDCODE | ICD+7 |
EN^ORQ1 | ORDERS+5 |
$$FMADD^XLFDT | ORDERS+3 |
$$NOW^XLFDT | ORDERS+4 |
$$LOW^XLFSTR | ACU+8, STS+8, DEL+8, ARR+7, DISP+10 |
$$STA^XUAF4 | VST+4 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^OR(100 - [#100] | GET1^DIQ |
100.008 | GET1^DIQ |
^EDPB(231.8 - [#231.8] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^EDP( | LOOP+3, LOOP+5* |
^EDP(230 - [#230] | VST+19, VST+22*, HIST+4, ORDERS+7, ICD+2, ICD+3, ICD+8*, SHOWICD+3, SHOWICD+4 |
^EDP(230.1 - [#230.1] | HIST+7* |
^EDPB(231.8 - [#231.8] | LOC+5, MARK+3, MARK+4, MARK+5, MARK+6, MARK+7*, LOOP+4, DIK+2 |
^EDPB(231.9 - [#231.9] | AREA+1 |
^EDPB(233.1 - [#233.1] | ACU+4, STS+4, STS+5, DEL+4, DEL+5, ARR+4, DISP+5, DISP+6, NOVALUE |
^TMP("ORR" | ORDERS+5!, ORDERS+6, ORDERS+19! |
Name | Line Occurrences |
---|---|
$$ACU | VST+12, HIST+5 |
$$AREA | VST+3 |
$$ARR | VST+8 |
$$DEL | VST+10 |
$$DISP | VST+10 |
$$LOC | VST+12, HIST+5 |
$$NEW | VST+6, HIST+2 |
$$NOVALUE | ACU+2, STS+3, DEL+3, ARR+3, DISP+3 |
$$PID | VST+8 |
$$STS | VST+12, HIST+5, LOC+16 |
HIST | VST+26 |
ORDERS | VST+29 |
XREF | VST+23, HIST+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACT | HIST+1~, HIST+7 |
ACT(0 | HIST+4* |
ACT(3 | HIST+5* |
AREA | MARK+2~, MARK+3*, MARK+4, MARK+5, MARK+7 |
BEG | SHOWICD~, SHOWICD+2*, SHOWICD+3 |
DA | NEW+1~, XREF~, ORDERS+1~, ORDERS+14!, SHOWICD+1~, SHOWICD+4*, SHOWICD+6, DIK+1~, DIK+3* |
DA(1 | ORDERS+15* |
DFN | ORDERS+1~, ORDERS+2*, ORDERS+5 |
DIC | NEW+1~, NEW+2*, ORDERS+1~, ORDERS+14!, ORDERS+15* |
DIC("DR" | ORDERS+16* |
DIC(0 | NEW+2*, ORDERS+15* |
DIERR | ACU+6~, ACU+12, STS+7~, STS+13, DEL+7~, DEL+13, ARR+6~, ARR+10, DISP+8~, DISP+17 , LOC+7~, LOC+19 |
DIK | XREF+1~, XREF+2*, DIK+1~, DIK+3* |
DIV | AREA~, AREA+1 |
DO | NEW+1~ |
DT | ORDERS+3 |
EDP1 | ICD+1~, ICD+2*, ICD+3, ICD+8 |
EDP2 | ICD+1~, ICD+3*, ICD+8 |
EDPAREA | VST+1~, VST+3*, VST+8, LOC+5, LOC+10 |
EDPDIFF | VST+1~, VST+2* |
EDPI | VST+1~, VST+14*, VST+15, VST+19, VST+26* |
EDPLOG | VST+1~, VST+22 |
EDPLOG(0 | VST+8*, VST+29 |
EDPLOG(1 | VST+10* |
EDPLOG(2 | VST+11* |
EDPLOG(3 | VST+12* |
EDPLOG(4 | VST+13*, VST+14, VST+15, VST+19* |
EDPSITE | VST+1~, VST+2*, VST+3, VST+4, VST+8, LOC+5, LOC+9 |
EDPSTA | VST+1~, VST+4*, ACU+8, STS+8, DEL+8, ARR+7, DISP+10 |
EDPY | VST+1~, VST+6*, VST+19, VST+22, VST+23, VST+26, VST+29, VST+31, HIST+1~, HIST+2* , HIST+7, HIST+8 |
END | SHOWICD~, SHOWICD+2*, SHOWICD+3 |
ERR | ACU+6~, STS+7~, DEL+7~, ARR+6~, DISP+8~, LOC+7~ |
FDA | ACU+6~, STS+7~, DEL+7~, ARR+6~, DISP+8~, LOC+7~ |
FDA( | ACU+8*, ACU+9*, ACU+10*, STS+8*, STS+9*, STS+10*, STS+11*, DEL+8*, DEL+9*, DEL+10* , DEL+11*, ARR+7*, ARR+8*, DISP+10*, DISP+11*, DISP+12*, DISP+13*, DISP+14*, DISP+15*, LOC+8* , LOC+9*, LOC+10*, LOC+11*, LOC+12*, LOC+13*, LOC+15*, LOC+16*, LOC+17* |
FDAIEN | ACU+6~, STS+7~, DEL+7~, ARR+6~, DISP+8~, LOC+7~ |
FDAIEN(1 | ACU+12, STS+13, DEL+13, ARR+10, DISP+17, LOC+19 |
FILE | NEW~, NEW+2, XREF~, XREF+2, LOOP+1~, LOOP+2*, LOOP+3, LOOP+5 |
FIX | LOOP+1~, LOOP+4*, LOOP+5 |
I | VST+1~, VST+5* |
ID | PID~, PID+1 |
IEN | SHOWICD+1~, SHOWICD+3*, SHOWICD+4, SHOWICD+6, MARK+2~, MARK+7*, LOOP+1~, LOOP+3*, LOOP+5, DIK+1~ , DIK+2*, DIK+3 |
IN | ORDERS+1~, ORDERS+3*, ORDERS+5 |
LOC | MARK+2~, MARK+5*, MARK+6*, MARK+7, LOOP+1~, LOOP+3*, LOOP+4 |
LOG | HIST~, HIST+2, HIST+4, ORDERS~, ORDERS+7, ORDERS+15 |
MVT | HIST+1~, HIST+3*, HIST+4, HIST+5 |
MVTI | HIST~, HIST+3 |
NM | PID~, PID+1, ACU+6~, ACU+7*, ACU+8, MARK+2~, MARK+4*, MARK+5, MARK+7 |
NODE | ACU+2~*, ACU+3, ACU+7, STS+2~, STS+3*, STS+4, STS+5, STS+9, STS+11, DEL+2~ , DEL+3*, DEL+4, DEL+5, DEL+9, DEL+10, DEL+11, ARR+2~, ARR+3*, ARR+4, DISP+2~ , DISP+3*, DISP+4, DISP+6, DISP+9, DISP+11, DISP+12, DISP+13, DISP+14, DISP+15, LOC+2~ , LOC+3*, LOC+4, LOC+8, LOC+11, LOC+12, LOC+13, LOC+14, LOC+16, LOC+17, ORDERS~ , ORDERS+2, ORDERS+3, ORDERS+4 |
OLD | VST~ |
OLD( | VST+5*, VST+26, HIST+3 |
OLD("ACU" | ACU+2 |
OLD("ARR" | ARR+3 |
OLD("CLOSED" | VST+8, VST+29 |
OLD("DEL" | DEL+3 |
OLD("DIS" | DISP+3 |
OLD("LOC" | LOC+3 |
OLD("SITE" | VST+2 |
OLD("STS" | STS+3 |
OLD("TZ" | VST+2 |
OLD(0 | VST+6, VST+7, VST+8, VST+12 |
OLD(1 | VST+10 |
OLD(2 | VST+11 |
OLD(230 | VST+31* |
OLD(3 | VST+12 |
OLD(4 | VST+8, VST+10, VST+12 |
OLD(6 | VST+8, VST+9, VST+12 |
OLD(8 | VST+13 |
OLD(9 | VST+9, VST+10 |
ORI | ORDERS+1~, ORDERS+5*, ORDERS+6* |
ORIFN | ORDERS+1~, ORDERS+6*, ORDERS+7, ORDERS+8, ORDERS+10, ORDERS+11, ORDERS+15 |
ORLIST | ORDERS+1~, ORDERS+6, ORDERS+19 |
OUT | ORDERS+1~, ORDERS+4*, ORDERS+5 |
PKG | ORDERS+1~, ORDERS+12*, ORDERS+16 |
PNM | VST+1~, VST+7*, VST+8 |
REL | ORDERS+1~, ORDERS+10*, ORDERS+16 |
SSN | VST+1~, VST+7*, VST+8 |
STN | MARK~, MARK+3, MARK+4, MARK+5, MARK+7 |
STS | ORDERS+1~, ORDERS+9*, ORDERS+16 |
U | VST+6, VST+7, VST+8, VST+9, VST+10, VST+11, VST+12, VST+13, VST+15, VST+19 , HIST+4, HIST+5, ACU+3, ACU+7, STS+4, STS+5, STS+9, STS+11, DEL+4, DEL+5 , DEL+9, DEL+10, DEL+11, ARR+4, DISP+4, DISP+6, DISP+9, DISP+11, DISP+12, DISP+13 , DISP+14, DISP+15, LOC+4, LOC+8, LOC+11, LOC+12, LOC+13, LOC+14, LOC+16, LOC+17 , ORDERS+2, ORDERS+3, ORDERS+4, ORDERS+9, ICD+4, ICD+8, SHOWICD+5, LOOP+3, LOOP+5 |
X | VST+1~, VST+2*, VST+6*, VST+8, VST+9*, VST+10, VST+11*, VST+15*, VST+16*, VST+17* , VST+19*, VST+29*, NEW~, TZONE~, TZONE+1, ACU~, ACU+1, ACU+2, ACU+3*, ACU+4 , ACU+9, ACU+10, STS~, STS+1, STS+3, STS+4*, STS+5*, STS+8, STS+10, DEL~ , DEL+1, DEL+3, DEL+4*, DEL+5*, DEL+8, ARR~, ARR+1, ARR+3, ARR+4*, ARR+7 , ARR+8, DISP~, DISP+1, DISP+3, DISP+4*, DISP+5, DISP+6*, DISP+9*, DISP+10, LOC~ , LOC+1, LOC+3, LOC+4*, LOC+5, LOC+7~, LOC+14*, LOC+15, ORDERS+1~, ORDERS+8*, ORDERS+9 , ORDERS+11*, ORDERS+12, ORDERS+14!, ORDERS+15*, ICD+1~, ICD+4*, ICD+5*, ICD+6*, ICD+7, SHOWICD+1~ , SHOWICD+5*, SHOWICD+6 |
X0 | ICD+1~, ICD+3*, ICD+4, SHOWICD+1~, SHOWICD+4*, SHOWICD+5, SHOWICD+6 |
Y | NEW+1~, NEW+3, PID+1~*, PID+2, TZONE+1~*, TZONE+2, ACU+2~, ACU+3*, ACU+4*, ACU+12* , ACU+13, STS+2~, STS+3*, STS+4*, STS+5*, STS+13*, STS+14, DEL+2~, DEL+3*, DEL+4* , DEL+5*, DEL+13*, DEL+14, ARR+2~, ARR+3*, ARR+4*, ARR+10*, ARR+11, DISP+2~, DISP+3* , DISP+5*, DISP+6*, DISP+17*, DISP+18, LOC+2~, LOC+4*, LOC+5*, LOC+19*, LCQ+1, ORDERS+1~ , ORDERS+14!, ICD+1~, ICD+7*, ICD+8 |