Routine: PXRMCPLS

Information

PXRMCPLS ;SLC/PKR - Copy various reminder files. ;09/25/2013

Source Information

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
VA Fileman	6	($$GET1,FIELD)^DID (FILE,UPDATE)^DIE IX^DIK $$ROOT^DILFD $$GET1^DIQ ^DIR
Clinical Reminders	5	SETSTART^PXRMCOPY $$EXISTS^PXRMEXIU $$VNAME^PXRMINTR SMANEDIT^PXRMTXSM AWRITE^PXRMUTIL
Kernel	2	($$FMTE,$$NOW)^XLFDT $$LOW^XLFSTR

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Clinical Reminders	1	PXRMTAXL

Entry Points

Name	Comments	DBIA/ICR reference
GETFOIEN(ROOT)	;Return the first open IEN in ROOT. This should be called
SCAS(FILENUM,IEN,CLASS,SPONSOR)	;Set the class field to CLASS and the sponsor
INIEH(FILENUM,ROOT,IENN,IEN)	;Initialize the change log after a copy.
COPY(FILENUM,IEN)	;Copy an entry of ROOT into a new entry.
EDIT(FILENUM,IEN)	;Call the appropriate editor.
MERGE(IENN,IEN,ROOT)	;Use MERGE to copy ROOT(IEN into ROOT(IENN.
SETSTART(ROOT)	;Set the starting value to add new entries. Start
GETNAM

External References

Name	Field # of Occurrence
$$GET1^DID	COPY+4, COPY+8
FIELD^DID	INIEH+3
FILE^DIE	GETNAM+18, INIEH+11, SCAS+6
UPDATE^DIE	INIEH+21
IX^DIK	GETNAM+29
$$ROOT^DILFD	COPY+3
$$GET1^DIQ	COPY+6, INIEH+18, INIEH+20
^DIR	GETNAM, GETNAM+36
SETSTART^PXRMCOPY	GETNAM+10
$$EXISTS^PXRMEXIU	GETNAM+6
$$VNAME^PXRMINTR	GETNAM+5
SMANEDIT^PXRMTXSM	EDIT+2
AWRITE^PXRMUTIL	INIEH+12, INIEH+22, SCAS+7
$$FMTE^XLFDT	INIEH+17
$$NOW^XLFDT	INIEH+17
$$LOW^XLFSTR	COPY+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"There is already an entry with that name!" Line Location: GETNAM+7
Function Call: WRITE	Prompt: !,NAME," is not a unique name!" Line Location: GETNAM+21
Function Call: WRITE	Prompt: ! Line Location: GETNAM+32
Routine Call	DIE Line Location: INIEH+21
Routine Call	DIE Line Location: GETNAM+18 INIEH+11 SCAS+6
Routine Call	DIR Line Location: GETNAM GETNAM+36

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

Name	Line Occurrences
$$GETFOIEN	GETNAM+11
EDIT	GETNAM+37
GETNAM	GETNAM+5, GETNAM+6, GETNAM+20
INIEH	GETNAM+25
MERGE	GETNAM+12
SCAS	GETNAM+23

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CLASS	SCAS~, SCAS+4
CUR	SETSTART+2~
DA	COPY+1~, GETNAM+28*
DEST	MERGE+1~, MERGE+2*, MERGE+4, MERGE+6, MERGE+8
DIK	COPY+1~, GETNAM+28*
>> DILOCKTM	MERGE+4
DIR	COPY+1~
DIR("A"	COPY+10, GETNAM+34, GETNAM+35*
DIR(0	COPY+9, GETNAM+33
DIROUT	COPY+1~
DIRUT	COPY+1~, GETNAM+1, GETNAM+36
DTOUT	COPY+1~
DUOUT	COPY+1~
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*
FDA	COPY+1~, INIEH+2~, INIEH+14!, SCAS+2~
FDA(	GETNAM+16, INIEH+10, INIEH+11, INIEH+17, INIEH+18, INIEH+19, SCAS+4, SCAS+5*
FDAIEN	INIEH+2~
FDAIEN(	INIEH+16*
FIELDLEN	COPY+1~, COPY+8*, COPY+9
FILENAME	COPY+1~, COPY+4, COPY+5, GETNAM+35
FILENUM	COPY~, COPY+3, COPY+4, COPY+6, COPY+8, GETNAM+6, GETNAM+16, GETNAM+23, GETNAM+25, GETNAM+37 , EDIT~, EDIT+2, INIEH~, INIEH+3, INIEH+20, SCAS~, SCAS+4, SCAS+5
IEN	COPY~, COPY+6, GETNAM+12, GETNAM+25, EDIT~, EDIT+2, INIEH~, INIEH+20, MERGE~, MERGE+5 , SCAS~, SCAS+3
IENN	COPY+2~, GETNAM+11*, GETNAM+12, GETNAM+15, GETNAM+23, GETNAM+25, GETNAM+28, GETNAM+37, INIEH~, INIEH+6 , INIEH+9, INIEH+15, INIEH+16, MERGE~, MERGE+2
IENS	COPY+2~, GETNAM+15, GETNAM+16, 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
MSG	COPY+2~, GETNAM+17!, INIEH+2~, INIEH+12, INIEH+14!, INIEH+22, SCAS+2~, SCAS+7
MSG("DIERR"	GETNAM+20
NAME	COPY+2~, GETNAM+2*, GETNAM+5, GETNAM+6, GETNAM+16, GETNAM+21, GETNAM+35
NIEN	GETFOIEN+2~, GETFOIEN+6*
OIEN	GETFOIEN+2~, GETFOIEN+4, GETFOIEN+5, GETFOIEN+6, GETFOIEN+7
ORIGNAME	COPY+2~, COPY+6*, GETNAM+35
ROOT	COPY+2~, COPY+3*, GETNAM+10, GETNAM+11, GETNAM+12, GETNAM+25, GETNAM+28, 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
SOURCE	MERGE+1~, MERGE+5*, MERGE+6
SPONSOR	SCAS~, SCAS+5
TARGET	INIEH+2~
TARGET("SPECIFIER"	INIEH+4
U	COPY+9, GETFOIEN+4, SETSTART+4
WP	INIEH+2~
WP(1	INIEH+20*
X	COPY+2~
Y	COPY+2~, GETNAM+2, GETNAM+37

Customize PDF page

Package: Clinical Reminders

Routine: PXRMCPLS

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Label References

Local Variables

Legend: