Routine: DGOINS1

Package	Total	Call Graph
Registration	3	CLOSE^DGUTQ INP^VADPT PID^VADPT6
Kernel	1	$$FMTE^XLFDT
VA Fileman	1	NOW^%DTC

Package	Total	Caller Graph
Registration	1	DGOINS

Entry Points

External References

Name	Field # of Occurrence
NOW^%DTC	START
CLOSE^DGUTQ	QUIT
INP^VADPT	UTIL+1
PID^VADPT6	PRINT+2
$$FMTE^XLFDT	START, PRINT+1, HEAD2+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"=====>NO PATIENTS FOUND" Line Location: PP+0
Function Call: WRITE	Prompt: !!,"DIVISION: ",$P(DGL,"^",1),!!?10,"Number of unknown",?34,": ",$J($P(DGL,"^",3),5),!?9,"#Number of unanswered",?34,": ",$J($P(DGL,"^",2),5) Line Location: PP+4
Function Call: WRITE	Prompt: !!?5,"MEDICAL CENTER:",!?10,"Total number of unknown",?34,": ",$J(DGS(4),5),!?9,"#Total number unanswered",?34,": ",$J(DGS(3),5),!?36,"-----",!?29,"TOTAL",?34,": ",$J(DGS(4)+DGS(3),5) Line Location: PP+5
Function Call: WRITE	Prompt: !! Line Location: PP+5
Function Call: WRITE	Prompt: @IOF,!?3,"DIVISION: ",DGV,?50,DGDT," PAGE ",DGC,!!?22,"DIVISION SUMMARY FOR" Line Location: TT+0
Function Call: WRITE	Prompt: !!,DGCL Line Location: TT+0
Function Call: WRITE	Prompt: !!!?3,"DIVISION: ",DGV,!?5,"Number of Unknown: ",$J(DGS(2),5),!?4,"#Number Unanswered: ",$J(DGS(1),5),?40 Line Location: TT+1
Function Call: WRITE	Prompt: VA("PID") Condition for execution: VA("PID")]"" Line Location: PRINT+2
Function Call: WRITE	Prompt: ?40,X,?52 Line Location: PRINT+2
Function Call: WRITE	Prompt: $J(^("VET")_$S(^("VET")="Y":"ES",^("VET")="N":"O",1:""),3) Condition for execution: $D(^DPT(DFN,"VET")) Line Location: PRINT+2
Function Call: WRITE	Prompt: ?57 Line Location: PRINT+3
Function Call: WRITE	Prompt: $J(X_$S(X="Y":"ES",1:"O"),3) Condition for execution: X]"" Line Location: PRINT+3
Function Call: WRITE	Prompt: ?62 Line Location: PRINT+3
Function Call: WRITE	Prompt: ?62 Line Location: PRINT+3
Function Call: WRITE	Prompt: @IOF,!?3,"DIVISION: ",$S(DGDV="ZNOT SPECIFIED":"NOT SPECIFIED",1:DGDV),?50,DGDT," PAGE ",DGC,!?31 Line Location: HEAD+0
Function Call: WRITE	Prompt: !!?3,"PATIENT",?30,"PT ID",?43,"DOB",?52,"VET",?58,"SC",?63,"ADMISSION DATE",!,DGCL Line Location: HEAD+1
Function Call: WRITE	Prompt: " ACTIVE PATIENTS",!?23,"WITH UNKNOWN/UNANSWERED INSURANCE",! Line Location: HEAD2+0
Function Call: WRITE	Prompt: ?DGY,DGT Line Location: HEAD2+3
Function Call: WRITE	Prompt: ! Line Location: RT+0
Function Call: READ	Prompt: "Enter <RET> to continue or ^ to QUIT" Formatting: !?22 Timeout: DTIME Variable: X Line Location: RT+1
Function Call: WRITE	Prompt: @IOF,!?60,DGDT,!?19,"MEDICAL CENTER TOTALS FOR" Line Location: MC+0
Function Call: WRITE	Prompt: !,DGCL Line Location: MC+0
Function Call: WRITE	Prompt: "# - Denotes prompt left blank by user" Line Location: NT+0

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	PRINT+3
^DG(40.8 - [#40.8]	UT+1
^DGPM - [#405]	START+1, UTIL+1
^DGPM("AMV1"	SR
^DIC(42 - [#42]	UTIL+2
^DPT - [#2]	UTIL, UT, UT+1, CT, CT+1, PRINT+1, PRINT+2, PRINT+3
^DPT("CN"	START+1
^UTILITY($J	PP, PP+1, LP, UT+2*

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	START
>> DFN	START+1, SR, LP*, UTIL, UT, UT+1, UT+2, CT, CT+1, PRINT+1 , PRINT+2, PRINT+3
>> DGBEG	HEAD2+2
>> DGBEG1	SR
>> DGC	START, TT, TT+1, TT+2, HEAD*
>> DGCA	START+1, SR, UTIL+1
>> DGCL	START*, TT, HEAD+1, MC
>> DGD	SR, PP, PP+1, LP, UTIL+1, UT+2, PRINT+3
>> DGDT	START*, TT, HEAD, HEAD2+1, MC
>> DGDV	PP+1, LP, UT+1, UT+2, HEAD
>> DGEND	HEAD2+2
>> DGEND1	SR
>> DGJ	PP+1*
>> DGL	START+1, START+2, PP+4*, UTIL+1, HEAD2+1, HEAD2+2
>> DGL(	PP+4, TT+1*
>> DGN	START*
>> DGNO	UTIL+1*
>> DGP	PP+1, LP, UT+1, UT+2, PRINT+2
>> DGS(	START*
>> DGS(1	CT, CT+1, TT, TT+1*
>> DGS(2	CT+2, TT, TT+1
>> DGS(3	PP+3, PP+5, CT, CT+1
>> DGS(4	PP+3, PP+5, CT+2*
>> DGSC	UTIL
>> DGT	HEAD2+1, HEAD2+2, HEAD2+3
>> DGU	START, PP+1, PP+2, PP+4, PP+5, LP, TT, PRINT, RT+1, MC
>> DGV	START, PP+1, TT*, TT+1
>> DGW	START+1*
>> DGY	HEAD2+3*
DTIME	RT+1
IOF	TT, HEAD, MC
IOSL	PP+4, TT, PRINT, RT
IOST	PP+4, TT, TT+1, PRINT
>> K	PP+1, PP+4
>> L	START, TT+1
>> VA("PID"	PRINT+2
VAIN	UTIL+1!
VAIN(4	UTIL+1
>> VAUTD	UTIL+2
>> VAUTD(	UTIL+2
>> X	START, UTIL+1, UTIL+2, UT, CT+1, PRINT+1, PRINT+2, PRINT+3, RT, RT+1
>> X1	START+1*
>> Y	START, UTIL+2, UT+1, PRINT+3*

Customize PDF page

Package: Registration

Routine: DGOINS1

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Line Occurrences
CT	LP
HEAD	PP+1, PRINT
HEAD2	TT, HEAD, MC
LP	PP+1
MC	PP+3, PP+4
NT	PP+5, TT+1
PP	START+2
PRINT	LP
QUIT	PP, PP+2, PP+5
RT	PP+4, TT, TT+1, PRINT
TT	PP+1, PP+2
UT	UTIL+2
UTIL	START+1, SR