Routine: XQCHK

Package	Total	Call Graph
Kernel	4	XQO^XQ92 ($$CHCKL,$$CHCKRL,$$CHKOOO)^XQCHK2 ($$ACCESS,OPACCES)^XQCHK3 ^XQDATE

Package	Total	Caller Graph
Kernel	10	XQ12 XQ71 XQ72 XQ74 XQ75 XQOPACCESS XQSTCK XQT XQTOC XUS5
Order Entry Results Reporting	8	ORCHTAB ORQPT2 ORWRA ORWTPN ORWU ORWU1 ORWU2 ORY148
IFCAP	6	PRC5129 PRCHE1 PRCHID PRCHJRP5 PRCV442B PRCVITMU
Mental Health	4	YTQAPI5 YTQRIS YTQRQAD YTQRQAD1
Registration	3	DGQPT2 DGSEC VAFCQRY3
Barcode Medication Administration	2	ALPBGEN2 PSBRPC1
PCE Patient Care Encounter	2	PXRRGPRT PXRRPCR
Scheduling	2	SDEC07 SDECAR
Clinical Reminders	1	PXRMXPR
Emergency Department Integration Software	1	EDPFAA
Engineering	1	ENTIRRH
Enterprise Health Management Platform	1	HMPCAC
Fee Basis	1	FBUTL5
Health Summary	1	GMTSHCPR
HealtheVet Desktop	1	XHDX
Imaging	1	MAGGTU9
Lighthouse	1	LHSRPC
Outpatient Pharmacy	1	PSO7P545

Entry Points

Name	Comments	DBIA/ICR reference
CHK
OUT
JMP	;Check all options in jump path in %XQJP returned as "" if not OK
SET	;Produce the same XQY0 as SET1^XQ7 without the synonym
S1
MES	;Messages for rejected options from a call to XQCHK
OP	;Find out what option or protocol is in charge right now	ICR #10078 Status: Active Usage: Supported
OP1()	;Extrinsic function call returns 3 pieces: 1. "P", "O", or "U" for
ACCESS(%XQUSR,%XQOP)	;Find out if a user has access to a particular option	ICR #10078 Status: Active Usage: Supported
OPACCES	;Entry point for the option that checks to see if a user has
KEYSET(XQU)	;Collect users keys and set them into ^TMP($J)

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7) Line Location: MES+1
Function Call: WRITE	Prompt: !!?5,"==> Sorry, ",$S($D(XQPRMN):"your Primary Menu",1:"this option")," is out of order with the message:",!?10,$P(^DIC(19,XQY,0),U,3) Line Location: MES+2
Function Call: WRITE	Prompt: !!?5,"==> Sorry, ",$S($D(XQPRMN):"your Primary Menu",1:"this option")," is locked." Line Location: MES+3
Function Call: WRITE	Prompt: !!?5,"==> Sorry, ",$S($D(XQPRMN):"your Primary Menu",1:"this option")," has a reverse lock on it." Line Location: MES+4
Function Call: WRITE	Prompt: !!?5,"==> Sorry, ",$S($D(XQPRMN):"your Primary Menu",1:"this option")," not allowed right now." Line Location: MES+5
Function Call: WRITE	Prompt: !!?5,"==> Sorry, ",$S($D(XQPRMN):"your Primary Menu",1:"this option")," not allowed on this device." Line Location: MES+6

Name	Line Occurrences (* Changed, ! Killed)
^DIC(19 - [#19]	XQCHK+5, CHK+9, SET+1, S1, S1+1, S1+3, MES+2, OP+4, OP1+9
^DIC(19.1 - [#19.1]	KEYSET+2
^TMP($J	KEYSET+2*
^VA(200 - [#200]	KEYSET+2
^XUTL("XQO"	JMP+2

Name	Field # of Occurrence
%	CHK+7, CHK+9, OUT!, S1+1, S1+2, S1+3, S1+4!, OP1+6~, OP1+8, OP1+9* , OP1+10, OP1+11, KEYSET+1~, KEYSET+2
%XQ	OP+2, OP+3, OP+4, OP+6!, OP1+6~, OP1+7, OP1+8, OP1+9
%XQ1	OP+3, OP+4, OP+6!, OP1+6~, OP1+8, OP1+9
%XQCI	JMP+2*, JMP+3!
%XQI	CHK+9, OUT!, S1+1, S1+4!
>> %XQJP	JMP+2*
%XQOP	ACCESS~, ACCESS+1
%XQUSR	ACCESS~, ACCESS+1
%Y	OUT!
DUZ	CHK+3, CHK+5
>> IOS	CHK+9
U	CHK+7, CHK+8, JMP+2, S1, S1+1, S1+2, S1+3, MES+2, OP+2, OP+3 , OP+4, OP1+7, OP1+8, OP1+9, OP1+10, KEYSET+2
>> X	CHK+7*
XQCY	XQCHK+4, XQCHK+5, XQCHK+6, CHK, CHK+2, CHK+3, CHK+5, CHK+7, CHK+9, CHK+10 , JMP+2*, JMP+3!, MES+2, MES+3, MES+4, MES+5, MES+6
XQCY0	XQCHK+6, CHK, CHK+2, CHK+3, CHK+5, CHK+7, CHK+8, OUT!, JMP+2, JMP+3!
>> XQDIC	JMP+2
XQI	KEYSET+1~, KEYSET+2*
>> XQJMP	XQCHK+4, JMP+1
>> XQOPT	OP+3, OP+4, OP+5*
>> XQORNOD	OP+3, OP+4, OP1+8, OP1+9
>> XQPRMN	MES+2, MES+3, MES+4, MES+5, MES+6
XQRT	CHK+2~, CHK+3~, CHK+5~*
>> XQSAV	XQCHK+6*
XQU	KEYSET~, KEYSET+2
>> XQY	XQCHK+6, SET+1, S1, S1+1, S1+3, MES+2, OP+4, OP1+9
>> XQY0	XQCHK+5, XQCHK+6, S1, S1+2, S1+3*
XQZ	CHK+7*, OUT!