©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
SCMCHLL ;BP/DJB - PCMM HL7 Log Transmission ; 3/2/00 12:59pm
Source file <SCMCHLL.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 1 | $$NOW^XLFDT |
| Scheduling | 1 | $$CONVERT^SCMCHLRI |
| VA Fileman | 1 | (FILE,UPDATE)^DIE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| STORE(TRANI) | ;Store data
|
|
| ADD | ;Process data array built in GETDATA
|
|
| GETDATA | ;Go thru HL7 array and build array of data in ^TMP("PCMM","LOG",$J).
|
|
| CREATE(MSGID) | ;Create new entry
; Input: Message Control ID |
|
| LOG | ;Record HL7 messages in PCMM HL7 TRANSMISSION LOG file.
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SCPT(404.471 - [#404.471] | STORE+9 |
| ^SCTM(404.52 - [#404.52] | STORE+17 |
| ^TMP("HLS" | GETDATA+3 |
| ^TMP("PCMM" | LOG+7!, LOG+11*, LOG+12*, LOG+17!, GETDATA+10*, GETDATA+16*, ADD+2, STORE+12, STORE+13, STORE+23 |
| Name | Line Occurrences |
|---|---|
| $$CREATE | ADD+2 |
| ADD | LOG+15 |
| GETDATA | LOG+14 |
| STORE | ADD+4 |
| Name | Field # of Occurrence |
|---|---|
| ^( | GETDATA+4, STORE+24 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CNT | GETDATA+1~, GETDATA+2*, GETDATA+3*, GETDATA+4, STORE+5~, STORE+22*, STORE+25*, STORE+26 |
| DATA | GETDATA+1~, GETDATA+4*, GETDATA+5, GETDATA+9, GETDATA+14, GETDATA+15 |
| DFN | GETDATA+1~, GETDATA+9*, GETDATA+10 |
| FS | LOG+4~, LOG+8*, GETDATA+5 |
| >> HL("FS" | LOG+8 |
| >> HLRESLT | LOG+9 |
| MSGID | LOG+4~, LOG+9*, LOG+11, CREATE~, CREATE+6 |
| SCERR | CREATE+5~, CREATE+8, STORE+5~, STORE+19! |
| SCFDA | CREATE+5~, STORE+5~, STORE+19! |
| SCFDA( | CREATE+6*, STORE+12*, STORE+13*, STORE+14*, STORE+15, STORE+16*, STORE+17*, STORE+27*, STORE+28* |
| SCIEN | CREATE+5~, STORE+5~ |
| SCIEN(1 | CREATE+9 |
| SCIENS | STORE+5~, STORE+11*, STORE+12, STORE+13, STORE+14, STORE+15, STORE+16, STORE+17, STORE+26 |
| SCIENS1 | STORE+5~, STORE+26*, STORE+27, STORE+28 |
| SEG | GETDATA+1~, GETDATA+5*, GETDATA+8, GETDATA+13 |
| SEQ | GETDATA+1~, GETDATA+14*, GETDATA+16, STORE+5~, STORE+22*, STORE+23*, STORE+24, STORE+27 |
| TDATE | LOG+4~, LOG+10*, LOG+12 |
| TRANI | ADD+1~, ADD+2*, ADD+3, ADD+4, STORE~, STORE+8, STORE+9, STORE+11 |
| U | GETDATA+9, GETDATA+14, GETDATA+15, STORE+17 |
| >> VARPTR | STORE+16, STORE+17 |
| >> WORK | STORE+15 |
| ZPCID | GETDATA+1~, GETDATA+15*, GETDATA+16, STORE+5~, STORE+24*, STORE+28 |