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

Package: Radiology Nuclear Medicine

Routine: RAPSET


Information

RAPSET ;HISC/CAH,FPT,GJC AISC/MJK,RMO-Set Sign-on parameters ; Aug 25, 2021@13:21:09

Source Information

Source file <RAPSET.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Radiology Nuclear Medicine 4 (,KILL,Q)^RAPSET1  $$IMGTY^RAUTL12  CHKSP^RAUTL2  VARACC^RAUTL6  
Kernel 1 (,HOME)^%ZIS  
VA FileMan 1 ^DIC  

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

Package Total Caller Graph
Radiology Nuclear Medicine 2 RAPSET1  RAREG  

Entry Points

Name Comments DBIA/ICR reference
LOC
LOC1
PAR
UNDEF ; Message for undefined imaging types
NOESC ; No up-arrow allowed at Flash Card, Jacket Label, or Report
; printer device prompts after selecting sign-on imaging location.

External References

Name Field # of Occurrence
^%ZIS PAR+5, PAR+8, PAR+11
HOME^%ZIS RAPSET+5, PAR+15
^DIC LOC1+10
^RAPSET1 PAR+15
KILL^RAPSET1 PAR+14
Q^RAPSET1 LOC, LOC1+11, LOC1+17
$$IMGTY^RAUTL12 PAR+13
CHKSP^RAUTL2 RAPSET+2
VARACC^RAUTL6 LOC1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"You must initialize at least one Radiology/Nuclear Medicine Division",!,"and one Imaging Location to proceed.",!,"Refer to the Radiology/Nuclear Medicine ADPAC Guide.",!!
  • Line Location: RAPSET+3
Function Call: WRITE
  • Prompt: !,*7,"Your user code 'DUZ' must be defined to continue."
  • Line Location: LOC+0
Function Call: WRITE
  • Prompt: !?3,*7,"You must choose an Imaging 'Location' to continue...",!?3,"or enter '^' to stop.",!
  • Line Location: LOC1+12
Function Call: WRITE
  • Prompt: !!,$C(7),"***Selected location is not assigned to a division!***",!
  • Line Location: LOC1+15
Function Call: WRITE
  • Prompt: !!,*7,"Imaging Location definition error. Call your site manager."
  • Line Location: LOC1+17
Function Call: WRITE
  • Prompt: !?5,"Imaging Location data is not defined, "
  • Line Location: UNDEF+3
Function Call: WRITE
  • Prompt: "contact IRM.",$C(7)
  • Line Location: UNDEF+4
Function Call: WRITE
  • Prompt: !?5,"An Imaging Type was not defined for the following Imaging"
  • Line Location: UNDEF+7
Function Call: WRITE
  • Prompt: $C(7),!,"No up-arrow allowed. Default printer will be your terminal."
  • Line Location: NOESC+2
Routine Call
  • %ZIS
  • Line Location:
    • PAR+5
    • PAR+8
    • PAR+11
Routine Call
  • %ZIS
  • Line Location:
    • RAPSET+5
    • PAR+15
Routine Call
  • DIC
  • Line Location:
    • LOC1+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RA(79.1 - [#79.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(1 - [#3.5] PAR+4, PAR+5, PAR+7, PAR+8, PAR+10, PAR+11
^DISV( LOC+2, LOC+3
^RA(79 - [#79] LOC1+13, LOC1+15, LOC1+16, PAR
^RA(79.1 - [#79.1] LOC+2, LOC+3, LOC+10, LOC+11, LOC+13, LOC1+6, LOC1+7, LOC1+16, UNDEF+6
^RA(79.2 - [#79.2] RAPSET+4, LOC+1, PAR+5, PAR+8, PAR+11
^SC - [#44] LOC+2, LOC1+6, UNDEF+6
^SC("B" LOC+10
^XUSEC("RA ALLOC" LOC1+3

Label References

Name Line Occurrences
LOC RAPSET+4
LOC1 LOC+6, LOC+8, LOC1+12, LOC1+15
NOESC PAR+5, PAR+8, PAR+11
UNDEF PAR+14

Naked Globals

Name Field # of Occurrence
^( PAR
^(0 LOC+2, LOC1+16, PAR+4, PAR+7, PAR+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS PAR+5*, PAR+8*, PAR+11*
>> %ZIS("A" PAR+5*, PAR+8*, PAR+11*
>> DEV RAPSET+4*, LOC+1*, PAR+1
>> DIC LOC1+10*
>> DIC("A" LOC1+1*, LOC1+11!
>> DIC("B" LOC+2*!, LOC+3!, LOC+8, LOC+10, LOC+12!, LOC+13!, LOC1+6*, LOC1+7!
>> DIC("S" LOC1+2*, LOC1+4*, LOC1+8*, LOC1+11!
>> DIC(0 LOC1+10*
>> DIV RAPSET+4*, LOC1+13*, LOC1+15, LOC1+16, PAR
DT LOC1+7
>> DTOUT LOC1+11
>> DUOUT LOC1+11
DUZ LOC, LOC+2, LOC+3, LOC1, LOC1+3
>> I PAR*
IO PAR+5, PAR+8, PAR+11
IO(0 PAR+5, PAR+8, PAR+11
ION PAR+5, PAR+8, PAR+11
>> LINE PAR+12*
>> LOC RAPSET+4*, LOC1+13*, LOC1+16, PAR+3
>> POP PAR+5, PAR+8, PAR+11
RA1 LOC+7~, LOC+9*, LOC+10*
RA2 LOC+7~, LOC+9*, LOC+10*, LOC+11, LOC+13
RA3 LOC+7~, LOC+11*, LOC+12
>> RACCESS( LOC1
>> RADEV RAPSET+4*, PAR+1
>> RADIV RAPSET+4*, LOC1+16*
>> RADUPSCN LOC1+5
RADV RAPSET+3!, RAPSET+4!
>> RAFLH PAR+4*, PAR+5*, PAR+6*
>> RAI PAR+4*, PAR+5*, PAR+6, PAR+7*, PAR+8*, PAR+9, PAR+10*, PAR+11*, PAR+12
>> RAIMGTY PAR+13*, PAR+14
>> RAITN LOC+6, LOC+12
>> RAJAC PAR+7*, PAR+8*, PAR+9*
RALC RAPSET+3!, RAPSET+4!
>> RALOC RAPSET+4*, LOC1+16*, LOC1+17, PAR+3, PAR+4, PAR+6, PAR+7, PAR+9, PAR+10, PAR+12
>> RAMDIV PAR*
>> RAMDV PAR*, PAR+1*, PAR+3, PAR+6
>> RAMLC PAR+3*, PAR+6*, PAR+9*, PAR+12*, PAR+13, UNDEF+2, UNDEF+6
>> RAOPT("REG" LOC1+3
>> RAREGX(4 LOC1+5, LOC1+6, LOC1+7
>> RARPT PAR+10*, PAR+11*, PAR+12*
RAVAPOR UNDEF+1~, UNDEF+6*, UNDEF+8
>> RAYN LOC1+5
U LOC+3, LOC1+6, LOC1+7, UNDEF+6
X LOC1+7~*
>> XQUIT RAPSET+3*, LOC*, LOC1+11*, LOC1+17*
>> Y LOC1+12, LOC1+13, PAR*
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