Routine: DGMTOREQ

Package	Total	Call Graph
Registration	4	$$SR^DGMTAUD1 ($$PA,CLOSE)^DGMTUTL ZIS^DGUTQ PID^VADPT6
Kernel	2	^%ZISC $$FMTE^XLFDT
VA Fileman	2	^DIC ^DIR

Package

Total

Call Graph

Registration

$$SR^DGMTAUD1 ($$PA,CLOSE)^DGMTUTL ZIS^DGUTQ PID^VADPT6

Kernel

^%ZISC $$FMTE^XLFDT

VA Fileman

^DIC ^DIR

Package	Total	Caller Graph
Registration	5	DG CO-PAY TEST INCOMPLETE DG MEANS TEST REQUIRED DGMTCOM DGMTEO DGMTM

Package

Total

Caller Graph

Registration

DG CO-PAY TEST INCOMPLETE DG MEANS TEST REQUIRED DGMTCOM DGMTEO DGMTM

Entry Points

Name	Comments	DBIA/ICR reference
SORT	;sort data into tmp global
EN	;Entry point to list required/pending means tests
HDR	;header
DTB	;select beginning date
DATE(X)	;function to return date in external format
ST	;select means test status
Q	;select device and print
EXIT	;clean up and quit
ST1
PAGE	;new page
PRINT	;print data from tmp global
CR	;read for display
PID(X)	;function to return pid
DQ	;gather data and print

Name	Field # of Occurrence
^%ZISC	EXIT+3
$$SR^DGMTAUD1	SORT+7
$$PA^DGMTUTL	SORT+9
CLOSE^DGMTUTL	EXIT+3
ZIS^DGUTQ	Q+2
^DIC	ST1+2
^DIR	DTB+1, DTB+4, CR+1
PID^VADPT6	PID+3
$$FMTE^XLFDT	DATE+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !," Future dates are not allowed.",*7 Line Location: DTB+2
Function Call: WRITE	Prompt: !!?10,DGM Line Location: SORT+1
Function Call: WRITE	Prompt: !!?10,DGM Line Location: SORT+11
Function Call: WRITE	Prompt: ?71,$P(DG0,U,4) Line Location: PRINT+7
Function Call: WRITE	Prompt: @IOF Line Location: HDR+1
Function Call: WRITE	Prompt: !?(IOM-$L(DGC(I))/2),DGC(I) Line Location: HDR+2
Function Call: WRITE	Prompt: !?66,"Page ",DGPG,!,DGDASH,! Line Location: HDR+3
Function Call: WRITE	Prompt: !?38,$S(DGMTYPT=1:"Means",1:"Copay")_" Test",?56,"Date of" Line Location: HDR+4
Function Call: WRITE	Prompt: ?67,"Pend. Adj." Line Location: HDR+5
Function Call: WRITE	Prompt: !,"Patient Name",?24,"Patient ID",?40,"Source",?58,"Test" Line Location: HDR+6
Function Call: WRITE	Prompt: ?69,"Status" Line Location: HDR+7
Function Call: WRITE	Prompt: !,"------------",?24,"----------",?38,"----------",?56,"-------" Line Location: HDR+8
Function Call: WRITE	Prompt: ?67,"----------" Line Location: HDR+9
Function Call: WRITE	Prompt: ! Line Location: CR+1
Function Call: WRITE	Prompt: @IOF Line Location: PAGE+2
Routine Call	DIC Line Location: ST1+2
Routine Call	DIR Line Location: DTB+1 DTB+4 CR+1

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

Name	Line Occurrences (* Changed, ! Killed)
^DGMT(408.31 - [#408.31]	SORT+1, SORT+2, SORT+3, SORT+4, SORT+5, SORT+6
^DPT - [#2]	SORT+3
^TMP($J	SORT+7, SORT+10, SORT+11, PRINT+2, PRINT+3, PRINT+4, PRINT+5, EXIT+4!

Name	Line Occurrences
$$DATE	DQ+2, PRINT+6
$$PID	SORT+3, PRINT+6
CR	EXIT+1, PAGE+1
DTB	DTB+2
EXIT	ST1+2, DTB+1, DTB+4, Q+2, SORT+1, SORT+11, PRINT+2
HDR	SORT+1, SORT+11, PRINT+1, PAGE+3
PAGE	PRINT+4
ST	ST1+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CFLG	DQ+6*, SORT+8, PRINT+7, EXIT+2!, HDR+5, HDR+7, HDR+9
DFN	SORT+3, SORT+4, SORT+7, SORT+10, PRINT+3, PRINT+4, PRINT+5, EXIT+2!
DG0	PRINT+5*, PRINT+6, PRINT+7, EXIT+2!
DGBEG	DTB+1*, DTB+2!, DTB+4, DQ+2, SORT+2, EXIT+2!
DGBEGE	DQ+2*, DQ+4, EXIT+2!
DGC	DQ+1*, DQ+3, DQ+6, SORT+1, SORT+2, SORT+3, SORT+4, EXIT+2!
DGC(	HDR+2
DGC(1	DQ+3*
DGC(2	DQ+3*
DGC(3	DQ+4*
DGCAT	EXIT+2!
DGCAT(	ST1+3*, DQ+3, SORT+1
DGCAT(0	DQ+1
DGCRT	DQ+1*, EXIT+1, EXIT+2!, HDR+1, PAGE+1
DGD	SORT+2*, SORT+3, SORT+4, EXIT+2!
DGDA	SORT+4, SORT+5, SORT+6, SORT+7, SORT+9, SORT+10, PRINT+4, PRINT+5, EXIT+2!
DGDASH	DQ+2*, EXIT+2!, HDR+3
DGDPT0	SORT+3*, EXIT+2!
DGEND	DTB+5*, DQ+2, SORT+2, EXIT+2!
DGENDE	DQ+2*, DQ+4, EXIT+2!
DGJ	EXIT+2!
DGM	SORT+1, SORT+11, EXIT+2!
DGMT0	SORT+6*, SORT+7, EXIT+2!
DGMTYPT	ST+1, ST+2, ST1+1, DQ+3, DQ+6, SORT+1, SORT+2, SORT+3, SORT+4, EXIT+2! , HDR+4
DGNM	SORT+3, SORT+7, SORT+10, PRINT+2, PRINT+3, PRINT+4, PRINT+5, PRINT+6, EXIT+2!
DGPG	DQ+2, EXIT+2!, HDR+1, HDR+3
>> DGPGM	Q+1*
DGSSN	SORT+3*, SORT+7, EXIT+2!
>> DGVAR	Q+1*
DIC	ST1*, ST1+2!, EXIT+2!
DIC("A"	ST1+1*
DIC("B"	ST+2*
DIC("S"	ST+1, ST+2
DIC(0	ST1*
DIR	DTB+1!, DTB+4!, EXIT+2!, CR+1!
DIR("?"	DTB+1, DTB+4
DIR("A"	DTB+1, DTB+4
DIR(0	DTB+1, DTB+4, CR+1*
DIRUT	DTB+1, DTB+4, PRINT+2, PRINT+3, PRINT+4, EXIT+2!, CR+1*, PAGE+1
DT	DTB+2
DTOUT	ST1+2, EXIT+2!, CR+1
DUOUT	ST1+2, EXIT+2!, CR+1
>> I	HDR+2*
IO	Q+2
IOF	HDR+1, PAGE+2
IOM	DQ+2, HDR+2
IOSL	PRINT+4, EXIT+1
IOST	DQ+1
PENDA	SORT+9*, SORT+10, EXIT+2!
>> POP	Q+2
U	ST1+3, SORT+3, SORT+7, SORT+10, PRINT+6, PRINT+7
>> VA("PID"	PID+4
VAERR	EXIT+2!
X	EXIT+2!, DATE~, DATE+3, PID~
Y	ST1+2, ST1+3, DTB+1, DTB+5, EXIT+2!

Customize PDF page

Package: Registration

Routine: DGMTOREQ

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: