©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
ASUWSND1 ; IHS/ITSC/LMH - SAMS DATA TRANSMISSION ROUTINE - SEND DATA ;
Source file <ASUWSND1.m>
| Package | Total | Call Graph |
|---|---|---|
| MailMan | 2 | XMZ^XMA2 ENT1^XMD |
| VA Fileman | 2 | FILE^DICN ^DIE |
| IHS VA Utilities | 1 | ^XBKVAR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| QUIT | ;----- CLEAN UP AND QUIT
|
|
| EN | ;EP -- MAIN ENTRY POINT TO TRANSMIT NEW SAMS TRANSACTIONS
|
|
| TRANS(X) | ;----- GET TRANSMISSION NUMBER
|
|
| EN2 | ;EP -- ENTRY POINT TO RETRANSMIT SAMS TRANSACTIONS
|
|
| MSG(X,Y) | ;----- CREATE MAIL MESSAGE STUB
|
|
| SITE() | ;----- GET SITE'S DOMAIN NAME
|
|
| SEND(XMZ) | ||
| GET(XMZ) | ;----- GET DATA AND STUFF INTO MAIL MESSAGE
|
|
| MARK(ASUTRANS) |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ASUW(9002036.77 | TRANS+3, TRANS+4, TRANS+5, TRANS+11 |
| ^ASUW(9002036.88 | EN+4, GET+13, GET+17 |
| ^AUTTVNDR - [#9999999.11] | GET+19 |
| ^DD(9002036.77 | MARK+15 |
| ^DIC(4.2 - [#4.2] | SITE+3 |
| ^TMP("ASU" | GET+10!, GET+21*, MARK+4, MARK+5, QUIT+2! |
| ^VA(200 - [#200] | GET+18 |
| ^XMB(1 - [#4.3] | SITE+3 |
| ^XMB(3.9 - [#3.9] | GET+12*, GET+20*, GET+23*, GET+24* |
| Name | Line Occurrences |
|---|---|
| $$SITE | MSG+3 |
| GET | EN+9 |
| MARK | EN+11 |
| MSG | EN+7 |
| QUIT | EN+12 |
| SEND | EN+10 |
| TRANS | EN+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ASUDATA | GET+9~, GET+17*, GET+18*, GET+19*, GET+20 |
| ASUDT | MARK+3~, MARK+6* |
| ASUL | GET+9~, GET+11*, GET+12, GET+16*, GET+20, GET+22*, GET+23, GET+24 |
| ASUMSG | MARK+3~, MARK+5*, MARK+6 |
| ASUR | GET+9~, GET+11*, GET+14*, GET+20 |
| ASUTRANS | EN+2~, EN+5, EN+6, EN+7, EN+11, EN2+6~, MARK~, MARK+12, MARK+21 |
| >> ASUW( | EN2+8 |
| ASUWN | GET+9~, GET+15*, GET+17, GET+20 |
| ASUX | GET+9~, GET+13*, GET+17, GET+21, MARK+3~, MARK+4*, MARK+5, MARK+8, MARK+17 |
| ASUXMZ | EN+2~, EN+7, EN+8, EN+9, EN+10, EN2+6~ |
| D0 | TRANS+2~ |
| DA | MARK+3~, MARK+8*, MARK+11!, MARK+19!, MARK+21*, TRANS+2~, TRANS+7* |
| DA(1 | MARK+12*, MARK+13 |
| DD | MARK+3~, MARK+11!, TRANS+2~, TRANS+6! |
| DI | TRANS+2~ |
| DIC | MARK+3~, MARK+13*, TRANS+2~, TRANS+7* |
| DIC("DR" | TRANS+8* |
| DIC("P" | MARK+15* |
| DIC(0 | MARK+14*, TRANS+7* |
| DIE | MARK+3~, MARK+7*, MARK+11!, MARK+19!, MARK+20*, TRANS+2~ |
| DLAYGO | MARK+3~, MARK+16* |
| DO | MARK+3~, MARK+11!, TRANS+2~, TRANS+6! |
| DQ | TRANS+2~ |
| DR | MARK+3~, MARK+9*, MARK+11!, MARK+19!, MARK+22*, TRANS+2~ |
| DT | MSG+3, GET+21, GET+24 |
| DTIME | TRANS+3 |
| U | GET+18, GET+19, GET+20, GET+21, GET+24, MARK+6, MARK+15, SITE+3, TRANS+4 |
| X | EN+2~, MSG~, MSG+6*, MARK+3~, MARK+11!, MARK+17*, MARK+19!, SITE+2~, SITE+3*, SITE+4 , TRANS~, TRANS+4*, TRANS+5*, TRANS+7, TRANS+10* |
| XMDUN | SEND+3~, SEND+4* |
| XMDUZ | MSG+2~, MSG+4* |
| XMSUB | MSG+2~, MSG+3* |
| XMY | SEND+3~ |
| XMY("DOE,MARY@TST.DSD-ALB1.DOMAIN.NAME" | SEND+5* |
| XMZ | MSG+2~, MSG+6, GET~, GET+12, GET+20, GET+21, GET+23, GET+24, SEND~ |
| Y | EN+2~, MSG~, MSG+3, MARK+3~, MARK+11!, MARK+19!, TRANS+2~, TRANS+10 |