Routine: ORWCSP

Package	Total	Call Graph
Kernel	2	^%ZTLOAD $$FMTE^XLFDT
Order Entry Results Reporting	1	RPT^ORWCS
Registration	1	PID^VADPT6

Package	Total	Caller Graph
Order Entry Results Reporting	1	ORWRAP

Entry Points

Name	Comments	DBIA/ICR reference
PRINTQ
TASKQ
OUTPUT(ROOT,HDRDATA)	; -- generic print report
DEQUE	; -- logic to print queued consult report
INIT(HDRDATA)	; -- init generic header data
CHKQ
TASK(ORY,ORIO,DFN,ORID,TASKDATA)	;
DEQUEQ
CHK()	; -- do checks for required data ; -- this check assumes all parameters in PRINT call are available
PRINT(ORY,ORIO,DFN,ORID)
HDR(ORY)	; -- print generic header

Name	Line Occurrences
Function Call: WRITE	Prompt: !,@ROOT@(I,0) Line Location: OUTPUT+7
Function Call: WRITE	Prompt: @IOF Line Location: HDR+5
Function Call: WRITE	Prompt: !,ORY("TITLE"),?71,"Page: ",ORY("PAGE") Line Location: HDR+6
Function Call: WRITE	Prompt: !,"Name: ",ORY("NAME"),?37,"ID: ",ORY("PID"),?56,"DOB: ",ORY("DOB") Line Location: HDR+7
Function Call: WRITE	Prompt: !,LINE,! Line Location: HDR+8

RPC Name	Call Tags
ORWCS PRINT REPORT	PRINT

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	CHK+10, INIT+6

Name	Field # of Occurrence
DFN	PRINT~, PRINT+9, TASK~, CHK+10, DEQUE+4, DEQUE+8, INIT+1~, INIT+2*, INIT+6
DFN0	INIT+1~, INIT+6*, INIT+8
FALSE	CHK+3~, CHK+4*, CHK+6, CHK+8, CHK+10
HDRDATA	DEQUE+1~, DEQUE+9, OUTPUT~, OUTPUT+2, OUTPUT+3, OUTPUT+6, INIT~
HDRDATA("DFN"	DEQUE+8*, INIT+2
HDRDATA("DOB"	INIT+8*
HDRDATA("LCNT"	OUTPUT+5, OUTPUT+6, INIT+4
HDRDATA("NAME"	INIT+6*
HDRDATA("PAGE"	INIT+3*
HDRDATA("PID"	INIT+7*
HDRDATA("TITLE"	DEQUE+7*
I	OUTPUT+1~, OUTPUT+4*, OUTPUT+7
IOF	HDR+5
IOSL	OUTPUT+6
LINE	HDR+1~, HDR+3*, HDR+8
ORID	PRINT~, PRINT+9, TASK~, CHK+8, DEQUE+4
ORIO	PRINT~, PRINT+9, TASK~, TASK+3, CHK+6
OROK	CHK+3~, CHK+6, CHK+8, CHK+10, CHK+12, CHKQ
ORRPT	CHK+3~
ORY	PRINT~, PRINT+9, TASK~, TASK+9, TASK+11, CHK+6, CHK+8, CHK+10*, HDR~
ORY("DOB"	HDR+7
ORY("LCNT"	HDR+2*
ORY("NAME"	HDR+7
ORY("PAGE"	HDR+2*, HDR+6
ORY("PID"	HDR+7
ORY("TITLE"	HDR+6
ROOT	DEQUE+1~, DEQUE+4, DEQUE+9, OUTPUT~, OUTPUT+4, OUTPUT+7
TASKDATA	PRINT+6~, PRINT+9, TASK~
TASKDATA("DESC"	PRINT+7*, TASK+4
TASKDATA("RTN"	PRINT+8*, TASK+5
TRUE	CHK+3~, CHK+4*, CHK+12
U	INIT+6, INIT+8
VA	INIT+1~
VA("PID"	INIT+7
X	INIT+1~, INIT+8*
ZTDESC	TASK+2~, TASK+4*
ZTDTH	TASK+2~, TASK+3*
>> ZTIO	TASK+3*
ZTRTN	TASK+2~, TASK+5*
ZTSAVE	TASK+2~
ZTSAVE("DFN"	TASK+6*
ZTSAVE("DUZ("	TASK+6*
ZTSAVE("ORID"	TASK+6*
ZTSK	TASK+2~, TASK+8, TASK+9