©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
PSDFT1 ;B'ham ISC/JPW,LTL - File NDES Info ; 26 June 95
Source file <PSDFT1.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 5 | ^%DT NOW^%DTC ^DIC ^DIE IX^DIK |
| MailMan | 3 | KILL^XM XMZ^XMA2 ^XMD |
| Health Level Seven | 2 | $$FMDATE^HLFNC GENACK^HLMA1 |
| Controlled Substances | 1 | ^PSDFILM |
| Registration | 1 | (INP,KVA)^VADPT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| END | ||
| ERR | ;err log update
|
|
| ACK | ;Send ack back
|
|
| DFT | ;process the incoming message
|
|
| NUR | ||
| UPDATE | ;update 58.8 and 58.81
|
|
| EDIT | ;edit new transaction in 58.81
|
|
| ADD | ;find entry number in 58.81
|
|
| FIND9 | ||
| EDIT9 | ;edit error log
|
|
| FIND | ||
| LOOP | ;loop thru data from DFT message
|
|
| OP |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| HL7 Protocol Name | Call Tags |
|---|---|
| PSD DFT CLIENT |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | Classic Fileman Calls |
| ^PSD(58.81 - [#58.81] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("DD" | NUR+17 |
| ^DIC(42 - [#42] | LOOP+7, LOOP+10 |
| ^DIC(45.7 - [#45.7] | EDIT+4 |
| ^DPT - [#2] | NUR+10, NUR+11, NUR+31 |
| ^PSD(58.8 - [#58.8] | LOOP+9, NUR+13, NUR+27, UPDATE+2, UPDATE+4, UPDATE+5 |
| ^PSD(58.81 - [#58.81] | ADD+1, FIND*, FIND+2, EDIT+1*, EDIT+4*, EDIT+5* |
| ^PSD(58.89 - [#58.89] | ERR+1, FIND9*, FIND9+2 |
| ^PSDRUG - [#50] | LOOP+4, LOOP+5, NUR+32 |
| ^VA(200 - [#200] | NUR+3, NUR+8, NUR+29, NUR+30 |
| ^XUSEC("PSD ERROR" | NUR+25 |
| Name | Line Occurrences |
|---|---|
| ACK | LOOP+4, LOOP+5 |
| FIND | FIND |
| FIND9 | FIND9 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | NUR+11, UPDATE+4* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | END!, UPDATE+3 |
| %DT | NUR+17*, END! |
| %H | END! |
| %I | END! |
| BAL | END!, UPDATE+4*, EDIT+1 |
| CQTY | END! |
| DA | END!, EDIT+6!*, EDIT9+1!* |
| >> DFN | LOOP+8*, EDIT+3* |
| DIC | NUR*, NUR+2!, NUR+5*, NUR+7!, END!, FIND+1!*, FIND9+1!* |
| DIC(0 | NUR*, NUR+5*, FIND+1*, FIND9+1* |
| DIE | END!, EDIT9+1!* |
| DIK | END!, EDIT+6!* |
| >> DILOCKTM | UPDATE+2, ADD+1, ERR+1 |
| DINUM | END!, FIND+1*, FIND9+1* |
| DLAYGO | END!, FIND+1!*, FIND9+1!* |
| DR | END!, EDIT9+1!* |
| DUZ | NUR+24 |
| >> HL("DTM" | NUR+16 |
| >> HL("ECH" | LOOP+6, LOOP+13, NUR+14 |
| >> HL("EID" | ACK+1 |
| >> HL("EIDS" | ACK+1 |
| >> HL("FS" | LOOP+4, LOOP+5, LOOP+6, LOOP+8, LOOP+11, LOOP+13, NUR+4, NUR+9, NUR+10, NUR+11 , NUR+12, NUR+15, ACK+3 |
| >> HL("MID" | ACK+3 |
| >> HLA("HLA" | ACK+3* |
| >> HLARYTYP | ACK+1*, ACK+4 |
| >> HLEID | ACK+1*, ACK+4 |
| >> HLEIDS | ACK+1*, ACK+4 |
| >> HLFORMAT | ACK+1*, ACK+4 |
| >> HLMTIENA | ACK+2*, ACK+4 |
| >> HLMTIENS | ACK+4 |
| >> HLNEXT | DFT+2 |
| >> HLNODE | DFT+2 |
| >> HLNODE( | DFT+2 |
| >> HLP | ACK+2*, ACK+4 |
| >> HLQUIT | DFT+2 |
| >> HLRESLTA | ACK+2*, ACK+4 |
| JJ | END! |
| LQTY | END! |
| NAOU | LOOP+1~, LOOP+6*, LOOP+7*, LOOP+8*, LOOP+9, LOOP+10, EDIT9+1 |
| NAOU(1 | LOOP+9*, LOOP+10, NUR+13, NUR+27, UPDATE+2, UPDATE+4, UPDATE+5, EDIT+1 |
| NAOU(2 | LOOP+6*, LOOP+10 |
| NAOUN | END! |
| NODE | END! |
| NUR1 | LOOP+1~, LOOP+13*, NUR+3, EDIT+4 |
| NUR1(1 | NUR*, NUR+1*, NUR+3, NUR+29 |
| NUR2 | LOOP+1~, NUR+4*, NUR+8, NUR+15*, NUR+30, EDIT+4 |
| NUR2(1 | NUR+5*, NUR+6*, NUR+8 |
| OK | END! |
| OQTY | END! |
| ORD | END! |
| PAT | LOOP+1~, NUR+9*, NUR+10, NUR+11, NUR+31, END+1!, EDIT+3, EDIT+4 |
| PATL | END+1! |
| PSD | DFT+1~, DFT+2*, NUR+20~, NUR+24*, NUR+25*, END+1!, EDIT+6! |
| PSD( | DFT+2* |
| PSD(3 | LOOP+2, EDIT+4 |
| PSD(4 | LOOP+2 |
| PSD(5 | LOOP+3 |
| PSD(6 | LOOP+3 |
| PSD1 | DFT+1~, DFT+2* |
| PSD1( | DFT+2* |
| PSDER | END+1!, FIND9*, FIND9+1, EDIT9+1 |
| PSDFT1 | LOOP+1~, LOOP+3*, LOOP+4, LOOP+5, LOOP+11, LOOP+13, NUR+12, NUR+15 |
| PSDM | LOOP+1~ |
| PSDM( | NUR+8*, NUR+26*, NUR+27*, NUR+28*, NUR+29*, NUR+30*, NUR+31*, NUR+32*, NUR+33*, NUR+34* |
| PSDM(0 | NUR+19 |
| PSDM(1 | LOOP+10*, NUR+13 |
| PSDM(2 | LOOP+12* |
| PSDM(3 | NUR+3*, NUR+29 |
| PSDM(4 | NUR+10*, NUR+11*, NUR+31 |
| PSDM(5 | NUR+14*, NUR+32 |
| PSDM(6 | NUR+18*, NUR+33 |
| PSDPID | LOOP+1~, LOOP+2*, LOOP+8, NUR+9, NUR+10, NUR+11 |
| PSDPN | END+1! |
| PSDPV1 | LOOP+1~, LOOP+2*, LOOP+6 |
| PSDR | NUR+12*, NUR+13, NUR+14, NUR+32, END+1!, UPDATE+2, UPDATE+4, UPDATE+5, EDIT+1 |
| PSDREC | END+1!, FIND*, FIND+1, EDIT+1, EDIT+4, EDIT+5, EDIT+6, EDIT9+1 |
| PSDRN | END+1! |
| PSDT | NUR+16*, NUR+17, END+1!, EDIT+1, EDIT9+1 |
| PSDT(1 | NUR+17*, NUR+18, NUR+33 |
| PSDTN | END+1!, UPDATE+3* |
| PSDTYP | LOOP+1~, LOOP+11*, LOOP+12, NUR+8, NUR+28, NUR+30 |
| PSDTYP(1 | LOOP+11*, LOOP+12, NUR+15, NUR+28, EDIT+1, EDIT+4 |
| PSDZPM | LOOP+1~, LOOP+3*, NUR+4 |
| QTY | NUR+15*, NUR+32, NUR+36*, END+1!, UPDATE+4, EDIT+1, EDIT+4 |
| U | LOOP+5, LOOP+9, LOOP+10, NUR+11, NUR+27, NUR+29, NUR+30, NUR+31, NUR+32, EDIT+4 |
| VAERR | EDIT+6! |
| >> VAIN(4 | LOOP+8 |
| >> VAROOT | EDIT+3* |
| WQTY | END+1! |
| X | LOOP+13*, NUR+1*, NUR+4*, NUR+6*, NUR+17*, END+1!, FIND+1*, FIND9+1* |
| >> XMDUZ | NUR+22* |
| >> XMSUB | NUR+21* |
| >> XMTEXT | NUR+35* |
| >> XMY( | NUR+24*, NUR+25* |
| >> XMZ | NUR+23 |
| Y | NUR, NUR+1, NUR+5, NUR+6, NUR+17*, NUR+18, END+1! |