©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
VAFCMS03 ;BPFO/JRP - GENERAL ADT-A08 MESSAGE SENDER ; 22 Jan 2002 10:32 AM
Source file <VAFCMS03.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 3 | $$BLDMSG^VAFCMSG1 FILERM^VAFCUTL $$PIVNW^VAFHPIVT |
| VA Fileman | 3 | LIST^DIC CLEAN^DILF $$GET1^DIQ |
| Kernel | 2 | $$S^%ZTLOAD $$NOW^XLFDT |
| Health Level Seven | 1 | GENERATE^HLMA |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SNDA08(DFN,EVNTPROT,USER) | ;Build/send ADT-A08 message for patient
|
|
| TASK | ;Entry point for TaskMan to do bulk send
|
|
| BULKA08(ARRAY,EVNTPROT,USER,OUTARR) | ;Build/send ADT-A08 messages
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | SNDA08+16 |
| ^TMP("DG53494" | SNDA08+31 |
| ^TMP("HLS" | SNDA08+32 |
| ^TMP("VAFCMS03" | TASK+25 |
| ^VAT(391.71 - [#391.71] | SNDA08+28 |
| Name | Line Occurrences |
|---|---|
| $$SNDA08 | BULKA08+37 |
| BULKA08 | TASK+26 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARRAY | BULKA08~, BULKA08+25, BULKA08+35, TASK+10, TASK+22, TASK+26, TASK+27 |
| COUNT | BULKA08+31~, BULKA08+35*, BULKA08+39 |
| DFN | BULKA08+31~, BULKA08+33*, BULKA08+35*, BULKA08+37, BULKA08+39, SNDA08~, SNDA08+15*, SNDA08+16, SNDA08+24, SNDA08+25 , SNDA08+40, SNDA08+44 |
| DT | SNDA08+25 |
| DUZ | BULKA08+27, SNDA08+18, TASK+12, TASK+26 |
| EVNTPROT | BULKA08~, BULKA08+26, BULKA08+37, SNDA08~, SNDA08+17, SNDA08+37, SNDA08+47, TASK+11, TASK+16, TASK+26 |
| IENS | TASK+14~, TASK+16*, TASK+17, TASK+18, TASK+24! |
| INFOARR | SNDA08+22~, SNDA08+31*, SNDA08+33, SNDA08+34, SNDA08+35, SNDA08+36, SNDA08+37, SNDA08+38, SNDA08+39, SNDA08+40 , SNDA08+41, SNDA08+42, SNDA08+44, SNDA08+45, SNDA08+52 |
| ITEM | TASK+14~ |
| ITEM("DILIST" | TASK+21 |
| MSGARR | SNDA08+22~, SNDA08+32*, SNDA08+33, SNDA08+44, SNDA08+45, SNDA08+52 |
| MSGID | BULKA08+31~ |
| MULT | TASK+24! |
| OUT | TASK+14~, TASK+25*, TASK+26, TASK+27 |
| OUTARR | BULKA08~, BULKA08+23, BULKA08+24, BULKA08+37 |
| PIVOTNUM | SNDA08+22~, SNDA08+25*, SNDA08+26, SNDA08+28, SNDA08+35 |
| PIVOTPTR | SNDA08+22~, SNDA08+28*, SNDA08+29, SNDA08+34, SNDA08+50 |
| RESULT | SNDA08+22~, SNDA08+47, SNDA08+49, SNDA08+53*, SNDA08+54*, SNDA08+55 |
| STOP | BULKA08+31~, BULKA08+34*, BULKA08+35, BULKA08+39* |
| SUBS | TASK+14~ |
| SUBS("DILIST" | TASK+21 |
| TMP | SNDA08+22~, SNDA08+44*, SNDA08+45, SNDA08+49*, SNDA08+50 |
| USER | BULKA08~, BULKA08+27*, BULKA08+28*, BULKA08+29, BULKA08+37, SNDA08~, SNDA08+18*, SNDA08+19*, SNDA08+20, SNDA08+39 |
| VARPTR | SNDA08+22~, SNDA08+24*, SNDA08+25, SNDA08+36 |
| >> ZTREQ | TASK+28* |