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: RAORDC

Package: Radiology Nuclear Medicine

Routine: RAORDC


Information

RAORDC ;HISC/CAH,FPT,GJC,DAD AISC/RMO-Check Request Status against Exam Status ; Mar 24, 2020@11:52:36

Source Information

Source file <RAORDC.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Radiology Nuclear Medicine 7 GETDOSE^RADUTL  EN2^RAO7CH  EXMCOM^RAORDC1  (,$$ORVR)^RAORDU  UNCOMPL^RAPCE1  $$EN1^RASETU  $$PCE^RAWORK  
VA FileMan 4 ^DIC  ^DIE  ^DIK  ^DIR  

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: 6

Package Total Caller Graph
Radiology Nuclear Medicine 6 RAEDCN  RAEDCN1  RAESO  RAMAG06A  RASTED  RAUTL1  

Entry Points

Name Comments DBIA/ICR reference
Q
EXMCAN ; Update request status to cancel or hold.
ASKCAN ;logic to determine whether studies tied to the order meet the criteria
EXMCOM ; Code moved to EXMCOM^RAORDC1 to save on space. To update request
; statuses for complete exams.
DELMOD
ADDMOD
YNCAN() ;ask if the order is to be canceled
REASON(RAOSTS) ;cancel/hold reason using DIR
; RAOSTS - the request status selected by the user.
; 1 = discontinued/cancel; 3 = hold
; return: IEN^.01 of IEN
; -1^ (if nothing selected, timeout or up arrow)

External References

Name Field # of Occurrence
^DIC ADDMOD
^DIE ASKCAN+30, ASKCAN+39
^DIK DELMOD
^DIR YNCAN+9, REASON+8
GETDOSE^RADUTL RAORDC+22
EN2^RAO7CH RAORDC+29
EXMCOM^RAORDC1 EXMCOM+2
^RAORDU RAORDC+10, ASKCAN+14, ASKCAN+42
$$ORVR^RAORDU RAORDC+29
UNCOMPL^RAPCE1 RAORDC+32
$$EN1^RASETU ASKCAN+8
$$PCE^RAWORK RAORDC+32

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"Please note, however, that more than one procedure is associated"
  • Line Location: ASKCAN+15
Function Call: WRITE
  • Prompt: !?5,"with the procedure's Parent request. The Parent request will not"
  • Line Location: ASKCAN+16
Function Call: WRITE
  • Prompt: !?5,"be canceled or put or hold unless all the registered descendent"
  • Line Location: ASKCAN+17
Function Call: WRITE
  • Prompt: !?5,"procedures are canceled or deleted.",!,$C(7)
  • Line Location: ASKCAN+18
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKCAN+23
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKCAN+39
Function Call: WRITE
  • Prompt: !?10,"...request status updated to ",$S(RAOSTS=1:"discontinued",1:"hold"),"."
  • Line Location: ASKCAN+42
Function Call: WRITE
  • Prompt: !
  • Line Location: REASON+8
Routine Call
  • DIC
  • Line Location:
    • ADDMOD
Routine Call
  • DIE
  • Line Location:
    • ASKCAN+30
    • ASKCAN+39
