Routine: DGMTAUD1

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

DGMTAUD1 ;ALB/CAW,LD,BRM - Audit Changes to Means Tests - Con't ; 12/20/01 9:07am

Source Information

Source file <DGMTAUD1.m>

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
VA FileMan	2	FIND^DIC $$GET1^DIQ
Kernel	1	$$FMTE^XLFDT
Registration	1	($$D,$$SR)^DGMTAUD1

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 14

Package	Total	Caller Graph
Registration	11	DGMTAUD DGMTAUD1 DGMTAUD2 DGMTDEL1 DGMTE DGMTEO DGMTO1 DGMTOREQ DGMTP4 DGMTREM DGMTU23
Enrollment Application System	3	EASECDEL EASECE EASECU23

Entry Points

Name	Comments	DBIA/ICR reference
D(I)	;Date function
U(I)	;User function
C(I)	;Change type function
SR(I,DGMTI)	;Get source of test
S(I)	;MT status
A(I)	;Agree to pay deduct
HDR	;Header

External References

Name	Field # of Occurrence
$$D^DGMTAUD1	HDR+1
$$SR^DGMTAUD1	HDR+2
FIND^DIC	SR+20
$$GET1^DIQ	SR+17
$$FMTE^XLFDT	D+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!,"PATIENT: ",$E(DGNAM,1,38),?40,$P("MEANS^COPAY^^LTC EXEMPTION","^",DGMTYPT)_" TEST DATE: ",$$D^DGMTAUD1(DGMTD),! Line Location: HDR+1
Function Call: WRITE	Prompt: ?40,$$SR^DGMTAUD1($G(^DGMT(408.31,DGMTI,0)))_" "_$P("MEANS^COPAY^^LTC EXEMPTION","^",DGMTYPT)_" TEST",! Line Location: HDR+2
Function Call: WRITE	Prompt: ?33,"CHANGES",!! Line Location: HDR+3
Function Call: WRITE	Prompt: ?2,"Date",?23,"Type of Change",?57,"User",!,DGDASH,! Line Location: HDR+4
Routine Call	DIC Line Location: SR+20

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(4 - [#4]	FIND^DIC
^DGMT(408.31 - [#408.31]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(408.31	A+4
^DG(408.32 - [#408.32]	S+4
^DG(408.34 - [#408.34]	SR+10
^DG(408.42 - [#408.42]	C+4
^DGMT(408.31 - [#408.31]	HDR+2
^VA(200 - [#200]	U+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DGDASH	HDR+4
>> DGMTD	HDR+1
DGMTI	SR~, SR+14, SR+17, HDR+2
>> DGMTYPT	HDR+1, HDR+2
>> DGNAM	HDR+1
DGX	D+3~, D+4, D+5, U+3~, U+4, U+5, C+3~, C+4, C+5, SR+9~ , SR+10, SR+14, SR+20, SR+21, SR+22, S+3~, S+4, S+5, A+3~, A+4* , A+5
DGX(1	SR+17*
I	D~, D+4, U~, U+4, C~, C+4, SR~, SR+10, S~, S+4 , A~, A+4
IOF	HDR+1
STA	SR+15~
STA("DILIST"	SR+21
U	U+4, C+4, SR+10, S+4, A+4
Y	D+3~, D+4*