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

Package: Controlled Substances

Routine: PSDDWKE


Information

PSDDWKE ;BIR/JPW-Pharm Dispensing Worksheet (cont'd) ; 24 Aug 93

Source Information

Source file <PSDDWKE.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA Fileman 2 ^DIE  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Controlled Substances 1 PSDDWK1  

Entry Points

Name Comments DBIA/ICR reference
SET ;sets disp data if disp site changes
MSG1
EDIT ;ask/edit dispensing info
DIE ;edit mfg/lot #/exp
EDIT1
MSG

External References

Name Field # of Occurrence
^DIE EDIT+2, EDIT1+3, EDIT1+6, DIE+2, DIE+4
^DIR EDIT+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+1
Function Call: WRITE
  • Prompt: !!,"Updating your order..."
  • Line Location: EDIT1+2
Function Call: WRITE
  • Prompt: "still updating..."
  • Line Location: EDIT1+4
Function Call: WRITE
  • Prompt: "done.",!
  • Line Location: EDIT1+7
Function Call: WRITE
  • Prompt: $C(7),!!,"This order cannot be processed. ",PSDRN," is ",!,$S(MSG:"missing breakdown unit or package size",1:"not stocked")," in ",ORDSN,".",!
  • Line Location: MSG1+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: MSG+0
Function Call: WRITE
  • Prompt: !!,"Press <RET> to continue"
  • Line Location: MSG+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: MSG+0
Routine Call
  • DIE
  • Line Location:
    • EDIT+2
    • EDIT1+3
    • EDIT1+6
    • DIE+2
    • DIE+4
Routine Call
  • DIR
  • Line Location:
    • EDIT+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" DIE+1, DIE+5
^PSD(58.8 - [#58.8] EDIT+4, EDIT+6, SET+2, SET+3, SET+4
^PSD(58.85 - [#58.85] EDIT+4, EDIT+5, EDIT+12*, EDIT1, EDIT1+3, DIE+3, DIE+5, SET+5!*
^VA(200 - [#200] EDIT1

Label References

Name Line Occurrences
DIE EDIT+13, EDIT+14, EDIT+15
EDIT1 EDIT+13
MSG EDIT+2, EDIT+3, EDIT+9, EDIT+10
MSG1 EDIT+6, EDIT+7
SET EDIT+6

Naked Globals

Name Field # of Occurrence
^(0 EDIT+5, EDIT1, EDIT1+3, DIE+3, DIE+5, SET+4
^(2 SET+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACT EDIT+3, EDIT+8, EDIT+10, EDIT+13, EDIT1+1
DA EDIT+2!*, EDIT+9!, EDIT1+3!*, EDIT1+5!*, EDIT1+6!, DIE+2!*, DIE+4!*
DA(1 EDIT1+5*, DIE+4*
DA(2 EDIT1+5*
DIE EDIT+2!*, EDIT1+3!*, EDIT1+5!*, EDIT1+6!, DIE+2!*, DIE+4!*
DIR EDIT+9!
DIR("A" EDIT+9*
DIR("B" EDIT+9*
DIR(0 EDIT+9*
DIRUT EDIT+9!, EDIT+10
DR EDIT+2!*, EDIT1+3!*, EDIT1+5!, EDIT1+6*!, DIE+2!*, DIE+4!*
DTIME MSG
DTOUT EDIT+2!, EDIT+9!
DUOUT EDIT+9!, EDIT+11
>> EXP EDIT1+3, DIE+1, DIE+3, DIE+4, DIE+5*, SET+1*, SET+4*
>> EXPD DIE+1*, DIE+5*
>> LOT EDIT1+3, DIE+3, DIE+4, DIE+5*, SET+1*, SET+4*
>> MFG EDIT1+3, DIE+3, DIE+4, DIE+5*, SET+1*, SET+4*
>> MSG EDIT+1*, EDIT+7*, MSG1
>> NAOU EDIT1+3, EDIT1+5
>> NBKU EDIT+7, EDIT+9, SET+1*, SET+4*
>> NEW EDIT+4*, EDIT+6, EDIT+14, EDIT+15
>> NPKG EDIT+7, EDIT+9, SET+1*, SET+4*
>> ORDS EDIT+4*, EDIT+6, EDIT1+3, EDIT1+6, DIE+4, SET+2, SET+3, SET+4, SET+5
>> ORDSN EDIT+4*, MSG1
>> PRT SET+5*
>> PSDAGN SET+3*
>> PSDBY EDIT1*, EDIT1+3
>> PSDBYN EDIT1*
>> PSDGSN SET+3*
>> PSDM EDIT+14
>> PSDMN EDIT+15, SET+2*, SET+4
>> PSDN EDIT+2, EDIT+4, EDIT+5, EDIT+12, EDIT1, EDIT1+3, DIE+2, DIE+3, DIE+5, SET+5
>> PSDNO MSG1*
>> PSDOUT EDIT+1*, EDIT+2*, EDIT+3*, EDIT+8*, EDIT+9*, EDIT+10*, EDIT+11*, MSG+1*
>> PSDR EDIT+6, EDIT1+5, DIE+4, SET+4
>> PSDRGN SET+3*
>> PSDRN MSG1
>> PSDS EDIT+4
>> QTY EDIT+5*, EDIT+9, EDIT1*, EDIT1+3, EDIT1+6
>> REQ EDIT1+5
>> STAT EDIT1*, EDIT1+3, EDIT1+6
TEXP DIE+3!*, DIE+4!
TLOT DIE+3!*, DIE+4!
TMFG DIE+3!*, DIE+4!
>> X MSG*, MSG+1
Y EDIT+2!, EDIT+3, EDIT+8, EDIT+9!, EDIT+11, EDIT+12, DIE+1*, DIE+5*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All