Routine: ACPT29L

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	ACPT29

Entry Points

Name	Comments	DBIA/ICR reference
DELCODE	;
LOADCODE	; load CPTs from ^TMP("ACPT-IMP",$J)
CLEAN(ACPTDESC,ACPTUP)	; clean up description field
IMPORT	; this tag will load the complete file into ^TMP("ACPT-IMP",$J) using the concept ID ; and the property ID as the identifiers
TEXT(ACPTDESC)	; convert Description text to Word-Processing data type ; input: .ACPTDESC = passed by reference, starts out as long string, ; ends as Fileman WP-format array complete with header
DELETE	; this tag will load the complete file into ^TMP("ACPT-DEL",$J) using the concept ID ; and the property ID as the identifiers

External References

Name	Field # of Occurrence
^%ZISC	IMPORT+26, DELETE+20
$$STATUS^%ZISH	IMPORT+11, IMPORT+14, DELETE+10, DELETE+13
OPEN^%ZISH	IMPORT+4, DELETE+4
CLEAN^ACPT28P1	CLEAN+3
^DIC	LOADCODE+61, DELCODE+14
^DIE	LOADCODE+50, DELCODE+22
$$UP^XLFSTR	CLEAN+14
MES^XPDUTL	IMPORT+6, IMPORT+7, DELETE+6, DELETE+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: IMPORT+9
Function Call: WRITE	Prompt: "." Line Location: IMPORT+25
Function Call: WRITE	Prompt: !,"ADDING CODES:" Line Location: IMPORT+28
Function Call: WRITE	Prompt: !?5,ACPTCODE,?15,ACPTSHRT Line Location: IMPORT+34
Function Call: WRITE	Prompt: !,"Deleting Codes:" Line Location: DELETE+22
Routine Call	DIE Line Location: LOADCODE+50 DELCODE+22
Routine Call	DIC Line Location: LOADCODE+61 DELCODE+14

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(81	LOADCODE+57, DELCODE+11
^ICPT - [#81]	LOADCODE+9, LOADCODE+11, LOADCODE+13, LOADCODE+26, LOADCODE+35!, LOADCODE+36, LOADCODE+38, LOADCODE+39, LOADCODE+42, DELCODE+4 , DELCODE+5*
^ICPT("B"	LOADCODE+5, LOADCODE+6, LOADCODE+10*, DELCODE+3
^TMP("ACPT-CNT"	IMPORT+2!, IMPORT+24*
^TMP("ACPT-CPTS"	IMPORT+2!, IMPORT+23*, IMPORT+30, IMPORT+32
^TMP("ACPT-DCNT"	DELETE+2!, DELETE+19*
^TMP("ACPT-DEL"	DELETE+2!, DELETE+19*, DELETE+24, DELETE+26
^TMP("ACPT-IMP"	IMPORT+2!, IMPORT+21*, LOADCODE+14, LOADCODE+30, LOADCODE+31, LOADCODE+32

Label References

Name	Line Occurrences
$$CLEAN	LOADCODE+14, LOADCODE+33
DELCODE	DELETE+27
LOADCODE	IMPORT+33
TEXT	LOADCODE+34

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACPTBRK	TEXT+10~, TEXT+15, TEXT+17, TEXT+20, TEXT+23, TEXT+25, TEXT+27*, TEXT+30, TEXT+31
>> ACPTCD	DELETE+16*, DELETE+17, DELETE+19
ACPTCLN	CLEAN+6~, CLEAN+10, CLEAN+11*, CLEAN+14, CLEAN+16
ACPTCNT	IMPORT+10!, IMPORT+11, LOADCODE+63, DELETE+9!, DELETE+10, TEXT+6~, TEXT+29, TEXT+30, TEXT+33
>> ACPTCODE	IMPORT+31, IMPORT+32, IMPORT+34, LOADCODE+3, LOADCODE+5, LOADCODE+6, LOADCODE+8, LOADCODE+9, LOADCODE+10, DELETE+25* , DELETE+26*, DELETE+28, DELCODE+3
>> ACPTDATA	IMPORT+20*, IMPORT+21
ACPTDESC	LOADCODE+2!, LOADCODE+29, LOADCODE+31, LOADCODE+32, LOADCODE+33, LOADCODE+34, LOADCODE+36, CLEAN~, CLEAN+3, CLEAN+7 , CLEAN+8, CLEAN+14, DELETE+28, DELCODE+2, DELCODE+4*, TEXT~, TEXT+4, TEXT+5!
ACPTDESC(	TEXT+30*
ACPTDESC(0	TEXT+33*
>> ACPTEDT	LOADCODE+38*, LOADCODE+39, LOADCODE+41
ACPTEIEN	LOADCODE+39~*, LOADCODE+41, LOADCODE+42, LOADCODE+45
>> ACPTFIEN	IMPORT+15, IMPORT+21, IMPORT+23, IMPORT+25, IMPORT+29, IMPORT+30, IMPORT+32, LOADCODE+14, LOADCODE+30, LOADCODE+31 , LOADCODE+32, DELETE+14, DELETE+15, DELETE+19, DELETE+23, DELETE+24, DELETE+26
ACPTIEN	LOADCODE+2!, LOADCODE+5, LOADCODE+8, LOADCODE+9, LOADCODE+10, LOADCODE+11, LOADCODE+13, LOADCODE+26, LOADCODE+35, LOADCODE+36 , LOADCODE+38, LOADCODE+39, LOADCODE+42, LOADCODE+46, LOADCODE+54, DELCODE+1, DELCODE+3, DELCODE+4, DELCODE+5, DELCODE+8 , DELCODE+18
>> ACPTL	LOADCODE+28, LOADCODE+30, LOADCODE+31, LOADCODE+32
>> ACPTLCNT	IMPORT+19*, IMPORT+21
ACPTLINE	IMPORT+13!, IMPORT+14, IMPORT+15, IMPORT+16, IMPORT+19, IMPORT+20, IMPORT+22, IMPORT+23, DELETE+12!, DELETE+13 , DELETE+14, DELETE+16, DELETE+18, DELETE+19
ACPTNEW	IMPORT+34, LOADCODE+2!, LOADCODE+7*, LOADCODE+17
>> ACPTNODE	LOADCODE+13, LOADCODE+15, LOADCODE+19, LOADCODE+21, LOADCODE+22, LOADCODE+24, LOADCODE+26
>> ACPTPID	IMPORT+16*, IMPORT+19, IMPORT+20, IMPORT+21, IMPORT+22, IMPORT+23
ACPTPIEC	CLEAN+7~*, CLEAN+8
>> ACPTPTH	IMPORT+4, DELETE+4
ACPTRY	TEXT+13~, TEXT+14, TEXT+15, TEXT+17, TEXT+18, TEXT+19, TEXT+20, TEXT+22, TEXT+23
ACPTSHRT	IMPORT+34, LOADCODE+2!, LOADCODE+14*, LOADCODE+15
ACPTSTRN	TEXT+4~, TEXT+8, TEXT+14, TEXT+18, TEXT+19, TEXT+22, TEXT+30, TEXT+31*
ACPTUP	CLEAN~, CLEAN+14
ACPTWORD	CLEAN+8~*, CLEAN+9, CLEAN+10
>> ACPTYR	LOADCODE+11, LOADCODE+19, LOADCODE+22, DELCODE+5
DA	LOADCODE+44!, LOADCODE+45, LOADCODE+53!, DELCODE+7!, DELCODE+15
DA(1	LOADCODE+46, LOADCODE+47, LOADCODE+54, LOADCODE+55, DELCODE+8, DELCODE+9, DELCODE+18, DELCODE+19
DIC	LOADCODE+44!, LOADCODE+53!, LOADCODE+55, DELCODE+7!, DELCODE+9, DELCODE+17!
DIC("DR"	LOADCODE+59*
DIC("P"	LOADCODE+57, DELCODE+11
DIC(0	LOADCODE+56, DELCODE+10
DIDEL	LOADCODE+49~, DELCODE+21~
DIE	LOADCODE+44!, LOADCODE+47, LOADCODE+53!, DELCODE+7!, DELCODE+17!, DELCODE+19
DIR	LOADCODE+44!, LOADCODE+53!, DELCODE+7!, DELCODE+17!
DLAYGO	LOADCODE+60~, DELCODE+13~
DR	LOADCODE+48, DELCODE+7!, DELCODE+17!, DELCODE+20
DT	TEXT+33
DTOUT	LOADCODE+49~, LOADCODE+60~, DELCODE+13~, DELCODE+21~
DUOUT	LOADCODE+60~, DELCODE+13~
IO	IMPORT+14, DELETE+13
IO(0	IMPORT+5, IMPORT+25, LOADCODE+63, DELETE+5
POP	IMPORT+3~, IMPORT+6, DELETE+3~, DELETE+6
U	LOADCODE+11, LOADCODE+15, LOADCODE+19, LOADCODE+21, LOADCODE+22, LOADCODE+24, LOADCODE+42, LOADCODE+57, DELCODE+4, DELCODE+5 , TEXT+33
X	LOADCODE+44!, LOADCODE+53!, LOADCODE+58, DELCODE+7!, DELCODE+12, DELCODE+17!
Y	LOADCODE+44!, LOADCODE+53!, LOADCODE+60~, DELCODE+7!, DELCODE+13~, DELCODE+15, DELCODE+17!

Customize PDF page

Package: CPT Files

Routine: ACPT29L

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: