Routine: DGBTOA2

Package	Total	Call Graph
Registration	4	CLOSE^DGUTQ ^VADATE PID^VADPT PID^VADPT6
Beneficiary Travel	2	PR^DGBTOA3 TOTAL^DGBTOA4
VA Fileman	1	(COMMA,NOW)^%DTC

Package

Total

Call Graph

CLOSE^DGUTQ ^VADATE PID^VADPT PID^VADPT6

PR^DGBTOA3 TOTAL^DGBTOA4

(COMMA,NOW)^%DTC

Package	Total	Caller Graph
Beneficiary Travel	1	DGBTOA1

Package

Total

Caller Graph

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"=====>NO PATIENTS FOUND" Line Location: START+2

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	SET+3
^DGBT(392 - [#392]	SORT, DATE, SET+2, SET+3
^DGBT(392.3 - [#392.3]	SET+6
^DPT - [#2]	SET+3
^PRC(440	SET+5, ACCTU
^UTILITY($J	START+1, SET+10, SET+11, SET+12, SET+13, PATU, ACCTU+2

Name	Field # of Occurrence
>> %	START
>> DFN	SET+8*
>> DGBT2	START*
>> DGBT4	START*
>> DGBTA	START*
>> DGBTB	SET+5*, SET+7, PATU, ACCTU+2
>> DGBTBEG	DATE
>> DGBTBY	SORT*, DATE, SET+13, ACCTU
>> DGBTC	SET+6*, SET+7, PATU, ACCTU+2
>> DGBTCH	START, SET+6, PATU, ACCTU+2
>> DGBTCL	START*
>> DGBTCW	SET+6, SET+11, SET+13, ACCTU, ACCTU+2
>> DGBTD	START, DATE, SET+2, SET+3, PATU, ACCTU+2
>> DGBTDN	START, SET+3, SET+4, SET+10, SET+11, SET+12, SET+13, PATU, ACCTU, ACCTU+2
>> DGBTDT	START*
>> DGBTDV	START, SET+3, ACCTU+1
>> DGBTEND	DATE
>> DGBTG	SET+7*
>> DGBTI	START, SET+7
>> DGBTIX	START+1*, SORT, DATE
>> DGBTK	SET+3, SET+5, SET+6, SET+8, SET+9, PATU, ACCTU+2*
>> DGBTK10	SET+5*, PATU, ACCTU+2
>> DGBTK9	SET+5*, PATU, ACCTU+2
>> DGBTO	SET+3*, SET+7, SET+8
>> DGBTOTX	START*
>> DGBTOTX(	ACCTU*
>> DGBTP	SET+8*, SET+10, SET+12, PATU, ACCTU+2
>> DGBTPTC(	ACCTU+1*
>> DGBTS	START, SET+9, SET+10, SET+11, SET+12, SET+13
>> DGBTSD	START, SET+9, SET+10, SET+11, SET+12, SET+13
>> DGBTSL	START+1, SET+7, SET+8, SET+12, ACCTU
>> DGBTU	START*, START+1, SORT, DATE
>> DGBTV	START*
>> DGBTXX	SET+7*
>> DGBTY	START*
>> SSN	SET+8*, SET+10, SET+12, PATU, ACCTU+2
U	START*, SET+3, SET+5, SET+6, SET+7, SET+8, SET+9, SET+10, SET+11, SET+12 , SET+13, PATU, ACCTU, ACCTU+2
>> VA("PID"	SET+8
>> VADAT("W"	START*
>> VADATE("E"	START
>> VAUTD	SET+4
>> VAUTD(	SET+4
>> VAUTN	SORT
>> VAUTN(	SORT
>> X2	START*
>> Y	START*

Information

Name	Comments	DBIA/ICR reference
SORT
SET	;Sets up variables and does validity checks, also sets up Utility
PATU
CM
ACCTU
START
DATE
QUIT1