Routine: VPSRPC11

Information

VPSRPC11 ;BPOIFO/EL,WOIFO/BT - Patient Demographic RPC - Appointment;9/4/14 13:07

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
Kernel	1	$$DT^XLFDT
Scheduling	1	$$SDAPI^SDAMA301
VA FileMan	1	$$GET1^DIQ
VA Point of Service	1	SET^VPSRPC1

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
VA Point of Service	1	VPSRPC1

Entry Points

Name	Comments	DBIA/ICR reference
GETAPPT(VPSARR,DFN,DTRANGE)	; Appointment Info ; OUTPUT ; VPSARR - passed in by reference; this is the output array to store patient demographics ; INPUT ; DFN - patient DFN (This value must be validated before calling this procedure) ; DTRANGE - FROMDATE:THROUGH DATE
STAPPT(VPSARR,VPSAPT,VPSIEN)	; Store appointments ; ------ Clinic Info ------------
SET(VPSARR,VPSFL,VPSIEN,VPSFLD,VPSDA,VPSDS)	;Set line item to output array

External References

Name	Field # of Occurrence
$$GET1^DIQ	STAPPT+12, STAPPT+27, STAPPT+28, STAPPT+29, STAPPT+30
$$SDAPI^SDAMA301	GETAPPT+22
SET^VPSRPC1	SET+1
$$DT^XLFDT	GETAPPT+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	GETAPPT+21!, GETAPPT+28, GETAPPT+30, GETAPPT+31, GETAPPT+36!

Label References

Name	Line Occurrences
SET	GETAPPT+23, STAPPT+7, STAPPT+11, STAPPT+13, STAPPT+17, STAPPT+18, STAPPT+19, STAPPT+20, STAPPT+21, STAPPT+22 , STAPPT+23, STAPPT+24, STAPPT+27, STAPPT+28, STAPPT+29, STAPPT+30
STAPPT	GETAPPT+33

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DFN	GETAPPT~, GETAPPT+17, GETAPPT+21, GETAPPT+23, GETAPPT+28, GETAPPT+30, GETAPPT+31, GETAPPT+32, GETAPPT+36
DTRANGE	GETAPPT~, GETAPPT+8, GETAPPT+9
EXIST	GETAPPT+26~, GETAPPT+34
FLD	STAPPT+26~
TODAY	GETAPPT+7~*, GETAPPT+10, GETAPPT+11
U	STAPPT+2, STAPPT+17, STAPPT+18, STAPPT+19, STAPPT+20, STAPPT+21, STAPPT+22, STAPPT+23, STAPPT+24
VAL	GETAPPT+22~, GETAPPT+23, STAPPT+2~, STAPPT+3, STAPPT+4, STAPPT+12, STAPPT+13, STAPPT+17, STAPPT+18, STAPPT+19 , STAPPT+20, STAPPT+21, STAPPT+22, STAPPT+23, STAPPT+24, STAPPT+27, STAPPT+28, STAPPT+29, STAPPT+30*
VPSAPT	GETAPPT+31*, GETAPPT+33, STAPPT~, STAPPT+2, STAPPT+17, STAPPT+18, STAPPT+19, STAPPT+20, STAPPT+21, STAPPT+22 , STAPPT+23, STAPPT+24
VPSARR	GETAPPT~, GETAPPT+23, GETAPPT+33, STAPPT~, STAPPT+7, STAPPT+11, STAPPT+13, STAPPT+17, STAPPT+18, STAPPT+19 , STAPPT+20, STAPPT+21, STAPPT+22, STAPPT+23, STAPPT+24, STAPPT+27, STAPPT+28, STAPPT+29, STAPPT+30, SET~ , SET+1
VPSCL	GETAPPT+25~, GETAPPT+28, GETAPPT+30, GETAPPT+31, GETAPPT+32
VPSCLN	STAPPT+3~*, STAPPT+7, STAPPT+12
VPSCNAM	STAPPT+4~*, STAPPT+11
VPSDA	SET~, SET+1
VPSDFN	STAPPT+26~*, STAPPT+27, STAPPT+28, STAPPT+29, STAPPT+30
VPSDS	SET~, SET+1
VPSDT	GETAPPT+25~, GETAPPT+29, GETAPPT+30, GETAPPT+31, GETAPPT+32, STAPPT+26~, STAPPT+27, STAPPT+28, STAPPT+29, STAPPT+30
VPSFL	STAPPT+10~, STAPPT+11, STAPPT+12, STAPPT+13, STAPPT+16, STAPPT+17, STAPPT+18, STAPPT+19, STAPPT+20, STAPPT+21 , STAPPT+22, STAPPT+23, STAPPT+24, STAPPT+27, STAPPT+28, STAPPT+29, STAPPT+30, SET~, SET+1
VPSFLD	SET~, SET+1
VPSFR	GETAPPT+8~, GETAPPT+10, GETAPPT+15
VPSIEN	GETAPPT+32*, GETAPPT+33, STAPPT~, STAPPT+7, STAPPT+11, STAPPT+13, STAPPT+17, STAPPT+18, STAPPT+19, STAPPT+20 , STAPPT+21, STAPPT+22, STAPPT+23, STAPPT+24, STAPPT+26, STAPPT+27, STAPPT+28, STAPPT+29, STAPPT+30, SET~ , SET+1
VPSSD	GETAPPT+14~, GETAPPT+22
VPSSD("FLDS"	GETAPPT+18*
VPSSD(1	GETAPPT+15*
VPSSD(3	GETAPPT+16*
VPSSD(4	GETAPPT+17*
VPSTO	GETAPPT+9~, GETAPPT+11, GETAPPT+15

Customize PDF page

Package: VA Point of Service