Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BDMVRL

Package: Diabetes Registry

Routine: BDMVRL


Information

BDMVRL ; IHS/CMI/LAB - VIEW PT RECORD LT ; 29 Sep 2014 11:55 AM

Source Information

Source file <BDMVRL.m>

Call Graph

Call Graph Total: 29

Package Total Call Graph
Diabetes Registry 10 TIME^BDMDG1  (DDS,DIC,DIE,DIR)^BDMFDIC  PAUSE^BDMFMENU  REG^BDMFUTIL  (,BROWSE)^BDMFZIS  EN1^BDMPL  DQ^BDMPPDT  RDINIT^BDMVRL2  
(DXUPD,GETHSTYP,GETPAT,NEWHS,PP)^BDMVRL5  ($$PKGCK,$$VALMSG,MSG,RETURN)^BDMVU  
Case Management System 3 ^ACMCTRL  ^ACMLPAT  SELTYP^ACMPPDTX  
IHS VA Utilities 3 (GUIR,VIEWR)^XBLM  EN^XBNEW  EN^XBVK  
Patient Care Component 3 GETVISIT^APCDDISP  ^APCDVD  EN^APCHS  
Registration 3 EN^VALM  TERM^VALM0  (CLEAR,FULL)^VALM1  
IHS Patient Registration 2 L2^AGSEENLY  ^AGVAR  
MailMan 2 (LOCK,UNLOCK)^XM  XMZ^XMA2  
IHS Patient 1 ^AUPNPAT  
Kernel 1 DISP^XQORM1  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 9

Package Total Caller Graph
Diabetes Registry 9 BDMGR  BDMLET  BDMRMC  BDMVRL1  BDMVRL3  BDMVRL4  BDMVRL42  BDMVRL6  
BDMVRL8  

Entry Points

Name Comments DBIA/ICR reference
WF ;EP;TO EDIT WHERE FOLLOWED
FS ;EP;TO VIEW A FLOW SHEET
HDR ;EP; -- header code
HS ;EP;TO VIEW A HEALTH SUMMARY
BACK
ERD ;EP;TO EDIT REGISTER DATA
VALM(BDMVALM) ;EP; -- main entry point for list templates
EXPND ;EP; -- expand code
PAUSE ; -- end of action pause
APPTS ;EP;TO DISPLAY APPOINTMENTS
REF ;EP;TO EDIT REFERRALS
HELP ;EP; -- help code
PRD ;EP;TO VIEW PATIENT REGISTRATION DATA
LOPT ;EP;TO EDIT LOCAL OPTION
RS ;EP;TO EDIT REGISTER STATUS
VFS ;EP;TO VIEW PATIENT REGISTRATION FACE SHEET
VSEL ;EP;TO SELECT VISIT TO DISPLAY
GETVISIT ;EP;TO GET VISIT
INIT ;EP; -- init variables and list array
LP ;EP;TO DISPLAY LAB PROFILE
CS1 ;EP;
PL ;EP; called from protocol - changed in 2015 audit to display only per MU2
RDINIT ;EP;TO INITIALIZE PATIENT REGISTER DATA FOR DISPLAY
EN ;EP; -- main entry point for list template BDMV HS VIEW
CM ;EP;TO EDIT CASE MANAGER
CC ;EP;TO EDIT CONTACT
HAVEPAT ;EP; -- entry point when patient already known
VISIT
APPINIT ;EP;TO DISPLAY APPOINTMENTS
LVD ;EP;TO DISPLAY LAST VISIT
AS ;EP;TO REVIEW AUDIT STATUS
DLP ;EP;FOR DIABETES LAB PROFILE
CS ;EP;TO REVIEW CASE SUMMARY
CSS ;EP;TO REVIEW CASE SUMMARY
MM ;EP;TO SEND MAIL MESSAGE
DPSC ;EP;DPSC
REGDAT ;EP;TO GATHER AND DISPLAY PATIENT REGISTER DATA
Z(X) ;SET TMP NODE
EXIT ;EP; -- exit code
PROB ;EP; called from protocol

