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 |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: VPRD

Package: Virtual Patient Record

Routine: VPRD


Information

VPRD ;SLC/MKB -- Serve VistA data as XML via RPC ;8/2/11 15:29

Source Information

Source file <VPRD.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 $$TZ^XLFDT  $$LOW^XLFSTR  $$NS^XUAF4  $$TAXIND^XUSTAX  
Master Patient Index VistA 1 $$GETDFN^MPIF001  
Registration 1 $$SITE^VASITE  
Toolkit 1 $$GET^XPAR  
VA FileMan 1 $$GET1^DIQ  

Caller Graph

Caller Graph Total: 50

Package Total Caller Graph
Virtual Patient Record 48 VPR DATA VERSION  VPR GET PATIENT DATA  VPRDGMPL  VPRDGMRA  VPRDGMRC  VPRDGMV  VPRDGPF  VPRDIB  
VPRDJ00  VPRDJ01  VPRDJ02  VPRDJ03  VPRDJ04  VPRDJ04A  VPRDJ05  VPRDJ05V  
VPRDJ06  VPRDJ07  VPRDJ08  VPRDJ09  VPRDLR  VPRDLRA  VPRDLRO  VPRDMC  
VPRDMDC  VPRDOR  VPRDPROC  VPRDPS  VPRDPSI  VPRDPSO  VPRDPSOR  VPRDPT  
VPRDPXAM  VPRDPXED  VPRDPXHF  VPRDPXIM  VPRDPXRM  VPRDPXSK  VPRDRA  VPRDRMIM  
VPRDSDAM  VPRDSR  VPRDTIU  VPRDTST  VPRDVSIT  VPRSDA  VPRSDAL  VPRSDAP  
VA FileMan 2 ITEM  ^DDE  

Entry Points

Name Comments DBIA/ICR reference
ERR(X,VAL) ; -- return error message
FAC(X) ; -- return Institution file station# for location X
VUID(IEN,FILE) ; -- Return VUID for item
TEST(DFN,TYPE,ID,START,STOP,MAX,TEXT,IN) ; -- test GET, write results to screen
STRING(ARRAY) ; -- Return text in ARRAY(n) or ARRAY(n,0) as a string
ALL() ; -- return string for all types of data
VERSION(RET) ; -- Return current version of data extracts
GTQ ; end
ESC(X) ; -- escape outgoing XML
; Q $ZCONVERT(X,"O","HTML") ; uncomment for fastest performance on Cache
PROVSPC(NP) ; -- Return contact & specialty info for provider NP
; save strings in ^TMP("VPRD",$J,NP) for efficiency
GET(VPR,DFN,TYPE,START,STOP,MAX,ID,FILTER) ; -- Return search results as XML in @VPR@(n)
; RPC = VPR GET PATIENT DATA
PROVTAGS() ; -- Return attribute tags for provider info as built below
RTN(X) ; -- Return name of VPRDxxxx routine for clinical domain X
; X is also enforced as expected group tag name, if passed by ref
ADD(X) ; Add a line @VPR@(n)=X
TAG(X) ; -- return plural name for group tags

External References

Name Field # of Occurrence
$$GET1^DIQ FAC+4, PROVSPC+9, VUID+1
$$GETDFN^MPIF001 GET+8
$$SITE^VASITE FAC+5
$$TZ^XLFDT GET+18
$$LOW^XLFSTR GET+10, TAG+1
$$GET^XPAR GET+18, VERSION+1
$$NS^XUAF4 FAC+5
$$TAXIND^XUSTAX PROVSPC+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,@IDX
  • Line Location: TEST+7

Used in RPC

