Routine: OCXOCMP6

Information

OCXOCMP6 ;SLC/RJS,CLA - ORDER CHECK CODE COMPILER (Assemble Order Check Routines) ;1/05/04 14:33

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
Order Entry Results Reporting	3	($$SIZE,APPEND,FILE)^OCXOCMP8 (CALL,DOC)^OCXOCMPT WARN^OCXOCMPV
VA FileMan	1	^%DT

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Order Entry Results Reporting	1	OCXOCMP

Entry Points

Name	Comments	DBIA/ICR reference
EN()	;
GETHDR(RNUM)	;
RNAM(X)	;
TODAY()
NOW()

External References

Name	Field # of Occurrence
^%DT	TODAY, NOW
$$SIZE^OCXOCMP8	EN+22
APPEND^OCXOCMP8	EN+33, EN+34, EN+37, EN+49, EN+50
FILE^OCXOCMP8	EN+99, EN+100
CALL^OCXOCMPT	EN+87
DOC^OCXOCMPT	EN+6
WARN^OCXOCMPV	EN+66, EN+75

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Condition for execution: ($X>60) Line Location: EN+10
Function Call: WRITE	Prompt: "." Line Location: EN+10
Function Call: WRITE	Prompt: ! Condition for execution: ($X>60) Line Location: EN+19
Function Call: WRITE	Prompt: "." Line Location: EN+19
Function Call: WRITE	Prompt: ! Condition for execution: ($X>60) Line Location: EN+54
Function Call: WRITE	Prompt: "." Line Location: EN+54
Function Call: WRITE	Prompt: ! Condition for execution: ($X>60) Line Location: EN+98
Function Call: WRITE	Prompt: "." Line Location: EN+98

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("DEL"	EN+90
^%ZOSF("SAVE"	EN+90
^%ZOSF("TEST"	EN+90
^DD("DD"	TODAY, NOW
^OCXS(860.3 - [#860.3]	EN+8!, EN+9, EN+10!, EN+39*
^TMP("OCXCMP"	EN+6, EN+12!, EN+17, EN+20, EN+23, EN+27, EN+30, EN+40, EN+43, EN+46 , EN+53, EN+57, EN+65, EN+82!, EN+83, EN+87, EN+96, EN+97, EN+100, GETHDR+30*
^VA(200 - [#200]	GETHDR+22

Label References

Name	Line Occurrences
$$NOW	GETHDR+3
$$RNAM	EN+39, EN+40, EN+56, EN+93, GETHDR+3
GETHDR	EN+16, EN+35

Naked Globals

Name	Field # of Occurrence
^("CALLS"	EN+27, EN+43

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	TODAY~, NOW~
ALT	EN+55~
CHAR	RNAM+1~, RNAM+2*, RNAM+3
CNT	EN+70~, EN+71*, EN+73
D0	EN+70~, EN+71*, EN+72, GETHDR+2~
DUZ	GETHDR+22
EFC	GETHDR+2~
LABL	EN+55~, EN+63, EN+64, EN+65, EN+66, EN+67, EN+69, EN+72, EN+73*, EN+75 , EN+77
OBJ	EN+55~
>> OCXAUTO	EN+5, EN+10, EN+14, EN+19, EN+52, EN+54, EN+86, EN+89, EN+92, EN+93 , EN+95, EN+98, GETHDR+21
OCXCCODE	EN+18~
>> OCXCLL	GETHDR+14
>> OCXCRS	EN+24, GETHDR+15
OCXD0	EN+3~, EN+6, EN+9, EN+10, EN+15, EN+17, EN+20, EN+22, EN+23, EN+37 , EN+40, EN+53, EN+56, EN+57, EN+82, EN+83, EN+87, EN+96, EN+97, EN+99 , EN+100*
OCXD1	EN+3~, EN+58*, EN+60, EN+71, EN+80
OCXDCODE	EN+18~
>> OCXDEL	EN+90*, EN+93
>> OCXDLOG	GETHDR+20
OCXEFF	GETHDR+2~
OCXEXF	EN+18~, EN+26!, EN+27, EN+29, EN+30, EN+42!, EN+43, EN+45, EN+46
OCXEXF(	EN+28, EN+29, EN+31, EN+32, EN+44, EN+45, EN+47, EN+48
OCXFILE	EN+18~, EN+24*, EN+25
OCXLAST	EN+18~, EN+23*, EN+24, EN+41
OCXLLAB	EN+18~, EN+20*, EN+21, EN+37, EN+38, EN+39
OCXOFF	EN+3~, EN+58*
OCXREC	GETHDR+2~, GETHDR+30
OCXREC(1	GETHDR+3*
OCXREC(10	GETHDR+12*
OCXREC(11	GETHDR+14, GETHDR+27
OCXREC(12	GETHDR+15, GETHDR+28
OCXREC(13	GETHDR+16*
OCXREC(14	GETHDR+17*
OCXREC(15	GETHDR+18*
OCXREC(16	GETHDR+19*
OCXREC(17	GETHDR+20*
OCXREC(18	GETHDR+21*
OCXREC(19	GETHDR+22*
OCXREC(2	GETHDR+4*
OCXREC(20	GETHDR+23*
OCXREC(21	GETHDR+24*
OCXREC(3	GETHDR+5*
OCXREC(4	GETHDR+6*
OCXREC(5	GETHDR+7*
OCXREC(6	GETHDR+8*
OCXREC(7	GETHDR+9*
OCXREC(8	GETHDR+10*
OCXREC(9	GETHDR+11*
OCXRN	EN+3~, EN+15, EN+22, EN+27, EN+33, EN+34, EN+35, EN+37, EN+39, EN+40 , EN+43, EN+49, EN+50, EN+91*, EN+92, EN+93
>> OCXRTEST	EN+90*, EN+93
>> OCXSAVE	EN+90*
OCXSCNT	EN+3~
OCXSIZE	EN+18~, EN+22*, EN+24
OCXSKIP	EN+18~, EN+21*, EN+24
OCXSUB	EN+18~, EN+28, EN+29, EN+30, EN+31, EN+32, EN+33, EN+44, EN+45, EN+46* , EN+47, EN+48*, EN+49
>> OCXTRACE	GETHDR+18
>> OCXTSPI	GETHDR+16
>> OCXWARN	EN+2, EN+17, EN+53, EN+58, EN+62, EN+85, EN+97, EN+102
PIEC	EN+55~, EN+59~, EN+62*, EN+63, EN+77, GETHDR+2~
RNUM	GETHDR~, GETHDR+3, GETHDR+13, GETHDR+30
RTN	EN+55~, EN+56*, EN+67, EN+73
TEMP	EN+55~, EN+57!*, EN+83
TEMP(	EN+58, EN+60, EN+71, EN+72, EN+80*
TEXT	EN+55~, EN+59~, EN+60, EN+62, EN+63, EN+66, EN+77, EN+79*, EN+80, GETHDR+2~
U	EN+39, EN+40, EN+73, GETHDR+22
X	EN+93, RNAM~, RNAM+3, TODAY~, NOW~*
Y	TODAY~, NOW~*

Marked Items

Name	Field # of Occurrence
$T(	EN+66, EN+75, GETHDR+4, GETHDR+5

Customize PDF page

Package: Order Entry Results Reporting