Routine: DGPTTS

Package	Total	Call Graph
Registration	6	BS^DGPTFM6 MSG^DGPTMSG1 VARS^DGPTSUDO EV^DGPTTS0 ^DGPTTS1 EN^DGPTTS3
DRG Grouper	2	$$ICDDX^ICDCODE $$GETDATE^ICDGTDRG
VA Fileman	2	^DIE ^DIK
Kernel	1	$$FMTE^XLFDT

Package	Total	Caller Graph
Registration	4	DGPM TREATING SPECIALTY EVENT DGPTF DGPTTS0 DGPTUTL
Integrated Billing	2	IB20PT82 IB20PT86

Entry Points

Name	Comments	DBIA/ICR reference
Q
LE	;entry point for PTF record update
NOTS	;
CA	; -- determine CA info
NTR
DEL1
DEL	;facility treating specialty has been deleted from ^DGPM
EV	;entry point from event driver
DGDT	; -- get first ts before dc date

External References

Name	Field # of Occurrence
BS^DGPTFM6	LE+8
MSG^DGPTMSG1	DEL+12, DEL1+1, NTR+1
VARS^DGPTSUDO	LE+6
EV^DGPTTS0	EV+1
^DGPTTS1	LE+6
EN^DGPTTS3	LE+9
^DIE	DEL1+4, DEL1+7, LE+8, NOTS+1, NOTS+2
^DIK	DEL+3
$$ICDDX^ICDCODE	DEL+4
$$GETDATE^ICDGTDRG	DEL+4
$$FMTE^XLFDT	DEL1, NTR

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Updating PTF Record #",PTF,"..." Line Location: LE+2
Function Call: WRITE	Prompt: "completed." Line Location: LE+9
Routine Call	DIE Line Location: DEL1+4 DEL1+7 LE+8 NOTS+1 NOTS+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	DEL+11
^DGPM - [#405]	LE+4, CA+2
^DGPM("ATS"	LE+4, DGDT+2
^DGPT - [#45]	DEL+2, DEL1+3, DEL1+6, LE+8, NOTS+2
^DIC(42.4 - [#42.4]	DEL+11
^DPT - [#2]	DEL+11, DEL1
^UTILITY("DGPM"	DEL+1
^UTILITY($J	DEL+5, DEL+9, LE+3!, LE+7!
^VA(200 - [#200]	DEL+11, DEL1

Label References

Name	Line Occurrences
DEL1	DEL+2, DEL+5
NOTS	LE+5

Naked Globals

Name	Field # of Occurrence
^(0	DEL+3, LE+4, CA+2
^(300	DEL+3, DEL1+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	LE+7!
A	LE+7!
ADM	LE+7!
B	LE+7!
C	LE+7!
D	LE+7!
DA	DEL+3!, DEL1+4, DEL1+7, DEL1+8!, LE+7!, LE+8, Q!, NOTS+1, NOTS+2
DA(1	DEL+3, DEL1+4, DEL1+7, LE+8, NOTS+1, NOTS+2
>> DFN	DEL+11, DEL1, LE+4, DGDT+2
>> DG1	DEL+7, DEL+8, DEL+9
DGAD	LE+7!
>> DGADM	CA+2*
DGDEL	LE+7!
DGDR	LE+7!
DGDT	LE+4*, LE+6, Q!, DGDT+1
DGDT1	LE+7!
DGEX	DEL+3*, DEL+8, DEL1+8!
DGI	DEL+10!
DGMOVM	LE+8, Q!
DGMSG	DEL+4, DEL+5, DEL+11, DEL1, Q!, NTR
>> DGMSG1	DEL+12, DEL1+1, NTR+1*
>> DGMV	DEL+1
>> DGMVA	NTR
>> DGMVP	DEL1
>> DGMVT	CA+2*
DGP0	Q!
>> DGPMA	CA+1, CA+2
>> DGPMAN	LE+4, CA+2*
>> DGPMCA	LE+4, DGDT+2, CA+1*, CA+2
>> DGPMP	CA+1, CA+2
DGPREV	LE+4, LE+5, LE+6, Q!, DGDT+2
DGPTFP	DEL+1*, DEL+2, DEL+3, DEL+5, DEL+9, DEL1+3, DEL1+6, DEL1+8!
>> DGPTTMP	DEL+4*
>> DGQUIET	LE+2, LE+9
DGREC	DEL+3, DEL+4, DEL+11, DEL1+3, DEL1+6*, DEL1+8!, LE+7!, Q!
DGTEMP	LE+7!
DGTLOS	LE+7!
DGTNX	LE+7!
DGTPR	LE+7!
DGTR	LE+7!
DIC	LE+7!, Q!
DIE	DEL1+4, DEL1+8!, LE+7!, LE+8, Q!, NOTS+1, NOTS+2
>> DIK	DEL+3*
DIS	LE+7!
DR	DEL1+3, DEL1+4, DEL1+6, DEL1+7, DEL1+8!, LE+7!, LE+8, Q!, NOTS+1, NOTS+2*
DUZ	DEL+11, DEL1
I	LE+7!
I1	LE+7!
J	LE+7!
L	LE+7!
L1	LE+7!
L2	LE+7!
LL	LE+7!
LOL	LE+7!
LOP	LE+7!
MN	LE+7!
NOW	LE+7!
NTR	LE+7!
NX	LE+7!
NXX	LE+7!
PR	LE+7!
>> PTF	DEL+2, DEL+3, DEL+4, DEL1, DEL1+3, DEL1+4, DEL1+6, DEL1+7, LE+2, LE+8 , NTR, NOTS+1, NOTS+2, CA+2*
PTN	LE+7!
T	LE+7!
T(	LE+6*
T1	LE+7!
T2	LE+7!
TD	LE+7!
TDD	LE+7!
TRN	LE+7!
U	DEL+4, DEL+8, DEL+9, DEL+11, DEL1, DEL1+3, DEL1+6
V	Q!
X	DEL+4, DEL+8, DEL1, DEL1+3, DEL1+6, DEL1+8!, Q!, DGDT+1~, DGDT+2
X1	LE+7!
X2	LE+7!
Y	DEL+11*, DEL1+8!, LE+7!, Q!
Z	LE+7!
>> ZTQUEUED	LE+2, LE+9
ZTSK	LE+7!

Customize PDF page

Package: Registration

Routine: DGPTTS

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: