Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ORLPSRA

Package: Order Entry Results Reporting

Routine: ORLPSRA


Information

ORLPSRA ;SLC/RAF - Continuation of ORLPSR ; 3/31/08 6:24am

Source Information

Source file <ORLPSRA.m>

Call Graph

Call Graph Total: 5

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Order Entry Results Reporting 1 ORLPSR  

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 ORLPSR
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^ORLPSR LOOP+24
$$LOC^ORLPSR LOOP+23
$$SER^ORLPSR LOOP+17
$$STAT^ORLPSR LOOP+22
$$USER^ORLPSR LOOP+16, LOOP+19, LOOP+20
HDR^ORLPSR 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^ORLPSR SWARD+16
DIV^ORLPSRB SWARD+15
SERV^ORLPSRB SWARD+13
WHO^ORLPSRB SWARD+14
DEM^VADPT LOOP+21
$$FMTE^XLFDT LOOP+25, LOOP+26

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No lapsed 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),?91,$P(^(IEN),U,6),?104,$P(^(IEN),U,7),?118,$P(^(IEN),U,8),!
  • 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),?91,$P(^(IEN),U,6),?104,$P(^(IEN),U,7),?118,$P(^(IEN),U,8),!
  • Line Location: SPROV+10
Function Call: WRITE
  • Prompt: !!,"No lapsed orders found for "_LONER
  • Line Location: SPROV+12
Function Call: WRITE
  • Prompt: !,"No lapsed 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),?91,$P(^(IEN),U,6),?104,$P(^(IEN),U,7),?118,$P(^(IEN),U,8),!
  • 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),?91,$P(^(IEN),U,6),?104,$P(^(IEN),U,7),?118,$P(^(IEN),U,8),!
  • Line Location: SPAT+10
Function Call: WRITE
  • Prompt: !!,"No lapsed orders found for "_LONER
  • Line Location: SPAT+12
Function Call: WRITE
  • Prompt: !,"No lapsed 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),?91,$P(^(IEN),U,7),?104,$P(^(IEN),U,8),?118,$P(^(IEN),U,9),!
  • 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),?91,$P(^(IEN),U,7),?104,$P(^(IEN),U,8),?118,$P(^(IEN),U,9),!
  • Line Location: SWARD+10
Function Call: WRITE
  • Prompt: !!,"No lapsed 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+16, LOOP+17, LOOP+19, LOOP+20
, LOOP+21, LOOP+22, LOOP+23, LOOP+24, LOOP+25, LOOP+26
^TMP("ORSTATS" PROV+12*, SPROV+11*, PAT+12*, SPAT+11*, WARD+12*, SWARD+11*, EXIT!
^TMP("ORUNS" LOOP+28*, LOOP+29*, LOOP+30*, LOOP+31*, LOOP+32*, LOOP+33*, 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+16, LOOP+17, LOOP+19

Naked Globals

Name Field # of Occurrence
^( PROV+11, SPROV+10, PAT+11, SPAT+10, WARD+11, SWARD+10
^(0 LOOP+23, LOOP+24, LOOP+25
^(10 LOOP+26
^(3 LOOP+22
^(5 LOOP+17
^(6 LOOP+20

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, LOOP+12
>> DFN LOOP+21*
>> DIV LOOP+15*, LOOP+24*, LOOP+33
>> 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+16, LOOP+17, LOOP+19, LOOP+20, LOOP+21, LOOP+22
, LOOP+23, LOOP+24, LOOP+25, LOOP+26, LOOP+28, LOOP+29, LOOP+30, LOOP+31, LOOP+32, LOOP+33
, 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
LDATE LOOP+14~*, LOOP+26*, LOOP+28, LOOP+29, LOOP+30, LOOP+31, LOOP+32, LOOP+33
>> LOC LOOP+15*, LOOP+23*, LOOP+31, LOOP+33, 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
LTYPE LOOP+12~*, LOOP+13*, LOOP+27
>> PAGE PROV+6*, SPROV+1*, PAT+6*, SPAT+1*, WARD+6*, SWARD+1*
>> PAT LOOP+3*, LOOP+4, LOOP+5, LOOP+6, LOOP+7, LOOP+12
>> PNM LOOP+21*, LOOP+28, LOOP+29, LOOP+30, LOOP+31, LOOP+32, LOOP+33, 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+16*, LOOP+28, LOOP+29, LOOP+30, LOOP+31, LOOP+32, LOOP+33, 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+17*, LOOP+18*, LOOP+28
>> SORT LOOP+28, LOOP+29, LOOP+30, LOOP+31, LOOP+32, LOOP+33, PROV+1, SPROV+1, PAT+1, SPAT+1
, WARD+1, SWARD+1, SWARD+13, SWARD+14, SWARD+15
>> SSN LOOP+21*, LOOP+28, LOOP+29, LOOP+30, LOOP+31, LOOP+32, LOOP+33
>> STATUS LOOP+22*, LOOP+27*, LOOP+28, LOOP+29, LOOP+30, LOOP+31, LOOP+32, LOOP+33
>> 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+16, LOOP+17, LOOP+19, LOOP+25
>> SUMONLY PROV+11, SPROV+10, PAT+11, SPAT+10, WARD+8, WARD+11, SWARD+10
>> TYPE 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+16, LOOP+17, LOOP+19, LOOP+20, LOOP+21, LOOP+22, LOOP+23, LOOP+24, LOOP+25
, LOOP+26, LOOP+28, LOOP+29, LOOP+30, LOOP+31, LOOP+32, LOOP+33, PROV+11, SPROV+10, PAT+11
, SPAT+10, WARD+11, SWARD+10
>> VA("BID" LOOP+21
>> VADM(1 LOOP+21
>> WHEN LOOP+25*, LOOP+28, LOOP+29, LOOP+30, LOOP+31, LOOP+32, LOOP+33
>> WHO LOOP+19*, LOOP+20*, LOOP+28, LOOP+29, LOOP+30, LOOP+31, LOOP+32, LOOP+33
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All