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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BDMPL

Package: Diabetes Registry

Routine: BDMPL


Information

BDMPL ; IHS/CMI/LAB - PROBLEM LIST UPDATE ;

Source Information

Source file <BDMPL.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Registration 3 EN^VALM  TERM^VALM0  ($$FTIME,CLEAR,FULL)^VALM1  
IHS VA Utilities 2 DIQ^XBLM  EN^XBVK  
Kernel 1 DISP^XQORM1  
Patient Care Component 1 GATHER^APCDPL  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Diabetes Registry 1 BDMVRL  

Entry Points

Name Comments DBIA/ICR reference
EN ;EP main entry point for BDM PL PROBLEM LIST
GETNUM(P) ;EP - get problem number given ien of problem entry
HDR ;EP -- header code
EOJ ;cleanup
DD ;EP - called from protocol to display (DIQ) a problem in detail
EXPND ; -- expand code
GETPROB ;get record
EN1 ;EP
INIT ; -- init variables and list array
PAUSE ;EP
EXIT ; -- exit code
TEXT ;
XIT ;
HELP ; -- help code

External References

Name Field # of Occurrence
GATHER^APCDPL INIT+3
^DIR GETPROB+3, PAUSE+1
EN^VALM EN+2
TERM^VALM0 XIT+4
$$FTIME^VALM1 HDR+2
CLEAR^VALM1 EOJ+1, EN+3
FULL^VALM1 GETPROB+8
DIQ^XBLM DD+4
EN^XBVK EOJ+3
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,"No problems to select."
  • Line Location: GETPROB+2
Function Call: WRITE
  • Prompt: !!,"No Problem Selected"
  • Line Location: GETPROB+4
Function Call: WRITE
  • Prompt: !,"Not a valid PCC PROBLEM."
  • Line Location: GETPROB+7
Routine Call
  • VALM
  • Line Location:
    • EN+2
Routine Call
  • DIR
  • Line Location:
    • GETPROB+3
    • PAUSE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] HDR+2
^AUPNPROB - [#9000011] GETPROB+7, GETNUM+4, GETNUM+5, GETNUM+6
^AUTTLOC - [#9999999.06] GETNUM+6
^DPT - [#2] HDR+2
^TMP($J EOJ+2!, INIT+1!, INIT+6*, EXIT+1!, GETPROB+6

Label References

Name Line Occurrences
EXIT GETPROB+4
GETPROB DD+2
PAUSE GETPROB+4, DD+3
XIT DD+3, DD+5

Naked Globals

Name Field # of Occurrence
^(0 GETNUM+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCDLINE INIT+4
APCDLOOK XIT+9!
APCDOVRR EOJ+5!, INIT+8*, EXIT+2!, XIT+1!
APCDPIEN XIT+3!
APCDPLPT EOJ+5!, INIT+2*, EXIT+2!
>> APCDRCNT INIT+5
>> AUPNDOB HDR+2
BDMAF EOJ+5!, EXIT+2!, XIT+9!
BDMC EXIT+2!
BDMDATE EOJ+5!, EXIT+2!
BDMF XIT+9!
BDML EXIT+2!
BDMLINE EXIT+2!
BDMLOC EOJ+5!, EXIT+2!
BDMLOOK EOJ+5!, EXIT+2!
BDMLR EXIT+2!
BDMP GETPROB+5*, GETPROB+6, GETPROB+7!, XIT+9!
BDMP0 EXIT+2!, XIT+9!
BDMPAT EOJ+5!
BDMPDFN EOJ+5!, EXIT+2!
BDMPIEN EOJ+5!, EXIT+2!, GETPROB+1*, GETPROB+6*, GETPROB+7*, DD+1~, DD+3, DD+4, XIT+9!
BDMPL EXIT+2!
BDMPPTR XIT+9!
BDMPRB EOJ+5!, EXIT+2!, XIT+9!
BDMPRMT XIT+9!
BDMRCNT INIT+5*, EXIT+2!, GETPROB+2, GETPROB+3
BDMTEMP XIT+9!
BDMX EXIT+2!
DA GETPROB+3!
DFN EOJ+5!, HDR+2, INIT+2
DIR GETPROB+3!, PAUSE+1!
DIR("A" GETPROB+3*, PAUSE+1*
DIR(0 GETPROB+3*, PAUSE+1*
>> DIRUT GETPROB+4, PAUSE+1*
DLAYGO XIT+2!
>> DUOUT PAUSE+1
DUZ(2 HDR+2
F GETNUM+1~, GETNUM+5*, GETNUM+6
>> IOINORM HDR+2
>> IORVON HDR+2
N GETNUM+1~, GETNUM+2*, GETNUM+3, GETNUM+4, GETNUM+6*, GETNUM+7
P GETNUM~, GETNUM+3, GETNUM+4, GETNUM+5, GETNUM+6
U HDR+2, GETNUM+5, GETNUM+6
VALM EOJ+4!
VALMAR EOJ+4!
VALMBCK EOJ+4!, XIT+5*
VALMBG EOJ+4!
VALMCAP EOJ+4!
>> VALMCC EN+1*
VALMCNT EOJ+4!, INIT+4*
VALMDN EOJ+4!
VALMEVL EOJ+4!
VALMHDR EXIT+4!
VALMHDR(1 HDR+1*
VALMHDR(2 HDR+2*
VALMHDR(3 HDR+3*
VALMIOXY EOJ+4!
VALMKEY EOJ+4!
VALMLFT EOJ+4!
VALMLST EOJ+4!
VALMMCON EOJ+4!
VALMMENU EOJ+4!
VALMOFF EOJ+4!
VALMSGR EOJ+4!
VALMUP EOJ+4!
VALMWD EOJ+1, EOJ+4!
VALMY EOJ+4!
X HELP+1*, EXIT+3!, GETPROB+6*
XQORNEST EOJ+4!
XQORS EOJ+4!
XQORSPEW EOJ+4!
Y EXIT+3!, GETPROB+5, GETPROB+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All