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

Package: Outpatient Pharmacy

Routine: PSODIR


Information

PSODIR ;BHAM ISC/SAB - asks data for rx order entry ; 9/17/07 5:03pm

Source Information

Source file <PSODIR.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Outpatient Pharmacy 8 EN^PSOFSIG  (SIG,SSIG)^PSOHELP  DELINS^PSOHELP3  JUMP^PSONEW1  JUMP^PSONEW3  DOSE1^PSOORED5  JUMP^PSOREF1  JUMP^PSORENW3  
VA FileMan 5 EN^DDIOL  ^DIC  $$GET1^DIQ  ^DIR  EN^DIWE  
Kernel 1 ($$DETOX,$$SDEA)^XUSER  
Pharmacy Data Management 1 $$DETOX^PSSOPKI  

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

Package Total Caller Graph
Outpatient Pharmacy 12 PSOBKDED  PSONEW1  PSONEW3  PSOORED1  PSOOREDT  PSOORNE1  PSOORNE4  PSOORNE6  
PSOORNW2  PSORENW3  PSORENW4  PSOUTIL  

Entry Points

Name Comments DBIA/ICR reference
SINS(PSODIR) ;other lang. patient instructions
COSIGN ;
INSD
NODRUG
JUMPX
GENERIC ;
DIRX
PROV(PSODIR) ;
PROVEN ; Entry point for failed lookup
COSIGNX
JUMP ;
DRGSCH() ; determine the drug schedule
EX
COSIGN1
PROVX
INS(PSODIR) ;patient instructions
GENERICX
DIR ;
DOSE(PSODIR) ;add dosing info

External References

Name Field # of Occurrence
EN^DDIOL INSD+5, SINS+6
^DIC PROVEN+10, COSIGN1+3, JUMP+2
$$GET1^DIQ DRGSCH+2
^DIR DIR+3
EN^DIWE INS+7
EN^PSOFSIG INS+9, INSD+2, INSD+7, SINS+4, SINS+7
SIG^PSOHELP INSD+4
SSIG^PSOHELP SINS+5
DELINS^PSOHELP3 INSD+6, SINS+7
JUMP^PSONEW1 JUMP+4
JUMP^PSONEW3 JUMP+6
DOSE1^PSOORED5 DOSE+2
JUMP^PSOREF1 JUMP+5
JUMP^PSORENW3 JUMP+7
$$DETOX^PSSOPKI PROVEN+20
$$DETOX^XUSER PROVEN+20
$$SDEA^XUSER PROVEN+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!!,"Provider not authorized to write Federal Schedule "_SDEA_" prescriptions.",!
  • Line Location: PROVEN+17
Function Call: WRITE
  • Prompt: $C(7),!!,"Provider must have a DETOX# to order this drug.",!
  • Line Location: PROVEN+20
Routine Call
  • DIC
  • Line Location:
    • PROVEN+10
    • COSIGN1+3
    • JUMP+2
Routine Call
  • DIR
  • Line Location:
    • DIR+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