External References

Name Field # of Occurrence
^ACMCTRL CS1+9
^ACMLPAT CSS+7
SELTYP^ACMPPDTX CSS+15, CS+8
L2^AGSEENLY PRD+10
^AGVAR PRD+6
GETVISIT^APCDDISP GETVISIT+5
^APCDVD VISIT+3
EN^APCHS DLP+9, FS+14, LP+7
^AUPNPAT PL+9
TIME^BDMDG1 AS+10
DDS^BDMFDIC ERD+6
DIC^BDMFDIC FS+10
DIE^BDMFDIC LOPT+7, LOPT+12, RS+8, RS+13, WF+7, WF+12, CM+7, CM+12, CC+7, CC+12
, ERD+11
DIR^BDMFDIC VSEL+6
PAUSE^BDMFMENU DLP+10, LVD+7, FS+15, LP+8
REG^BDMFUTIL BDMVRL+8, HAVEPAT+1, EN+2, VALM+1, CSS+3, CS+1, CS1+1, AS+1, DLP+1, APPTS+1
, APPINIT+1, LVD+1, GETVISIT+1, LOPT+1, RS+2, WF+1, CM+1, CC+1, ERD+1, MM+1
, VFS+1, DPSC+1, PRD+1, REGDAT+1, VSEL+1, PL+1
^BDMFZIS CSS+18
BROWSE^BDMFZIS CS+10
EN1^BDMPL PL+7
DQ^BDMPPDT CS1+10
RDINIT^BDMVRL2 RDINIT+1
DXUPD^BDMVRL5 LOPT+8, RS+9, WF+8, CM+8, CC+8, ERD+7
GETHSTYP^BDMVRL5 HAVEPAT+4, EN+5
GETPAT^BDMVRL5 BDMVRL+15
NEWHS^BDMVRL5 DLP+5, FS+3, LP+3
PP^BDMVRL5 LOPT+13, RS+14, WF+13, CM+13, CC+13, ERD+12
$$PKGCK^BDMVU BDMVRL+10
$$VALMSG^BDMVU HDR+1, INIT+6
MSG^BDMVU BDMVRL+11
RETURN^BDMVU PAUSE+1
^DIR CSS+14, CS+7
EN^VALM VALM+6
TERM^VALM0 VALM+4
CLEAR^VALM1 EN+1, VALM+5, VALM+7, CS+3, AS+3, DLP+3, VISIT+2, FS+1, LP+1, MM+3
, VFS+4, DPSC+4, PRD+5, PL+3
FULL^VALM1 BDMVRL+18, HAVEPAT+7, RS+1, PL+4
GUIR^XBLM INIT+1
VIEWR^XBLM VFS+7, DPSC+7
EN^XBNEW AS+12
EN^XBVK CSS+20
LOCK^XM MM+7
UNLOCK^XM MM+9
XMZ^XMA2 MM+8
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: GETVISIT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: FS+9
Function Call: WRITE
  • Prompt: !!
  • Line Location: LOPT+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: RS+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: WF+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: CM+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: CC+6
Function Call: WRITE
  • Prompt: !!,"Send Mail Message"
  • Line Location: MM+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: VFS+5
Function Call: WRITE
  • Prompt: !?5,"Display FACE SHEET for: ",$P(BDMPAT0,U),!!
  • Line Location: VFS+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DPSC+5
Function Call: WRITE
  • Prompt: !?5,"Display Diabetes Patient Care Summary for: ",$P(BDMPAT0,U),!!
  • Line Location: DPSC+6
Function Call: WRITE
  • Prompt: !
  • Line Location: VSEL+5
Routine Call
  • VALM
  • Line Location:
    • VALM+6
