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

Package: Barcode Medication Administration

Routine: PSBOMH2


Information

PSBOMH2 ;BIRMINGHAM/EFC-MAH ;9/13/12 5:15pm

Source Information

Source file <PSBOMH2.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; Add dual sections for MAH report - IM and then CO *70
; only one Legend section after CO section
; sort 1 = IM sort 2 = CO
CONT(XO) ;
PRN(XO) ;
LEGEND ;
HDR(PRN) ;
; PRN = TRUE IF DISPLAYING PRN MED (OPTIONAL)
PSBCK1(PSBCHK) ;
PSBENT(PSBTIS) ;
PSBSTIV ;
PSBCTAR ;
SIOPI ;Get and print SI/OPI Wp text *68
CHKPAGE ;check for page full and print overflow msgs and new page headers *68

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$HDR()
  • Line Location: CONT+3
Function Call: WRITE
  • Prompt: " "
  • Line Location: CONT+21
Function Call: WRITE
  • Prompt: "HOLD"
  • Line Location: CONT+25
Function Call: WRITE
  • Prompt: "***"
  • Line Location: CONT+27
Function Call: WRITE
  • Prompt: "***"
  • Line Location: CONT+28
Function Call: WRITE
  • Prompt: $$HDR(1)
  • Line Location: PRN+2
Function Call: WRITE
  • Prompt: !!,"Initial - Name Legend",!
  • Line Location: LEGEND+4
Function Call: WRITE
  • Prompt: !!,"Status Codes",!,"C - Completed",!,"G - Given",!,"H - Held",!,"I - Infusing",!,"M - Missing Dose Requested",!,"N - Not Given (Undo-Given)",!,"R - Refused",!,"RM - Removed",!,"S - Stopped",!
  • Line Location: LEGEND+8
Function Call: WRITE
  • Prompt: "> - Scheduled administration times for the order have been changed",!,"*** - Medication Not Due",!
  • Line Location: LEGEND+9
Function Call: WRITE
  • Prompt: !,"Location",?32,"| "
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?(40+(X*13)),"|"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: ?(40+(X*13)),"|"
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM)," ","-")
  • Line Location: HDR+15
Function Call: WRITE
  • Prompt: !," Special Instructions:"
  • Line Location: SIOPI+6
Function Call: WRITE
  • Prompt: !," ",SITXT
  • Line Location: SIOPI+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSB(53.79 - [#53.79] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call