Routine: OCXOZ01

Information

OCXOZ01 ;SLC/RJS,CLA - Order Check Scan ;JAN 28,2014 at 03:37

Source Information

Source file <OCXOZ01.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Order Entry Results Reporting	4	CHK1^OCXOZ02 CHK23^OCXOZ03 CHK58^OCXOZ05 CHK95^OCXOZ06
Kernel	1	($$FMTH,$$HL7TFM)^XLFDT
VA Fileman	1	^%DT

Caller Graph

Caller Graph Total: 16

Package	Total	Caller Graph
Order Entry Results Reporting	16	OCXGENE OCXOCMPV OCXODGPM OCXOEPS OCXOERR OCXOHL7 OCXOPURG OCXOTIME OCXOZ03 OCXOZ05 OCXOZ08 OCXOZ09 OCXOZ0A OCXOZ0E OCXOZ0F OCXOZ0Z

Entry Points

Name	Comments	DBIA/ICR reference
LOG()	; Returns the number of days to keep the Raw Data Log or 0 if logging is disabled. ; External Call.
SCAN	; Tests all Rules for Event/Elements that were found to be valid in the UPDATE subroutine. ; Called from UPDATE+15.
SWAPIN(NAME,ARRAY)	; ; Called from UPDATE+24.
SWAPOUT(NAME,ARRAY)	; ; Called from UPDATE+9.
TERM(OCXTERM,OCXLIST)	; Local Term Lookup ; Internal Call.
UPDATE(DFN,OCXSRC,OUTMSG)	; Main Entry point for evaluating Rules. ; External Call.
DT2INT(OCXDT)	; This Local Extrinsic Function converts a date into an integer ; By taking the Years, Months, Days, Hours and Minutes converting ; Them into Seconds and then adding them all together into one big integer
GETDF	;This subroutine loads the OCXDF data field array from variables in the environment. ; Called from UPDATE+9.
CDATA()	; Returns compiler flags, Execution TRACE ON/OFF, Time Logging ON/OFF, and Raw Data Logging ON/OFF ; External Call.

External References

Name	Field # of Occurrence
^%DT	DT2INT+28
CHK1^OCXOZ02	UPDATE+10
CHK23^OCXOZ03	UPDATE+11
CHK58^OCXOZ05	UPDATE+12
CHK95^OCXOZ06	UPDATE+13
$$FMTH^XLFDT	DT2INT+32
$$HL7TFM^XLFDT	DT2INT+30

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^OCXS(860.3 - [#860.3]	SCAN+8
^TMP("OCXCHK"	UPDATE+4!, UPDATE+5, UPDATE+22!, SCAN+6, SCAN+7, SCAN+10, SCAN+11!
^TMP("OCXSWAP"	SWAPOUT+6!, SWAPOUT+7, SWAPOUT+8, SWAPIN+7, SWAPIN+8!

Label References

Name	Line Occurrences
$$DT2INT	GETDF+30, GETDF+32
@(	SCAN+9
GETDF	UPDATE+9
SCAN	UPDATE+15
SWAPIN	UPDATE+24
SWAPOUT	UPDATE+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	DT2INT+28~*
ARRAY	SWAPOUT~, SWAPOUT+8, SWAPOUT+9!, SWAPIN~, SWAPIN+6!, SWAPIN+7*
DFN	UPDATE~, UPDATE+8, SCAN+6, SCAN+7, SCAN+10
FILE	TERM+7~, TERM+11, TERM+14
IEN	TERM+7~, TERM+11*, TERM+12
LINE	TERM+7~, TERM+8*
LTERM	TERM+7~, TERM+11*, TERM+12
NAME	SWAPOUT~, SWAPOUT+5, SWAPOUT+6, SWAPOUT+8, SWAPIN~, SWAPIN+5, SWAPIN+7, SWAPIN+8
NTERM	TERM+7~, TERM+10*
OCXD0	SCAN+6~*, SCAN+7, SCAN+8, SCAN+10
OCXDF	UPDATE+6~, UPDATE+24!
OCXDF(1	GETDF+26*
OCXDF(113	GETDF+40*
OCXDF(12	GETDF+31*
OCXDF(13	GETDF+32*
OCXDF(15	GETDF+33*
OCXDF(152	GETDF+41*
OCXDF(2	GETDF+27*
OCXDF(21	GETDF+34*
OCXDF(23	GETDF+35*
OCXDF(24	GETDF+36*
OCXDF(34	GETDF+37*
OCXDF(37	GETDF+38*
OCXDF(5	GETDF+28*
OCXDF(6	GETDF+29*
OCXDF(82	GETDF+39*
OCXDF(9	GETDF+30*
OCXDIFF	DT2INT+5~, DT2INT+27
OCXDT	DT2INT~, DT2INT+4, DT2INT+7, DT2INT+9, DT2INT+10, DT2INT+11, DT2INT+12, DT2INT+14, DT2INT+16, DT2INT+17 , DT2INT+18, DT2INT+20, DT2INT+22, DT2INT+23, DT2INT+24, DT2INT+26, DT2INT+27, DT2INT+28, DT2INT+30, DT2INT+32* , DT2INT+34
OCXHR	DT2INT+8~, DT2INT+9, DT2INT+10, DT2INT+11*, DT2INT+12
OCXLIST	TERM~, TERM+7!
OCXLIST(	TERM+12*
OCXLIST("B"	TERM+12*
OCXMIN	DT2INT+8~, DT2INT+9*, DT2INT+12
OCXMON	DT2INT+15~, DT2INT+16, DT2INT+17, DT2INT+18, DT2INT+21~, DT2INT+22, DT2INT+23, DT2INT+24
OCXNDX	UPDATE+6~
OCXNDX1	UPDATE+18~, UPDATE+19*, UPDATE+20, UPDATE+21
OCXNDX2	UPDATE+18~, UPDATE+20*, UPDATE+21
OCXOCMSG	UPDATE+6~
OCXOCMSG(	UPDATE+19, UPDATE+20, UPDATE+21
OCXOCMSG(""	UPDATE+17
>> OCXODATA	UPDATE+9, UPDATE+24
>> OCXODATA("OBR"	GETDF+28, GETDF+32, GETDF+35, GETDF+36, GETDF+41
>> OCXODATA("OBX"	GETDF+29, GETDF+31, GETDF+33, GETDF+40
>> OCXODATA("ORC"	GETDF+26, GETDF+27, GETDF+30, GETDF+34, GETDF+37
>> OCXODATA("PID"	GETDF+38
>> OCXODATA("RXO"	GETDF+39
OCXOERR	UPDATE+6~, GETDF+3, SWAPOUT+3, SWAPIN+3, SCAN+3, TERM+3
>> OCXOSRC	UPDATE+9, UPDATE+10, UPDATE+11, UPDATE+12, UPDATE+13, UPDATE+24
OCXPGM	SCAN+8~*, SCAN+9
OCXRULE	SCAN+6~
OCXSRC	UPDATE~
OCXTERM	TERM~, TERM+5, TERM+10
OCXTIME	DT2INT+8~, DT2INT+9*
OCXTSPI	UPDATE+6~, UPDATE+7*
OCXVAL	DT2INT+5~, DT2INT+34, DT2INT+36
OCXX	UPDATE+6~
OUTMSG	UPDATE~
OUTMSG(	UPDATE+20, UPDATE+21*
OUTMSG(999999	UPDATE+21
TEXT	TERM+7~, TERM+8, TERM+9, TERM+10, TERM+11
U	TERM+10, TERM+11, DT2INT+16, DT2INT+22
X	DT2INT+28~*
Y	DT2INT+28~

Marked Items

Name	Field # of Occurrence
$T(TERM+LINE	TERM+8

Customize PDF page

Package: Order Entry Results Reporting

Routine: OCXOZ01

Call Graph Total: 6

Caller Graph Total: 16