Routine: PXRMCOPY

Package	Total	Call Graph
Clinical Reminders	6	SETSTART^PXRMCOPY ASK^PXRMDCPY DITEMAR^PXRMDUTL EDIT^PXRMEDIT $$VNAME^PXRMINTR ($$FNFR,AWRITE)^PXRMUTIL
VA FileMan	6	^DIC ($$GET1,FIELD)^DID (,FILE,UPDATE)^DIE (,IX)^DIK $$GET1^DIQ ^DIR
Kernel	1	($$FMTE,$$NOW)^XLFDT

Package

Total

Call Graph

Clinical Reminders

SETSTART^PXRMCOPY ASK^PXRMDCPY DITEMAR^PXRMDUTL EDIT^PXRMEDIT $$VNAME^PXRMINTR ($$FNFR,AWRITE)^PXRMUTIL

VA FileMan

^DIC ($$GET1,FIELD)^DID (,FILE,UPDATE)^DIE (,IX)^DIK $$GET1^DIQ ^DIR

Kernel

($$FMTE,$$NOW)^XLFDT

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

Package	Total	Caller Graph
Clinical Reminders	19	PXRM DEFINITION COPY PXRM LOCATION LIST COPY PXRM TERM COPY PXRMCFED PXRMCOPY PXRMCPLS PXRMDBL3 PXRMDCPY PXRMDEDT PXRMEFED PXRMEGED PXRMEPED PXRMLLED PXRMLRED PXRMREDT PXRMSPED PXRMSTS PXRMTMED PXRMV1I
Electronic Health Modernization	6	EHM-01185 EHM-01309 EHM-01357 EHM-01475 EHM-01599 EHM-01647

Package

Total

Caller Graph

Clinical Reminders

PXRM DEFINITION COPY  PXRM LOCATION LIST COPY  PXRM TERM COPY  PXRMCFED  PXRMCOPY  PXRMCPLS  PXRMDBL3  PXRMDCPY
PXRMDEDT  PXRMEFED  PXRMEGED  PXRMEPED  PXRMLLED  PXRMLRED  PXRMREDT  PXRMSPED
PXRMSTS  PXRMTMED  PXRMV1I

Electronic Health Modernization

EHM-01185 EHM-01309 EHM-01357 EHM-01475 EHM-01599 EHM-01647

Entry Points

Name	Comments	DBIA/ICR reference
COPY(PROMPT,ROOT,WHAT)	;Copy an entry of ROOT into a new entry.
GETORGR	;Look-up logic to get and copy source entry to destination.
GETORGRC(IENO,IENN,ROOT,WHAT,SKIP)	;
GETNAM
COPYLL	;Copy a location list.
COPYREM	;Copy a reminder definition.
COPYTAX	;Copy a taxonomy.
COPYTERM	;Copy a reminder term.
DELETE(DIK,DA)	;Delete the entry just added.
GETFOIEN(ROOT)	;Return the first open IEN in ROOT. This should be called
HASGF(IEN)	;
GFCANCPY(FIND)	;
ITEMHSGF(IEN)	;
INIEH(FILENUM,ROOT,IENN,IENO)	;Initialize the edit history after a copy.
MERGE(IENN,IENO,ROOT)	;Use MERGE to copy ROOT(IENO into ROOT(IENN.
SCAS(FILENUM,IEN,CLASS,SPONSOR)	;Set the class field to CLASS and the sponsor
SETSTART(ROOT)	;Set the starting value to add new entries. Start

Name	Field # of Occurrence
^DIC	GETORGR+4
$$GET1^DID	GETORGRC+29
FIELD^DID	INIEH+3
^DIE	GETNAM+33
FILE^DIE	GETNAM+11, INIEH+11, SCAS+6
UPDATE^DIE	INIEH+21
^DIK	DELETE+1
IX^DIK	GETNAM+22
$$GET1^DIQ	INIEH+18, INIEH+20
^DIR	GETNAM, GETNAM+42
SETSTART^PXRMCOPY	GETORGRC+22
ASK^PXRMDCPY	GETNAM+30
DITEMAR^PXRMDUTL	HASGF+6
EDIT^PXRMEDIT	GETNAM+43
$$VNAME^PXRMINTR	GETNAM+5
$$FNFR^PXRMUTIL	GETORGRC+28
AWRITE^PXRMUTIL	INIEH+12, INIEH+22, SCAS+7
$$FMTE^XLFDT	INIEH+17
$$NOW^XLFDT	INIEH+17

Name

Field # of Occurrence

^DIC

GETORGR+4

$$GET1^DID

GETORGRC+29

FIELD^DID

INIEH+3

^DIE

GETNAM+33

FILE^DIE

GETNAM+11, INIEH+11, SCAS+6

UPDATE^DIE

INIEH+21

^DIK

DELETE+1

IX^DIK

GETNAM+22

$$GET1^DIQ

INIEH+18, INIEH+20

^DIR

GETNAM, GETNAM+42

GETORGRC+22

GETNAM+30

HASGF+6

GETNAM+43

GETNAM+5

GETORGRC+28

INIEH+12, INIEH+22, SCAS+7

$$FMTE^XLFDT

INIEH+17

$$NOW^XLFDT

INIEH+17

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: GETORGR+3
Function Call: WRITE	Prompt: !,NAME," is not a unique name!" Line Location: GETNAM+14
Function Call: WRITE	Prompt: ! Line Location: GETNAM+35
Function Call: WRITE	Prompt: !,"The original "_WHAT_" "_ORGNAME_" has been copied into "_NAME_"." Line Location: GETNAM+37
Function Call: WRITE	Prompt: !!,"New entry not created due to invalid name!",! Line Location: DELETE+2
Routine Call	DIC Line Location: GETORGR+4
Routine Call	DIE Line Location: GETNAM+33
Routine Call	DIE Line Location: GETNAM+11 INIEH+11 SCAS+6
Routine Call	DIE Line Location: INIEH+21
Routine Call	DIR Line Location: GETNAM GETNAM+42

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ

FileNo

Call Tags

^VA(200 - [#200]

GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^PXRMD(801.41 - [#801.41]	GETORGRC+8, GETORGRC+9, GETORGRC+10, GETORGRC+13, HASGF+5, ITEMHSGF+4, ITEMHSGF+6
^PXRMD(801.46 - [#801.46]	GFCANCPY+3

Name

Line Occurrences (* Changed, ! Killed)

^PXRMD(801.41 - [#801.41]

GETORGRC+8, GETORGRC+9, GETORGRC+10, GETORGRC+13, HASGF+5, ITEMHSGF+4, ITEMHSGF+6

^PXRMD(801.46 - [#801.46]

GFCANCPY+3

Label References

Name	Line Occurrences
$$GETFOIEN	GETORGRC+23
$$GFCANCPY	ITEMHSGF+5, ITEMHSGF+7
$$HASGF	GETORGRC+11
$$ITEMHSGF	HASGF+4, HASGF+8
COPY	COPYLL+5, COPYREM+5, COPYTAX+5, COPYTERM+5
DELETE	GETNAM+1
GETNAM	GETNAM+5, GETNAM+13
GETORGR	COPY+2
GETORGRC	GETORGR+8
INIEH	GETNAM+18
MERGE	GETORGRC+24
SCAS	GETNAM+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ANS	GETNAM+28~, GETNAM+30
ARRAY	HASGF+1~, HASGF+6
CLASS	SCAS~, SCAS+4
CNT	HASGF+1~, HASGF+2*, HASGF+6
CUR	SETSTART+2~
DA	GETORGRC+1~, GETNAM+21, GETNAM+32, DELETE~
DARRAY	HASGF+1~, HASGF+6
DARRAY(	HASGF+7
DEST	MERGE+1~, MERGE+2*, MERGE+4, MERGE+6, MERGE+8
DIC	GETORGR+1~, GETORGR+2, GETORGRC+1~, GETORGRC+4, GETORGRC+22
DIC("A"	GETORGR+2*
DIC(0	GETORGR+2*
DIE	GETORGRC+1~, GETNAM+32*
DIEN	HASGF+1~, HASGF+7*, HASGF+8
DIK	GETORGRC+1~, GETNAM+21*, DELETE~
>> DILOCKTM	MERGE+4
DIR	GETORGRC+1~
DIR("A"	GETORGRC+31, GETNAM+40, GETNAM+41*
DIR(0	GETORGRC+30, GETNAM+39
DIROUT	COPY+1~, COPY+2, GETORGR+5, GETORGR+7
DIRUT	GETORGRC+1~, GETNAM+1, GETNAM+42
>> DR	GETNAM+32*
DTOUT	COPY+1~, COPY+2, GETORGR+5, GETNAM+30, GETNAM+34*
DTYP	GETORGRC+5~, GETORGRC+10*, GETORGRC+15, GETORGRC+17
DUOUT	COPY+1~, GETORGR+5, GETNAM+30
DUZ	INIEH+18
ENTRY	GETFOIEN+2~, GETFOIEN+3, GETFOIEN+4, GETFOIEN+5, GETFOIEN+6, INIEH+2~, INIEH+6, INIEH+8, SETSTART+2~, SETSTART+3* , SETSTART+4*
FAIL	GETORGRC+1~, GETORGRC+4, GETORGRC+14, GETORGRC+16, GETORGRC+18, GETORGRC+20
FDA	GETORGRC+1~, INIEH+2~, INIEH+14!, SCAS+2~
FDA(	GETNAM+9, INIEH+10, INIEH+11, INIEH+17, INIEH+18, INIEH+19, SCAS+4, SCAS+5*
FDAIEN	INIEH+2~
FDAIEN(	INIEH+16*
FIELDLEN	GETORGRC+1~, GETORGRC+29*, GETORGRC+30
FILE	GETORGRC+1~, GETORGRC+28*, GETORGRC+29, GETNAM+9, GETNAM+16, GETNAM+18
FILENUM	INIEH~, INIEH+3, INIEH+20, SCAS~, SCAS+4, SCAS+5
FIND	GFCANCPY~, GFCANCPY+3, ITEMHSGF+1~, ITEMHSGF+4, ITEMHSGF+5, ITEMHSGF+6, ITEMHSGF+7
>> FOUND	ITEMHSGF+6*
HASGF	GETORGRC+2~, GETORGRC+11*, GETORGRC+12
IEN	HASGF~, HASGF+4, HASGF+5, HASGF+6, ITEMHSGF~, ITEMHSGF+4, ITEMHSGF+6, SCAS~, SCAS+3
IENN	GETORGR+1~, GETORGR+8, GETORGRC~, GETORGRC+23*, GETORGRC+24, GETNAM+1, GETNAM+8, GETNAM+16, GETNAM+18, GETNAM+21 , GETNAM+26, GETNAM+32, GETNAM+43, INIEH~, INIEH+6, INIEH+9, INIEH+15, INIEH+16, MERGE~, MERGE+2
IENO	GETORGR+1~, GETORGR+6*, GETORGR+7, GETORGR+8, GETORGRC~, GETORGRC+8, GETORGRC+9, GETORGRC+10, GETORGRC+11, GETORGRC+13 , GETORGRC+24, GETORGRC+27, GETNAM+18, INIEH~, INIEH+20, MERGE~, MERGE+5
IENS	GETORGRC+2~, GETNAM+8, GETNAM+9, INIEH+2~, INIEH+9, INIEH+10, INIEH+15, INIEH+17, INIEH+18, INIEH+19 , SCAS+2~, SCAS+3, SCAS+4, SCAS+5
IND	INIEH+2~, INIEH+7, INIEH+8, INIEH+9
LFIND	GETORGRC+5~, GETORGRC+9*, GETORGRC+17
LOCK	GETORGRC+5~, GETORGRC+8*, GETORGRC+15, GETORGRC+17
MSG	GETORGRC+2~, GETNAM+10!, INIEH+2~, INIEH+12, INIEH+14!, INIEH+22, SCAS+2~, SCAS+7
MSG("DIERR"	GETNAM+13
NAME	GETORGRC+2~, GETNAM+2, GETNAM+5, GETNAM+9, GETNAM+14, GETNAM+25, GETNAM+37, GETNAM+41, GFCANCPY+1~, GFCANCPY+3 , GFCANCPY+4
NIEN	GETFOIEN+2~, GETFOIEN+6*
OIEN	GETFOIEN+2~, GETFOIEN+4, GETFOIEN+5, GETFOIEN+6, GETFOIEN+7
ORGNAME	GETORGRC+2~, GETORGRC+27*, GETNAM+24, GETNAM+37, GETNAM+41
PROMPT	COPY~, GETORGR+2, COPYLL+1~, COPYLL+4, COPYLL+5, COPYREM+1~, COPYREM+4, COPYREM+5, COPYTAX+1~, COPYTAX+4* , COPYTAX+5, COPYTERM+1~, COPYTERM+4*, COPYTERM+5
>> PXRMDANY	GETNAM+23, GETNAM+34*
>> PXRMINST	GETORGRC+15, GETORGRC+17, HASGF+3, ITEMHSGF+3
RESULT	HASGF+1~, HASGF+2, HASGF+3, HASGF+4, HASGF+5, HASGF+7, HASGF+8, HASGF+9, GFCANCPY+1~, GFCANCPY+2 , GFCANCPY+4, GFCANCPY+5, ITEMHSGF+1~, ITEMHSGF+2, ITEMHSGF+3, ITEMHSGF+6, ITEMHSGF+7*, ITEMHSGF+8
ROOT	COPY~, GETORGR+2, GETORGR+8, GETORGRC~, GETORGRC+4, GETORGRC+6, GETORGRC+23, GETORGRC+24, GETORGRC+27, GETORGRC+28 , GETNAM+1, GETNAM+18, GETNAM+21, GETNAM+26, GETNAM+32, GETNAM+43, COPYLL+1~, COPYLL+3, COPYLL+5, COPYREM+1~ , COPYREM+3, COPYREM+5, COPYTAX+1~, COPYTAX+3, COPYTAX+5, COPYTERM+1~, COPYTERM+3, COPYTERM+5, GETFOIEN~, GETFOIEN+3 , GETFOIEN+5, GETFOIEN+6, INIEH~, INIEH+6, MERGE~, MERGE+2, MERGE+5, SETSTART~, SETSTART+3
SFN	INIEH+2~, INIEH+4*, INIEH+5, INIEH+10, INIEH+11, INIEH+17, INIEH+18, INIEH+19
SKIP	GETORGRC~, GETNAM+37
SOURCE	MERGE+1~, MERGE+5*, MERGE+6
SPONSOR	SCAS~, SCAS+5
TARGET	INIEH+2~
TARGET("SPECIFIER"	INIEH+4
TEXT	GETNAM+28~, GETNAM+29*, GETNAM+30
U	GETORGR+6, GETORGRC+8, GETORGRC+9, GETORGRC+10, GETORGRC+13, GETORGRC+27, GETORGRC+30, GETNAM+26, GETFOIEN+4, GFCANCPY+3 , ITEMHSGF+4, SETSTART+4
WHAT	COPY~, GETORGR+8, GETORGRC~, GETNAM+37, GETNAM+41, COPYLL+1~, COPYLL+2, COPYLL+5, COPYREM+1~, COPYREM+2 , COPYREM+5, COPYTAX+1~, COPYTAX+2, COPYTAX+5, COPYTERM+1~, COPYTERM+2, COPYTERM+5
WP	INIEH+2~
WP(1	INIEH+20*
X	GETORGRC+2~
Y	GETORGR+1~, GETORGR+6, GETORGRC+2~, GETNAM+2, GETNAM+43

Customize PDF page

Package: Clinical Reminders

Routine: PXRMCOPY

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 25

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: