Routine: ORS100A

Package	Total	Call Graph
Kernel	2	^%ZISC $$FMTE^XLFDT
Order Entry Results Reporting	2	($$DIV,$$LOC,$$SER,$$STAT,$$USER,HDR,STATS)^ORS100 (DIV,SERV,WHO)^ORS100B
Registration	1	DEM^VADPT

Package

Total

Call Graph

Kernel

^%ZISC $$FMTE^XLFDT

Order Entry Results Reporting

($$DIV,$$LOC,$$SER,$$STAT,$$USER,HDR,STATS)^ORS100 (DIV,SERV,WHO)^ORS100B

Registration

DEM^VADPT

Package	Total	Caller Graph
Order Entry Results Reporting	1	ORS100

Package

Total

Caller Graph

Order Entry Results Reporting

ORS100

Entry Points

Name	Comments	DBIA/ICR reference
PAT	;loops thru the TMP global for output sort by patient
PROV	;loops thru the TMP global for output sort by provider
SPROV	;sorts for a single provider
EXIT
LOOP	;called from ORS100
SWARD	;sorts for a single location
WARD	;loops thru the TMP global for output sort by location
SPAT	;sorts for a single patient

External References

Name	Field # of Occurrence
^%ZISC	EXIT+1
$$DIV^ORS100	LOOP+20
$$LOC^ORS100	LOOP+19
$$SER^ORS100	LOOP+13
$$STAT^ORS100	LOOP+18
$$USER^ORS100	LOOP+12, LOOP+15, LOOP+16
HDR^ORS100	PROV+6, PROV+11, SPROV+6, SPROV+10, PAT+6, PAT+11, SPAT+6, SPAT+10, WARD+6, WARD+11 , SWARD+6, SWARD+10
STATS^ORS100	SWARD+16
DIV^ORS100B	SWARD+15
SERV^ORS100B	SWARD+13
WHO^ORS100B	SWARD+14
DEM^VADPT	LOOP+17
$$FMTE^XLFDT	LOOP+21

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No unsigned orders found" Line Location: PROV+7
Function Call: WRITE	Prompt: $P(^(IEN),U),?25,$P(^(IEN),U,2),?50,$P(^(IEN),U,3),?75,$P(^(IEN),U,4),?81,$P(^(IEN),U,5),?95,$P(^(IEN),U,6),?110,$P(^(IEN),U,7),! Line Location: PROV+11
Function Call: WRITE	Prompt: $P(^(IEN),U),?25,$P(^(IEN),U,2),?50,$P(^(IEN),U,3),?75,$P(^(IEN),U,4),?81,$P(^(IEN),U,5),?95,$P(^(IEN),U,6),?110,$P(^(IEN),U,7),! Line Location: SPROV+10
Function Call: WRITE	Prompt: !!,"No unsigned orders found for "_LONER Line Location: SPROV+12
Function Call: WRITE	Prompt: !,"No unsigned orders found" Line Location: PAT+7
Function Call: WRITE	Prompt: $P(^(IEN),U),?25,$P(^(IEN),U,2),?30,$P(^(IEN),U,3),?55,$P(^(IEN),U,4),?81,$P(^(IEN),U,5),?95,$P(^(IEN),U,6),?110,$P(^(IEN),U,7),! Line Location: PAT+11
Function Call: WRITE	Prompt: @IOF,@HDR Line Location: PAT+13
Function Call: WRITE	Prompt: $P(^(IEN),U),?25,$P(^(IEN),U,2),?30,$P(^(IEN),U,3),?55,$P(^(IEN),U,4),?81,$P(^(IEN),U,5),?95,$P(^(IEN),U,6),?110,$P(^(IEN),U,7),! Line Location: SPAT+10
Function Call: WRITE	Prompt: !!,"No unsigned orders found for "_LONER Line Location: SPAT+12
Function Call: WRITE	Prompt: !,"No unsigned orders found" Line Location: WARD+7
Function Call: WRITE	Prompt: $P(^TMP("ORUNS",$J,LOC,PROV,IEN),U,2),?25,$P(^(IEN),U,3),?50,$P(^(IEN),U,4),?75,$P(^(IEN),U,5),?81,$P(^(IEN),U,6),?95,$P(^(IEN),U,7),?110,$P(^(IEN),U,8),! Line Location: WARD+11
Function Call: WRITE	Prompt: $P(^TMP("ORUNS",$J,LOC,PROV,IEN),U,2),?25,$P(^(IEN),U,3),?50,$P(^(IEN),U,4),?75,$P(^(IEN),U,5),?81,$P(^(IEN),U,6),?95,$P(^(IEN),U,7),?110,$P(^(IEN),U,8),! Line Location: SWARD+10
Function Call: WRITE	Prompt: !!,"No unsigned orders found for "_LONER Line Location: SWARD+12

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	LOOP+4
^OR(100 - [#100]	LOOP+3, LOOP+5, LOOP+6, LOOP+7, LOOP+8, LOOP+12, LOOP+13, LOOP+15, LOOP+16, LOOP+17 , LOOP+18, LOOP+19, LOOP+20, LOOP+21
^TMP("ORSTATS"	PROV+12, SPROV+11, PAT+12, SPAT+11, WARD+12, SWARD+11, EXIT!
^TMP("ORUNS"	LOOP+22, LOOP+23, LOOP+24, LOOP+25, LOOP+26, LOOP+27, PROV+7, PROV+8, PROV+9, PROV+10 , SPROV+7, SPROV+8, SPROV+9, SPROV+12, PAT+7, PAT+8, PAT+9, PAT+10, SPAT+7, SPAT+8 , SPAT+9, SPAT+12, WARD+7, WARD+8, WARD+9, WARD+10, WARD+11, SWARD+7, SWARD+8, SWARD+9 , SWARD+10, SWARD+12, EXIT!
^VA(200 - [#200]	LOOP+12, LOOP+13, LOOP+15

Name	Field # of Occurrence
^(	PROV+11, SPROV+10, PAT+11, SPAT+10, WARD+11, SWARD+10
^(0	LOOP+8, LOOP+9, LOOP+10, LOOP+19, LOOP+20, LOOP+21
^(3	LOOP+18
^(5	LOOP+13
^(6	LOOP+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CNT	PROV+9, PROV+10, PROV+12, SPROV+8, SPROV+9, SPROV+11, PAT+9, PAT+10, PAT+12, SPAT+8* , SPAT+9, SPAT+11, WARD+9, WARD+10, WARD+12, SWARD+8, SWARD+9*, SWARD+11
>> DATE	LOOP+5*, LOOP+6, LOOP+7
>> DFN	LOOP+17*
>> DIV	LOOP+11, LOOP+20, LOOP+27
>> EDATE	LOOP+5
>> HDR	PROV+2, PROV+3, PROV+4, SPROV+2, SPROV+3, SPROV+4, PAT+2, PAT+3, PAT+4, SPAT+2 , SPAT+3, SPAT+4, WARD+2, WARD+3, WARD+4, SWARD+2, SWARD+3, SWARD+4
>> HDR1	PROV+5, SPROV+5, PAT+5, SPAT+5, WARD+5, SWARD+5
>> IEN	LOOP+6, LOOP+7, LOOP+8, LOOP+12, LOOP+13, LOOP+15, LOOP+16, LOOP+17, LOOP+18, LOOP+19 , LOOP+20, LOOP+21, LOOP+22, LOOP+23, LOOP+24, LOOP+25, LOOP+26, LOOP+27, PROV+10, PROV+11 , SPROV+9, SPROV+10, PAT+10, PAT+11, SPAT+9, SPAT+10, WARD+10, WARD+11, SWARD+9*, SWARD+10
IOSL	PROV+11, SPROV+10, PAT+11, SPAT+10, WARD+11, SWARD+10
>> LOC	LOOP+11, LOOP+19, LOOP+25, LOOP+27, WARD+8, WARD+9, WARD+10, WARD+11, WARD+12, SWARD+7 , SWARD+8, SWARD+9, SWARD+10, SWARD+11, SWARD+12
>> LONER	PROV+1, SPROV+1, SPROV+7, SPROV+12, PAT+1, SPAT+1, SPAT+7, SPAT+12, WARD+1, SWARD+1* , SWARD+7, SWARD+12
>> LONER(	SPROV+1, SPAT+1, SWARD+1
>> PAGE	PROV+6, SPROV+1, PAT+6, SPAT+1, WARD+6, SWARD+1
>> PAT	LOOP+3*, LOOP+4, LOOP+5, LOOP+6, LOOP+7
>> PNM	LOOP+17, LOOP+22, LOOP+23, LOOP+24, LOOP+25, LOOP+26, LOOP+27, PROV+9, PROV+10, PROV+12 , SPROV+8, SPROV+9, SPROV+11, PAT+8, PAT+9, PAT+10, PAT+12, SPAT+7*, SPAT+8, SPAT+9 , SPAT+11, SPAT+12
>> PROV	LOOP+12, LOOP+22, LOOP+23, LOOP+24, LOOP+25, LOOP+26, LOOP+27, PROV+8, PROV+9, PROV+10 , PROV+12, SPROV+7, SPROV+8, SPROV+9, SPROV+11, SPROV+12, PAT+9, PAT+10, PAT+12, SPAT+8* , SPAT+9, SPAT+11, WARD+9, WARD+10, WARD+11, WARD+12, SWARD+8, SWARD+9, SWARD+10, SWARD+11
>> RPDT	LOOP+2*
>> SDATE	LOOP+5
>> SER	LOOP+13, LOOP+14, LOOP+22
>> SORT	LOOP+22, LOOP+23, LOOP+24, LOOP+25, LOOP+26, LOOP+27, PROV+1, SPROV+1, PAT+1, SPAT+1 , WARD+1, SWARD+1, SWARD+13, SWARD+14, SWARD+15
>> SSN	LOOP+17*, LOOP+22, LOOP+23, LOOP+24, LOOP+25, LOOP+26, LOOP+27
>> STATUS	LOOP+18*, LOOP+22, LOOP+23, LOOP+24, LOOP+25, LOOP+26, LOOP+27
>> STOP	LOOP+2*, LOOP+3, LOOP+5, LOOP+6, LOOP+7, PROV+8, PROV+9, PROV+10, PROV+11, SPROV+1 , SPROV+8, SPROV+9, SPROV+10, PAT+8, PAT+9, PAT+10, PAT+11, SPAT+1, SPAT+8, SPAT+9 , SPAT+10, WARD+8, WARD+9, WARD+10, WARD+11, SWARD+1, SWARD+8, SWARD+9, SWARD+10, SWARD+16
>> SUB	LOOP+7*, LOOP+8, LOOP+12, LOOP+13, LOOP+15, LOOP+21
>> SUMONLY	PROV+11, SPROV+10, PAT+11, SPAT+10, WARD+8, WARD+11, SWARD+10
>> TYPE	LOOP+9, LOOP+10, PROV+2, PROV+3, PROV+4, SPROV+2, SPROV+3, SPROV+4, PAT+2, PAT+3 , PAT+4, SPAT+2, SPAT+3, SPAT+4, WARD+2, WARD+3, WARD+4, SWARD+2, SWARD+3, SWARD+4
U	LOOP+4, LOOP+9, LOOP+10, LOOP+12, LOOP+13, LOOP+15, LOOP+16, LOOP+17, LOOP+18, LOOP+19 , LOOP+20, LOOP+21, LOOP+22, LOOP+23, LOOP+24, LOOP+25, LOOP+26, LOOP+27, PROV+11, SPROV+10 , PAT+11, SPAT+10, WARD+11, SWARD+10
>> VA("BID"	LOOP+17
>> VADM(1	LOOP+17
>> WHEN	LOOP+21*, LOOP+22, LOOP+23, LOOP+24, LOOP+25, LOOP+26, LOOP+27
>> WHO	LOOP+15, LOOP+16, LOOP+22, LOOP+23, LOOP+24, LOOP+25, LOOP+26, LOOP+27

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORS100A

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend: