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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: VBECLU3

Package: VBECS

Routine: VBECLU3


Information

VBECLU3 ;HIOFO/BNT - VBECS Patient Lookup Utility ;04/13/2005 09:00

Source Information

Source file <VBECLU3.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 2 $$UP^XLFSTR  $$ACTIVE^XUSER  
VA FileMan 1 DT^DICRW  
VBECS 1 ADD^VBECLU  
VistALink 1 ($$CHARCHK,$$XMLHDR)^XOBVLIB  

Entry Points

Name Comments DBIA/ICR reference
CLIST(ITEM,CHKVAL) ;
TESTP ;
TESTW ;
GETLIST(RESULT,PARAM) ;
DISPLAY(RESULT) ;
TESTC ;
TEST ;
PLIST(ITEM) ;
WLIST(ITEM) ;

External References

Name Field # of Occurrence
DT^DICRW GETLIST+3
ADD^VBECLU GETLIST+10, GETLIST+13, GETLIST+15, GETLIST+18, GETLIST+20, GETLIST+23, GETLIST+25, GETLIST+28, GETLIST+29, GETLIST+30
, CLIST+10, WLIST+8, PLIST+11
$$UP^XLFSTR GETLIST+12, GETLIST+17, GETLIST+22
$$CHARCHK^XOBVLIB CLIST+10, WLIST+8, PLIST+11
$$XMLHDR^XOBVLIB GETLIST+10
$$ACTIVE^XUSER PLIST+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: IEN
  • Line Location: PLIST+9
Function Call: WRITE
  • Prompt: !,"WARD LIST"
  • Line Location: TESTW+2
Function Call: WRITE
  • Prompt: !,"Elapse Time: ",$P(FINISH,",",2)-$P(START,",",2)
  • Line Location: TESTW+7
Function Call: WRITE
  • Prompt: !,"CLINIC LIST"
  • Line Location: TESTC+1
Function Call: WRITE
  • Prompt: !,"Elapse Time: ",$P(FINISH,",",2)-$P(START,",",2)
  • Line Location: TESTC+6
Function Call: WRITE
  • Prompt: !,"PROVIDER LIST"
  • Line Location: TESTP+1
Function Call: WRITE
  • Prompt: !,"Elapse Time: ",$P(FINISH,",",2)-$P(START,",",2)
  • Line Location: TESTP+6
Function Call: WRITE
  • Prompt: !!,@RESULT@(I)
  • Line Location: DISPLAY+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] WLIST+4, WLIST+6
^SC - [#44] CLIST+5, CLIST+6, CLIST+9
^SC("AC" CLIST+4
^TMP($J GETLIST+6!, PLIST+4!, PLIST+6*, PLIST+8, PLIST+9
^VA(200 - [#200] PLIST+6
^XUSEC("PROVIDER" PLIST+5

Label References

Name Line Occurrences
CLIST GETLIST+19
DISPLAY TESTW+6, TESTC+5, TESTP+5
GETLIST TESTW+4, TESTC+3, TESTP+3
PLIST GETLIST+24
TESTC TEST+2
TESTP TEST+3
TESTW TEST+4
WLIST GETLIST+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CHKVAL CLIST~
CNT GETLIST+1~, GETLIST+2*, CLIST+3*, CLIST+8*, CLIST+10, WLIST+3*, WLIST+7*, WLIST+8, PLIST+3*, PLIST+10*
, PLIST+11
DT GETLIST+3, CLIST+7
FINISH TEST+1~, TESTW+5*, TESTW+7, TESTC+4*, TESTC+6, TESTP+4*, TESTP+6
I DISPLAY+1~, DISPLAY+2*
IDATE CLIST+1~, CLIST+5*, CLIST+7
IEN CLIST+1~, CLIST+2*, CLIST+4*, CLIST+5, CLIST+6, CLIST+9, CLIST+10, WLIST+1~, WLIST+5*, WLIST+6*
, WLIST+8, PLIST+1~, PLIST+2*, PLIST+5*, PLIST+6, PLIST+9*, PLIST+11
ITEM CLIST~, WLIST~, PLIST~
NAME CLIST+1~, CLIST+9*, CLIST+10, WLIST+1~, WLIST+2*, WLIST+4*, WLIST+6, WLIST+8, PLIST+1~, PLIST+2*
, PLIST+7*, PLIST+8*, PLIST+9, PLIST+11
OKAY GETLIST+1~, GETLIST+2*, GETLIST+12*, GETLIST+17*, GETLIST+22*, GETLIST+27
PARAM GETLIST~
PARAM("TYPE" GETLIST+12, GETLIST+17, GETLIST+22
RDATE CLIST+1~, CLIST+6*, CLIST+7
RESULT GETLIST~, GETLIST+8*, TESTW+4, TESTW+6, TESTW+8!, TESTC+3, TESTC+5, TESTC+7!, TESTP+3, TESTP+5
, DISPLAY~, DISPLAY+2
START TEST+1~, TESTW+1*, TESTW+7, TESTC+1*, TESTC+6, TESTP+1*, TESTP+6
VBECESLT GETLIST+1~
VBECLINE GETLIST+1~, GETLIST+5*
>> VBECRSLT GETLIST+7*, GETLIST+8
X GETLIST+1~, TEST+1~, TESTW+4, TESTC+3, TESTP+3
X("TYPE" TESTW+3*, TESTC+2*, TESTP+2*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All