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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ORLP1

Package: Order Entry Results Reporting

Routine: ORLP1


Information

ORLP1 ; SLC/DCM,CLA - Patient Lists, Store ; 1/19/11 10:12am

Source Information

Source file <ORLP1.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 5 ^DIC  YN^DICN  ^DIE  ^DIK  ^DIR  
Order Entry Results Reporting 3 (BUILD,PR2)^ORLA1  CLEAR^ORLP  (ASK,END,LIST,P1)^ORLP0  
Consult Request Tracking 1 CLNLIST^GMRCTU  
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: 7

Package Total Caller Graph
Order Entry Results Reporting 7 ORLP  ORLP CLEAR  ORLP DELETE  ORLP MERGE  ORLP TEAM DELETE  ORLP0  ORLP00  

Entry Points

Name Comments DBIA/ICR reference
STOR ;called by ORLP0 - Store lists
GETNAME ; Call DIR to get user entry for new list name:
OVRWR ;
MERG ;called by option ORLP MERG - merge patient lists
DEL ;called by option ORLP DELETE - delete a list
D2 ;
D1 ;
CLEAR(X) ;called by option ORLP CLEAR - clear active list
NAMCH(ORTEAM) ; Check for name duplication, proper team type.
OWNER ; Get input from CAC for list user/owner.

External References

Name Field # of Occurrence
^DIC GETNAME+11, OVRWR+29, OVRWR+40, OVRWR+45, DEL+3
YN^DICN STOR+3, OVRWR+15, D2+2, D1+3, CLEAR+4
^DIE OVRWR+38
^DIK OVRWR+22, D1+9
^DIR GETNAME+7, OWNER+16
CLNLIST^GMRCTU D1+14
BUILD^ORLA1 MERG+14
PR2^ORLA1 MERG+10
CLEAR^ORLP MERG+1
ASK^ORLP0 MERG+2
END^ORLP0 MERG+9, MERG+13
LIST^ORLP0 MERG+12
P1^ORLP0 MERG+7
$$GET^XPAR D2+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Store list for future reference"
  • Line Location: STOR+2
Function Call: WRITE
  • Prompt: !,"You may store the newly compiled list. Answer YES or NO."
  • Line Location: STOR+4
Function Call: WRITE
  • Prompt: " List not permanently stored."
  • Line Location: GETNAME+8
Function Call: WRITE
  • Prompt: !,"List ",ORLN," unchanged.",!
  • Line Location: OVRWR+16
Function Call: WRITE
  • Prompt: !,"Answer YES or NO, if you answer YES the list "_ORLN_" will be cleared,",!,"and this temporary list will overwrite it.",!
  • Line Location: OVRWR+17
Function Call: WRITE
  • Prompt: !,"Another user is editing this entry."
  • Line Location: OVRWR+19
Function Call: WRITE
  • Prompt: !,"Another user is editing this entry."
  • Line Location: OVRWR+43
Function Call: WRITE
  • Prompt: !!,"List has been stored."
  • Line Location: OVRWR+48
Function Call: WRITE
  • Prompt: @IOF,!,"Merging patients from two or more Personal and/or Team patient lists.",!
  • Line Location: MERG+5
Function Call: WRITE
  • Prompt: !!,ORCT_" Patients added, "_ORCNT_" total"
  • Line Location: MERG+7
Function Call: WRITE
  • Prompt: !!,"List empty.",!
  • Line Location: MERG+9
Function Call: WRITE
  • Prompt: !!,"LIST PATIENTS MERGED"
  • Line Location: MERG+11
Function Call: WRITE
  • Prompt: !!,"This is your primary patient list, are you sure you want to remove it"
  • Line Location: D2+2
Function Call: WRITE
  • Prompt: !,"Answer YES if you really want to remove this list."
  • Line Location: D2+3
