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
Print Page as PDF
Routine: PSJOCDI

Package: Inpatient Medications

Routine: PSJOCDI


Information

PSJOCDI ;BIR/MV - DISPLAY DRUG INTERACTION ORDER CHECKS ; Jun 06, 2007@15:37

Source Information

Source file <PSJOCDI.m>

Entry Points

Name Comments DBIA/ICR reference
DI ;
DSPLOC ;Display drug drug interaction - sorted by severity, prospective drug (50,.01), profile drug (VAgen name), package, seq#
DSPCRTCL(PSJPSPEC,PSJPROFL) ;Display Critical orders
DISPON ; Display orders & clin effects if applied.
DISPON2 ;
SORTORD ;Sort drug drug output to display in order of: Inpatient, Active Rx, Remote Rx, Pending Rx, Non_VA
OCLST(PSJ1,PSJCLINF) ;Sort orders into array to display later
CLIN(PSJSEV,PSJDNM,PSJPON,PSJDN,PSJLINE) ;
INTERV ;Log intervention. Required for Critical.
HDR(PSJDNM) ;Display the intro text on drug interaction
PSTAT(PSJPONCK) ;**Display order status - CCR 5980
DSPDRG(PSJPON,PSJDNM,PSJCLINF) ;Display order info or drug name from prospective. CCR 6454
RDIVUID ;Loop thru the "IN" global to store the VUID for remote Rx
DSPLCLIN(PSJ2) ;If the next drug on the list is diff the flag to display the clin effects.
CRITICAL ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"*** REFER TO MONOGRAPH FOR SIGNIFICANT INTERACTION CLINICAL EFFECTS",!
  • Line Location: DI+18
Function Call: WRITE
  • Prompt: !
  • Line Location: DI+20
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DSPLOC+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DSPLOC+31
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISPON+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISPON+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISPON+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISPON+16
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISPON2+3
Function Call: WRITE
  • Prompt: !
  • Line Location: CLIN+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CLIN+8
Function Call: WRITE
  • Prompt: !
  • Line Location: CLIN+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CLIN+11
Function Call: WRITE
  • Prompt: !,?8,$G(PSJDNM)_$G(PSJSTCK),!
  • Line Location: DSPDRG+3
Function Call: WRITE
  • Prompt: !?8,$G(PSJDNM)_" (Prospective)",!
  • Line Location: DSPDRG+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DSPDRG+7
Info |  Source |  Entry Points |  Interaction Calls