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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSOLLU4

Package: Outpatient Pharmacy

Routine: PSOLLU4


Information

PSOLLU4 ;BIR/EJW - CHANGE CONTROL CODES ;05/23/2004

Source Information

Source file <PSOLLU4.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 4 C^%DTC  FILE^DICN  ^DIE  ^DIR  
Kernel 2 ^%ZIS  $$DT^XLFDT  

Entry Points

Name Comments DBIA/ICR reference
IO
FILE
CLEAN ; REMOVE EXACT DUPLICATE CONTROL CODES RESULTING WHEN CHANGE CONTROL CODES ROUTINES ARE RUN MORE THAN ONCE

External References

Name Field # of Occurrence
C^%DTC CLEAN+2
^%ZIS IO
FILE^DICN FILE
^DIE FILE+2
^DIR IO+5
$$DT^XLFDT CLEAN+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "No terminal type available."
  • Line Location: IO+1
Function Call: WRITE
  • Prompt: "No DUZ defined."
  • Line Location: IO+2
Function Call: WRITE
  • Prompt: "FileMan access must be @."
  • Line Location: IO+3
Function Call: WRITE
  • Prompt: "No CONTROL CODES defined."
  • Line Location: IO+4
Function Call: WRITE
  • Prompt: !,"Copying..."
  • Line Location: IO+6
Routine Call
  • DIE
  • Line Location:
    • FILE+2
Routine Call
  • DIR
  • Line Location:
    • IO+5
Routine Call
  • %ZIS
  • Line Location:
    • IO

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(2 - [#3.2] IO+4, CLEAN+4, CLEAN+5, CLEAN+6!, CLEAN+7, CLEAN+8, CLEAN+9, CLEAN+11!
^XTMP("PSOLLU4" CLEAN+2*, CLEAN+4*

Label References

Name Line Occurrences
CLEAN IO+11
FILE IO+7, IO+8, IO+9, IO+10
IO IO+5

Naked Globals

Name Field # of Occurrence
^(1 CLEAN+8, CLEAN+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS PSOLLU4+7*
>> AB IO+7*, IO+8*, IO+9*, IO+10*, FILEFILE+2
>> CODE IO+7*, IO+8*, IO+9*, IO+10*, FILE+2, CLEAN+5*, CLEAN+6, CLEAN+7, CLEAN+11
DA FILE+1!*
DA(1 FILE*, FILE+1*
DIC FILE!*, FILE+1
DIC(0 FILE*
DIE FILE!, FILE+1!*
DIR IO+5!
DIR("A" IO+5*
DIR("B" IO+5*
DIR(0 IO+5*
DR FILE+1!, FILE+2*
DT CLEAN+1*, CLEAN+2
>> DUZ(0 IO+2, IO+3
IO PSOLLU4+6~, IO+5
IOST PSOLLU4+6~
IOST(0 IO+1, IO+4, FILEFILE+1, CLEAN+3, CLEAN+4, CLEAN+5, CLEAN+6, CLEAN+7, CLEAN+8
CLEAN+9, CLEAN+11
>> NAME IO+7*, IO+8*, IO+9*, IO+10*, FILE+2
>> SEQ CLEAN+5*, CLEAN+6, CLEAN+7, CLEAN+8, CLEAN+11
>> SEQ1 CLEAN+7*, CLEAN+9
>> X FILE*, CLEAN+2
>> X0 CLEAN+8*, CLEAN+10, CLEAN+11
>> X1 CLEAN+2*, CLEAN+8*, CLEAN+10, CLEAN+11
>> X2 CLEAN+2*
>> Y IO+5, FILE+1
>> Z0 CLEAN+9*, CLEAN+11
>> Z1 CLEAN+9*, CLEAN+11
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All