Routine: APSPEC15

Package	Total	Call Graph
VA Fileman	5	$$FIND1^DIC (FILE,UPDATE)^DIE ^DIK $$GET1^DIQ EN^DIU2
Kernel	3	$$CJ^XLFSTR ADD^XPDMENU BMES^XPDUTL

Entry Points

Name	Comments	DBIA/ICR reference
PRE	;EP - Pre-init
RENXPAR(OLD,NEW)	; Rename parameter
UREGPROT(P,C,ERR)	;EP-
AAPPGRP(FILE,NMSP)	;EP
SETPKGV(PKG,VER)	;EP
CLNNVA	;EP -
REMXPAR(PAR)	;Remove values stored for a given parameter
ENV	;EP
POST	;EP ; Set Default Med Route for CPRS field of first Pharmacy System to null
REGPROT(P,C,SEQ,ERR)	;EP
MES(TXT,QUIT)	;EP
CLN50DD	;EP -

External References

Name	Field # of Occurrence
$$FIND1^DIC	RENXPAR+3, RENXPAR+4, REGPROT+4, REGPROT+5, UREGPROT+4, UREGPROT+5, UREGPROT+7, SETPKGV+2
FILE^DIE	RENXPAR+7
UPDATE^DIE	AAPPGRP+4, REGPROT+9, UREGPROT+9, SETPKGV+5, CLNNVA+5
^DIK	REMXPAR+7
$$GET1^DIQ	ENV+2
EN^DIU2	CLN50DD+1
$$CJ^XLFSTR	ENV+3, ENV+4
ADD^XPDMENU	POST+6
BMES^XPDUTL	ENV+8, MES+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM) Line Location: ENV+3
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("Checking Environment for "_$P($T(+2),";",4)_" V "_$P($T(+2),";",3)_", Patch 1015.",IOM) Line Location: ENV+4
Routine Call	DIE Line Location: AAPPGRP+4 REGPROT+9 UREGPROT+9 SETPKGV+5 CLNNVA+5
Routine Call	DIC Line Location: RENXPAR+3 RENXPAR+4 REGPROT+4 REGPROT+5 UREGPROT+4 UREGPROT+5 UREGPROT+7 SETPKGV+2
Routine Call	DIE Line Location: RENXPAR+7

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ORD(101 - [#101]	FIND1^DIC
101.01	FIND1^DIC
^VA(200 - [#200]	GET1^DIQ
^XTV(8989.5 - [#8989.5]	Classic Fileman Calls
^DIC(9.4 - [#9.4]	FIND1^DIC

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(55 - [#55]	CLNNVA+2, CLNNVA+3
^PS(59.7 - [#59.7]	POST+3, POST+5*
^XPAR(8989.5	REMXPAR+4, REMXPAR+5, REMXPAR+6
^XPAR(8989.51	REMXPAR+2
^XPD(9.7 - [#9.7]	ENV+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AIEN	REGPROT+1~, REGPROT+5, REGPROT+6, REGPROT+7, UREGPROT+1~, UREGPROT+5, UREGPROT+6
C	REGPROT~, REGPROT+3, REGPROT+5, UREGPROT~, UREGPROT+3, UREGPROT+5, UREGPROT+7
DA	REMXPAR+1~, REMXPAR+6*
DFN	CLNNVA+1~, CLNNVA+2*, CLNNVA+3, CLNNVA+4
>> DIERR	CLNNVA+6
DIK	REMXPAR+1~, REMXPAR+7*
>> DIU	CLN50DD+1*
>> DIU(0	CLN50DD+1*
DUZ	ENV+2
ENT	REMXPAR+1~, REMXPAR+4*, REMXPAR+5, REMXPAR+6
ERR	AAPPGRP+1~, REGPROT~, REGPROT+3, REGPROT+6, UREGPROT~, UREGPROT+3, UREGPROT+6
FDA	RENXPAR+1~, AAPPGRP+1~, REGPROT+1~, UREGPROT+1~, SETPKGV+1~, CLNNVA+1~, CLNNVA+5
FDA(	RENXPAR+6, AAPPGRP+3, REGPROT+7, REGPROT+8, UREGPROT+8, SETPKGV+4, CLNNVA+4*
FIL	RENXPAR+1~, RENXPAR+2*, RENXPAR+3, RENXPAR+4, RENXPAR+6
FILE	AAPPGRP~, AAPPGRP+2, AAPPGRP+3
IEN	RENXPAR+1~, RENXPAR+4, RENXPAR+5, RENXPAR+6, POST+2~, POST+3, POST+4, POST+5, AAPPGRP+1~, CLNNVA+1~ , CLNNVA+3*, CLNNVA+4
IENARY	REGPROT+1~, UREGPROT+1~
IENARY(1	REGPROT+4, REGPROT+6, REGPROT+7, REGPROT+8, UREGPROT+4, UREGPROT+6, UREGPROT+7, UREGPROT+8
IENARY(2	UREGPROT+7*, UREGPROT+8
INT	REMXPAR+1~, REMXPAR+5*, REMXPAR+6
IOM	ENV+3, ENV+4
NEW	RENXPAR~, RENXPAR+3, RENXPAR+6
NMSP	AAPPGRP~, AAPPGRP+2, AAPPGRP+3
NVAERR	CLNNVA+1~
NVAERR("DIERR"	CLNNVA+6
OLD	RENXPAR~, RENXPAR+4
P	REGPROT~, REGPROT+3, REGPROT+4, UREGPROT~, UREGPROT+3, UREGPROT+4
PAR	REMXPAR~, REMXPAR+2
PIEN	REMXPAR+1~, REMXPAR+2, REMXPAR+3, REMXPAR+4, REMXPAR+5, REMXPAR+6, REGPROT+1~, UREGPROT+1~, SETPKGV+1~, SETPKGV+2 , SETPKGV+3, SETPKGV+4
PKG	SETPKGV~, SETPKGV+2
QUIT	MES~, MES+2
SEQ	REGPROT~, REGPROT+8
TXT	MES~, MES+1
U	POST+5
VER	SETPKGV~, SETPKGV+4
VIEN	REMXPAR+1~
>> X	ENV+2*, ENV+3
>> XPDABORT	ENV+6, ENV+7, ENV+8, ENV+9, MES+2*
>> XPDDIQ("XPZ1"	ENV+5*
>> XPDDIQ("XPZ2"	ENV+5*

Customize PDF page

Package: IHS Changes To Pharmacy

Routine: APSPEC15

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Local Variables

Legend:

Marked Items