Routine: ORQQAL

Package	Total	Call Graph
Adverse Reaction Tracking	3	($$ORCHK,GETDATA)^GMRAOR EN1^GMRAOR1 EN1^GMRAOR2
VA Fileman	2	DD^%DT $$GET1^DIQ
Kernel	1	$$FMTE^XLFDT
National Drug File	1	IEN^PSN50P65
Order Entry Results Reporting	1	$$CLASS50^ORPEAPI

Package	Total	Caller Graph
Order Entry Results Reporting	3	ORKCHK5 ORKCHK6 ORKCHKM

Entry Points

Name	Comments	DBIA/ICR reference
MEDCLASS(ORAY,DFN,PSDRUG)	;check for allergens with medications in same VA drug class
LIST(ORAY,ORPT)	; RETURN PATIENT'S ALLERGY/ADVERSE REACTION INFO: ; null:no allergy assessment, 0:no known allergies, 1:pt has allergies ; if 1 also get: allergen/reactant^reaction/symptom^severity^allergy ien
DETAIL(ORAY,DFN,ALLR,ID)	; RETURN DETAILED ALLERGY INFO FOR SPECIFIED ALLERGIC REACTION:
LRPT(ORAY,ORPT)	; RETURN PT'S ALLERGY/ADVERSE REACTION INFO IN REPORT FORMAT: ; null:no allergy assessment, 0:no known allergies, 1:pt has allergies ; if 1 also get: allergen/reactant^reaction/symptom^severity^allergy ien
CLAS
SYMP
RXN(ORAY,ORPT,SRC,NDF,PSDRUG)	; RETURN TRUE OR FALSE IF PATIENT IS ALLERGIC TO AGENT ; SRC: ALLERGEN SOURCE (CM=CONTRAST MEDIA, DR=DRUG) ; NDF: IF SRC=DR, NDF=Nat'l Drug File ien ELSE NDF="" ; PSDRUG:IF SRC=DR, PSDRUG=(local) Drug file ien ELSE PSDRUG=""
OBS
SIGNS
COM
SETARRY	; Get the data

Name	Field # of Occurrence
DD^%DT	OBS+2, OBS+5, COM+3
$$GET1^DIQ	RXN+13
$$ORCHK^GMRAOR	RXN+14, RXN+27
GETDATA^GMRAOR	MEDCLASS+9
EN1^GMRAOR1	LIST+5, LRPT+6
EN1^GMRAOR2	DETAIL+1
$$CLASS50^ORPEAPI	MEDCLASS+5
IEN^PSN50P65	MEDCLASS+15
$$FMTE^XLFDT	LRPT+15

RPC Name	Call Tags
ORQQAL LIST	LIST
ORQQAL DETAIL	DETAIL
ORQQAL LIST REPORT	LRPT

FileNo	Call Tags
^PSDRUG - [#50]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^PSDRUG - [#50]	RXN+8, RXN+11, RXN+12
^TMP("GMRAOC"	MEDCLASS+10, MEDCLASS+11, MEDCLASS+20, MEDCLASS+21, MEDCLASS+22, MEDCLASS+23, MEDCLASS+24!
^TMP($J	MEDCLASS+16, MEDCLASS+18

Name	Line Occurrences
CLAS	DETAIL+7
COM	DETAIL+13
MEDCLASS	SETARRY+26
OBS	DETAIL+10
SETARRY	RXN+16, RXN+28
SIGNS	LIST+8
SYMP	DETAIL+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ALLR	DETAIL~, DETAIL+1
CDRG	RXN+4~, RXN+12*, RXN+13
CL	SETARRY+14, SETARRY+18, SETARRY+27!, MEDCLASS+1~, MEDCLASS+8*, MEDCLASS+12
CMP	RXN+4~, RXN+8*, RXN+9
CMPDR	RXN+4~, RXN+10, RXN+11, RXN+12
CNT	RXN+4~, RXN+20, RXN+22, RXN+23
CR	LRPT+3~, LRPT+4, DETAIL+2~
DFN	MEDCLASS~, MEDCLASS+9, DETAIL~
GMRACT	DETAIL+3, DETAIL+4, DETAIL+8, DETAIL+9, DETAIL+11, DETAIL+12, DETAIL+14!
GMRACT("C"	DETAIL+13, COM+1, COM+3, COM+4, COM+5, COM+6
GMRACT("O"	DETAIL+10, OBS, OBS+2, OBS+3, OBS+5, OBS+6
GMRACT("S"	DETAIL+6, SYMP, SYMP+1, SYMP+2
GMRACT("V"	DETAIL+7, CLAS, CLAS+1, CLAS+2
GMRADRCL	SETARRY+27!
GMRADRCL(	SETARRY+14, SETARRY+16, SETARRY+17, SETARRY+18
GMRAIDT	LRPT+3~, LRPT+5*
GMRAING	SETARRY+27!
GMRAING(	SETARRY+2, SETARRY+3, SETARRY+4
GMRAREAC	SETARRY+8, SETARRY+20, SETARRY+27!
GMRAREAC(	SETARRY+9, SETARRY+10, SETARRY+11, SETARRY+21, SETARRY+22, SETARRY+23
GMRARXN	LIST+6, LIST+7, LIST+8, LIST+10!, LRPT+7, LRPT+8, LRPT+9, LRPT+19!
GMRARXN(	LIST+8, SIGNS, SIGNS+1, SIGNS+2, LRPT+9, LRPT+10, LRPT+11, LRPT+12, LRPT+13, LRPT+14 , LRPT+15
I	LIST+3~, LIST+4, LIST+6, LIST+7, LIST+8, SIGNS+1, SIGNS+2, LRPT+3~, LRPT+5, LRPT+7 , LRPT+8, LRPT+11, LRPT+13, LRPT+14, LRPT+15, LRPT+16, LRPT+17, SETARRY+2, SETARRY+3, SETARRY+5 , SETARRY+14, SETARRY+17, SETARRY+25, SETARRY+27!, MEDCLASS+1~, MEDCLASS+11, MEDCLASS+12, DETAIL+2, DETAIL+3, DETAIL+4 , DETAIL+5, DETAIL+8, DETAIL+9, DETAIL+11, DETAIL+12, SYMP+1, SYMP+2, SYMP+4, CLAS+1, CLAS+2 , CLAS+4, OBS+3, OBS+6, OBS+8, COM, COM+2, COM+4, COM+6, COM+8*
ID	DETAIL~
IEN	MEDCLASS+14~, MEDCLASS+16*, MEDCLASS+17, MEDCLASS+18
J	LIST+3~, LIST+4, LIST+8, SIGNS, SIGNS+1, SIGNS+2, LRPT+3~, LRPT+5, LRPT+9, LRPT+10 , LRPT+11, LRPT+12, LRPT+13, LRPT+14, LRPT+15, SETARRY+2, SETARRY+3, SETARRY+4, SETARRY+14, SETARRY+16 , SETARRY+17, SETARRY+18, SETARRY+27!
K	LIST+3~, LIST+4, SIGNS, SIGNS+1, SIGNS+2, LRPT+3~, LRPT+5, LRPT+12, LRPT+13, LRPT+14 , LRPT+15, SETARRY+6~, SETARRY+9, SETARRY+10, SETARRY+11, SETARRY+21, SETARRY+22, SETARRY+23, MEDCLASS+21~, MEDCLASS+22 , MEDCLASS+23, SYMP, SYMP+1, SYMP+2, SYMP+5!, CLAS, CLAS+1, CLAS+2, CLAS+5!, OBS , OBS+2, OBS+3, OBS+5, OBS+6, OBS+9!, COM, COM+1, COM+3, COM+4, COM+5 , COM+6, COM+9!
L	COM+5*, COM+6, COM+9!
N	SIGNS, SIGNS+1, SIGNS+3, LRPT+12, LRPT+13, LRPT+16, SYMP, SYMP+1, SYMP+3, SYMP+5! , CLAS, CLAS+1, CLAS+3, CLAS+5!, OBS, OBS+1, OBS+7, OBS+9!, COM, COM+2 , COM+7, COM+9!
NAME	MEDCLASS+14~, MEDCLASS+18*, MEDCLASS+19, MEDCLASS+20
NDF	RXN~, RXN+27
NDF2	RXN+4~, RXN+13*, RXN+14
OH	DETAIL+2~
ORAY	LIST~, LRPT~, RXN~, RXN+14, RXN+15, RXN+17, RXN+18!, RXN+24, RXN+27, SETARRY+1 , SETARRY+3, SETARRY+4, SETARRY+10, SETARRY+11, SETARRY+13, SETARRY+17, SETARRY+18, SETARRY+22, SETARRY+23, SETARRY+26 , MEDCLASS~, MEDCLASS+17, MEDCLASS+19, MEDCLASS+20, MEDCLASS+22, MEDCLASS+23, DETAIL~
ORAY(	LIST+6, LIST+7, LIST+8, SIGNS+1, SIGNS+2, LRPT+7, LRPT+8, LRPT+11, LRPT+13, LRPT+14 , LRPT+15, LRPT+17, DETAIL+3, DETAIL+4, DETAIL+5, DETAIL+8, DETAIL+9, DETAIL+11, DETAIL+12, SYMP+1 , SYMP+2, SYMP+4, CLAS+1, CLAS+2, CLAS+4, OBS+3, OBS+6, OBS+8, COM, COM+2 , COM+4, COM+6, COM+8*
ORAY(1	LIST+9, LRPT+18
ORPT	LIST~, LIST+5, LRPT~, LRPT+6, RXN~, RXN+14, RXN+27, SETARRY+26
ORVACLS	MEDCLASS+1~, MEDCLASS+5*, MEDCLASS+6, MEDCLASS+7, MEDCLASS+8, MEDCLASS+12
OX	DETAIL+2~
PSDRUG	RXN~, RXN+5, RXN+8, RXN+11, RXN+12, SETARRY+26, MEDCLASS~, MEDCLASS+3, MEDCLASS+5
RET	MEDCLASS+1~
SAVE	RXN+4~, RXN+6, RXN+15, RXN+24
SEVER	LRPT+3~, LRPT+5, LRPT+10, LRPT+11
SRC	RXN~, RXN+14, RXN+27, SETARRY+1, SETARRY+13, SETARRY+26
TEMP	RXN+4~
TEMP(	RXN+17*, RXN+21
TEMP2	RXN+4~, RXN+6, RXN+20, RXN+23*, RXN+24
TYP	MEDCLASS+1~, MEDCLASS+2*
U	LRPT+10, LRPT+11, RXN+8, RXN+12, RXN+17, RXN+24, SETARRY+3, SETARRY+16, SETARRY+17, SETARRY+18 , MEDCLASS+17, MEDCLASS+19, MEDCLASS+20, DETAIL+3, DETAIL+4, DETAIL+8, DETAIL+9, DETAIL+11, DETAIL+12, CLAS+1 , CLAS+2, OBS+2, OBS+3, OBS+5, OBS+6, COM+3, COM+4
X	RXN+20, RXN+21, RXN+23, MEDCLASS+1~, MEDCLASS+12*, MEDCLASS+13, MEDCLASS+15, MEDCLASS+16, MEDCLASS+17, MEDCLASS+19 , MEDCLASS+20, MEDCLASS+21, MEDCLASS+22, MEDCLASS+23
Y	OBS+2, OBS+3, OBS+5, OBS+6, OBS+9!, COM+3*, COM+4, COM+9!

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORQQAL

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: