Routine: DGAINP

Customize PDF page

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

Information

DGAINP ;ALB/RMO - Driver Routine to Generate Inpatient AMIS's 334-341 ; 27 DEC 89 1:37 pm

Source Information

Source file <DGAINP.m>

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
Registration	5	^DGAINP1 EN^DGAINP3 ASK^DGGECSA (EOM,LO)^DGUTL (CLOSE,ZIS)^DGUTQ
VA FileMan	3	C^%DTC ^DIC YN^DICN

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

Package	Total	Caller Graph
Registration	1	DG AMIS 334-341

Entry Points

Name	Comments	DBIA/ICR reference
MYR	;Prompt User for AMIS Month/Year
CHK	;Check if AMIS has Already been Calculated for Selected Month/Year
GEN	;Prompt User to Generate AMIS Code Sheets
START	;Start AMIS Generation
Q

External References

Name	Field # of Occurrence
C^%DTC	GEN+3
^DGAINP1	START+1
EN^DGAINP3	CHK+1
ASK^DGGECSA	GEN+1
EOM^DGUTL	GEN+3
LO^DGUTL	DGAINP+3
CLOSE^DGUTQ	Q
ZIS^DGUTQ	GEN+4
^DIC	MYR+1
YN^DICN	CHK+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: MYR+1
Function Call: WRITE	Prompt: !!?3,"Enter 'YES' to recalculate monthly totals, or 'NO' to print." Line Location: CHK+1
Function Call: WRITE	Prompt: ! Line Location: Q+0
Routine Call	DIC Line Location: MYR+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DGAM(334 - [#42.6]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGAM(334 - [#42.6]	CHK+1
^UTILITY($J	START+1!, Q!

Label References

Name	Line Occurrences
CHK	CHK+1
Q	MYR+1, CHK+1, GEN+1, GEN+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	CHK+1, GEN+1, Q!
DGBOM	GEN+3*, Q!
DGCODFLG	GEN+1*, Q!
DGEOM	GEN+3*, Q!
DGMYR	MYR+1*, CHK+1, GEN+3, Q!
DGPEOM	GEN+3*, Q!
DGPGM	GEN+4*, Q!
DGPMYR	GEN+3*, Q!
DGVAR	GEN+4*, Q!
DIC	MYR+1*!
DIC("A"	MYR+1*
DIC(0	MYR+1*
DLAYGO	MYR+1*!
IO	START+1
POP	GEN+4, Q!
X	GEN+3*, Q!
X1	GEN+3*, Q!
X2	GEN+3*, Q!
Y	MYR+1, GEN+3, Q!