Routine Call
  • DIR
  • Line Location:
    • CSS+14
    • CS+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^APCHSCTL - [#9001015] Classic Fileman Calls
^ACM(41 - [#9002241] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACM(41.1 - [#9002241.1] CSS+11, CS+4
^APCHSCTL("B" DLP+5, DLP+6, FS+3, LP+3, LP+4
^AUPNVSIT - [#9000010] VISIT
^AUPNVSIT("AA" LVD+4, LVD+8
^DD("DD" APPINIT+16
^DPT - [#2] CS1+6, APPINIT+11, APPINIT+12
^SC - [#44] APPINIT+14
^TMP("BDMDM19" AS+9*
^TMP("BDMVR" BDMVRL+14!, INIT+3, INIT+5*, EXIT+1!, APPINIT+3!, APPINIT+21*, Z+2*
^XTMP("BDMDM19" AS+8*

Label References

Name Line Occurrences
BACK APPINIT+22, PL+10
EN HAVEPAT+7, HS+1
EXIT BDMVRL+10, BDMVRL+19, HAVEPAT+5, HAVEPAT+7, EN+6
REGDAT BDMVRL+17
VALM EN+9, APPTS+4, REGDAT+4
VISIT GETVISIT+6, VSEL+9
Z APPINIT+7, APPINIT+9, APPINIT+20

Naked Globals

Name Field # of Occurrence
^(0 VISIT

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACMMHS CSS+2!, CSS+15*, CSS+19!, CS+8*
>> ACMPATNA CS1+7*
>> ACMPTNA2 CS1+8*
>> ACMPTNO CSS+8, CSS+9, CS1+5*
ACMQUIT CSS+1!, CSS+8
>> ACMRG CSS+4*, CS1+3*
>> ACMRGDFN CSS+10, CS1+4*
>> ACMRGNA CSS+5*
ACMSTYP CSS+2!, CSS+19!
>> AGPAGE PRD+7*
AMCHDAYS HAVEPAT+3~, EN+4~
AMCHDOB HAVEPAT+3~, EN+4~
>> APCDCAT VISIT*
>> APCDCLN VISIT*
>> APCDDATE VISIT*
>> APCDLOC VISIT*
>> APCDLOOK LVD+9*, VISIT, GETVISIT+6*, VSEL+8*
>> APCDOVRR PL+5*
>> APCDPAT GETVISIT+3*, PL+6*, PL+8
>> APCDTYPE VISIT*
>> APCDVDSP VISIT+1*
>> APCDVSIT VISIT*, VISIT+1, GETVISIT+6
APCHSMTY HAVEPAT+3~, EN+4~
APCHSPAT HAVEPAT+3~, HAVEPAT+6*, EN+4~, EN+7*, DLP+4~, DLP+8*, FS+2~, FS+13*, LP+2~, LP+6*
APCHSTAT HAVEPAT+3~, EN+4~
APCHSTYP HAVEPAT+3~, HAVEPAT+5, EN+4~, EN+6, DLP+4~, DLP+6*, DLP+7, FS+2~, FS+12*, LP+2~
, LP+4*, LP+5
BDM EXIT+2!
BDM( VSEL+7, VSEL+8
BDMAPPDA APPINIT+4~, APPINIT+10*, APPINIT+11*, APPINIT+12, APPINIT+15
BDMBROWS CSS+17*, CSS+19!
>> BDMBTH AS+6*, AS+8, AS+9
>> BDMDMRG AS+7*
>> BDMJ VSEL+3
>> BDMJOB AS+5*, AS+8, AS+9
BDMOUT BDMVRL+15, BDMVRL+20!
BDMPAT0 APPINIT+4~, APPINIT+12*, APPINIT+13, APPINIT+14, VFS+6, DPSC+6
BDMQUIT BDMVRL+9, BDMVRL+13!, BDMVRL+15, BDMVRL+20!, HAVEPAT+2, EN+3, VALM+2, CSS+1!, CSS+6, CS+2
, CS1+2, AS+2, AS+4~, DLP+2, APPTS+2, APPINIT+2, LVD+2, GETVISIT+2, FS+11!, LOPT+2
, RS+3, WF+2, CM+2, CC+2, ERD+2, MM+2, VFS+2, DPSC+2, PRD+2, REGDAT+2
, VSEL+2, PL+2
>> BDMRDA BDMVRL+16, CSS+4, CSS+11, CS+4, CS1+3, AS+7
>> BDMREGNM CSS+5
>> BDMRPDA BDMVRL+16, CSS+10*, CS1+4, LOPT+3, LOPT+9, RS+4, RS+10, WF+3, WF+9, CM+3
, CM+9, CC+3, CC+9, ERD+3, ERD+8
BDMRTN CSS+16*, CSS+19!, CS+9*
>> BDMSAV PRD+4*, PRD+11
>> BDMSTP AS+11
BDMVALM EN+8*, EN+9, VALM~, VALM+6, APPTS+3*, APPTS+4, REGDAT+3*, REGDAT+4
BDMVRLY AS+4~
BDMVSAV HAVEPAT+3~, HAVEPAT+6*, EN+4~, EN+7*
BDMY AS+4~
BDMZ AS+4~
BMOUT BDMVRL+13!
>> DA LOPT+3*, LOPT+9*, RS+4*, RS+10*, WF+3*, WF+9*, CM+3*, CM+9*, CC+3*, CC+9*
, ERD+3*, ERD+8*
DFN BDMVRL+13!, HAVEPAT+6, EN+7, CSS+9*, CS1+5, CS1+6, AS+8, AS+9, DLP+8, APPINIT+11
, APPINIT+12, LVD+4, LVD+8, GETVISIT+3, FS+13, LP+6, VFS+3, DPSC+3, PRD+3, PRD+4
, PRD+11*, PL+6, PL+8*
>> DIC FS+5*
>> DIC("A" FS+7*
>> DIC("B" FS+8*
>> DIC(0 FS+6*
>> DIE LOPT+4*, LOPT+10*, RS+5*, RS+11*, WF+4*, WF+10*, CM+4*, CM+10*, CC+4*, CC+10*
, ERD+4*, ERD+9*
DIR CSS+14!, CS+7!
DIR("A" CSS+12*, CS+5*, VSEL+4*
DIR("B" CSS+12*, CS+5*
DIR(0 CSS+12*, CS+5*, VSEL+3*
>> DR LOPT+5*, LOPT+11*, RS+6*, RS+12*, WF+5*, WF+11*, CM+5*, CM+11*, CC+5*, CC+11*
, ERD+5*, ERD+10*
DT APPINIT+10, LOPT+11, RS+12, WF+11, CM+11, CC+11, ERD+10
IOF VFS+5, DPSC+5
J APPINIT+4~
U CSS+11, CS+4, CS1+6, APPINIT+13, APPINIT+14, VISIT, VFS+6, DPSC+6
>> VALMBCK BACK*
>> VALMCC VALM+3*
>> VALMCNT INIT+4*, APPINIT+5*, APPINIT+21, Z+1*, Z+2
>> VALMSG HDR+1*, INIT+6*
X INIT+2*, INIT+3*, INIT+4, INIT+5, HELP+1*, CS1+6*, CS1+7, CS1+8, AS+4~, APPINIT+4~
, APPINIT+6*, APPINIT+7, APPINIT+8*, APPINIT+9, APPINIT+17*, APPINIT+18*, APPINIT+19*, APPINIT+20, LVD+3~, LVD+4*
, LVD+5, LVD+8*, LVD+9, Z~, Z+2
XMDF MM+5~
XMLOAD MM+5~
XMMENU MM+5~
XMMENU(0 MM+6*
Y CSS+15, CS+8, APPINIT+4~, APPINIT+15*, APPINIT+19, FS+11, FS+12, MM+8, VSEL+7, VSEL+8
, PL+8*
Z APPINIT+4~, APPINIT+14*, APPINIT+18
>> ZTRTN CSS+16*, CS+9*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All