Routine: DG1074P

Package	Total	Call Graph
VA FileMan	2	^DIC ^DIE
Kernel	1	(BMES,MES)^XPDUTL

Entry Points

Name	Comments	DBIA/ICR reference
EN	;Add Treating Specialties to the SPECIALTY file (#42.4)
TSPEC	;Add treating specialty to SPECIALTY File (#42.4)
FAC	;Add treating specialty to Facility Treating Specialty file (#45.7)
MULT	;Add Effective Date
TRSP	;PTF CODE^SPECIALTY^PRINT NAME^SERVICE^ASK PSYCH^BILLING BEDSECTION^CDR/MPCR^^QUES#^AUSTIN PTF CODE

Name	Field # of Occurrence
^DIC	TSPEC+8, FAC+6, MULT+6
^DIE	TSPEC+19, FAC+19, MULT+12
BMES^XPDUTL	TSPEC+1, FAC+8, FAC+10, FAC+14
MES^XPDUTL	TSPEC+11, TSPEC+12, TSPEC+14, TSPEC+15, FAC+11, FAC+12, FAC+15, MULT+8, MULT+9

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

Name	Line Occurrences (* Changed, ! Killed)
^DD(	MULT+4

Name	Field # of Occurrence
DA	TSPEC+2~, TSPEC+18, FAC+1~, FAC+17, MULT+1~, MULT+7*
DA(1	MULT+2*
DGDA1	TSPEC+2~, TSPEC+9, FAC+7, FAC+8, FAC+9, FAC+14, FAC+17, FAC+22, MULT+2
DGERR	EN+1~
DGFILE	TSPEC+2~, TSPEC+20, FAC+1~, FAC+20, MULT+4
DGI	EN+1~, EN+4*
DGIFN	EN+1~, EN+2, TSPEC+9, TSPEC+10, TSPEC+18, TSPEC+22
DGMULT	TSPEC+2~, TSPEC+21, FAC+1~, FAC+21, MULT+4
DGQUES	EN+1~, EN+6*
DGSPEC	EN+1~, EN+4*, EN+6, TSPEC+1, TSPEC+5, TSPEC+6, TSPEC+9, TSPEC+17, FAC+5, FAC+9 , FAC+18
DIC	TSPEC+2~, TSPEC+3, TSPEC+16, TSPEC+22, FAC+1~, FAC+2, FAC+16, FAC+22, MULT+10
DIC("P"	MULT+4*
DIC(0	TSPEC+4, FAC+3, MULT+3*
DIE	TSPEC+2~, TSPEC+16, FAC+1~, FAC+16, MULT+1~, MULT+10*
DINUM	TSPEC+2~, TSPEC+5*
DLAYGO	TSPEC+2~, TSPEC+7, FAC+1~, FAC+4
DR	TSPEC+2~, TSPEC+17, FAC+1~, FAC+18, MULT+1~, MULT+11*
U	EN+6, TSPEC+1, TSPEC+5, TSPEC+6, TSPEC+17, FAC+5, FAC+9, FAC+14, FAC+18
X	TSPEC+2~, TSPEC+6, FAC+1~, FAC+5, MULT+5*
Y	TSPEC+2~, FAC+1~, FAC+7, MULT+7, MULT+8
Y(0	FAC+9

Name	Field # of Occurrence
$T(TRSP+DGI	EN+4