Routine: ORCMGMCK

Package	Total	Call Graph
Kernel	5	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD $$FMTE^XLFDT $$REPEAT^XLFSTR
VA Fileman	2	$$FIND1^DIC ^DIR
DRG Grouper	1	($$HIST,$$STATCHK)^ICDAPIU
MailMan	1	^XMD
Order Entry Results Reporting	1	$$PTR^ORCD

Package	Total	Caller Graph
Order Entry Results Reporting	1	ORCM GMRC CSV CHECK

Entry Points

Name	Comments	DBIA/ICR reference
QUEUE	; entry point for tasked report
CSVPEP	; protocol event point called upon CSV install ; Called by Protocol - ??
PAGE(NUM)	;print header and raise page number
CSVOPT	; report of CSV affected quick orders from option ORCM ...
FINDQOS	; find cons/proc quick orders with a default Prov. DX code

External References

Name	Field # of Occurrence
^%ZIS	CSVOPT+2
HOME^%ZIS	CSVOPT+3, QUEUE+40
^%ZISC	CSVOPT+3, QUEUE+39
^%ZTLOAD	CSVOPT+7
$$FIND1^DIC	FINDQOS+3, FINDQOS+4
^DIR	QUEUE+37, PAGE+3
$$HIST^ICDAPIU	FINDQOS+17
$$STATCHK^ICDAPIU	FINDQOS+15
$$PTR^ORCD	FINDQOS+5
$$FMTE^XLFDT	FINDQOS+20, CSVPEP+28, QUEUE+31
$$REPEAT^XLFSTR	PAGE+8
^XMD	CSVPEP+38

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Unable to task report" Line Location: CSVOPT+8
Function Call: WRITE	Prompt: !,"The following Consult or Procedure quick orders were found that currently" Line Location: QUEUE+8
Function Call: WRITE	Prompt: !,"have a provisional diagnosis code that is inactive. These should be edited" Line Location: QUEUE+9
Function Call: WRITE	Prompt: !,"as soon as possible to reduce interruption of ordering these quick orders.",! Line Location: QUEUE+10
Function Call: WRITE	Prompt: !,"Quick order name: ",$P(^TMP("ORCMGMCK",$J,"I",IREC),U)," IEN: ",IREC Line Location: QUEUE+14
Function Call: WRITE	Prompt: !,"Provisional Diagnosis code: ",$P(^TMP("ORCMGMCK",$J,"I",IREC),U,2) Line Location: QUEUE+15
Function Call: WRITE	Prompt: !," " Line Location: QUEUE+16
Function Call: WRITE	Prompt: !,"The following Consult or Procedure quick orders were found to have a" Line Location: QUEUE+21
Function Call: WRITE	Prompt: !,"provisional diagnosis code that will become inactive in the future." Line Location: QUEUE+22
Function Call: WRITE	Prompt: !,"These should be edited as soon as possible after the inactivation date to" Line Location: QUEUE+23
Function Call: WRITE	Prompt: !,"reduce interruption in ordering these quick orders." Line Location: QUEUE+24
Function Call: WRITE	Prompt: !," " Line Location: QUEUE+25
Function Call: WRITE	Prompt: !,"Quick order name: ",$P(^TMP("ORCMGMCK",$J,"F",FREC),U)," IEN: ",FREC Line Location: QUEUE+30
Function Call: WRITE	Prompt: !,"Provisional Diagnosis code: ",$P(^TMP("ORCMGMCK",$J,"F",FREC),U,2)," Inactivation Date: ",$$FMTE^XLFDT($P(^(FREC),U,3),2) Line Location: QUEUE+31
Function Call: WRITE	Prompt: !,"There were no problem quick orders found.",! Line Location: QUEUE+34
Function Call: WRITE	Prompt: @IOF Line Location: PAGE+5
Function Call: WRITE	Prompt: "Code Set Version review of Consult/Procedure Quick Orders" Line Location: PAGE+6
Function Call: WRITE	Prompt: ?70,"Page: ",NUM Line Location: PAGE+7
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("-",78) Line Location: PAGE+8
Routine Call	%ZIS Line Location: CSVOPT+3 QUEUE+40
Routine Call	DIC Line Location: FINDQOS+3 FINDQOS+4
Routine Call	DIR Line Location: QUEUE+37 PAGE+3
Routine Call	%ZIS Line Location: CSVOPT+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ORD(100.98 - [#100.98]	FIND1^DIC

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ORD(101.41 - [#101.41]	FINDQOS+7, FINDQOS+9, FINDQOS+11, FINDQOS+13, FINDQOS+16, FINDQOS+20
^TMP("ORCMGMCK"	FINDQOS+2!, FINDQOS+16, FINDQOS+20, CSVPEP+7, CSVPEP+13, CSVPEP+14, CSVPEP+15, CSVPEP+19, CSVPEP+26, CSVPEP+27 , CSVPEP+28, CSVPEP+39!, QUEUE+6, QUEUE+12, QUEUE+14, QUEUE+15, QUEUE+19, QUEUE+28, QUEUE+30, QUEUE+31 , QUEUE+33, QUEUE+41!
^TMP("ORCMMSG"	CSVPEP+5!, CSVPEP+8, CSVPEP+9, CSVPEP+10, CSVPEP+11, CSVPEP+14, CSVPEP+15, CSVPEP+16, CSVPEP+20, CSVPEP+21* , CSVPEP+22, CSVPEP+23, CSVPEP+24, CSVPEP+27, CSVPEP+28, CSVPEP+31, CSVPEP+32, CSVPEP+39!

Label References

Name	Line Occurrences
FINDQOS	CSVPEP+4, QUEUE+4
PAGE	QUEUE+5, QUEUE+13, QUEUE+20, QUEUE+29

Naked Globals

Name	Field # of Occurrence
^(	FINDQOS+7, CSVPEP+28, QUEUE+31

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	CSVOPT+1~, CSVOPT+2*
ACTDT	FINDQOS+8~, FINDQOS+18*, FINDQOS+19, FINDQOS+20
DIR	QUEUE+36~, PAGE+2~
DIR(0	QUEUE+37, PAGE+3
DIRUT	QUEUE+36~, PAGE+2~
DT	FINDQOS+15, FINDQOS+18
DTOUT	QUEUE+36~, PAGE+2~, PAGE+4
DUOUT	QUEUE+36~, PAGE+2~, PAGE+4
FREC	CSVPEP+25, CSVPEP+26, CSVPEP+27, CSVPEP+28, QUEUE+26~, QUEUE+27, QUEUE+28, QUEUE+30, QUEUE+31
IO	QUEUE+3
IO("Q"	CSVOPT+3
IOF	PAGE+5
ION	CSVOPT+6
IOSL	QUEUE+13, QUEUE+20, QUEUE+29
IOST	QUEUE+35, QUEUE+39, PAGE+1
IREC	CSVPEP+12, CSVPEP+13, CSVPEP+14, CSVPEP+15, QUEUE+7~, QUEUE+11, QUEUE+12, QUEUE+14, QUEUE+15
LN	CSVPEP+3~, CSVPEP+6, CSVPEP+8, CSVPEP+9, CSVPEP+10, CSVPEP+11, CSVPEP+14, CSVPEP+15, CSVPEP+16, CSVPEP+20* , CSVPEP+21, CSVPEP+22, CSVPEP+23, CSVPEP+24, CSVPEP+27, CSVPEP+28, CSVPEP+29, CSVPEP+32, CSVPEP+33*
NUM	PAGE~, PAGE+1, PAGE+4, PAGE+7, PAGE+9
ORAPIVAL	FINDQOS+8~, FINDQOS+17*
ORAPIVAL(	FINDQOS+18, FINDQOS+19
ORCODEF	FINDQOS+8~, FINDQOS+13*, FINDQOS+15, FINDQOS+16, FINDQOS+17, FINDQOS+20
ORDGC	FINDQOS+1~, FINDQOS+3*, FINDQOS+10
ORDGP	FINDQOS+1~, FINDQOS+4*, FINDQOS+10
ORDLG	FINDQOS+1~, FINDQOS+6, FINDQOS+7, FINDQOS+9, FINDQOS+11, FINDQOS+13, FINDQOS+16, FINDQOS+20
ORPDLG	FINDQOS+1~, FINDQOS+5*, FINDQOS+11
ORPRMPT	FINDQOS+8~, FINDQOS+11*, FINDQOS+12, FINDQOS+13, FINDQOS+14
ORQDG	FINDQOS+8~, FINDQOS+9*, FINDQOS+10
PG	QUEUE+2~, QUEUE+5*, QUEUE+12, QUEUE+13, QUEUE+20, QUEUE+28, QUEUE+29
POP	CSVOPT+1~, CSVOPT+2
U	FINDQOS+7, FINDQOS+9, FINDQOS+16, FINDQOS+20, CSVPEP+14, CSVPEP+15, CSVPEP+27, CSVPEP+28, QUEUE+14, QUEUE+15 , QUEUE+30, QUEUE+31
X	QUEUE+36~, PAGE+2~
XMDUZ	CSVPEP+3~, CSVPEP+36*
XMSUB	CSVPEP+3~, CSVPEP+35*
XMTEXT	CSVPEP+3~, CSVPEP+37*
XMY	CSVPEP+3~
XMY("G.ORCM C	SV EVENT" , CSVPEP+34*
Y	QUEUE+36~, PAGE+2~
ZTDESC	CSVOPT+4~, CSVOPT+5*
ZTDTH	CSVOPT+4~, CSVOPT+6*
ZTIO	CSVOPT+4~, CSVOPT+6*
>> ZTQUEUED	QUEUE+1
>> ZTREQ	QUEUE+1*
ZTRTN	CSVOPT+4~, CSVOPT+6*
ZTSK	CSVOPT+4~, CSVOPT+8

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORCMGMCK

Information

Source Information

Call Graph

Call Graph Total: 10

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

Naked Globals

Local Variables

Legend: