Routine: XUPROD

Package	Total	Call Graph
Kernel	2	$$SID^%ZOSV $$DT^XLFDT
VA Fileman	2	(,FILE)^DIE ^DIR

Package

Total

Call Graph

Kernel

$$SID^%ZOSV $$DT^XLFDT

VA Fileman

(,FILE)^DIE ^DIR

Package	Total	Caller Graph
Clinical Reminders	14	PXRMG2M1 PXRMP17I PXRMP18I PXRMP20I PXRMP21I PXRMP23I PXRMP24I PXRMP26I PXRMP27I PXRMP28I PXRMP30I PXRMP31I PXRMP34I PXRMP36I
Kernel	14	XPDIST XQ12 XQ55SPEC XU SID ASK XU SID EDIT XU SID STARTUP XU8P540 XU8P585 XUP XUSNPIE3 XUSNPIED XUSNPIX1 XUSNPIXI XUSRB
Health Data and Informatics	8	HDI1000A HDISVC01 HDISVCFX HDISVCUT HDISVF01 HDISVF07 HDISVF09 HDISVF10
Outpatient Pharmacy	7	PSO293P1 PSO293PI PSOCIDC3 PSOCIDC4 PSOCIDC8 PSOCPBK1 PSOCPBK2
iCare	7	BQICAEXP BQICAVAL BQIIPCME BQIIPCMF BQIIPPOR BQIIPTST BQIMUEXP
Automated Lab Instruments	3	LA7CHDR LA7HDR LA7HDR1
Lexicon Utility	3	LEX2080P LEXXFI7 LEXXII
IHS Personal Health Record	2	BPHRCHK BPHRMUPM
IHS Standard Terminology	2	BSTSAPIL BSTSSTA
Order Entry Results Reporting	2	ORWU ORYCHKE
Adverse Reaction Tracking	1	GMRAUTL1
Barcode Medication Administration	1	PSBRPC
Care Management	1	ORRCLNP
General Medical Record - Vitals	1	GMVRPCP
IHS Immunizations Interface	1	BYIMIMM6
Lab Service	1	LR317
Patient Registration MPI	1	AGMPHLU
Pharmacy Data Management	1	PSSMEDRQ
Registration	1	DGPFPARM
Text Integration Utility	1	TIUP246
VistALink	1	XOBVSYSI
VistALink Security	1	XOBSCAV1

Package

Total

Caller Graph

Clinical Reminders

PXRMG2M1 PXRMP17I PXRMP18I PXRMP20I PXRMP21I PXRMP23I PXRMP24I PXRMP26I
PXRMP27I PXRMP28I PXRMP30I PXRMP31I PXRMP34I PXRMP36I

Kernel

XPDIST XQ12 XQ55SPEC XU SID ASK XU SID EDIT XU SID STARTUP XU8P540 XU8P585
XUP XUSNPIE3 XUSNPIED XUSNPIX1 XUSNPIXI XUSRB

Health Data and Informatics

HDI1000A HDISVC01 HDISVCFX HDISVCUT HDISVF01 HDISVF07 HDISVF09 HDISVF10

Outpatient Pharmacy

PSO293P1 PSO293PI PSOCIDC3 PSOCIDC4 PSOCIDC8 PSOCPBK1 PSOCPBK2

iCare

BQICAEXP BQICAVAL BQIIPCME BQIIPCMF BQIIPPOR BQIIPTST BQIMUEXP

Automated Lab Instruments

LA7CHDR LA7HDR LA7HDR1

Lexicon Utility

LEX2080P LEXXFI7 LEXXII

IHS Personal Health Record

BPHRCHK BPHRMUPM

IHS Standard Terminology

BSTSAPIL BSTSSTA

Order Entry Results Reporting

ORWU ORYCHKE

Adverse Reaction Tracking

GMRAUTL1

Barcode Medication Administration

PSBRPC

Care Management

ORRCLNP

General Medical Record - Vitals

GMVRPCP

IHS Immunizations Interface

BYIMIMM6

Lab Service

LR317

Patient Registration MPI

AGMPHLU

Pharmacy Data Management

PSSMEDRQ

Registration

DGPFPARM

Text Integration Utility

TIUP246

VistALink

XOBVSYSI

VistALink Security

XOBSCAV1

Entry Points

Name	Comments	DBIA/ICR reference
PROD(FORCE)	;Return 1 if this is a production account	ICR #4440 Status: Active Usage: Supported
ASK	;Ask user if this is prod.
SSID(SID)	;Set the SID into KSP.
CHECK	;Check if SID matched stored value, Set field 501
EDIT	;Edit Logical - Physical fields

Name	Field # of Occurrence
$$SID^%ZOSV	CHECK+3, ASK+14
^DIE	EDIT+6
FILE^DIE	CHECK+5, SSID+4
^DIR	ASK+8, ASK+13
$$DT^XLFDT	CHECK+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This is "_$S(P=P2:"still",1:"now")_" a "_$S(P2:"PRODUCTION",1:"TEST")_" account.",! Line Location: ASK+16
Function Call: WRITE	Prompt: !,"Busy, Please try again later.",! Line Location: EDIT+2
Function Call: WRITE	Prompt: !!,"This is only valid in a Cache v5.2 client/server configuration." Line Location: EDIT+3
Function Call: WRITE	Prompt: !,"This lets you edit the fields that support the" Line Location: EDIT+4
Function Call: WRITE	Prompt: !,"LOGICAL to PHYSICAL translation for the System ID.",!! Line Location: EDIT+5
Routine Call	DIE Line Location: EDIT+6
Routine Call	DIE Line Location: CHECK+5 SSID+4
Routine Call	DIR Line Location: ASK+8 ASK+13

Name	Line Occurrences (* Changed, ! Killed)
^XTV(8989.3 - [#8989.3]	PROD+5, PROD+7, CHECK+2, CHECK+3, CHECK+6, SSID+3, SSID+5, EDIT+2, EDIT+7

Name	Line Occurrences
$$PROD	ASK+1, ASK+15
CHECK	PROD+7
SSID	ASK+14

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CSID	CHECK+1~, CHECK+3*, CHECK+4
DA	EDIT+1~, EDIT+6*
DIE	EDIT+1~, EDIT+6*
>> DILOCKTM	EDIT+2
DIR	ASK+1~, ASK+9!
DIR("A"	ASK+2, ASK+3, ASK+4, ASK+5, ASK+6, ASK+7, ASK+11, ASK+12
DIR("B"	ASK+2, ASK+12
DIR(0	ASK+2, ASK+10
>> DIRUT	ASK+8
DR	EDIT+1~, EDIT+6*
DT	PROD+6
FDA	CHECK+1~, SSID+1~
FDA(	CHECK+4, SSID+2
FORCE	PROD~, PROD+6
LC	PROD+4~
P	ASK+1~*, ASK+2, ASK+4, ASK+11, ASK+13, ASK+16
P2	ASK+1~, ASK+15*, ASK+16
SID	PROD+4~, PROD+5, PROD+6, PROD+7, PROD+8, SSID~, SSID+2
SSID	CHECK+1~, CHECK+3*, CHECK+4
T	ASK+1~, ASK+8*, ASK+14
Y	ASK+1~, ASK+8, ASK+12, ASK+13, ASK+14

Customize PDF page

Package: Kernel

Routine: XUPROD

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 74

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: