Routine: ORCMEDT1

Call Graph

Call Graph Total: 15

Package	Total	Call Graph
Order Entry Results Reporting	9	GETQDLG^ORCD (DIALOG,DISPLAY)^ORCDLG DG^ORCHANG1 ($$DIALOG,SAVE)^ORCMEDT0 $$NAME^ORCMEDT4 ($$RAWCRC,UPDQNAME)^ORCMEDT8 ($$ITEM,$$NEXT)^ORCONVRT $$VALQO^ORWDXM3 $$VBQO^ORWDXM4
VA Fileman	5	(,IX)^DIC MIX^DIC1 ^DIE ^DIK ^DIR
Kernel	1	XREF^XQORM

Package	Total	Caller Graph
Order Entry Results Reporting	10	ORCM ORDER SETS ORCM ORDERABLES ORCM PROTOCOLS ORCM QUICK ORDERS ORCMEDT2 ORCMEDT3 ORCMEDT7 ORINQIV ORWDXQ ORY57
IHS Electronic Health Record	1	BEHOQOW

Package

Total

Caller Graph

Order Entry Results Reporting

ORCM ORDER SETS ORCM ORDERABLES ORCM PROTOCOLS ORCM QUICK ORDERS ORCMEDT2 ORCMEDT3 ORCMEDT7 ORINQIV
ORWDXQ ORY57

IHS Electronic Health Record

BEHOQOW

Entry Points

Name	Comments	DBIA/ICR reference
Q1
QQ
MENU()	; -- Add converted item to menus?
QR
PROTOCOL	; -- Convert additional protocols to dialogs
AUTO(DLG)	; -- set AutoAccept flag for GUI
OI	; -- Enter/edit generic orderable items
QCK0(ORQDLG)	; -- edit quick order ORQDLG
S1
SET0(ORSET)	; -- edit order set ORSET
ADD
OK()	; -- Ready to save?
DGRP()	; -- Returns sub-display group of Nursing or Other for generic OI
S2
QUICK	; -- Enter/edit quick order dialogs
SET	; -- Order Sets
EXPLAIN	;Give reason why user can't set auto-accept to yes
SAVE
FINDXUTL(MENU,ITEM)	; -- Returns position of ITEM in MENU
ONE(PITEM,ORADD,ERROR)	; -- Convert single item protocol, add to menu(s)

External References

Name	Field # of Occurrence
^DIC	DGRP+4, PROTOCOL+2
IX^DIC	OI+4
MIX^DIC1	S2+3
^DIE	OI+3, QCK0+6, SET0+4, S2+4
^DIK	S1+5, S2+5, ONE+2
^DIR	OK+4, AUTO+7, MENU+4
GETQDLG^ORCD	QCK0+6
DIALOG^ORCDLG	Q1
DISPLAY^ORCDLG	Q1+1
DG^ORCHANG1	DGRP+2
$$DIALOG^ORCMEDT0	QUICK+2, SET+2
SAVE^ORCMEDT0	Q1+2, SAVE
$$NAME^ORCMEDT4	QCK0+3, SET0+2
$$RAWCRC^ORCMEDT8	QCK0+4, QR
UPDQNAME^ORCMEDT8	QR+1
$$ITEM^ORCONVRT	ONE+3
$$NEXT^ORCONVRT	ADD+5
$$VALQO^ORWDXM3	AUTO+3
$$VBQO^ORWDXM4	AUTO+2
XREF^XQORM	FINDXUTL+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: OI+2
Function Call: WRITE	Prompt: ! Line Location: OI+3
Function Call: WRITE	Prompt: ! Line Location: QUICK+2
Function Call: WRITE	Prompt: ! Line Location: QCK0+8
Function Call: WRITE	Prompt: ! Line Location: SET+2
Function Call: WRITE	Prompt: !,"ORDER SET COMPONENTS:" Line Location: S1+1
Function Call: READ	Prompt: "Press <return> to continue ..." Formatting: ! Timeout: DTIME Variable: X Line Location: S1+6
Function Call: WRITE	Prompt: !?3,SEQ,?10,$P(^ORD(101.41,ITM,0),U) Line Location: S1+7
Function Call: WRITE	Prompt: ! Line Location: S2+0
Function Call: WRITE	Prompt: ! Line Location: PROTOCOL+2
Function Call: WRITE	Prompt: " done." Line Location: PROTOCOL+4
Function Call: WRITE	Prompt: " unable to convert.",!,">> "_$P(ORERR,U,2) Line Location: PROTOCOL+5
Function Call: WRITE	Prompt: "." Line Location: ADD+0
Function Call: WRITE	Prompt: !!,"The combination of VERIFY set to NO and ASK FOR ANOTHER ORDER set to",!,"YES, DON'T ASK and AUTO-ACCEPT set to YES is not allowed." Line Location: EXPLAIN+1
Function Call: WRITE	Prompt: !!,"This combination of settings could cause CPRS to enter into an infinite loop",!,"creating the same order over and over. If you wish to have" Line Location: EXPLAIN+2
Function Call: WRITE	Prompt: !,"AUTO-ACCEPT set to YES you must change one of the other two fields",!,"to a different value.",!!,"AUTO-ACCEPT is being set to NO for you." Line Location: EXPLAIN+3
Routine Call	DIE Line Location: OI+3 QCK0+6 SET0+4 S2+4
Routine Call	DIC Line Location: DGRP+4 PROTOCOL+2
Routine Call	DIR Line Location: OK+4 AUTO+7 MENU+4
Routine Call	DIC Line Location: OI+4

FileNo	Call Tags
^ORD(100.98 - [#100.98]	Classic Fileman Calls
^ORD(100.99 - [#100.99]	Classic Fileman Calls
^ORD(101 - [#101]	Classic Fileman Calls
^ORD(101.41 - [#101.41]	Classic Fileman Calls
^ORD(101.43 - [#101.43]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(101.41	S2+2
^ORD(100.98 - [#100.98]	DGRP+2, DGRP+5
^ORD(100.99 - [#100.99]	ONE+2, ONE+4
^ORD(101 - [#101]	ONE+3, ADD, ADD+1
^ORD(101.41 - [#101.41]	QCK0+7, QCK0+8, QQ, AUTO+2, AUTO+3, AUTO+5, AUTO+7, AUTO+8, S1, S1+3 , S1+4, S1+5, S1+7, S2+5, ADD+1, ADD+4, ADD+6, ADD+7, ADD+8
^XUTL("XQORM"	ADD+3, FINDXUTL+3

Name	Line Occurrences
$$DGRP	OI+2
$$FINDXUTL	ADD+2
$$MENU	PROTOCOL+3
$$OK	Q1+1
AUTO	Q1+2
EXPLAIN	AUTO+8
ONE	PROTOCOL+4
Q1	Q1+2
QCK0	QUICK+2
QQ	QCK0+8, Q1, Q1+1
QR	QCK0+6
SET0	SET+2

Name	Field # of Occurrence
^(	FINDXUTL+3
^(0	AUTO+8, S2+5, ONE+4
^(3.1	QCK0+8
^(4	QQ

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTION	QCK0+1~, Q1+1*, Q1+2
AFTERCRC	QCK0+1~, QR*, QR+1
BEFORCRC	QCK0+1~, QCK0+4*, QR+1
>> D	OI+3, S2+1
DA	OI+1~, OI+3, QCK0+1~, QCK0+2, SET0+1~, SET0+3, SET0+4, S1+4, S1+5, S2+3! , S2+4, S2+5, ONE+1~, ONE+2, ADD+4, ADD+5, ADD+6, ADD+7, ADD+8
DA(1	S1+2, S2+3, ONE+2*
DIC	OI+1~, OI+4, DGRP+1~, DGRP+3, SET0+1~, S2+1, S2+4, PROTOCOL+1~, PROTOCOL+2
DIC("A"	DGRP+4, S2+2
DIC("P"	S2+2*
DIC("S"	DGRP+3*
DIC(0	OI+4, DGRP+3, S2+1, PROTOCOL+2
DIDEL	QCK0+1~
DIE	OI+1~, OI+4, QCK0+1~, QCK0+5, SET0+1~, SET0+4, S2+4, S2+5
DIK	SET0+1~, S1+2, S2+5, ONE+1~, ONE+2*
DIR	OK+1~, AUTO+1~, MENU+1~
DIR("?"	OK+3, AUTO+6, MENU+3*
DIR("A"	OK+2, AUTO+4, MENU+2*
DIR("B"	OK+1, AUTO+5, MENU+2*
DIR(0	OK+1, AUTO+4, MENU+1*
>> DITEM	ONE+3*, ONE+4, ADD+4, ADD+6, ADD+7, ADD+8
DLAYGO	OI+1~, OI+4*
DLG	AUTO~, AUTO+2, AUTO+3, AUTO+5, AUTO+7, AUTO+8
DMENU	ONE+1~, ADD+1*, ADD+4, ADD+5, ADD+6, ADD+7, ADD+8
DR	OI+1~, OI+3, QCK0+1~, QCK0+5, SET0+1~, SET0+3, S2+4
DTIME	S1+6
>> DTOUT	QCK0+6, OK+4, MENU+4
DUZ(0	QCK0+5, SET0+3
ERROR	ONE~, ONE+4*
FIRST	QCK0+1~, QCK0+2, Q1+2
ID	OI+1~, OI+3*
IOSL	S1+6
ITEM	FINDXUTL~, FINDXUTL+3
ITM	SET0+1~, S1+5*, S1+7
LCNT	SET0+1~, S1+1, S1+6
MENU	FINDXUTL~, FINDXUTL+2
NAME	ONE+1~, ONE+3*
ORADD	ONE~, ONE+5
ORDG	OI+1~, OI+2, OI+3, DGRP+1~, DGRP+2, QUICK+1~, SET+1~
ORDIALOG	QCK0+1~, QCK0+6, QCK0+7, QCK0+8, QQ
ORERR	PROTOCOL+1~, PROTOCOL+4, PROTOCOL+5!
ORGRP	DGRP+1~, DGRP+2
ORI	DGRP+1~, DGRP+2*
ORL	QCK0+1~, QCK0+2*
>> ORM	PROTOCOL+3*, PROTOCOL+4
ORNAME	QCK0+1~, QCK0+3, SET0+1~, SET0+2
>> ORP	PROTOCOL+3*, PROTOCOL+4
ORPOS	ONE+1~, ADD+2, ADD+3, ADD+4, ADD+6, ADD+7
ORQDLG	QUICK+1~, QUICK+2*, QCK0~, QCK0+2, QCK0+3, QCK0+4, QCK0+6, QCK0+7, Q1+2, QR , QR+1
ORQUIT	QCK0+1~, QCK0+8, Q1
ORSET	SET+1~, SET+2*, SET0~, SET0+1, SET0+2, SET0+3, S1, S1+2, S1+3, S1+4 , S1+5, S2+1, S2+3, S2+5
ORTYPE	QCK0+1~, QCK0+2*
ORVP	QCK0+1~, QCK0+2*
PITEM	ONE~, ONE+2, ONE+3, ONE+4, ADD, ADD+2
PMENU	ONE+1~, ADD*, ADD+1, ADD+2, ADD+3
POS	ONE+1~, ADD+4, FINDXUTL+1~, FINDXUTL+3, FINDXUTL+4
QUIT	SET0+1~, S1, S1+1, S1+6, S2, S2+3
SEQ	SET0+1~, S1+1, S1+3, S1+4, S1+7
U	OI+3, DGRP+5, QCK0+7, AUTO+2, AUTO+3, AUTO+5, AUTO+7, S1+5, S1+7, S2+2 , S2+5, PROTOCOL+5, ONE+3, ADD+1, ADD+4, ADD+6, FINDXUTL+3
X	OI+1~, DGRP+1~, QCK0+1~, QCK0+7, OK+1~, AUTO+1~, SET0+1~, S1+6, PROTOCOL+1~, MENU+1~
XQORM	FINDXUTL+1~, FINDXUTL+2*, FINDXUTL+3
XUTL	ONE+1~, ADD+3*, ADD+6
Y	OI+1~, OI+3, DGRP+1~, DGRP+5, DGRP+6, QCK0+1~, QCK0+6, OK+1~, OK+4, OK+5 , AUTO+1~, AUTO+7, AUTO+8, SET0+1~, SET0+4, S2+3, S2+4, PROTOCOL+1~, PROTOCOL+2, PROTOCOL+3 , MENU+1~, MENU+4*, MENU+5

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORCMEDT1

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 11

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: