Routine: DGUTL2

Package	Total	Call Graph
VA Fileman	1	^%DTC

Package	Total	Caller Graph
Registration	3	DGAINP0 DGPTC1 DGPTTS2
Integrated Billing	1	IBCU64

Entry Points

Name	Comments	DBIA/ICR reference
ASIH	;calculate asih days
PLASIH	;calculate pass, leave and asih days	ICR #421 Status: Active Usage: Private
IBCHK
ENDREC
CALCQ
APLD(DGPMCA,DGARR,DGBDT,DGEDT,DGMTYP)	;Return ASIH, pass & leave days and dates	ICR #3503 Status: Active Usage: Private
CALC	; -- calculate days ; input: DGBDT := begin date ; DGEDT := end date ; DGADM := adm date ; DGPMCA:= corresponding. admission. ; DGMVTP:= type movements to count - see below ; output: DGREC := #days count asih
PL	;calculate total PASS and UA, AA leave days

External References

Name	Field # of Occurrence
^%DTC	CALC+11, APLD+59, IBCHK+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGPM - [#405]	CALC+10, APLD+24, APLD+31, APLD+32, APLD+34, APLD+37, IBCHK+2
^DGPM("APCA"	CALC+10, APLD+36, APLD+37, IBCHK, IBCHK+1
^TMP("DGMOV"	APLD+30!, ENDREC!

Label References

Name	Line Occurrences
CALC	ASIH+1, PL+1, PLASIH+1
ENDREC	APLD+40
IBCHK	APLD+40, APLD+56

Naked Globals

Name	Field # of Occurrence
^(	CALC+10
^(0	CALC+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DFN	CALC+10, APLD+21~, APLD+31*, APLD+36, APLD+37, IBCHK, IBCHK+1
DG	APLD+41~*, APLD+53
>> DGA	CALC+11*
>> DGADM	CALC+10
DGARR	APLD~, APLD+22!
DGARR(	APLD+61, APLD+62
DGARR(0	ENDREC*
DGB	APLD+41~, APLD+47, APLD+48, APLD+49
DGBDT	CALC+11, APLD~, APLD+23*, APLD+24, APLD+35, APLD+36, APLD+40, APLD+55, ENDREC, IBCHK+2
DGCT	APLD+21~, APLD+30, APLD+63, ENDREC, IBCHK+3*
DGDIS	APLD+21~, APLD+32*, APLD+33, APLD+35, APLD+59
DGEDT	CALC+10, CALC+11, APLD~, APLD+23, APLD+24, APLD+25, APLD+33, APLD+36, APLD+38, APLD+40 , APLD+54, ENDREC
DGI	CALC+10, CALC+11, CALCQ!, APLD+21~, APLD+30, APLD+36, APLD+37, APLD+38, APLD+41*, APLD+42 , APLD+43, APLD+48, APLD+50
DGIB	APLD+22~, APLD+40, APLD+42, APLD+58, IBCHK+2*, IBCHK+3
DGK	APLD+41~, APLD+47, APLD+48
DGM	APLD+21~, APLD+37, APLD+38, APLD+42, APLD+43, APLD+48, APLD+57, APLD+61, APLD+62
DGM0	APLD+21~, APLD+31, APLD+32, APLD+34, APLD+37, APLD+38, APLD+40, APLD+43, APLD+44, APLD+45 , APLD+55, APLD+56, APLD+57, APLD+58, APLD+61, IBCHK, IBCHK+2
DGMOV	APLD+21~, APLD+30*, APLD+38, APLD+41, APLD+42, APLD+43, APLD+50, APLD+51, APLD+52
DGMTYP	APLD~, APLD+23*, APLD+27, APLD+28
DGMVTP	CALC+8, CALC+11, ASIH+1, PL+1, PLASIH+1, APLD+21~, APLD+27, APLD+34*, APLD+44, IBCHK+2
DGPL	APLD+22~, APLD+29*
DGPMCA	CALC+10, APLD~, APLD+23*, APLD+24, APLD+31, APLD+36, APLD+37, IBCHK, IBCHK+1
DGRC	APLD+22~, APLD+36, APLD+38, APLD+40, IBCHK+2, IBCHK+3
>> DGREC	CALC+9, CALC+11
DGRTMV	APLD+22~, APLD+28*, APLD+45, APLD+51, APLD+56
DGRTNCHK	APLD+41~
DGRTNCHK(	APLD+48, APLD+53*
DGXFRS	CALC+9*, CALC+10, CALC+11, CALCQ!
DT	APLD+25
EOL	APLD+21~, APLD+40, APLD+42, APLD+50, APLD+52, APLD+54, APLD+59, APLD+61, IBCHK+2*, IBCHK+3
ISOL	APLD+22~, IBCHK*, IBCHK+1
MDT	APLD+22~, APLD+37*, APLD+38
NDGM	APLD+22~, APLD+42*, APLD+54, APLD+59
PROCESS	APLD+22~, APLD+44, APLD+45, APLD+46
RCNT	APLD+22~, APLD+41*, APLD+45, APLD+55, APLD+56, APLD+58, IBCHK+2
RTN	APLD+22~, APLD+41, APLD+52, APLD+57, APLD+59, APLD+60, APLD+62*
SOL	APLD+21~, APLD+40, APLD+43, APLD+55, APLD+59, APLD+61, IBCHK+2, IBCHK+3
TDGI	APLD+21~, APLD+50*, APLD+51, APLD+52, APLD+53
TDGM	APLD+21~, APLD+51*, APLD+52, APLD+53
U	CALC+10, CALC+11, APLD+31, APLD+32, APLD+34, APLD+38, APLD+43, APLD+44, APLD+45, APLD+51 , APLD+52, APLD+55, APLD+56, APLD+57, APLD+58, APLD+61, ENDREC, IBCHK+2
X	CALC+11, APLD+21~, APLD+59*, APLD+60, APLD+61, APLD+63, IBCHK+3
X1	CALC+11, APLD+21~, APLD+59, IBCHK+3*
X2	CALC+11, APLD+21~, APLD+59, IBCHK+3*
XDGMOV	APLD+22~, IBCHK+1*, IBCHK+2
XSOL	APLD+22~

Customize PDF page

Package: Registration

Routine: DGUTL2

Information

Source Information

Call Graph

Call Graph Total: 1

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: