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

Package: Controlled Substances

Routine: PSDOPT1


Information

PSDOPT1 ;BIR/JPW,LTL - Outpatient Rx Entry (cont'd) ;20 July 94

Source Information

Source file <PSDOPT1.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 5 NOW^%DTC  ^DIC  FILE^DICN  ^DIE  IX^DIK  
Controlled Substances 1 (CHKEY,VER)^PSDOPT  
Outpatient Pharmacy 1 EN^PSOCSRL  

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

Package Total Caller Graph
Controlled Substances 2 PSDOPT  PSDOPT0  

Entry Points

Name Comments DBIA/ICR reference
UPDATE
FIND
ADD ;set trans
DIE
PSDREL
PSDRTS ;Returned to stock continued
FIND1
PSDORIG ;Check original labels
PSDRFL ;Check refill labels
PSDPRTL ;Chec partial labels
RTSMUL ; Setup local array of refills in reverse order

External References

Name Field # of Occurrence
NOW^%DTC UPDATE+2, PSDRTS+3
^DIC FIND+1, DIE+4, FIND1+1
FILE^DICN DIE+1
^DIE DIE+5
IX^DIK ADD+4
CHKEY^PSDOPT DIE+8
VER^PSDOPT PSDORIG+5
EN^PSOCSRL PSDREL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Creating an Outpatient Transaction..."
  • Line Location: UPDATE+0
Function Call: WRITE
  • Prompt: "updating..."
  • Line Location: UPDATE+4
Function Call: WRITE
  • Prompt: "vault activity..."
  • Line Location: ADD+5
Function Call: WRITE
  • Prompt: "done."
  • Line Location: DIE+6
Function Call: WRITE
  • Prompt: !,"Updating balances"
  • Line Location: PSDRTS+1
Function Call: WRITE
  • Prompt: "."
  • Line Location: PSDRTS+4
Function Call: WRITE
  • Prompt: !!,"Original suspended."
  • Line Location: PSDORIG+4
Function Call: WRITE
  • Prompt: !!,"Original label not printed."
  • Line Location: PSDORIG+8
Function Call: WRITE
  • Prompt: !!,"Refill #",PSDFLNO," label not printed."
  • Line Location: PSDRFL+3
Function Call: WRITE
  • Prompt: !!,"Partial #",PSDFLNO," label not printed."
  • Line Location: PSDPRTL+3
Routine Call
  • DIC
  • Line Location:
    • FIND+1
    • DIE+4
    • FIND1+1
Routine Call
  • DIE
  • Line Location:
    • DIE+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSD(58.81 - [#58.81] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" PSDREL
^PS(52.5 - [#52.5] PSDORIG+3, PSDORIG+4
^PSD(58.8 - [#58.8] UPDATE+1, UPDATE+2, UPDATE+3, DIEDIE+3, DIE+4, PSDRTS+2, PSDRTS+3*, PSDRTS+4
^PSD(58.81 - [#58.81] UPDATE+5, FIND*, FIND+2, ADD+1*, ADD+2*, ADD+3*, PSDRTS+5, FIND1*, FIND1+2, FIND1+3*
FIND1+4*, FIND1+5*, FIND1+6*, RTSMUL+1
^PSRX - [#52] PSDORIG+2, PSDORIG+6, PSDORIG+7, PSDRFL+1, PSDRFL+2, PSDPRTL+1, PSDPRTL+2

Label References

Name Line Occurrences
DIE FIND1+7
FIND FIND
FIND1 FIND1

Naked Globals

Name Field # of Occurrence
^(0 UPDATE+2*, DIE*, DIE+3*, PSDORIG+6, PSDORIG+7, PSDRFL+1, PSDPRTL+1
^(2 PSDORIG+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % UPDATE+2, PSDRTS+3
>> BAL UPDATE+2*, ADD+1, PSDRTS+3*, FIND1+3
DA FIND+1!, ADD+4*!, DIE+1!, DIE+4!, DIE+5!*, FIND1+1!
DA(1 DIE+1*, DIE+4*, DIE+5*
DA(2 DIE+1*, DIE+4*, DIE+5*
>> DAT ADD+2, FIND1+6
>> DATA6 RTSMUL+1*, RTSMUL+4
DD DIE+1!
DIC FIND+1!*, DIE+1!*, DIE+4!*, FIND1+1!*
DIC(0 FIND+1*, DIE+1*, DIE+4*, FIND1+1*
DIE DIE+5!*
DIK ADD+4*!
>> DILOCKTM UPDATE+1, UPDATE+5, PSDRTS+2, PSDRTS+5
DINUM FIND+1*, DIE+1*!, DIE+4*!, FIND1+1*
DLAYGO FIND+1!*, DIE+4*!, FIND1+1!*
DO DIE+1!
DR DIE+5!*
DT DIE+4, DIE+5
>> NEW(1 ADD+2, PSDREL
>> NEW(2 ADD+2, PSDREL
>> PSD1 RTSMUL+1*, RTSMUL+2, RTSMUL+3
>> PSD1MUL RTSMUL+3*, RTSMUL+4
>> PSDA FIND*, FIND+1, ADD+1, ADD+2, ADD+3, ADD+4, DIE+1, FIND1*, FIND1+1, FIND1+3
FIND1+4, FIND1+5, FIND1+6
PSDERR PSDORIG+8!
>> PSDFILL FIND1+6
>> PSDFLNO PSDRFL+1, PSDRFL+2, PSDRFL+3, PSDPRTL+1, PSDPRTL+2, PSDPRTL+3
PSDLBL PSDORIG+5!, PSDORIG+6*, PSDORIG+7*, PSDRFL+2*, PSDPRTL+2*
PSDLBL(1 PSDORIG+6*, PSDORIG+7*, PSDORIG+8, PSDRFL+2*, PSDRFL+3, PSDPRTL+2*, PSDPRTL+3
>> PSDMUL( RTSMUL+4*
>> PSDNUM1 FIND1+6
>> PSDOIN PSDORIG+2, PSDRFL+1, PSDPRTL+1
>> PSDOUT DIE+8, PSDORIG+4*, PSDORIG+8*, PSDRFL+3*, PSDPRTL+3*
>> PSDQTY PSDRTS+3, FIND1+3, FIND1+4, FIND1+7
>> PSDR UPDATE+1, UPDATE+2, UPDATE+3, ADD+1, DIEDIE+1, DIE+3, DIE+4, DIE+5, PSDRTS+2
PSDRTS+3, PSDRTS+4, FIND1+3
>> PSDREL DIE+10
>> PSDRPH ADD+2, PSDRELFIND1+6
PSDRTS DIE+11!, FIND1+7*
>> PSDRX ADD+2, PSDRELFIND1+6, PSDORIG+2, PSDORIG+3, PSDORIG+6, PSDORIG+7, PSDRFL+1, PSDRFL+2, PSDPRTL+1
PSDPRTL+2, RTSMUL+1
>> PSDRX(1 PSDORIG+4*, PSDORIG+8*, PSDRFL+3*, PSDPRTL+3*
>> PSDRXFD PSDORIG+2*, PSDORIG+4
PSDRXIN PSDORIG+8!
>> PSDS UPDATE+1, UPDATE+2, UPDATE+3, ADD+1, DIEDIE+1, DIE+3, DIE+4, DIE+5, PSDRTS+2
PSDRTS+3, PSDRTS+4, FIND1+3
PSDSTA PSDORIG+8!
>> PSDSUPN PSDORIG+3*, PSDORIG+4
>> PSDT UPDATE+2*, ADD+1, PSDRTS+3*, FIND1+3, FIND1+4
>> PSDUZ ADD+1, FIND1+3
>> PSDXXX RTSMUL+2*
PSOVR PSDORIG+6, PSDORIG+7, PSDORIG+8!
>> QTY UPDATE+2, ADD+1, FIND1+7*
>> RXNUM ADD+2, FIND1+6
U PSDRELPSDORIG+2, PSDRFL+1, PSDRFL+2, PSDPRTL+1, PSDPRTL+2
>> X FIND+1*, DIE+1*, DIE+4*, PSDREL*, FIND1+1*
>> XTYPE PSDREL*
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