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

Package: Barcode Medication Administration

Routine: PSBOMT


Information

PSBOMT ;BIRMINGHAM/TEJ-BCMA MEDICATION THERAPY REPORT ;03/06/16 3:06pm

Source Information

Source file <PSBOMT.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
OUT(PSBXDFN,PSBSTRT,PSBSTOP) ;
GETOIS ;
OFROMA(PSBADD) ;OITEM FROM AN ADDITIVE
OFROMS(PSBSOL) ;OITEM FROM A SOLUTION
PREOUT ;
OUTPUT ;
PRNEFF ;Add PRN Effectiveness to Medication theropy Report - PSB*3*50
COMNTS ;
WRAPMEDS(W,MED,UG,UO,UOA) ;insert parm W (possible RM string) to print on line 1 *83
HEADA ;
NONSTS(PSBX,PSBY) ;
WRITEOT ;
MEDS ;
WRAP(SIZE,ZP,BRIEN) ;
ADD(XE) ;
GETDRN(IEN1) ;
; Get the Drug IEN (p50) via OI IEN (p50.7)
GETCLSS(IEN1) ;
; Get the Items w/i VA Class

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: possible
  • Line Location: OUTPUT+31
Function Call: WRITE
  • Prompt: (possible
  • Line Location: WRAPMEDS+0
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADA+1
Function Call: WRITE
  • Prompt: "Location",?21,"St Sch Administration Date",?50,"By",?61,"Body Site",?96,"Units",?104,"Units",?113,"Units of"
  • Line Location: HEADA+2
Function Call: WRITE
  • Prompt: !,?56,"Medication & Dosage",?96,"Ordered",?104,"Given",?113,"Administration"
  • Line Location: HEADA+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADA+4
Function Call: WRITE
  • Prompt: $$MAKELINE^PSBOMT1("-",132)
  • Line Location: HEADA+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSDRUG - [#50] GET1^DIQ
^PS(50.7 - [#50.7] GET1^DIQ
^PS(52.6 - [#52.6] GET1^DIQ
^PS(52.7 - [#52.7] GET1^DIQ
^PSB(53.79 - [#53.79] GET1^DIQ
53.793 GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call