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

Package: Outpatient Pharmacy

Routine: PSODIR3


Information

PSODIR3 ;ISC-BIRM/SAB - rx order entry contd ;Jul 24, 2018@22:48

Source Information

Source file <PSODIR3.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Outpatient Pharmacy 4 JUMP^PSONEW1  JUMP^PSONEW3  JUMP^PSORENW3  $$MAXNUMRF^PSOUTIL  
VA FileMan 2 ^DIC  ^DIR  

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
Outpatient Pharmacy 2 PSODIR1  PSOREF2  

Entry Points

Name Comments DBIA/ICR reference
EXP(PSODIR) ;
EXPX
MW(PSODIR) ;
MW1
MWX
FILLDT(PSODIR) ;
FILLDTX
CLERK(PSODIR) ;
CLERKX
DIR ;
DIRX
JUMP ;
JUMPX
REFOR ;

External References

Name Field # of Occurrence
^DIC JUMP+2
^DIR EXP+4, DIR+3
JUMP^PSONEW1 JUMP+4
JUMP^PSONEW3 JUMP+5
JUMP^PSORENW3 JUMP+6
$$MAXNUMRF^PSOUTIL REFOR+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Cannot jump to another field ..",!
  • Line Location: MW1+4
Routine Call
  • DIC
  • Line Location:
    • JUMP+2
Routine Call
  • DIR
  • Line Location:
    • EXP+4
    • DIR+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EXP+2, FILLDT+9
^VA(200 - [#200] CLERK+1, CLERK+3

Label References

Name Line Occurrences
CLERKX CLERK+1, CLERK+4
DIR MW+7, MW1+3, FILLDT+7, CLERK+4, REFOR+15
DIRX DIR+2, DIR+4
EXPX EXP+5
FILLDTX FILLDT+7
JUMP DIR+5
JUMPX JUMP+3, JUMP+4, JUMP+5, JUMP+6
MW1 MW1+4
MWX MW+7, MW+8, MW1MW1+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CLOZPAT REFOR+2, REFOR+8, REFOR+10
DA DIR+3!
DIC EXP+1!, MW+1!, FILLDT+1!, CLERK+2!, DIR+3!, JUMP+2*!
DIC(0 JUMP+2*
DIE DIR+3!
DIR EXP+1!, MW+1!, FILLDT+1!, CLERK+2!, DIR+3!
DIR("?" EXP+4*, FILLDT+4*, FILLDT+5*, FILLDT+6*, REFOR+14*
DIR("A" EXP+3*, MW+3*, FILLDT+2*, CLERK+3*, REFOR+12*
DIR("B" EXP+3*, MW+3*, MW+6*, MW1+2*, FILLDT+2*, CLERK+3*, REFOR+13*
DIR(0 EXP+4*, MW+3*, MW+5*, MW1+1*, FILLDT+3*, CLERK+3*, DIR+2, REFOR+12*
DIROUT DIR+4, DIRX!
DIRUT DIRX!
DT FILLDT+3
DTOUT DIR+4, DIRX!
DUOUT DIR+4, DIRX!
DUZ CLERK+1, CLERK+3
DUZ("AG" FILLDT+3, CLERK+1
>> OR0 JUMP+1
>> POERR REFOR+13
>> PSOBBC1("FROM" MW+2
PSODIR EXP~, MW~, FILLDT~, CLERK~
PSODIR("# OF REFILLS" , REFOR+5*, REFOR+11*, REFOR+13, REFOR+16*
PSODIR("CLERK CODE" , CLERK+1*, CLERK+5*
PSODIR("DAYS SUPPLY" , REFOR+8
PSODIR("DFLG" EXP+5, MW+7, MW+8*, MW1+3, FILLDT+7, CLERK+4, DIR+4*, JUMP+1*, REFOR+15
PSODIR("EXPIR ATION DATE" , EXP+6*
PSODIR("FIELD" EXP+5, MW+7, FILLDT+7, CLERK+4, DIR+1*, JUMP+3*, REFOR+5*, REFOR+15
PSODIR("FILL DATE" , FILLDT+8*
PSODIR("FLD" JUMP+3
PSODIR("ISSUE DATE" , FILLDT+3
PSODIR("MAIL/WINDOW" MW+9*, MW+10, MW1
PSODIR("METHO D OF PICK-UP" , MW+10!, MW1+5*
PSODIR("N# RE F" , REFOR+11*, REFOR+13, REFOR+16*
PSODIR("PATIE NT STATUS" , REFOR+8
>> PSODRUG("DEA" REFOR+2, REFOR+3
>> PSODRUG("EXPI RATION DATE" , EXP+2
>> PSODRUG("IEN" REFOR+8
>> PSOEDIT JUMP+1
>> PSONEW1 JUMP+4
>> PSONEW3 JUMP+5
>> PSOPAR MW1
>> PSORENW3 JUMP+6
>> PSORX("CLERK CODE" , CLERK+1*, CLERK+3, CLERK+5*
>> PSORX("EDIT" MW+10
>> PSORX("EXPIRA TION DATE" , EXP+2*, EXP+3
>> PSORX("FILL D ATE" , FILLDT+2, FILLDT+9*
>> PSORX("MAIL/WINDOW" MW+6, MW+9*
>> PSORX("METHOD OF PICK-UP" , MW1+2, MW1+5*
PSOX DIRX!, REFOR+1~, REFOR+8*, REFOR+11, REFOR+12, REFOR+13
U MW1+4, DIR+5
>> VALMSG REFOR+3*, REFOR+4
X EXPX!, MW1+4, MWX!, FILLDTX!, DIR+4, DIR+5, JUMP+2*, JUMPX*
Y EXP+2*, EXP+6, EXPX!, MW+9, MW1+5, MWX!, FILLDT+8, FILLDT+9, FILLDTX!, CLERK+5
DIR+4, JUMP+3, REFOR+16
Y(0 MW+8, MW+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All