^PSNDF(50.68 - [#50.68] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(50.7 - [#50.7] INS+12, SINS+3
^PS(52.41 - [#52.41] INS+11
^PSDRUG - [#50] DRGSCH+2
^TMP($J INS+6!*, INS+8, INS+9!
^VA(200 - [#200] PROVEN+1, NODRUG+4, NODRUG+5, COSIGN+3, COSIGN+4, COSIGN+5, COSIGN1
^XUSEC("YSCL AUTHORIZED" PROVEN+21

Label References

Name Line Occurrences
$$DRGSCH PROVEN+16
COSIGN NODRUG+4, COSIGN1+5
COSIGN1 COSIGN+2
COSIGNX COSIGN1+4
DIR GENERIC+3, INSD+1, SINS+4
DIRX DIR+2, DIR+4
EX INS+5, INSD+3, INSD+8, SINS+4, SINS+8
GENERIC NODRUG+3
GENERICX GENERIC+3
INSD INS+3, INS+10, INS+11, INS+12, INSD+4
JUMP PROVEN+11, DIR+5
JUMPX JUMP+3, JUMP+4, JUMP+5, JUMP+6, JUMP+7
NODRUG PROVEN+23
PROVEN PROVEN+13, PROVEN+16, PROVEN+20, PROVEN+21
PROVX PROVEN+11, PROVEN+12

Naked Globals

Name Field # of Occurrence
^("PS" NODRUG+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CLOZPAT PROVEN+16, PROVEN+21
D INS+2*, INS+6*, INS+8*, INS+9!
DA INS+1~, DIR+3!
DD EX!, INS+2!*, INS+3, INS+5
DEA PROVEN+3~*
DIC PROVEN+1!, PROVEN+5*, PROVEN+10!, GENERIC+1!, COSIGN+1!, COSIGN1*, COSIGN1+3!, INS+7*, DIR+3!, JUMP+2*!
DIC("A" PROVEN+7*, COSIGN1+3*
DIC("B" PROVEN+1*, PROVEN+9*, COSIGN1*
DIC("S" PROVEN+7*, PROVEN+8*, COSIGN1+1*, COSIGN1+2*
DIC("W" PROVEN+6*, COSIGN1+2*
DIC(0 PROVEN+5*, COSIGN1*, JUMP+2*
DIE DIR+3!
DIR GENERIC+1!, EX!, INS+2!, SINS+1!, DIR+3!
DIR("B" INS+12*, INS+13*, INSD*, SINS+2*, SINS+3*
DIR(0 GENERIC+2*, INSD*, SINS+2*, DIR+2
DIROUT DIR+4, DIRX!
DIRUT EX!, INS+2!, DIRX!
DOOR EX!
DOSE EX!
DOSEOR EX!
DRUA EX!
DTOUT PROVEN+12, COSIGN1+4, DIR+4, DIRX!
DUOUT PROVEN+12, COSIGN1+4, DIR+4, DIRX!
DWLW INS+7*, INS+9!
DWPK INS+7*, INS+9!
ENT EX!
ERTE EX!
INS1 EX!, INS+2!, INSD+5
ND3 DRGSCH+1~, DRGSCH+2*
NDEA PROVEN+16~*, PROVEN+17
NOUN EX!
>> OR0 PROVEN+1, JUMP+1
>> ORD INS+11
>> PSODELINS INSD+6*, SINS+7*
PSODIR PROV~, DOSE~, DOSE+2, INS~, INS+9, INSD+2, INSD+7, SINS~, SINS+4, SINS+7
PSODIR("COSIG NING PROVIDER" , NODRUG+2!, NODRUG+5!, COSIGN+2*, COSIGN+5*, COSIGN1, COSIGN1+5*
PSODIR("CS" PROVEN+2, PROVEN+3*, PROVEN+16
PSODIR("DFLG" PROVEN+12*, GENERIC+3, COSIGN1+4*, INSD+2, INSD+3, SINS+4, DIR+4*, JUMP+1*
PSODIR("FIELD" PROVEN+5*, GENERIC+3, INSD+3, DIR+1*, JUMP+3*
PSODIR("FLD" INS+12, INSD+6*, SINS+3, SINS+7*, JUMP+3
PSODIR("GENER IC PROVIDER" , NODRUG+2!, GENERIC+1!, GENERIC+4*
PSODIR("INS" INS+3*, INS+12, INSD, INSD+2*, INSD+4*, INSD+6!, SINS+4*, SINS+7!
PSODIR("OLD V AL" , PROVEN+4*, NODRUG+2, NODRUG+3
PSODIR("PROVI DER NAME" , NODRUG+1*
PSODIR("PROVIDER" PROVEN+4, NODRUG*, NODRUG+3, NODRUG+4, NODRUG+5, COSIGN+3, COSIGN+5, COSIGN1
PSODIR("SIG" INS+2, INS+3, INS+6, INS+7!, INS+8*, INS+13, INSD+2*, INSD+5*, INSD+6!, SINS+4*
, SINS+7!
PSODIR("SINS" INSD+2*, INSD+6!, SINS+2, SINS+3, SINS+4*, SINS+5*, SINS+6*, SINS+7!
PSODOSE EX!
PSODOSNW DOSE+1~*
>> PSODRUG("DEA" PROVEN+2, PROVEN+3, DRGSCH+3, DRGSCH+4, DRGSCH+5
>> PSODRUG("IEN" PROVEN+20, PROVEN+23, DRGSCH+2
>> PSODRUG("OI" INS+12, SINS+3
>> PSOEDIT PROVEN+11, DIR+5, JUMP+1
>> PSOFDR PROVEN+1, INS+11
>> PSOFROM PROVEN+8
>> PSOINSFL INS+10
>> PSONEW1 JUMP+4
>> PSONEW3 JUMP+6
>> PSOOEINS INS+12*, INS+13*, INSD+2, SINS+3, SINS+4
>> PSOOSINS INSD+2, SINS+3*, SINS+4
>> PSOREF1 JUMP+5
>> PSORENW("DRUG IEN" , PROVEN+23
>> PSORENW3 JUMP+7
PSORTE EX!
>> PSORX("PROVID ER NAME" , PROVEN+9, NODRUG+1*
PSOSCH EX!
>> PSOTPBFG PROVEN+8
PSOX DIRX!
RTE EX!
>> RX3 COSIGN+2, COSIGN+3, COSIGN+4, COSIGN+5
SCH DRGSCH+1~, DRGSCH+2*, DRGSCH+3, EX!
SDEA PROVEN+16~*, PROVEN+17
>> SIG(0 INSD+7
>> SIGOK INSD+7*
SINS1 EX!, SINS+1!, SINS+6
>> SPEED PROVEN+13, PROVEN+14
U PROVEN+11, DIR+5
VERB EX!
X PROVEN+1!, PROVEN+11, PROVX!, GENERICX!, COSIGNX!, EX!, INSD+4, INSD+6, SINS+5, SINS+7
, DIR+4, DIR+5, JUMP+2*, JUMPX*
Y PROVEN+1!, PROVEN+13, PROVEN+14, PROVEN+16, PROVEN+20, PROVEN+21, NODRUG, NODRUG+1, NODRUG+2, NODRUG+3
, PROVX!, GENERIC+4, GENERICX!, COSIGN1+5, COSIGNX!, EX!, INSD+4, SINS+5, JUMP+3
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