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

Package: Outpatient Pharmacy

Routine: PSOB


Information

PSOB ;BHAM ISC/CCG - black line resolver ; 07/18/96 8:49 am

Source Information

Source file <PSOB.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 4 ^DIC  $$GET1^DIQ  EN^DIQ1  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Outpatient Pharmacy 2 $$SELPRT^PSOFDAUT  (,LASK)^PSOLSET  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Outpatient Pharmacy 1 PSO B  

Entry Points

Name Comments DBIA/ICR reference
SET
END
PT
LIST
RL
RX08
RX1
RX2
RX05

External References

Name Field # of Occurrence
^%ZIS SET+2
^%ZISC END
^%ZTLOAD SET+20
^DIC PT, RX1, RX1+1, RX2
$$GET1^DIQ PSOB+7, PSOB+13, SET+12
EN^DIQ1 SET+1, SET+6
^DIR PSOB+9, PSOB+15
$$SELPRT^PSOFDAUT SET+14
^PSOLSET PSOB+2
LASK^PSOLSET SET+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"THE LABEL/PROFILE MONITOR LIST IS EMPTY.",!!
  • Line Location: PSOB+5
Function Call: WRITE
  • Prompt: !
  • Line Location: PSOB+14
Function Call: WRITE
  • Prompt: !
  • Line Location: PT+0
Function Call: WRITE
  • Prompt: !!,"THE ENDING RX# DOES NOT FOLLOW THE BEGINNING RX#. PLEASE TRY AGAIN.",!!!
  • Line Location: RX2+2
Function Call: WRITE
  • Prompt: $C(7),!,"Output MUST be sent to a printer !!",!
  • Line Location: SET+4
Function Call: WRITE
  • Prompt: $C(7),!,"You must select a valid FDA Medication Guide printer."
  • Line Location: SET+15
Function Call: WRITE
  • Prompt: !,"Task Queued #"_ZTSK_" !!",!
  • Line Location: SET+20
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: RX05+0
Function Call: WRITE
  • Prompt: !!,"???"
  • Line Location: RX05+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: LIST+0
Function Call: WRITE
  • Prompt: !,?5,I-1," ",$P(PSOB,"^",I)
  • Line Location: LIST+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: RL+0
Function Call: WRITE
  • Prompt: !,"CHOOSE 1-",I-2," : "
  • Line Location: RL+0
Routine Call
  • DIC
  • Line Location:
    • PT
    • RX1
    • RX1+1
    • RX2
Routine Call
  • DIR
  • Line Location:
    • PSOB+9
    • PSOB+15
