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

Package Total Call Graph
Outpatient Pharmacy 1 TAPE1^PSOARCS2  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Outpatient Pharmacy 1 PSOARCSV  

Entry Points

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

External References

Name Field # of Occurrence
TAPE1^PSOARCS2 TAPE, TAPE2, TAPE2+1, IBNODE, CNODE, DNODE, SNODE, TAPE1, TAPE4, TAPE5
, ANODE1, LNODE1, PNODE1

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 TAPE, TAPE2, TAPE2+1, IBNODE, CNODE, DNODE, SNODE, TAPE1, TAPE4, TAPE5
, ANODE1, LNODE1, PNODE1
READ READ
TAPE TAPE, TAPE2, TAPE2+1, IBNODE, CNODE, DNODE, SNODE, TAPE1, TAPE4, TAPE5
, ANODE1, LNODE1, PNODE1
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 EOT1, READ
>> PSOAEOT TAPE, TAPE2, TAPE2+1, IBNODE, CNODE, DNODE, SNODE, PSOAT*, TAPE1, TAPE4
, TAPE5, ANODE1, LNODE1, PNODE1
>> PSOAT PSOAT, PSOAT+1, EOT1
>> PSOATNM READ+1*
>> PSRST PSOAT*
>> RX( TAPE, TAPE+1, TAPE+2, TAPE+3, TAPE+4, TAPE+5, TAPE+6, TAPE2, TAPE2+1, ANODE
, LNODE, PNODE, IBNODE, CNODE, DNODE, SNODE, SNODE+1!, TAPE1, TAPE4, TAPE5
, ANODE1, LNODE1, PNODE1
>> RX0 TAPE, TAPE+1, TAPE+2, TAPE+3, TAPE+4, TAPE+5, TAPE+6, TAPE2, TAPE2+1, ANODE
, LNODE, PNODE, IBNODE, CNODE, DNODE, SNODE, SNODE+1, TAPE1, TAPE4, TAPE5
, ANODE1, LNODE1, PNODE1
>> X TAPE+2*, TAPE+4*, TAPE+6*, ANODE*, LNODE*, PNODE*, READ*, TAPE1, TAPE4, TAPE5
, ANODE1, LNODE1, PNODE1
>> Y PSOAT
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All