Function Call: WRITE
  • Prompt: !!,"WARNING - Deleting a patient list will disable access by providers who use the",!,"list as their preferred patient list."
  • Line Location: D2+5
Function Call: WRITE
  • Prompt: !,"Another user is editing this entry."
  • Line Location: D1+1
Function Call: WRITE
  • Prompt: !,"Are you ready to delete list ",$P(ORPTEAM,"^",2)
  • Line Location: D1+2
Function Call: WRITE
  • Prompt: !,"Enter YES to delete the list, NO to quit."
  • Line Location: D1+4
Function Call: WRITE
  • Prompt: !,"Processing........"
  • Line Location: D1+6
Function Call: WRITE
  • Prompt: !,"Searching for/removing Consults pointers to deleted team..."
  • Line Location: D1+13
Function Call: WRITE
  • Prompt: !,"List deletion completed.",!
  • Line Location: D1+16
Function Call: WRITE
  • Prompt: !!,"No list currently defined"
  • Line Location: CLEAR+1
Function Call: WRITE
  • Prompt: !!,"Are you sure you want to clear the current pt selection list"
  • Line Location: CLEAR+3
Function Call: WRITE
  • Prompt: !!,"YES will clear the current pt selection list and leave you with a blank slate to work from."
  • Line Location: CLEAR+6
Function Call: WRITE
  • Prompt: !!,"List cleared"
  • Line Location: CLEAR+7
Function Call: WRITE
  • Prompt: !!,"Nothing done."
  • Line Location: CLEAR+8
Routine Call
  • DIC
  • Line Location:
    • GETNAME+11
    • OVRWR+29
    • OVRWR+40
    • OVRWR+45
    • DEL+3
Routine Call
  • DIE
  • Line Location:
    • OVRWR+38
