Routine: ACPT28PC

Package	Total	Call Graph
Kernel	4	^%ZISC ($$STATUS,OPEN)^%ZISH $$UP^XLFSTR MES^XPDUTL
VA Fileman	2	^DIC ^DIE
CPT Files	1	CLEAN^ACPT28P1

Package	Total	Caller Graph
CPT Files	1	ACPT28PA

Entry Points

Name	Comments	DBIA/ICR reference
MSG	; messages to display
T(TAG)
LOADCODE	; load HCPCS codes from AMA HCPCS Description file
CLEAN(ACPTDESC,ACPTUP)	; clean up description field
TEXT(ACPTDESC)	; convert Description text to Word-Processing data type

External References

Name	Field # of Occurrence
^%ZISC	LOADCODE+93
$$STATUS^%ZISH	LOADCODE+13, LOADCODE+16
OPEN^%ZISH	LOADCODE+7
CLEAN^ACPT28P1	CLEAN+5
^DIC	LOADCODE+89
^DIE	LOADCODE+79
$$UP^XLFSTR	CLEAN+16
MES^XPDUTL	LOADCODE+9, LOADCODE+10

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(81	LOADCODE+85
^ICPT - [#81]	LOADCODE+29, LOADCODE+31, LOADCODE+33, LOADCODE+59, LOADCODE+64!, LOADCODE+65, LOADCODE+68, LOADCODE+69, LOADCODE+72
^ICPT("B"	LOADCODE+26, LOADCODE+27, LOADCODE+30*

Label References

Name	Line Occurrences
$$CLEAN	LOADCODE+47, LOADCODE+62
$$T	LOADCODE+9, LOADCODE+10
TEXT	LOADCODE+63

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACPTACT	LOADCODE+22~, LOADCODE+23*, LOADCODE+50
ACPTBRK	TEXT+13~, TEXT+18, TEXT+20, TEXT+23, TEXT+26, TEXT+28, TEXT+30*, TEXT+33, TEXT+34
ACPTCLN	CLEAN+8~, CLEAN+12, CLEAN+13*, CLEAN+16, CLEAN+18
ACPTCNT	LOADCODE+12~, LOADCODE+13, LOADCODE+91, TEXT+9~, TEXT+32*, TEXT+33, TEXT+36
ACPTCODE	LOADCODE+18~, LOADCODE+19*, LOADCODE+20, LOADCODE+26, LOADCODE+27, LOADCODE+28, LOADCODE+29, LOADCODE+30
ACPTDESC	LOADCODE+61~, LOADCODE+62, LOADCODE+63, LOADCODE+65, CLEAN~, CLEAN+5, CLEAN+9, CLEAN+10, CLEAN+16, TEXT~ , TEXT+7, TEXT+8!
ACPTDESC(	TEXT+33*
ACPTDESC(0	TEXT+36*
ACPTEDT	LOADCODE+67~, LOADCODE+68*, LOADCODE+69, LOADCODE+71
ACPTEIEN	LOADCODE+69~*, LOADCODE+71, LOADCODE+72, LOADCODE+74
ACPTIEN	LOADCODE+25~, LOADCODE+26, LOADCODE+28, LOADCODE+29, LOADCODE+30, LOADCODE+31, LOADCODE+33, LOADCODE+59, LOADCODE+64, LOADCODE+65 , LOADCODE+68, LOADCODE+69, LOADCODE+72, LOADCODE+75, LOADCODE+82
ACPTLINE	LOADCODE+15~, LOADCODE+16*, LOADCODE+19, LOADCODE+23, LOADCODE+47, LOADCODE+62
ACPTNODE	LOADCODE+33~, LOADCODE+48, LOADCODE+51, LOADCODE+52, LOADCODE+54, LOADCODE+55, LOADCODE+57*, LOADCODE+59
ACPTPIEC	CLEAN+9~*, CLEAN+10
>> ACPTPTH	LOADCODE+7
ACPTRY	TEXT+16~, TEXT+17, TEXT+18, TEXT+20, TEXT+21, TEXT+22, TEXT+23, TEXT+25, TEXT+26
ACPTSHRT	LOADCODE+46~, LOADCODE+47*, LOADCODE+48
ACPTSTRN	TEXT+7~, TEXT+11, TEXT+17, TEXT+21, TEXT+22, TEXT+25, TEXT+33, TEXT+34*
ACPTUP	CLEAN~, CLEAN+16
ACPTWORD	CLEAN+10~*, CLEAN+11, CLEAN+12
>> ACPTYR	LOADCODE+31, LOADCODE+52
DA	LOADCODE+74~*, LOADCODE+82~
DA(1	LOADCODE+75, LOADCODE+76, LOADCODE+82, LOADCODE+83
DIC	LOADCODE+83~*
DIC("DR"	LOADCODE+87*
DIC("P"	LOADCODE+85*
DIC(0	LOADCODE+84*
DIDEL	LOADCODE+78~
DIE	LOADCODE+76~*
DLAYGO	LOADCODE+88~
DR	LOADCODE+77~*
DT	TEXT+36
DTOUT	LOADCODE+78~, LOADCODE+88~
DUOUT	LOADCODE+88~
IO	LOADCODE+16
IO(0	LOADCODE+8, LOADCODE+91
POP	LOADCODE+6~, LOADCODE+9
TAG	T~
U	LOADCODE+31, LOADCODE+48, LOADCODE+51, LOADCODE+52, LOADCODE+54, LOADCODE+55, LOADCODE+57, LOADCODE+72, LOADCODE+85, TEXT+36
X	LOADCODE+86~*
Y	LOADCODE+88~

Marked Items

Name	Field # of Occurrence
$T(@TAG	T

Customize PDF page

Package: CPT Files

Routine: ACPT28PC

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items