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 |