RPC Name Call Tags
VPR GET PATIENT DATA GET
VPR DATA VERSION VERSION

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^SC - [#44] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] GET+9
^SC - [#44] FAC+2
^TMP("VPR" GET+3
^TMP("VPRD" GTQ+1!, PROVSPC+3, PROVSPC+10*
^USC(8932.1 - [#8932.1] PROVSPC+7
^VA(200 - [#200] PROVSPC+4

Label References

Name Line Occurrences
$$ALL GET+10
$$RTN GET+21
@( GET+23
ADD GET+18, GET+22, GET+24, GET+25, ERR+6, ERR+7, ERR+8
ERR GET+9
GET TEST+4
GTQ GET+9

Naked Globals

Name Field # of Occurrence
^( PROVSPC+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARRAY STRING~
ARRAY( STRING+3, STRING+4, STRING+5
ARRAY("" STRING+2
ARRAY(0 STRING+2
CLS PROVSPC+2~, PROVSPC+7*, PROVSPC+8
DFN GET~, GET+7*, GET+8*, GET+9, TEST~, TEST+2*, TEST+4
FAC FAC+1~, FAC+2*, FAC+4*, FAC+5, FAC+7
FILE VUID~, VUID+1
FILTER GET~
FILTER("id" GET+14
FILTER("text" GET+4
HLOC FAC+1~, FAC+2*, FAC+4
I ESC+3~, ESC+4*, ESC+5*, ESC+6*, ESC+7*, ESC+8*, ESC+9*, STRING+1~, STRING+2*, STRING+3
, STRING+4*, STRING+5, PROVSPC+2~
ICN GET+2~, GET+7*, GET+8
ID GET~, GET+7*, GET+14*, TEST~, TEST+4
IDX TEST+1~, TEST+6*, TEST+7*
IEN VUID~, VUID+1
IN TEST~, TEST+4
MAX GET~, GET+11*, TEST~, TEST+4
MSG ERR+1~*, ERR+2*, ERR+3*, ERR+4*, ERR+7
NP PROVSPC~, PROVSPC+2*, PROVSPC+3, PROVSPC+4, PROVSPC+6, PROVSPC+9, PROVSPC+10
OUT TEST+1~, TEST+4, TEST+6
QOT ESC+3~*, ESC+9
RES PROVSPC+2~, PROVSPC+3*, PROVSPC+5*, PROVSPC+8*, PROVSPC+9*, PROVSPC+10, PROVSPC+11
RET VERSION~, VERSION+1*
START GET~, GET+11*, GET+12*, TEST~, TEST+4
STOP GET~, GET+11*, GET+12*, GET+13*, TEST~, TEST+4
TEXT TEST~
TYPE GET~, GET+10*, GET+19, TEST~, TEST+3*, TEST+4
U FAC+2, FAC+4, FAC+5, FAC+6, FAC+7, PROVSPC+5, PROVSPC+6, PROVSPC+7, PROVSPC+8, PROVSPC+9
, TEST+1*
VAL ERR~, ERR+2, ERR+3
VPR GET~, GET+3*, GET+24, ADD+2
VPRHDR GET+17~, GET+22*, GET+24
VPRI GET+2~, GET+22, ADD+1*, ADD+2
VPRP GET+17~, GET+20*
VPRTAG GET+17~, GET+20*, GET+21, GET+22, GET+24
VPRTEXT GET+2~, GET+4*
VPRTN GET+17~, GET+21*, GET+23
VPRTOTL GET+2~, GET+22*, GET+24
VPRTYPE GET+17~, GET+19*, GET+20
X GET+12~*, RTN~, RTN+2*, RTN+3*, RTN+4*, RTN+5*, RTN+6*, RTN+7*, RTN+8*, RTN+9*
, RTN+10*, RTN+11*, RTN+12*, RTN+13*, RTN+14*, RTN+15*, RTN+16*, RTN+17*, RTN+18*, RTN+19*
, RTN+20*, RTN+21*, RTN+22*, RTN+23*, RTN+24*, RTN+25*, RTN+26*, RTN+27*, RTN+28*, RTN+29*
, RTN+30*, RTN+31*, RTN+32*, RTN+33*, RTN+34*, RTN+35*, TAG~, TAG+1*, TAG+2, TAG+3
, TAG+4, ERR~, ERR+2, ERR+3, ERR+4, ESC~, ESC+4*, ESC+5, ESC+6*, ESC+7*
, ESC+8*, ESC+9*, ADD~, ADD+2, STRING+1~, STRING+5*, STRING+6, STRING+7, FAC~, FAC+2
, FAC+4, PROVSPC+2~, PROVSPC+6*, PROVSPC+7, PROVSPC+8
X13 PROVSPC+2~, PROVSPC+4*, PROVSPC+5
X15 PROVSPC+2~, PROVSPC+4*, PROVSPC+5
Y RTN+2~*, RTN+3*, RTN+4*, RTN+5*, RTN+6*, RTN+7*, RTN+8*, RTN+9*, RTN+10*, RTN+11*
, RTN+12*, RTN+13*, RTN+14*, RTN+15*, RTN+16*, RTN+17*, RTN+18*, RTN+19*, RTN+20*, RTN+21*
, RTN+22*, RTN+23*, RTN+24*, RTN+25*, RTN+26*, RTN+27*, RTN+28*, RTN+29*, RTN+30*, RTN+31*
, RTN+32*, RTN+33*, RTN+34*, RTN+35*, RTN+36, TAG+1~, TAG+2*, TAG+3*, TAG+4*, TAG+5
, ESC+3~, ESC+5*, ESC+6*, ESC+7*, ESC+8*, ESC+9*, ESC+10, STRING+1~*, STRING+3*, STRING+6*
, STRING+7*, STRING+8, FAC+1~*, FAC+6*, FAC+7*, FAC+8, PROVSPC+2~
Y0 FAC+1~, FAC+5*, FAC+6

Marked Items

Name Field # of Occurrence
$T(@VPRTN GET+21
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All