Routine: DG3PR

Customize PDF page

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

Information

DG3PR ;ALB/JDS - THIRD PARTY REIMBURSMENT ;01 JAN 1987

Source Information

Source file <DG3PR.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Registration	4	SORT^DG3PR1 IN^DGHELP (CLOSE,ZIS)^DGUTQ KVAR^VADPT
VA FileMan	1	^%DT

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: 3

Package	Total	Caller Graph
Registration	2	DG THIRD PARTY REIMBURSEMENT DG3PR1
Integrated Billing	1	IB20PT89

Entry Points

Name	Comments	DBIA/ICR reference
EN
DAT
Q

External References

Name	Field # of Occurrence
^%DT	DAT, DAT+1
SORT^DG3PR1	DAT+2
IN^DGHELP	EN+1
CLOSE^DGUTQ	Q
ZIS^DGUTQ	DAT+2
KVAR^VADPT	Q

Interaction Calls

Name	Line Occurrences
Function Call: READ	Prompt: "Sort by Discharge or Admission: D// " Variable: X Timeout: DTIME Line Location: EN+0
Function Call: WRITE	Prompt: X Line Location: EN+0
Function Call: WRITE	Prompt: !!,"CHOOSE FROM",!?4,"A - ADMISSION",!?4,"D - DISCHARGE",!?4,"^ - To QUIT",! Line Location: EN+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^UTILITY("DG"	Q!

Label References

Name	Line Occurrences
DAT	DAT, DAT+1
EN	EN+1
Q	DAT, DAT+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN+1, Q!
%DT	DAT, DAT+1, Q!
%DT("A"	DAT, DAT+1
%DT(0	DAT, DAT+1
C	Q!
DFN	Q!
DGAD	Q!
DGBY	EN+2*, Q!
DGCA	Q!
DGDC	Q!
DGFL	Q!
DGFR	DAT*, DAT+1, Q!
DGI	Q!
DGJ	Q!
DGLOL	Q!
DGNOW	Q!
DGPGM	DAT+2*, Q!
DGPMIFN	Q!
DGPR	Q!
DGPTF	Q!
DGTIME	Q!
DGTO	DAT+1*, Q!
DGTR	Q!
DGVAR	DAT+2*, Q!
DIR	Q!
DIROUT	Q!
DIRUT	Q!
DTIME	EN
DTOUT	Q!
DUOUT	Q!
I	Q!
J	Q!
K	Q!
L	Q!
M	Q!
POP	DAT+2, Q!
X	EN*, EN+2, DAT, DAT+1, Q!
X1	Q!
X2	Q!
Y	DAT, DAT+1, Q!
Z	EN*, Q!