Routine Call
  • DIR
  • Line Location:
    • GETNAME+7
    • OWNER+16

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^OR(100.21 - [#100.21] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OR(100.21 - [#100.21] OVRWR+12, OVRWR+19, OVRWR+20, OVRWR+21, OVRWR+22, OVRWR+23, OVRWR+36, OVRWR+40, OVRWR+43, OVRWR+47
D1+1, D1+17, NAMCH+7, NAMCH+14, OWNER+21*
^TMP("ORLP" D1+18!
^XUTL("OR" OVRWR+45, CLEAR+1, CLEAR+7!

Label References

Name Line Occurrences
$$NAMCH OVRWR+7
D1 D1+4
D2 D2+3
DEL D1+19
GETNAME OVRWR+8, OVRWR+24
STOR STOR+4, MERG+13

Naked Globals

Name Field # of Occurrence
^( OVRWR+45
^("ORU" CLEAR+7!
^("ORV" CLEAR+7!
^("ORW" CLEAR+7!
^(0 OVRWR+20*, OVRWR+21*, OVRWR+45

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% STOR+1~, STOR+3*, STOR+4, STOR+5, OVRWR+12, OVRWR+13, OVRWR+15*, OVRWR+16, OVRWR+17, D2+1*
D2+2*, D2+3, D2+4, D1+3*, D1+4, D1+5, CLEAR+4*, CLEAR+5, CLEAR+6, CLEAR+7
DA STOR+1~, OVRWR+22*, OVRWR+37*, OVRWR+39!, D1+8*, D1+10!
DA(1 OVRWR+22*, OVRWR+40*, OVRWR+45*
DIC STOR+1~, GETNAME+10*, GETNAME+13!, OVRWR+28*, OVRWR+32!, OVRWR+40*!, OVRWR+45*, OVRWR+46!, MERG+6*, MERG+15!
DEL+1*, DEL+2*, DEL+4!, D1+10!
DIC("A" MERG+7*, DEL+1*, DEL+2*
DIC("S" MERG+6*, DEL+1*, DEL+2*
DIC(0 OVRWR+28*, OVRWR+40*, OVRWR+45*, MERG+6*, DEL+1*, DEL+2*
DIE OVRWR+37*, OVRWR+39!
DIK STOR+1~, OVRWR+22*, D1+8*, D1+10!
DILOCKTM OVRWR+19, OVRWR+43, D1+1
DIR STOR+1~, OWNER+8~, OWNER+18!
DIR("?" OWNER+15*
DIR("A" GETNAME+6*, OWNER+13*
DIR("S" OWNER+14*
DIR(0 GETNAME+6*, OWNER+12*
DIRUT GETNAME+8!
DLAYGO STOR+1~, OVRWR+28*
DR STOR+1~, OVRWR+37*
>> DTOUT MERG+8
>> DUOUT MERG+8
DUZ OVRWR+40, D2+2, NAMCH+14
ERROR OVRWR+2~, OVRWR+11, OVRWR+19*
I STOR+1~, OVRWR+22*
IOF MERG+5
J STOR+1~
ORABORT OVRWR+1~, OVRWR+3*, OVRWR+7*, OVRWR+8, OVRWR+16*, OVRWR+18, OVRWR+24, OVRWR+30*, OVRWR+32
ORCEND MERG+15!
ORCLIN MERG+15!
ORCNT MERG+4*, MERG+7, MERG+9, MERG+15!, CLEAR+7*
ORCOLW MERG+15!
ORCSTRT MERG+15!
ORCT MERG+7*, MERG+15!
ORDEF MERG+15!
ORI OVRWR+44*, OVRWR+45*, OVRWR+46!
ORK MERG+7*, MERG+15!
ORLIST STOR+1~, GETNAME+13*, OVRWR+7, OVRWR+19, OVRWR+20, OVRWR+21, OVRWR+22, OVRWR+23, OVRWR+31*, OVRWR+36
OVRWR+37, OVRWR+40, OVRWR+43, OVRWR+45, OVRWR+47, NAMCH+9!, NAMCH+16!
ORLN STOR+1~, GETNAME+9*, GETNAME+13*, OVRWR+14, OVRWR+16, OVRWR+17, NAMCH+9!, NAMCH+16!
ORLPDUZ D1+18!
>> ORLST DEL+1, DEL+2
ORNEWL GETNAME+3~, GETNAME+4*, GETNAME+13*, OVRWR+6, OVRWR+11, OVRWR+27, OVRWR+35
>> OROPREF MERG+10
>> OROWNER OWNER+11*, OWNER+17*, OWNER+19*, OWNER+20*, OWNER+21
ORPRIM MERG+15!
ORPROV MERG+15!
ORPTEAM DEL+6*, D2+2, D1+1, D1+2, D1+8, D1+14, D1+17, D1+18!
ORSPEC MERG+15!
ORTEAM NAMCH~, NAMCH+7, NAMCH+14
ORTITLE MERG+15!
ORTNAM GETNAME+1~, GETNAME+2*, GETNAME+9*, NAMCH+8, NAMCH+15
ORUPNM MERG+15!
ORUSSN MERG+15!
ORWARD MERG+15!
>> ORY MERG+7
>> ORYY OWNER+21
U GETNAME+13, OVRWR+36, NAMCH+7, OWNER+21
X STOR+1~, GETNAME+5, GETNAME+8, GETNAME+9, GETNAME+10*, GETNAME+12, OVRWR+30, OVRWR+40*, OVRWR+45*, MERG+2
MERG+3, CLEAR~, CLEAR+1*, CLEAR+2, CLEAR+5*, CLEAR+6*, CLEAR+7*, CLEAR+9*, NAMCH+9!, NAMCH+16!
OWNER+8~, OWNER+18!
XX D1+18!
Y STOR+1~, GETNAME+13*, OVRWR+12, OVRWR+30, OVRWR+31, MERG+15!, DEL+5, DEL+6, D1+18!, NAMCH+9!
, NAMCH+16!, OWNER+8~, OWNER+17, OWNER+18!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All