WVRALINK ;HCIOFO/FT - RAD/NM-WOMEN'S HEALTH LINK ;04/15/2021
Source file <WVRALINK.m>
Package | Total | Call Graph |
---|---|---|
Womens Health | 7 | AUTOADD^WVPATE NEW2^WVPROC MAIL^WVRADWP ($$VNVEC,FIND)^WVRALIN1 BLDMSG^WVRPCGF1 CPRS^WVSNOMED $$SSN^WVUTL1 |
Kernel | 4 | ^%ZTLOAD $$NOW^XLFDT $$VERSION^XPDUTL $$KSP^XUPARAM |
Clinical Reminders | 2 | ADD^PXRMEOC ($$EARLDATE,BLDTARR,GETTRMCD)^PXRMPRAD |
VA FileMan | 2 | UPDATE^DIE $$GET1^DIQ |
MailMan | 1 | ^XMD |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Radiology Nuclear Medicine | 5 | RAHLO1 RAMAGU12 RART RARTE1 RARTE5 |
Womens Health | 1 | WVEXPTRA |
Name | Comments | DBIA/ICR reference |
---|---|---|
CREATE(DFN,DATE,CASE) | ;
|
|
CREATEH(DFN,DATE,CASE,STATUS) | ; Entry from ^WVEXPTRA which looks for exams
; created before the WH package was installed. |
|
CREATEQ | ; Queue data entry creation. Called from CREATE above
|
|
EXIT | ;EP
|
|
COMPARE(WVPROC) | ;
|
|
COPY(Y) | ;EP
|
|
PATIENT | ;---> IF PATIENT ISN'T IN WOMEN'S HEALTH DATABASE, ADD HER.
|
|
PROC | ;---> CREATE MAMMOGRAM PROCEDURE IN WV PROCEDURE FILE #790.1.
|
|
DELETE(DFN,DATE,CASE) | ;EP
|
|
DELETEQ | ; Modify WV entry when mammogram report is unverified or deleted
|
Name | Field # of Occurrence |
---|---|
^%ZTLOAD | CREATE+9, DELETE+11 |
UPDATE^DIE | COPY+40 |
$$GET1^DIQ | CREATEQ+13, CREATEQ+31, COMPARE+5, COPY+58, DELETEQ+20, DELETEQ+21, DELETEQ+25 |
ADD^PXRMEOC | COPY+42, PROC+14 |
$$EARLDATE^PXRMPRAD | CREATEQ+26 |
BLDTARR^PXRMPRAD | COMPARE+7 |
GETTRMCD^PXRMPRAD | CREATEQ+19 |
AUTOADD^WVPATE | PATIENT+3 |
NEW2^WVPROC | PROC+8 |
MAIL^WVRADWP | PROC+21 |
$$VNVEC^WVRALIN1 | CREATEQ+47 |
FIND^WVRALIN1 | PATIENT+6 |
BLDMSG^WVRPCGF1 | COPY+46, PROC+18 |
CPRS^WVSNOMED | PROC+23 |
$$SSN^WVUTL1 | DELETEQ+32 |
$$NOW^XLFDT | COPY+39, COPY+42, PROC+14 |
^XMD | DELETEQ+39 |
$$VERSION^XPDUTL | CREATE+1, DELETE+4 |
$$KSP^XUPARAM | CREATE+5 |
FileNo | Call Tags |
---|---|
^RAMIS(71 - [#71] | GET1^DIQ |
^RAMIS(71.2 - [#71.2] | GET1^DIQ |
^WV(790 - [#790] | GET1^DIQ |
^WV(790.02 - [#790.02] | GET1^DIQ |
^WV(790.1 - [#790.1] | GET1^DIQ |
^PXRMD(811.5 - [#811.5] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | CREATEQ+35, DELETEQ+32 |
^RADPT - [#70] | CREATEQ+7, CREATEQ+12, COPY+10, COPY+54, COPY+56, COPY+57, DELETEQ+1, DELETEQ+7, DELETEQ+8 |
^RADPT("ADC" | COPY+17 |
^TMP("PXRMXMZ" | COPY+45*, PROC+17* |
^WV(790 - [#790] | PATIENT+2 |
^WV(790.02 - [#790.02] | CREATEQ+39, CREATEQ+40, CREATEQ+45, DELETEQ+24 |
^WV(790.1 - [#790.1] | COPY+24, COPY+25, COPY+26, COPY+27, COPY+28, PATIENT+7, DELETEQ+13, DELETEQ+15, DELETEQ+16, DELETEQ+33 |
^WV(790.2 - [#790.2] | CREATEQ+17, CREATEQ+25, CREATEQ+32, CREATEQ+34, COMPARE+3 |
^WV(790.32 - [#790.32] | COPY+31, COPY+68 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CASE | CREATE~, CREATE+2, CREATEH~, CREATEH+2, CREATEQ+7, CREATEQ+12, COPY+17, COPY+54, COPY+56, COPY+57 , PROC+23, DELETE~, DELETE+5, DELETEQ+1, DELETEQ+8 |
CLOSED | CREATEQ+1~, CREATEQ+6*, CREATEQ+28*, CREATEQ+53 |
CODES | CREATEQ+1~, CREATEQ+18!, CREATEQ+19 |
CODES( | CREATEQ+21 |
DATE | CREATE~, CREATE+2, CREATEH~, CREATEH+2, CREATEQ+7, CREATEQ+12, CREATEQ+27, COPY+10, COPY+17, COPY+54 , COPY+56, COPY+57, PROC+23, DELETE~, DELETE+5, DELETEQ+1, DELETEQ+7, DELETEQ+8 |
DFN | CREATE~, CREATE+2, CREATEH~, CREATEH+2, CREATEQ+7, CREATEQ+12, CREATEQ+35, COPY+10, COPY+17, COPY+42 , COPY+46, COPY+54, COPY+56, COPY+57, PATIENT+2, PATIENT+3, PROC+2, PROC+8, PROC+14, PROC+18 , PROC+21, PROC+23, DELETE~, DELETE+5, DELETEQ+1, DELETEQ+7, DELETEQ+8, DELETEQ+21, DELETEQ+32 |
DT | PROC+6 |
DUZ | CREATE+4* |
DUZ(2 | CREATE+5*, CREATEQ+39, CREATEQ+40, CREATEQ+45, PATIENT+3, PROC+4, PROC+6 |
EARLDATE | CREATEQ+1~, CREATEQ+26*, CREATEQ+28 |
ERROR | CREATEQ+1~, CREATEQ+19, CREATEQ+20 |
FDA | COPY+5~ |
FDA( | COPY+35*, COPY+36*, COPY+37*, COPY+38*, COPY+39* |
I | EXIT+1! |
IENS | COPY+5~, COPY+34*, COPY+38, COPY+39 |
MATCH | CREATEQ+1~, CREATEQ+16*, CREATEQ+21*, CREATEQ+23*, CREATEQ+24 |
N | EXIT+1!, COPY+55~*, COPY+56*, COPY+57 |
NAME | COMPARE+1~, COMPARE+5*, COMPARE+6, COMPARE+9 |
NUM | COPY+5~, COPY+44*, COPY+45*, COPY+46, PROC+16*, PROC+17*, PROC+18 |
RESULT | COMPARE+1~, COMPARE+2*, COMPARE+4, COMPARE+6, COMPARE+8, COMPARE+9*, COMPARE+10 |
STATUS | CREATEH~, CREATEH+2, CREATEQ+46, CREATEQ+47, CREATEQ+52 |
TEMPDATE | CREATEQ+1~, CREATEQ+27*, CREATEQ+28 |
TERMARR | COMPARE+1~, COMPARE+7 |
TERMARR( | COMPARE+8, COMPARE+9 |
TERMIEN | CREATEQ+1~, CREATEQ+17*, CREATEQ+19, CREATEQ+25, COMPARE+1~, COMPARE+3*, COMPARE+4, COMPARE+5 |
TERMSTAT | CREATEQ+1~ |
U | CREATEQ+13, CREATEQ+23, CREATEQ+31, CREATEQ+34, CREATEQ+35, CREATEQ+40, CREATEQ+46, CREATEQ+51, COMPARE+3, COPY+6 , COPY+10, COPY+15, COPY+26, COPY+27, COPY+28, COPY+30, COPY+50, COPY+57, COPY+67, COPY+71 , DELETEQ+7, DELETEQ+8, DELETEQ+32, DELETEQ+33 |
WVACCESS | COPY+5~, COPY+26*, COPY+29, COPY+35 |
WVADDEOC | CREATEQ+3~, CREATEQ+15* |
WVBWDX | CREATEQ+2~, COPY+31*, COPY+32, COPY+36, COPY+68*, PROC+3 |
WVCASE | CREATEQ+3~, COPY+15*, COPY+17*, COPY+24, COPY+25, PATIENT+7, PROC+5, DELETEQ+2~, DELETEQ+8*, DELETEQ+11* , DELETEQ+13, DELETEQ+15, DELETEQ+34 |
WVCMGR | DELETEQ+2~, DELETEQ+21*, DELETEQ+22, DELETEQ+24, DELETEQ+25*, DELETEQ+26 |
WVCPT | CREATEQ+3~, CREATEQ+13*, CREATEQ+21, CREATEQ+31*, CREATEQ+32, PROC+20 |
WVCREDIT | CREATEQ+3~, COPY+71*, PROC+6 |
WVDATE | CREATEQ+2~, COPY+10*, COPY+15, PROC+5, PROC+8, DELETEQ+2~, DELETEQ+7*, DELETEQ+11 |
WVDR | CREATEQ+2~, PROC+2*, PROC+3*, PROC+4*, PROC+5*, PROC+6*, PROC+8 |
WVDX | CREATEQ+2~, COPY+30*, COPY+31, COPY+67*, COPY+68 |
WVERR | CREATEQ+3~, COPY+33!, COPY+41!, COPY+42, COPY+43, PATIENT+1*, PATIENT+3, PATIENT+4, PATIENT+5, PROC+8 , PROC+9, PROC+10, PROC+13!, PROC+14, PROC+15 |
WVEXAM0 | CREATEQ+3~, CREATEQ+12*, CREATEQ+13, CREATEQ+23, CREATEQ+31, CREATEQ+55 |
WVIEN | COPY+5~, DELETEQ+2~, DELETEQ+15*, DELETEQ+16, DELETEQ+20, DELETEQ+33 |
WVIEN1 | COPY+5~, COPY+25*, COPY+26, COPY+27, COPY+28, COPY+29, COPY+34, COPY+35, COPY+36, COPY+37 , COPY+42 |
WVLEFT | CREATEQ+2~, COPY+59*, COPY+61, COPY+62 |
WVLOC | CREATEQ+2~, COPY+6*, PROC+4 |
WVLOOP | DELETEQ+2~, DELETEQ+24*, DELETEQ+25 |
>> WVMCNT | PROC+9*, PROC+11 |
WVMOD | CREATEQ+2~, COPY+57*, COPY+58*, COPY+59, COPY+60, COPY+62*, COPY+63*, PROC+4 |
WVMSG | DELETEQ+2~ |
WVMSG(1 | DELETEQ+32* |
WVMSG(2 | DELETEQ+33* |
WVMSG(3 | DELETEQ+34* |
WVMSG(4 | DELETEQ+35* |
WVMSG(5 | DELETEQ+36* |
WVMSG(6 | DELETEQ+37* |
>> WVNEWP | PATIENT+4* |
WVPROC | CREATEQ+2~, CREATEQ+17, CREATEQ+25*, CREATEQ+30, CREATEQ+32*, CREATEQ+33, CREATEQ+34, COMPARE~, COMPARE+3, COPY+53 , PROC+2, PROC+8, PROC+12, PROC+21 |
WVPROV | CREATEQ+2~, COPY+50*, PROC+3, PROC+21, PROC+23, DELETEQ+2~, DELETEQ+20*, DELETEQ+29 |
WVPVDX | COPY+5~, COPY+8*, COPY+27*, COPY+29, COPY+32, COPY+38, PROC+12 |
WVRIGHT | CREATEQ+2~, COPY+60*, COPY+61, COPY+63 |
WVTERM | CREATEQ+3~, CREATEQ+19, CREATEQ+26 |
WVTERM("E" | CREATEQ+23 |
WVZSTAT | CREATEQ+3~, CREATEQ+51*, CREATEQ+52*, CREATEQ+53*, COPY+28*, COPY+37, PROC+5 |
X | EXIT+1!, COMPARE+1~, COMPARE+8*, COMPARE+9, COPY+5~ |
XMDUZ | DELETEQ+3~, DELETEQ+30* |
XMSUB | DELETEQ+3~, DELETEQ+31* |
XMTEXT | DELETEQ+3~, DELETEQ+38* |
XMY | DELETEQ+3~ |
XMY( | DELETEQ+22*, DELETEQ+26*, DELETEQ+29* |
XMY(0 | DELETEQ+28 |
Y | CREATEQ+45~*, CREATEQ+46, CREATEQ+51, COPY~, COPY+6, COPY+15, COPY+30, COPY+50, COPY+67, COPY+71 , PROC+12, PROC+14, PROC+21 |
ZTDESC | CREATE+3~, CREATE+6*, DELETE+6~, DELETE+7* |
ZTDTH | CREATE+3~, CREATE+8*, DELETE+6~, DELETE+9* |
ZTIO | CREATE+3~, CREATE+8*, DELETE+6~, DELETE+9* |
>> ZTQUEUED | CREATEQ+5, DELETEQ+4 |
>> ZTREQ | CREATEQ+5*, DELETEQ+4* |
ZTRTN | CREATE+3~, CREATE+6*, DELETE+6~, DELETE+7* |
ZTSAVE | CREATE+3~, DELETE+6~ |
ZTSAVE("CASE" | CREATE+7*, DELETE+8* |
ZTSAVE("DATE" | CREATE+7*, DELETE+8* |
ZTSAVE("DFN" | CREATE+7*, DELETE+8* |