Routine Call
  • DIR
  • Line Location:
    • YNCAN+9
    • REASON+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RAO(75.1 - [#75.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] RAORDC+31
^RA(72 - [#72] RAORDC+9, RAORDC+21
^RA(75.2 - [#75.2] EXMCAN+4
^RA(79.2 - [#79.2] RAORDC+17
^RADPT - [#70] RAORDC+9, RAORDC+16, RAORDC+20
^RADPT("AO" ASKCAN+5, ASKCAN+6
^RAMIS(71.2 - [#71.2] ADDMOD
^RAO(75.1 - [#75.1] RAORDC+9, ADDMOD

Label References

Name Line Occurrences
$$REASON ASKCAN+35, ASKCAN+38
$$YNCAN ASKCAN+23
EXMCAN RAORDC+10
EXMCOM RAORDC+10
Q RAORDC+9

Naked Globals

Name Field # of Occurrence
^(0 RAORDC+9, ADDMOD*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% YNCAN+4~, REASON+5~
DA ASKCAN+28~, ASKCAN+29*, ASKCAN+39*!, DELMOD*!, ADDMOD!
DA(1 ASKCAN+29*, DELMOD*, ADDMOD*
DIC ASKCAN+39*!, ADDMOD*!
DIC(0 ASKCAN+39*, ADDMOD*
DIE ASKCAN+28~, ASKCAN+29*, ASKCAN+39*!
DIK DELMOD*!
DIR YNCAN+4~, REASON+5~
DIR("?" YNCAN+6*, YNCAN+7*
DIR("A" YNCAN+8*, REASON+7*
DIR("B" YNCAN+5*
DIR("S" REASON+8*
DIR(0 YNCAN+5*, REASON+6*
DIROUT YNCAN+4~
DIRUT YNCAN+4~, REASON+5~, REASON+9
>> DLAYGO ADDMOD*
DR ASKCAN+28~, ASKCAN+29*, ASKCAN+39*!
DTOUT YNCAN+4~, REASON+5~
DUOUT YNCAN+4~, REASON+5~
>> N Q+1, Q+2
>> RA ASKCAN+5*, ASKCAN+6
RABLNK Q!
RACAT Q!
>> RACNI RAORDC+9, RAORDC+20, RAORDC+32
>> RADELFLG RAORDC+9, EXMCAN+4, ASKCAN+26
>> RADFN RAORDC+9, RAORDC+16, RAORDC+20, RAORDC+32, ASKCAN+5, ASKCAN+6, ASKCAN+8, ASKCAN+29
>> RADTI RAORDC+9, RAORDC+16, RAORDC+20, RAORDC+32, ASKCAN+5, ASKCAN+6, ASKCAN+29
RAESTAT ASKCAN+8~*, ASKCAN+11, ASKCAN+14
RAEXM0 RAORDC+9*, RAORDC+31, Q!
RAEXOR RAORDC+9*, RAORDC+10, Q!
RAILP Q!, ADDMOD
RAIT RAORDC+16~, RAORDC+17*, RAORDC+18, RAORDC+19*
RAMIFN Q!, DELMOD
RAMOD Q!
RAMODA Q!, ADDMOD*
RAMODD Q!, DELMOD*
RAOIFN RAORDC+9*, RAORDC+29, Q!, ASKCAN+5, ASKCAN+6, ASKCAN+8, ASKCAN+39, DELMOD, ADDMOD
RAORD0 RAORDC+9*, RAORDC+10, Q!
RAORDB4 RAORDC+9*, RAORDC+25, Q!
RAOREA Q+1!, Q+2!, EXMCAN+4*, ASKCAN+35*, ASKCAN+38*
RAOREA( Q+2!
RAOSTS RAORDC+10*, RAORDC+15, RAORDC+25, Q!, ASKCAN+14*, ASKCAN+23*, ASKCAN+26, ASKCAN+34, ASKCAN+35, ASKCAN+37
, ASKCAN+38, ASKCAN+42, REASON~, REASON+7
RAPRC Q!
RAREAY REASON+5~, REASON+9, REASON+10*, REASON+12*, REASON+13
RARSH Q!
RAS ASKCAN+35~*, ASKCAN+38~*
RASHA Q!
>> RAUSUNXF ASKCAN+23*
RAXIT EXMCAN+3~*, ASKCAN+6, ASKCAN+12*
RAY2 RAORDC+16~*, RAORDC+17
RAY3 RAORDC+16~, RAORDC+20*, RAORDC+21
U RAORDC+17, RAORDC+21
X Q!, ADDMOD*, REASON+5~
Y YNCAN+12, REASON+5~, REASON+12
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