BDMVRL2 ; cmi/anch/maw - DEMO/APPTS ACTION ;
Source file <BDMVRL2.m>
Package | Total | Call Graph |
---|---|---|
Diabetes Registry | 3 | (DIR,FILE)^BDMFDIC REG^BDMFUTIL GRD^BDMVRL5 |
IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
VA Fileman | 1 | NOW^%DTC |
Package | Total | Caller Graph |
---|---|---|
Diabetes Registry | 3 | BDMVRL BDMVRL4 BDMVRL5 |
Name | Comments | DBIA/ICR reference |
---|---|---|
RDINIT | ;EP;TO INITIALIZE PATIENT REGISTER DATA FOR DISPLAY
|
|
NEWPAT | ;EP;CREATE ENTRY FOR NEW REGISTER PATIENT
|
|
LM1 | ;DETERMINE IF PATIENT HAS CURRENT RX FOR TARGET MEDS
|
|
LMEDS | ;EP;TO LIST MEDS
|
|
PATDX | ;EP;INCLUDE PATIENTS WITH SPECIFIC DIAGNOSIS
|
|
Z(X) | ;SET TMP NODE
|
|
DX | ;EP;TO SELECT DIABETES DIAGNOSIS
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^ACM(41 - [#9002241] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ACM(41 - [#9002241] | RDINIT+47 |
^ACM(44 - [#9002244] | PATDX+2, PATDX+5, PATDX+6 |
^ACM(44.1 - [#9002244.1] | PATDX+7 |
^ATXAX - [#9002226] | LMEDS+5 |
^AUTTCOM - [#9999999.05] | RDINIT+18 |
^DPT - [#2] | NEWPAT+2 |
^PS(55 - [#55] | LM1+1, LM1+3, LM1+4 |
^PSRX - [#52] | LM1+6, LM1+10 |
^TMP("BDMVR" | RDINIT+5!, Z+2* |
Name | Line Occurrences |
---|---|
LM1 | LMEDS+5 |
Z | RDINIT+10, RDINIT+13, RDINIT+16, RDINIT+19, RDINIT+21, RDINIT+23, RDINIT+25, RDINIT+27, RDINIT+29, RDINIT+32 , RDINIT+37, RDINIT+44, RDINIT+46, RDINIT+47, RDINIT+49, RDINIT+50 |
Name | Field # of Occurrence |
---|---|
^(0 | PATDX+7, LM1+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | RDINIT+6~ |
B | RDINIT+6~ |
>> BDM("ADDRESS" | RDINIT+11 |
>> BDM("AGE" | RDINIT+9 |
>> BDM("CASE MAN | AGER" , RDINIT+26 |
>> BDM("CLIENT C | ONTACT" , RDINIT+28 |
>> BDM("DATE LAS | T EDITED" , RDINIT+31 |
>> BDM("DM DIAGN | OSIS" , DX+7*, PATDX+7 |
>> BDM("DOB" | RDINIT+12 |
>> BDM("DX" | RDINIT+35, RDINIT+41, RDINIT+42, RDINIT+43 |
>> BDM("HRN" | RDINIT+15 |
>> BDM("INITIAL | ENTRY DATE" , RDINIT+30 |
>> BDM("LIVER ME | DS TAX" , LMEDS+5 |
>> BDM("PATIENT" | RDINIT+8 |
>> BDM("PHONE" | RDINIT+14 |
>> BDM("PRIMARY | PROVIDER" , RDINIT+17 |
>> BDM("REGISTER | PROVIDER" , RDINIT+24 |
>> BDM("RES" | RDINIT+18 |
>> BDM("STATUS" | RDINIT+20 |
>> BDM("WHERE FO | LLOWED" , RDINIT+22 |
>> BDMDT | LMEDS+3*, LM1+10 |
BDMQUIT | RDINIT+2, DX+6*, PATDX+1*, PATDX+7!, LMEDS+1!, LMEDS+5, LM1+3, LM1+11*, NEWPAT+9*, NEWPAT+15* |
>> BDMRDA | NEWPAT+10 |
>> BDMREGNM | NEWPAT+3 |
>> BDMRPDA | RDINIT+3, RDINIT+47, RDINIT+49, RDINIT+50, PATDX+2, PATDX+5, NEWPAT+16* |
C | RDINIT+6~ |
>> DFN | LM1+1, LM1+3, LM1+4, NEWPAT+2, NEWPAT+13 |
>> DIC | NEWPAT+11* |
>> DIC("DR" | NEWPAT+13* |
>> DIC(0 | NEWPAT+12* |
>> DIR("A" | DX+3*, NEWPAT+2*, NEWPAT+3*, NEWPAT+4*, NEWPAT+5* |
>> DIR("B" | DX+4*, NEWPAT+6* |
>> DIR(0 | DX+2*, NEWPAT+1* |
DT | NEWPAT+13 |
>> J | RDINIT+35*, RDINIT+37, RDINIT+38 |
>> PS0 | LM1+4*, LM1+5, LM1+6, LM1+10 |
>> PSRX0 | LM1+6*, LM1+7, LM1+8, LM1+9 |
U | RDINIT+18, RDINIT+42, RDINIT+43, PATDX+7, LM1+7, LM1+8, LM1+9, LM1+10, NEWPAT+2 |
>> VALMBCK | RDINIT+66* |
>> VALMCNT | RDINIT+7*, Z+1*, Z+2 |
X | RDINIT+6~, RDINIT+8*, RDINIT+9*, RDINIT+10, RDINIT+11*, RDINIT+12*, RDINIT+13, RDINIT+14*, RDINIT+15*, RDINIT+16 , RDINIT+17*, RDINIT+18*, RDINIT+19, RDINIT+20*, RDINIT+21, RDINIT+22*, RDINIT+23, RDINIT+24*, RDINIT+25, RDINIT+26* , RDINIT+27, RDINIT+28*, RDINIT+29, RDINIT+30*, RDINIT+31*, RDINIT+32, RDINIT+36*, RDINIT+37*, RDINIT+42*, RDINIT+43* , RDINIT+44, RDINIT+46*, RDINIT+47*, RDINIT+49*, RDINIT+50*, Z~, Z+2, PATDX+3~, PATDX+4*, PATDX+5* , PATDX+6, LMEDS+3, LMEDS+5*, LM1+7, NEWPAT+10* |
>> XX | LM1+2*, LM1+3*, LM1+4 |
Y | RDINIT+6~, RDINIT+47*, DX+6, DX+7, PATDX+3~, PATDX+6*, PATDX+7, NEWPAT+9, NEWPAT+15, NEWPAT+16 |
Z | RDINIT+6~, RDINIT+39~, RDINIT+40*, RDINIT+41*, RDINIT+42, RDINIT+43, PATDX+3~, LMEDS+4*, LMEDS+5* |