Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSODGDGP

Package: Outpatient Pharmacy

Routine: PSODGDGP


Information

PSODGDGP ;BIR/SAB - drug drug interaction checker ;4/14/93

Source Information

Source file <PSODGDGP.m>

Entry Points

Name Comments DBIA/ICR reference
TECH ;add tech entry to RX VERIFY file (#52.4); called from new order/copy/renew
TECH2(PSOXIRXN,PSODFN,DUZ,PSOX) ;
T3 ;
; The only time PSOX("NOPSDRPH) key is defined equal to 1 is for controlled substances and the user doesn't hold
; the PSDRPH key.
BLD
BLD2 ;
PHARM ;pharmacist verification of drug interaction
CRI ;process new drug interactions entered by pharmacist
CRITN ;process multiple new drug interactions
MESS
PPL
ULRX ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!,"DRUG INTERACTON WITH RX #s: "_LSI,!
  • Line Location: PSODGDGP+9
Function Call: WRITE
  • Prompt: !!,"Remote data not available - Only local order checks processed.",!!
  • Line Location: PSODGDGP+17
Function Call: WRITE
  • Prompt: !
  • Line Location: PHARM+4
Function Call: WRITE
  • Prompt: $C(7)," ACTION NOT TAKEN!",!
  • Line Location: CRITN+8
Function Call: WRITE
  • Prompt: !!,"Canceling Rx: "_$P($G(^PSRX(DA,0)),"^")_" "_"Drug: "_$P($G(^PSDRUG($P(^PSRX(DA,0),"^",6),0)),"^"),!
  • Line Location: MESS+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(52.4 - [#52.4] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call