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 | FileMan Files Accessed Via FileMan Db Call | Global Variables Directly Accessed | Local Variables | Marked Items | All

Print Page as PDF

Routine: DVBYPGD

Package: HINQ

Routine: DVBYPGD

Information

DVBYPGD ;ALB/ABR - UPDATE DISABILITY CONDITION FILE ; APR 4 1995

Source Information

Source file <DVBYPGD.m>

Call Graph

Call Graph

Call Graph Total: 1

Package	Total	Call Graph
VA FileMan	1	FILE^DICN

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
DVBNEW	;add new codes
NEWCODE	; codes to be addded

External References

Name	Field # of Occurrence
FILE^DICN	DVBNEW+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"<<PROGRAMMER NOT DEFINED>>",! Line Location: EN+2
Function Call: WRITE	Prompt: !!,"*** Updating DISABILITY CONDITION file (#31)",!?4,"per VA circular 21-95-2, dated Feb. 1, 1995",! Line Location: DVBNEW+1
Function Call: WRITE	Prompt: !!," << DONE >>",! Line Location: DVBNEW+10

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(31 - [#31]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(31 - [#31]	DVBNEW+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DD	EN+1~, DVBNEW+6!
DIC	EN+1~, DVBNEW+7*
DIC("DR"	DVBNEW+7*
DIC(0	DVBNEW+7*
DO	EN+1~, DVBNEW+6!
DUZ	EN+2
DVBI	EN+1~, DVBNEW+3*
DVBJ	EN+1~, DVBNEW+3*, DVBNEW+4, DVBNEW+7
DVBREF	EN+1~, DVBNEW+4*, DVBNEW+5, DVBNEW+7, DVBNEW+9
U	EN+2
X	EN+1~, DVBNEW+7*, DVBNEW+9

Marked Items

Name	Field # of Occurrence
$T(NEWCODE+DVBI	DVBNEW+3

Info | Source | Call Graph | Entry Points | External References | Interaction Calls | FileMan Files Accessed Via FileMan Db Call | Global Variables Directly Accessed | Local Variables | Marked Items | All