Routine: VAQUTL1

Package	Total	Call Graph
Registration	1	DEM^VADPT
VA FileMan	1	DD^%DT

Package	Total	Caller Graph
Patient Data Exchange	38	VAQ1 VAQ2 VAQBUL01 VAQBUL02 VAQBUL05 VAQCON2 VAQCON6 VAQDBIM0 VAQDBIM1 VAQDBIM2 VAQDBIM3 VAQDBIM4 VAQDBIP1 VAQDBIP2 VAQDBIP3 VAQDBIP4 VAQDBIP6 VAQDBIP7 VAQDBIP8 VAQDIS15 VAQDIS20 VAQDIS21 VAQDIS23 VAQDIS24 VAQDIS25 VAQDIS26 VAQDIS27 VAQDIS28 VAQDIS29 VAQDIS31 VAQDIS32 VAQDIS33 VAQDIS41 VAQLED01 VAQLED03 VAQLED05 VAQPST01 VAQPST20

Entry Points

Name	Comments	DBIA/ICR reference
REPEAT(CHAR,TIMES)	;REPEAT A STRING
INSERT(INSTR,OUTSTR,COLUMN,LENGTH)	;INSERT A STRING INTO ANOTHER
KILLARR(ARRAY,NODE,START,END)	;KILL NODES OF AN ARRAY
PATINFO(DFN)	;RETURNS PATIENT NAME, SSN, DOB, PATIENT ID
PDXVER()	;RETURN VERSION OF PDX IN USE
APDX	;CONTINUATION OF APDX X-REF ON *PDX TRANSACTION FILE (# 394) ; THIS IS LEFT OVER FROM VERSION 1.0 - INCLUDED TO PASS %INDEX

Name	Field # of Occurrence
DD^%DT	PATINFO+18
DEM^VADPT	PATINFO+14

Name	Line Occurrences (* Changed, ! Killed)
^DD(394	PDXVER+8
^DD(394.61	PDXVER+7
^UTILITY("VADM"	PATINFO+13!, PATINFO+16, PATINFO+17, PATINFO+18, PATINFO+20!
^VAT(394 - [#394]	APDX+2*

Name	Field # of Occurrence
^(0	APDX+2

Name	Field # of Occurrence
%DT	PATINFO+11~
ARRAY	KILLARR~, KILLARR+24, KILLARR+31, KILLARR+32, KILLARR+35, KILLARR+36, KILLARR+38, KILLARR+39
CHAR	REPEAT~, REPEAT+7, REPEAT+10
COLUMN	INSERT~, INSERT+15*, INSERT+19, INSERT+20
>> DA	APDX+2
DFN	PATINFO~, PATINFO+8*, PATINFO+9
END	INSERT+18~, INSERT+20, INSERT+22, KILLARR~, KILLARR+27, KILLARR+40
FRONT	INSERT+18~, INSERT+19*, INSERT+22
INSTR	INSERT~, INSERT+13, INSERT+16, INSERT+22
LENGTH	INSERT~, INSERT+16*, INSERT+20, INSERT+22
LOOP	KILLARR+29~, KILLARR+34*
NODE	KILLARR~, KILLARR+25*, KILLARR+31, KILLARR+32, KILLARR+35, KILLARR+36, KILLARR+38, KILLARR+39
OUTSTR	INSERT~, INSERT+14, INSERT+15, INSERT+19, INSERT+20
START	KILLARR~, KILLARR+26*, KILLARR+31, KILLARR+32, KILLARR+35, KILLARR+36
SUBSCRPT	KILLARR+29~, KILLARR+34, KILLARR+35, KILLARR+36, KILLARR+37, KILLARR+38, KILLARR+39, KILLARR+40*
TIMES	REPEAT~, REPEAT+8, REPEAT+10
TMP	PATINFO+11~, PATINFO+16, PATINFO+17, PATINFO+18, PATINFO+19, PATINFO+21
U	APDX+2
VA	PATINFO+11~
VA("PID"	PATINFO+19
VAERR	PATINFO+11~, PATINFO+15
VAHOW	PATINFO+11~, PATINFO+12*
VAPTYP	PATINFO+11~
VAQ15	APDX+2, APDX+3!
VAQ16	APDX+2, APDX+3!
VAQTMP	APDX+3!
VAROOT	PATINFO+11~
X	PDXVER+6~, PDXVER+7*, PDXVER+10, PDXVER+12, PDXVER+14, APDX+2
Y	PATINFO+11~, PATINFO+18, PDXVER+6~, PDXVER+8, PDXVER+10, PDXVER+12