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 |  Local Variables |  All
Print Page as PDF
Routine: MCARPCS

Package: Medicine

Routine: MCARPCS


Information

MCARPCS ;WISC/TJK-AUTO TRANSMIT PACEMAKER REPORT-QUEUE ;4/10/96 14:14

Source Information

Source file <MCARPCS.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 ^DIC  ^DIR  
Kernel 1 ^%ZTLOAD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Medicine 1 MCARPACETRANS  

Entry Points

Name Comments DBIA/ICR reference
EXIT
REASON
OK ;temporarily all transmissions will go to the Eastern Pacemaker Center

External References

Name Field # of Occurrence
^%ZTLOAD OK+9
^DIC MCARPCS+3, REASON
^DIR OK+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!!,"FORM TRANSFER TO NATIONAL CENTER"
  • Line Location: MCARPCS+2
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: OK+3
Function Call: WRITE
  • Prompt: !,*7,"Answer with 'E' for Eastern Center,'W' for Western Center, or 'B' for Both"
  • Line Location: OK+4
Function Call: WRITE
  • Prompt: !,$S(MCT="E":"EASTERN PACEMAKER CENTER",MCT="W":"WESTERN PACEMAKER CENTER",1:"BOTH EASTERN AND WESTERN PACEMAKER CENTERS")
  • Line Location: OK+5
Routine Call
  • DIC
  • Line Location:
    • MCARPCS+3
    • REASON
Routine Call
  • DIR
  • Line Location:
    • OK+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^MCAR(690 - [#690] Classic Fileman Calls
^MCAR(695.8 - [#695.8] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^MCAR(695.8 - [#695.8] REASON

Label References

Name Line Occurrences
EXIT MCARPCS+3, REASON
OK REASON
REASON REASON

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EXIT!
DFN MCARPCS+4*, EXIT!
DIC MCARPCS+3!*, REASON!*, OK+6!
DIC("A" REASON*
DIC("S" MCARPCS+3*, REASON*
DIC(0 MCARPCS+3*, REASON*
DIR OK+6!, EXIT!
DIR("A" OK+7*
DIR("B" OK+7*
DIR(0 OK+7*
IOF MCARPCS+2
MCR MCARPCS+4!, EXIT!
MCR( REASON*
MCT OK+1*, EXIT!
U REASON
X REASON, EXIT!
Y MCARPCS+3, MCARPCS+4, REASON, OK+9, EXIT!
>> ZTDESC OK+9*
>> ZTIO OK+9*
>> ZTRTN OK+9*
>> ZTSAVE("DFN" OK+9*
>> ZTSAVE("DUZ" OK+9*
>> ZTSAVE("MCR(" OK+9*
>> ZTSAVE("MCT" OK+9*
ZTSK EXIT!
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 |  Local Variables |  All