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 |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ORLP00

Package: Order Entry Results Reporting

Routine: ORLP00


Information

ORLP00 ; slc/dcm,cla - Modify Patient Lists ;8/13/91 15:06

Source Information

Source file <ORLP00.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Order Entry Results Reporting 4 ADD^ORLP0  (CLIN,PROV,SPEC,WARD)^ORLP01  STOR^ORLP1  EN^ORUS  
VA FileMan 2 YN^DICN  ^DIR  
Toolkit 1 $$GET^XPAR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Order Entry Results Reporting 3 ORLP  ORLP DELETE PATIENT  ORLP0  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
DEL ;Delete items from patient list
L1
END
ASKPT(TEAM) ;from ^ORLPL or internally - ask for patients

External References

Name Field # of Occurrence
YN^DICN L1+12
^DIR ASKPT+11
ADD^ORLP0 ASKPT+12
CLIN^ORLP01 ASKPT+14
PROV^ORLP01 ASKPT+15
SPEC^ORLP01 ASKPT+16
WARD^ORLP01 ASKPT+13
STOR^ORLP1 L1+11
EN^ORUS L1+4
$$GET^XPAR L1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"You must build a Patient List before using this option"
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: !
  • Line Location: L1+6
Function Call: WRITE
  • Prompt: !,"..."_$P(Y(I),"^",2)_" removed"
  • Line Location: L1+8
Function Call: WRITE
  • Prompt: !!,"Show modified working list"
  • Line Location: L1+12
Routine Call
  • DIR
  • Line Location:
    • ASKPT+11

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XUTL("OR" DEL+1, L1+2, L1+7, L1+8!, L1+9!, L1+10*, ASKPT+12!, ASKPT+13!, ASKPT+14!, ASKPT+15!
, ASKPT+16!

Label References

Name Line Occurrences
END L1+5, L1+13
L1 L1+12

Naked Globals

Name Field # of Occurrence
^("ORU" L1+9!, ASKPT+12!, ASKPT+13!, ASKPT+14!, ASKPT+15!, ASKPT+16!
^("ORV" ASKPT+12!, ASKPT+13!, ASKPT+14!, ASKPT+15!, ASKPT+16!
^("ORW" L1+9!, ASKPT+12!, ASKPT+13!, ASKPT+14!, ASKPT+15!, ASKPT+16!
^(0 L1+2, L1+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % L1+12*
>> C L1+9*, L1+10
DIR ASKPT+3!, ASKPT+11!
DIR("?" ASKPT+5*, ASKPT+6*, ASKPT+7*, ASKPT+8*, ASKPT+9*, ASKPT+10*
DIR("A" ASKPT+4*
DIR(0 ASKPT+3*
>> DTOUT ASKPT+2
>> DUOUT ASKPT+2
DUZ L1
>> I L1+6*, L1+7*, L1+8, L1+9*
>> ORCNT ASKPT+12*, ASKPT+13*, ASKPT+14*, ASKPT+15*, ASKPT+16*
ORDIR ASKPT+1~, ASKPT+2, ASKPT+11*
OROPREF L1*, END!
ORUS L1*, END!
ORUS("A" L1+1*
ORUS("F" L1+2*
ORUS("H" L1+3*
ORUS("T" L1*
ORUS("W" L1+1*
ORUS(0 L1*
TEAM ASKPT~
>> X L1+7*, L1+8
Y L1+5, END!, ASKPT+1~, ASKPT+11, ASKPT+12, ASKPT+13, ASKPT+14, ASKPT+15, ASKPT+16
Y( L1+7, L1+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All