Routine: DGRUGV16

Information

DGRUGV16 ;ALB/BOK - RUG/PAI TRANSMISSION ; 12 MAY 87 07:25

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!?95,"Transmission Date: " Line Location: PERR+1
Function Call: WRITE	Prompt: !!?5,"NAME",?40,"SSN",?55,"ASSESSMENT DATE",?80,"STATUS",! Condition for execution: ($D(^UTILITY($J,"ERR"))!$D(^("TRANS"))) Line Location: PERR+1
Function Call: WRITE	Prompt: I Line Location: PERR+1
Function Call: WRITE	Prompt: !,$P(^DPT(+K,0),U,1),?38,$P(K,U,3),?55,$E($P(K,U,2),4,5)_"/"_$E($P(K,U,2),6,7)_"/"_$E($P(K,U,2),2,3),?82 Line Location: PERR+2
Function Call: WRITE	Prompt: S Line Location: PERR+2
Function Call: WRITE	Prompt: !,$P(^DPT(+K,0),U,1),?38,$P(K,U,3),?55,$E($P(K,U,2),4,5)_"/"_$E($P(K,U,2),6,7)_"/"_$E($P(K,U,2),2,3),?82 Line Location: PERR+3
Function Call: WRITE	Prompt: S Line Location: PERR+3
Function Call: WRITE	Prompt: !!!,I,!!!,"NUMBER OF RECORDS SENT TO AUSTIN: ",DGCNT,!,"DATE RANGE SENT: " Line Location: PERR+4
Function Call: WRITE	Prompt: " - " Line Location: PERR+4
Function Call: WRITE	Prompt: " - " Line Location: PERR+4
Routine Call	DIE Line Location: SET+6

FileNo	Call Tags
^DG(45.9 - [#45.9]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("RM"	PERR
^DG(45.9 - [#45.9]	EN+1, STAT
^DPT - [#2]	PERR+2, PERR+3
^UTILITY($J	QUIT!, EN+2, SET+5, ERR, PERR+1, PERR+2, PERR+3

Name	Field # of Occurrence
%	QUIT!
%DT	QUIT!
>> %ZIS("A"	DEV*
D	QUIT!, SET+1, DAT
DA	QUIT!, SET+6*
DGBC	QUIT!, EN+2*
DGCNT	QUIT!, EN, SET+5, PERR+4
DGED	QUIT!, EN+1, PERR+4
DGFLG	QUIT!, EN*, EN+1
DGI	QUIT!, EN+1*, SET, SET+1, SET+2, SET+3, SET+4, ERR
DGP	QUIT!, EN+1, PERR+4
DGPG	QUIT!, EN, EN+2, SET+5
DGPGM	QUIT!, DEV*
DGROW	QUIT!, EN, SET+5
DGS	QUIT!, EN+1*, ERR
DGSD	QUIT!, EN+1, PERR+4
DGSDI	QUIT!, ROUTER*
DGVAR	QUIT!, DEV*
DGXX	QUIT!, EN*, SET+5
DIE	QUIT!, SET+6*
DR	QUIT!, SET+6*
DT	SET+6, PERR+1
DUZ	ROUTER+1
I	QUIT!, EN+1, PERR+1, PERR+4
IOF	PERR+1, PERR+4
J	QUIT!, EN+1, SET+6, ERR, PERR+2, PERR+3*, STAT
K	QUIT!, SET, SET+1, SET+2, SET+3, SET+4, PERR+2, PERR+3*
L	QUIT!, SET, SET+1, SET+2, SET+3, SET+4*
POP	QUIT!, DEV
S	QUIT!, PERR+2, PERR+3, STAT*
U	SET, SET+1, SET+2, SET+3, SET+4, PERR+2, PERR+3
VAT	QUIT!
VAT(	ROUTER
VAT("F"	SET+5
VATERR	QUIT!
VATNAME	QUIT!
X	QUIT!, SET, SET+1, SET+2, SET+3, SET+4, SET+5, PERR, DAT*
XMDUZ	QUIT!, ROUTER+1*
XMSUB	QUIT!, EN+2*
XMTEXT	QUIT!, EN+2*
XMY	QUIT!
XMY(	ROUTER, ROUTER+1
Y	QUIT!, PERR+1, PERR+4