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

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