Routine Call
  • %ZIS
  • Line Location:
    • SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^%ZIS(2 - [#3.2] Classic Fileman Calls
^%ZIS(1 - [#3.5] Classic Fileman Calls
^PS(52.9 - [#52.9] Classic Fileman Calls
^PS(59 - [#59] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] RX05
^PS(52.9 - [#52.9] PSOB+5, RX2+1, RX08, RX08+1, RX08+2, RX08+3, RX08+4, RX05+2
^PSRX - [#52] RX08+3
^PSRX("B" RX08, RX05+2

Label References

Name Line Occurrences
END PT, RX1, RX1+1, RX1+3, RX2, SET+3, SET+12
LIST RX05+1
RL RL
RX05 RX05+1
RX08 RX1+2, RX1+3, RX2+2
RX1 RX1, RX1+1, RX2+2
RX2 RX2+2
SET RX2+1, SET+4

Naked Globals

Name Field # of Occurrence
^( RX08+1, RX08+3
^(0 RX08+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS SET+1!, SET+2*, SET+3!, END!
%ZIS("A" SET+2*
%ZIS("B" SET+2*
CC PSOB+3*, END!
DA SET+1*, SET+2, SET+5*, SET+7, SET+8, END!
DA(1 RX1+1*
DIC PT*!, RX1*!, RX1+1*, RX1+2!, RX2*, SET+1*, SET+6*, END!
DIC("A" PT*, RX1*, RX1+1*, RX2*
DIC("S" RX2*!
DIC(0 PT*, RX1*, RX1+1*, RX2*
DIQ SET+1*, SET+6*, END!
DIQ(0 SET+1*, SET+2, SET+6*, SET+7, SET+8, END!
DIR PSOB+6!, PSOB+9!, PSOB+12!, PSOB+15!
DIR("A" PSOB+8*, PSOB+14*
DIR("B" PSOB+8*, PSOB+14*
DIR(0 PSOB+8*, PSOB+14*
DIRUT PSOB+6!, PSOB+7, PSOB+9, PSOB+12!, PSOB+13, PSOB+15
DPTR END!
DPTR( SET+2
DPTRS SET+2*, END!
DPTRS1 END!
DPTRS1( SET+7, SET+8
DR SET+1*, SET+6*, END!
DTIME RX05, RL
DUZ PSOB+3
FDAPRT SET+12~*, SET+13, SET+14*, SET+15, SET+16
I END!, RX08+3*, LIST*, RL
ION SET+5
IOP END!
IOS SET~, SET+5
IOST SET+4
IOST(0 SET+5
>> PDUZ PSOB+3*
POP SET+3, END!
PSOB END!, RX08+3*, RX08+4, RX05+1, LIST, RL
PSOBAR0 SET~, SET+7*, SET+9
PSOBAR1 SET~, SET+8*, SET+9
PSOBARS SET~, SET+9*
PSOBFLAG SET+9*!
PSOBIO PT*, RX2+1, END!, RX08, RX08+1, RX08+2, RX08+3, RX08+4, RX05+2
PSOBOUT PSOB+3*, RX1+1, RX1+3, END!, RX05*
PSOBPT PT*, RX1+2, SET+1, END!
PSOBR RX1+2*, RX1+3*, RX2+2*, END!, RX08*, RX08+1*, RX08+2, RX08+3, RX08+4*, RX08+5*
, RX05+2*
PSOBR1 RX1+2*, RX1+3*, RX2+2, END!
PSOBR2 RX2+1*, RX2+2*, END!, RX08+1
PSOBRX END!, RX08*, RX08+1*
>> PSOBY RX1*, RX1+2
>> PSOCLC PSOB+3*
PSODISP PSOB+4~, PSOB+10*
PSODPT RX1*, RX1+2, END!
PSODPT(0 RX1*, RX1+2
>> PSOFDAPT SET+12, SET+14, SET+16*
>> PSOIOS SET+1*, SET+2, SET+5*
PSOIS SET+2*, END!
PSOMGREP PSOB+4~, PSOB+15*, SET+12
>> PSOPAR PSOB+2, PSOB+7, SET+9
>> PSOSITE PSOB+7, PSOB+13, SET+12
U RX05+1
X RX1, RX1+1, RX2, RX2+1, END!, RX08, RX05*, RX05+1, RX05+2, RL*
Y PSOB+10, PSOB+15, PT, RX1, RX1+1, RX1+2*, RX1+3, RX2+2, END!, RX08*
Y(0 PT, RX1, RX1+2*, RX08, RX08+5, RX05
>> ZTDESC SET+18*
>> ZTDTH SET+18*
>> ZTIO SET+5*
>> ZTRTN SET+18*
>> ZTSAVE("CC" SET+18*
>> ZTSAVE("PDUZ" SET+18*
>> ZTSAVE("PSOBAR0" SET+19*
>> ZTSAVE("PSOBAR1" SET+19*
>> ZTSAVE("PSOBARS" SET+19*
>> ZTSAVE("PSOBIO" SET+18*
>> ZTSAVE("PSOBR1" SET+18*
>> ZTSAVE("PSOBR2" SET+18*
>> ZTSAVE("PSODISP" SET+19*
>> ZTSAVE("PSODIV" SET+18*
>> ZTSAVE("PSOFDAPT" SET+19*
>> ZTSAVE("PSOIOS" SET+19*
>> ZTSAVE("PSOMGREP" SET+19*
>> ZTSAVE("PSOPAR" SET+18*
>> ZTSAVE("PSOSITE" SET+18*
>> ZTSAVE("PSOSYS" SET+19*
ZTSK SET+1!, SET+20, END!
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