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

Package: Outpatient Pharmacy

Routine: PSOARCTP


Information

PSOARCTP ;BHAM ISC/LGH - WRITE PSRX INFO TO TAPE ; 08/19/92

Source Information

Source file <PSOARCTP.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Outpatient Pharmacy 1 TAPE1^PSOARCS2  

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

Package Total Caller Graph
Outpatient Pharmacy 1 PSOARCSV  

Entry Points

Name Comments DBIA/ICR reference
EN ;
TAPE
TAPE2
ANODE
LNODE
PNODE
IBNODE
CNODE
DNODE
SNODE
PSOAT
EOT1
READ
TAPE1
TAPE4
TAPE5
ANODE1
LNODE1
PNODE1

External References

Name Field # of Occurrence
TAPE1^PSOARCS2 TAPETAPE2TAPE2+1, IBNODECNODEDNODESNODETAPE1TAPE4TAPE5
ANODE1LNODE1PNODE1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: RX(RX0,0)
  • Line Location: TAPE+0
Function Call: WRITE
  • Prompt: RX(RX0,2)
  • Line Location: TAPE2+0
Function Call: WRITE
  • Prompt: RX(RX0,3)
  • Line Location: TAPE2+1
Function Call: WRITE
  • Prompt: "IB$$"_RX(RX0,"IB")
  • Line Location: IBNODE+0
Function Call: WRITE
  • Prompt: "C$$"_RX(RX0,"C")
  • Line Location: CNODE+0
Function Call: WRITE
  • Prompt: "D$$"_RX(RX0,"D")
  • Line Location: DNODE+0
Function Call: WRITE
  • Prompt: "S$$"_RX(RX0,"SAND")
  • Line Location: SNODE+0
Function Call: WRITE
  • Prompt: !!,?5,"** End of tape detected **",!,"After current tape rewinds, mount next tape"
  • Line Location: EOT1+0
Function Call: WRITE
  • Prompt: @%MT("REW")
  • Line Location: EOT1+0
Function Call: READ
  • Timeout: DTIME
  • Line Location: READ+0
Function Call: WRITE
  • Prompt: !!,"Recording information"
  • Line Location: READ+1
Function Call: WRITE
  • Prompt: 1_","_X_"$$"_RX(RX0,1,X,0)
  • Line Location: TAPE1+0
Function Call: WRITE
  • Prompt: 4_","_X_"$$"_RX(RX0,4,X,0)
  • Line Location: TAPE4+0
Function Call: WRITE
  • Prompt: 5_","_X_"$$"_RX(RX0,5,X,0)
  • Line Location: TAPE5+0
Function Call: WRITE
  • Prompt: "A"_","_X_"$$"_RX(RX0,"A",X,0)
  • Line Location: ANODE1+0
Function Call: WRITE
  • Prompt: "L"_","_X_"$$"_RX(RX0,"L",X,0)
  • Line Location: LNODE1+0
Function Call: WRITE
  • Prompt: "P"_","_X_"$$"_RX(RX0,"P",X,0)
  • Line Location: PNODE1+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("EOT" PSOAT

Label References

Name Line Occurrences
ANODE1 ANODE
EOT1 PSOAT
LNODE1 LNODE
PNODE1 PNODE
PSOAT TAPETAPE2TAPE2+1, IBNODECNODEDNODESNODETAPE1TAPE4TAPE5
ANODE1LNODE1PNODE1
READ READ
TAPE TAPETAPE2TAPE2+1, IBNODECNODEDNODESNODETAPE1TAPE4TAPE5
ANODE1LNODE1PNODE1
TAPE1 TAPE+2
TAPE4 TAPE+4
TAPE5 TAPE+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %MT("REW" EOT1
DTIME READ
IO(0 EOT1READ
>> PSOAEOT TAPETAPE2TAPE2+1, IBNODECNODEDNODESNODE, PSOAT*, TAPE1TAPE4
TAPE5ANODE1LNODE1PNODE1
>> PSOAT PSOATPSOAT+1, EOT1
>> PSOATNM READ+1*
>> PSRST PSOAT*
>> RX( TAPETAPE+1, TAPE+2, TAPE+3, TAPE+4, TAPE+5, TAPE+6, TAPE2TAPE2+1, ANODE
LNODEPNODEIBNODECNODEDNODESNODESNODE+1!, TAPE1TAPE4TAPE5
ANODE1LNODE1PNODE1
>> RX0 TAPETAPE+1, TAPE+2, TAPE+3, TAPE+4, TAPE+5, TAPE+6, TAPE2TAPE2+1, ANODE
LNODEPNODEIBNODECNODEDNODESNODESNODE+1, TAPE1TAPE4TAPE5
ANODE1LNODE1PNODE1
>> X TAPE+2*, TAPE+4*, TAPE+6*, ANODE*, LNODE*, PNODE*, READ*, TAPE1TAPE4TAPE5
ANODE1LNODE1PNODE1
>> Y PSOAT
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All