©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
SDPMHLS ;BPFO/JRC -Build ROU-R01 HL7 message for 'SD ENC PERF MON' application ; 4/2/04 7:12am [5/12/04 10:29am]
Source file <SDPMHLS.m>
| Package | Total | Call Graph |
|---|---|---|
| Health Level Seven | 3 | $$HLDATE^HLFNC INIT^HLFNC2 GENERATE^HLMA |
| Kernel | 2 | ^%ZTLOAD ($$DT,$$FMADD,$$FMTE,$$NOW)^XLFDT |
| Registration | 2 | MAKEIT^VAFHLU $$SITE^VASITE |
| Scheduling | 2 | ROLLUP^SCRPW303 GETDATA^SDPMUT1 |
| VA Fileman | 2 | ^%DT C^%DTC |
| MailMan | 1 | ^XMD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BLDMSG(OUTARR,XMTARRY) | ;Build OBR segment
|
|
| EN | ;Entry point
|
|
| GETINFO | ;Get performance monitor data
|
|
| SENDMSG(XMTARRY) | ;Send HL7 message
|
|
| MSG | ;Build bulletin and send
|
|
| QUE | ;Queue retroactive XMIT job
|
|
| MAKEOBX | ;Set type and count for total encounters to bld OBX
|
|
| EXIT | ;Done
|
|
| BLDOBX | ;Build OBX
|
| Name | Field # of Occurrence |
|---|---|
| ^%DT | QUE+8 |
| C^%DTC | GETINFO+14 |
| ^%ZTLOAD | QUE+23 |
| $$HLDATE^HLFNC | BLDMSG+12, BLDMSG+14, BLDMSG+15 |
| INIT^HLFNC2 | BLDMSG+5, SENDMSG+9 |
| GENERATE^HLMA | SENDMSG+18 |
| ROLLUP^SCRPW303 | EN+13 |
| GETDATA^SDPMUT1 | GETINFO+23 |
| MAKEIT^VAFHLU | BLDMSG+17, BLDOBX+12 |
| $$SITE^VASITE | BLDMSG+23 |
| $$DT^XLFDT | GETINFO+13 |
| $$FMADD^XLFDT | QUE+7, QUE+14, QUE+16, GETINFO+17, GETINFO+18 |
| $$FMTE^XLFDT | MSG+7, MSG+8, MSG+9 |
| $$NOW^XLFDT | QUE+7, GETINFO+7, MSG+9 |
| ^XMD | MSG+17 |
| Name | Line Occurrences |
|---|---|
| $$SENDMSG | EN+20 |
| BLDMSG | EN+17 |
| BLDOBX | MAKEOBX+7, MAKEOBX+13, MAKEOBX+15, MAKEOBX+16, MAKEOBX+17, MAKEOBX+20, MAKEOBX+21 |
| EXIT | EN+24 |
| GETINFO | EN+15 |
| MAKEOBX | BLDMSG+24, BLDMSG+31 |
| MSG | EN+22 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | QUE+5*, QUE+24! |
| %DT("A" | QUE+4*, QUE+24! |
| %DT(0 | QUE+7*, QUE+24! |
| ARRY4HL7 | SENDMSG+3~, SENDMSG+7*, SENDMSG+13, SENDMSG+14, SENDMSG+15, SENDMSG+21 |
| CNT | BLDMSG+7~, BLDMSG+8*, BLDMSG+18, BLDMSG+19*, BLDOBX+13, BLDOBX+14* |
| COUNT | BLDMSG+4~, MAKEOBX+7*, MAKEOBX+12*, MAKEOBX+15*, MAKEOBX+16*, MAKEOBX+17*, MAKEOBX+20*, MAKEOBX+21*, BLDOBX+8 |
| DIV | BLDMSG+7~, BLDMSG+26*, BLDMSG+28, BLDMSG+29, BLDMSG+30 |
| DIVHL | BLDMSG+4~, BLDMSG+7~, BLDMSG+23*, BLDMSG+30*, BLDOBX+10 |
| EDT | QUE+2*, QUE+16*, QUE+24!, GETINFO+9 |
| ENDDATE | EN+5~, EN+11*, BLDMSG+15, GETINFO+9*, GETINFO+18*, GETINFO+21, MSG+8 |
| HL | BLDMSG+4~, BLDMSG+5, SENDMSG+3~, SENDMSG+9 |
| HL("" | BLDMSG+6, SENDMSG+10 |
| HLECH | BLDMSG+4~, SENDMSG+3~ |
| HLFS | BLDMSG+4~, SENDMSG+3~ |
| HLP | SENDMSG+3~, SENDMSG+18 |
| HLQ | BLDMSG+4~, SENDMSG+3~ |
| HLRESLT | SENDMSG+3~, SENDMSG+18, SENDMSG+19*, SENDMSG+22 |
| I | BLDMSG+7~ |
| INFO | BLDMSG+7~ |
| >> J | EN+20* |
| KILLARRY | SENDMSG+3~, SENDMSG+12*, SENDMSG+16*, SENDMSG+21 |
| >> M4 | MAKEOBX+9*, MAKEOBX+11, MAKEOBX+12 |
| MAKE | BLDMSG+7~, BLDMSG+17, BLDOBX+3~, BLDOBX+12 |
| MAKE(1 | BLDMSG+9*, BLDOBX+4* |
| MAKE(11 | BLDOBX+9* |
| MAKE(15 | BLDOBX+10* |
| MAKE(2 | BLDOBX+5* |
| MAKE(25 | BLDMSG+13* |
| MAKE(27 | BLDMSG+14*, BLDMSG+15* |
| MAKE(3 | BLDOBX+6*, BLDOBX+7* |
| MAKE(4 | BLDMSG+10*, BLDMSG+11* |
| MAKE(5 | BLDOBX+8* |
| MAKE(7 | BLDMSG+12* |
| MSGTEXT | MSG+5~ |
| MSGTEXT(1 | MSG+6* |
| MSGTEXT(2 | MSG+7* |
| MSGTEXT(3 | MSG+8*, MSG+9* |
| MSGTEXT(4 | MSG+10* |
| >> OBID | MAKEOBX+7*, MAKEOBX+10*, MAKEOBX+15*, MAKEOBX+16*, MAKEOBX+17*, MAKEOBX+20*, MAKEOBX+21*, BLDOBX+6 |
| OUTARR | EN+6~, EN+9*, EN+17, BLDMSG~, BLDMSG+21, BLDMSG+22, BLDMSG+26, BLDMSG+28, BLDMSG+29, GETINFO+23 , EXIT+1 |
| PNODE | BLDMSG+4~, BLDMSG+22*, BLDMSG+27~, BLDMSG+29*, MAKEOBX+12, MAKEOBX+20 |
| RDATE | EN+6~, BLDMSG+12, GETINFO+7*, MSG+7 |
| SCRNARR | EN+6~, EN+7*, EN+13, GETINFO+21, GETINFO+23, EXIT+1 |
| SNODE | BLDMSG+4~, BLDMSG+21*, BLDMSG+27~, BLDMSG+28*, MAKEOBX+7, MAKEOBX+15, MAKEOBX+16, MAKEOBX+17, MAKEOBX+20, MAKEOBX+21 |
| SORTARR | EN+6~, EN+8*, EN+13, GETINFO+23, EXIT+1 |
| STDATE | EN+5~, EN+11*, BLDMSG+14, GETINFO+9*, GETINFO+10, GETINFO+15*, GETINFO+17, GETINFO+21, MSG+8 |
| STDT | QUE+2*, QUE+12*, QUE+14, QUE+24!, GETINFO+9 |
| TYPE | BLDMSG+4~, MAKEOBX+7*, MAKEOBX+11*, MAKEOBX+15*, MAKEOBX+16*, MAKEOBX+17*, MAKEOBX+20*, MAKEOBX+21*, BLDOBX+7 |
| U | MAKEOBX+7, MAKEOBX+12, MAKEOBX+15, MAKEOBX+16, MAKEOBX+17, MAKEOBX+20, MAKEOBX+21 |
| VAFEVN | BLDMSG+7~ |
| VAFOBR | BLDMSG+7~, BLDMSG+16!, BLDMSG+17, BLDMSG+18 |
| VAFOBX | BLDMSG+7~, BLDOBX+3~, BLDOBX+11!, BLDOBX+12, BLDOBX+13 |
| VAFSTR | BLDMSG+7~ |
| X | QUE+2*, QUE+14*, QUE+16, QUE+24!, EN+6~, GETINFO+12~, GETINFO+15, GETINFO+17*, GETINFO+18 |
| X1 | GETINFO+12~, GETINFO+13* |
| X2 | GETINFO+12~, GETINFO+13* |
| XCNT | BLDMSG+7~, BLDMSG+8*, BLDMSG+19*, BLDOBX+4, BLDOBX+14* |
| XMCHAN | MSG+5~, MSG+15* |
| XMDUZ | MSG+5~, MSG+16* |
| XMSUB | MSG+5~, MSG+12* |
| XMTARRY | EN+6~, EN+10*, EN+17, EN+19, EN+20, BLDMSG~, BLDMSG+18, BLDOBX+13, SENDMSG~, SENDMSG+4* , SENDMSG+5*, SENDMSG+6, SENDMSG+13, SENDMSG+15, EXIT+1 |
| XMTEXT | MSG+5~, MSG+13* |
| XMY | MSG+5~ |
| XMY("G.SD PM | NOTIFICATION TIU" , MSG+14* |
| XMZ | MSG+5~ |
| Y | QUE+2*, QUE+10, QUE+12, QUE+24! |
| >> ZTDESC | QUE+19* |
| >> ZTIO | QUE+18* |
| >> ZTRTN | QUE+20* |
| >> ZTSAVE("EDT" | QUE+22* |
| >> ZTSAVE("STDT" | QUE+21* |
| >> ZTSK | QUE+23 |