Routine: ORCMEDT7

Package	Total	Call Graph
VA Fileman	3	^DIC ^DIE ^DIR
Order Entry Results Reporting	1	QCK0^ORCMEDT1

Package	Total	Caller Graph
Order Entry Results Reporting	1	ORCM QUICK ORDERS BY USER

Entry Points

Name	Comments	DBIA/ICR reference
SHOWUSRS	;
GETUSER(ORUSER)	;
QUIDX()	; Get quick order dialog info
VERIFYDA(ORFMDATA,ORIEN)	; ; Make sure FileMan pointers are still correct ; - may have changes via CPRS GUI or QCK0^ORCMEDT1(ORIEN)
QCKUSRDG(ORLSTUSR)	; Get quick order dialog by user
CONFLICT(ORUSER,DIALOG)	; Determine if another user shares the personal quick order
QULIST(ORUSER)	; Build user info
QCKBYUSR	; Edit quick orders by user

External References

Name	Field # of Occurrence
^DIC	GETUSER+4
^DIE	QCKBYUSR+22
^DIR	SHOWUSRS+5, QUIDX+4, CONFLICT+34
QCK0^ORCMEDT1	QCKBYUSR+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: QCKBYUSR+24
Function Call: WRITE	Prompt: !,! Line Location: QCKUSRDG+16
Function Call: WRITE	Prompt: !,ORHEADER,! Line Location: QCKUSRDG+17
Function Call: WRITE	Prompt: ?4,ORGROUP,! Line Location: QCKUSRDG+25
Function Call: WRITE	Prompt: ?7,ORIDX,?12,ORDGNAME,! Line Location: QCKUSRDG+26
Function Call: WRITE	Prompt: !,!,$P($G(^VA(200,ORUSER,0)),U,1)_" does not have any personal quick orders." Line Location: SHOWUSRS+2
Function Call: WRITE	Prompt: !,!," Choose from:",! Line Location: SHOWUSRS+7
Function Call: WRITE	Prompt: " ",ORUSER,! Line Location: SHOWUSRS+11
Function Call: WRITE	Prompt: $C(13),$J("",20),$C(13) Line Location: SHOWUSRS+17
Function Call: WRITE	Prompt: ! Line Location: QUIDX+11
Function Call: WRITE	Prompt: !,$C(7),!,! Line Location: CONFLICT+14
Function Call: WRITE	Prompt: " *********************",! Line Location: CONFLICT+15
Function Call: WRITE	Prompt: " *** WARNING ***",! Line Location: CONFLICT+16
Function Call: WRITE	Prompt: " *********************",!,! Line Location: CONFLICT+17
Function Call: WRITE	Prompt: " Multiple users share this personal quick order.",! Line Location: CONFLICT+18
Function Call: WRITE	Prompt: " Modifying this personal quick order will change",! Line Location: CONFLICT+19
Function Call: WRITE	Prompt: " it for all of the following users:",!,! Line Location: CONFLICT+20
Function Call: WRITE	Prompt: ! Line Location: CONFLICT+26
Function Call: WRITE	Prompt: $C(13),$J("",50),$C(13) Line Location: CONFLICT+29
Function Call: WRITE	Prompt: " ",NAME,! Line Location: CONFLICT+31
Function Call: WRITE	Prompt: ! Line Location: CONFLICT+34
Function Call: WRITE	Prompt: ! Line Location: CONFLICT+35
Routine Call	DIE Line Location: QCKBYUSR+22
Routine Call	DIC Line Location: GETUSER+4
Routine Call	DIR Line Location: SHOWUSRS+5 QUIDX+4 CONFLICT+34

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ORD(100.98 - [#100.98]	QULIST+26, QULIST+27
^ORD(101.41 - [#101.41]	QCKBYUSR+4, QCKBYUSR+8, QCKBYUSR+15, QCKBYUSR+21, QULIST+31
^ORD(101.44 - [#101.44]	QCKUSRDG+7, QULIST+8, QULIST+24, QULIST+28, QULIST+29, QULIST+30, VERIFYDA+6, VERIFYDA+10, VERIFYDA+11, CONFLICT+3 , CONFLICT+4
^TMP("ORWDQUSR"	QCKBYUSR+2!, QCKBYUSR+23!, QCKBYUSR+25!, QCKUSRDG+13, QCKUSRDG+18, QCKUSRDG+19, QCKUSRDG+20, QCKUSRDG+21, QCKUSRDG+32, QCKUSRDG+36! , SHOWUSRS+10, QUIDX+6, QUIDX+7, QUIDX+9, QULIST+5, QULIST+13, QULIST+21, QULIST+34
^VA(200 - [#200]	QCKUSRDG+10, SHOWUSRS+2, QULIST+12, CONFLICT+10, CONFLICT+13

Label References

Name	Line Occurrences
$$CONFLICT	QUIDX+8
$$GETUSER	QCKUSRDG+4
$$QCKUSRDG	QCKBYUSR+4
$$QUIDX	QCKUSRDG+29, QCKUSRDG+40
QULIST	QCKUSRDG+9, QCKUSRDG+35, SHOWUSRS+8
SHOWUSRS	QCKUSRDG+37, QCKUSRDG+41
VERIFYDA	QCKBYUSR+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABORT	CONFLICT+1~, CONFLICT+2, CONFLICT+22, CONFLICT+24, CONFLICT+28, CONFLICT+29, CONFLICT+30, CONFLICT+32, CONFLICT+36, CONFLICT+37
COUNT	CONFLICT+1~, CONFLICT+21, CONFLICT+23, CONFLICT+24, CONFLICT+25*
DA	QCKBYUSR+16~, QCKBYUSR+19*, QCKUSRDG+1~, CONFLICT+1~
DA(1	QCKBYUSR+17*, QCKBYUSR+18
DG	CONFLICT+1~, CONFLICT+2, CONFLICT+3, CONFLICT+4
DIALOG	CONFLICT~, CONFLICT+3
DIC	QCKUSRDG+1~, GETUSER+2~, GETUSER+3*
DIC(0	GETUSER+3*
DIDEL	QCKBYUSR+16~
DIE	QCKBYUSR+16~, QCKBYUSR+18*
DINUM	GETUSER+2~
DIR	QCKUSRDG+1~, CONFLICT+1~
DIR("A"	QCKUSRDG+28, QCKUSRDG+39, SHOWUSRS+3, QUIDX+2, CONFLICT+33*
DIR("B"	SHOWUSRS+4, CONFLICT+34
DIR(0	SHOWUSRS+4, QUIDX+3, CONFLICT+34*
DIROUT	QCKUSRDG+2~, SHOWUSRS+19, CONFLICT+1~, CONFLICT+30
DIRUT	QCKUSRDG+2~, SHOWUSRS+19, CONFLICT+1~, CONFLICT+30
DLAYGO	GETUSER+2~
DR	QCKBYUSR+16~, QCKBYUSR+21*
DTIME	SHOWUSRS+15, CONFLICT+27
DTOUT	QCKUSRDG+2~, SHOWUSRS+19, CONFLICT+1~, CONFLICT+30
DUOUT	QCKUSRDG+2~, SHOWUSRS+19, CONFLICT+1~, CONFLICT+30
GROUP	QULIST+22~, QULIST+25, QULIST+26, QULIST+27*, QULIST+34
ID	QULIST+1~, QULIST+7, QULIST+8, QULIST+9, QULIST+23, QULIST+24, QULIST+25, QULIST+28
IDX	QULIST+22~, QULIST+28*, QULIST+29, QULIST+30, QULIST+33
IDX1	VERIFYDA+3~, VERIFYDA+4*, VERIFYDA+6, VERIFYDA+10, VERIFYDA+11
IDX2	VERIFYDA+3~, VERIFYDA+5, VERIFYDA+6, VERIFYDA+9, VERIFYDA+10*, VERIFYDA+11
IEN	VERIFYDA+3~, VERIFYDA+6*, VERIFYDA+7
LASTUSER	QULIST+6~, QULIST+7, QULIST+10, QULIST+11
LEN	QULIST+1~, QULIST+7, QULIST+8, QULIST+9, QULIST+23, QULIST+24
NAME	CONFLICT+1~, CONFLICT+10, CONFLICT+11, CONFLICT+21, CONFLICT+22*, CONFLICT+31
NUMBER	QULIST+22~, QULIST+23, QULIST+32, QULIST+34
ORCOUNT	QCKUSRDG+1~, QCKUSRDG+12, QCKUSRDG+14, QCKUSRDG+15, QCKUSRDG+22, QCKUSRDG+24, QCKUSRDG+27, QCKUSRDG+30
ORDG	QCKBYUSR+1~, QCKBYUSR+10*
ORDGIEN	QCKUSRDG+2~, QCKUSRDG+19, QCKUSRDG+20, QCKUSRDG+21, QUIDX+1~, QUIDX+7, QUIDX+8, QUIDX+9, QUIDX+10
ORDGINFO	QCKBYUSR+1~, QCKBYUSR+4*, QCKBYUSR+5, QCKBYUSR+6, QCKBYUSR+7
ORDGNAME	QCKUSRDG+2~, QCKUSRDG+21*, QCKUSRDG+26
ORDIALOG	QCKUSRDG+1~, QCKUSRDG+3, QCKUSRDG+13, QCKUSRDG+29, QCKUSRDG+31, QCKUSRDG+40, QCKUSRDG+42, SHOWUSRS+1, SHOWUSRS+19*
OREXIT	QCKUSRDG+2~, QCKUSRDG+12, QCKUSRDG+13, QCKUSRDG+31, SHOWUSRS+9, SHOWUSRS+10, SHOWUSRS+16, SHOWUSRS+17, SHOWUSRS+18, QUIDX+8* , QUIDX+12*
ORFIRST	QCKUSRDG+2~, QCKUSRDG+12, QCKUSRDG+16
ORFMDATA	QCKBYUSR+1~, QCKBYUSR+6, QCKBYUSR+12, QCKBYUSR+13, QCKBYUSR+17, QCKBYUSR+19, QCKUSRDG+2~, QCKUSRDG+20, QCKUSRDG+21, QUIDX+1~ , QUIDX+9, QUIDX+10, QULIST+22~, QULIST+33, QULIST+34, VERIFYDA~, VERIFYDA+4, VERIFYDA+5, VERIFYDA+8, VERIFYDA+10 , VERIFYDA+11
ORGROUP	QCKUSRDG+1~, QCKUSRDG+18, QCKUSRDG+19, QCKUSRDG+20, QCKUSRDG+21, QCKUSRDG+22, QCKUSRDG+23, QCKUSRDG+25, QUIDX+1~, QUIDX+6 , QUIDX+7, QUIDX+9
ORHEADER	QCKUSRDG+1~, QCKUSRDG+11*, QCKUSRDG+17
ORIDX	QCKUSRDG+1~, QCKUSRDG+7, QCKUSRDG+8, QCKUSRDG+12, QCKUSRDG+13, QCKUSRDG+18, QCKUSRDG+19, QCKUSRDG+20, QCKUSRDG+21, QCKUSRDG+26 , QCKUSRDG+32, QCKUSRDG+33, SHOWUSRS+9, SHOWUSRS+12, SHOWUSRS+13, SHOWUSRS+14*, QUIDX+2, QUIDX+3, QUIDX+5
ORIEN	QCKBYUSR+1~, QCKBYUSR+5*, QCKBYUSR+8, QCKBYUSR+11, QCKBYUSR+12, QCKBYUSR+15, QCKBYUSR+21, VERIFYDA~, VERIFYDA+7, VERIFYDA+11
ORINPUT	QCKUSRDG+2~, SHOWUSRS+15*, SHOWUSRS+18
ORLASTGP	QCKUSRDG+2~, QCKUSRDG+12, QCKUSRDG+22, QCKUSRDG+23
ORLEN	QCKUSRDG+1~, QCKUSRDG+6*, QCKUSRDG+8
ORLINE0	QCKBYUSR+1~, QCKBYUSR+8*, QCKBYUSR+9, QCKBYUSR+10
ORLSTUSR	QCKUSRDG~, QCKUSRDG+4
ORPRE	QCKUSRDG+1~, QCKUSRDG+6*, QCKUSRDG+7, QCKUSRDG+8
ORRESULT	QUIDX+1~, QUIDX+5, QUIDX+8, QUIDX+10
ORTEXT	QCKBYUSR+1~, QCKBYUSR+9*, QCKBYUSR+15
ORUSER	QCKBYUSR+1~, QCKBYUSR+3, QCKBYUSR+4, QCKBYUSR+7, QCKBYUSR+23, QCKUSRDG+1~, QCKUSRDG+4, QCKUSRDG+5, QCKUSRDG+6, QCKUSRDG+9 , QCKUSRDG+10, QCKUSRDG+13, QCKUSRDG+18, QCKUSRDG+19, QCKUSRDG+20, QCKUSRDG+21, QCKUSRDG+32, GETUSER~, GETUSER+1, SHOWUSRS+2 , SHOWUSRS+9, SHOWUSRS+10, SHOWUSRS+11, QUIDX+6, QUIDX+7, QUIDX+8, QUIDX+9, QUIDX+10, QULIST~, QULIST+3 , QULIST+21, QULIST+23, QULIST+34, CONFLICT~, CONFLICT+9, CONFLICT+13
OTHERS	CONFLICT+1~, CONFLICT+12
OTHERS(	CONFLICT+11, CONFLICT+13, CONFLICT+22
PRE	QULIST+1~, QULIST+2, QULIST+7, QULIST+8, QULIST+23, QULIST+24
QCKORDER	QULIST+22~, QULIST+30*, QULIST+31, QULIST+34
QOINDEX	QULIST+22~, QULIST+28, QULIST+29, QULIST+30, QULIST+33
TEMP	CONFLICT+1~, CONFLICT+25, CONFLICT+27, CONFLICT+30
U	QCKBYUSR+5, QCKBYUSR+6, QCKBYUSR+7, QCKBYUSR+9, QCKBYUSR+10, QCKBYUSR+15, QCKBYUSR+21, QCKUSRDG+10, QCKUSRDG+12, SHOWUSRS+2 , SHOWUSRS+18, QUIDX+10, QUIDX+12, QULIST+12, QULIST+27, QULIST+34, VERIFYDA+6, VERIFYDA+11, CONFLICT+4, CONFLICT+10 , CONFLICT+13, CONFLICT+30
USER	QULIST+6~, QULIST+9*, QULIST+10, QULIST+11, QULIST+12
USERNAME	QCKUSRDG+1~, QCKUSRDG+10, QCKUSRDG+11, QCKUSRDG+36, QULIST+6~, QULIST+12, QULIST+13
USR	CONFLICT+1~, CONFLICT+4, CONFLICT+5, CONFLICT+6, CONFLICT+7, CONFLICT+8*, CONFLICT+9, CONFLICT+10
X	QCKUSRDG+1~, GETUSER+2~, CONFLICT+1~
Y	QCKUSRDG+1~, GETUSER+2~, GETUSER+5, SHOWUSRS+6, QUIDX+5, QUIDX+6, QUIDX+7, QUIDX+9, QUIDX+12, CONFLICT+1~ , CONFLICT+36

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORCMEDT7

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: