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

Package: Barcode Medication Administration

Routine: PSBOWA


Information

PSBOWA ;BIRMINGHAM/EFC-WARD ADMINISTRATION TIMES ;2/6/21 18:03

Source Information

Source file <PSBOWA.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
PATIENT ;* * * Print By Patient * * *
WARD ;* * * * Print By Ward * * *
CLINIC ;* * * Print By Clinic * * * ;*70-1480
QUIT
WRDHDR() ;
CLNHDR() ;
PTHDR() ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$PTHDR()
  • Line Location: PATIENT+86
Function Call: WRITE
  • Prompt: !,$P(PSBTOT(PSBX,PSBY,PSBZ),U,1),?20,PSBY
  • Line Location: PATIENT+91
Function Call: WRITE
  • Prompt: !
  • Line Location: PATIENT+96
Function Call: WRITE
  • Prompt: $$PTFTR^PSBOHDR()
  • Line Location: PATIENT+99
Function Call: WRITE
  • Prompt: $J(PSBTOT(PSBX),4)
  • Line Location: WARD+58
Function Call: WRITE
  • Prompt: $J($E(X_"00",2,3),4)
  • Line Location: WARD+61
Function Call: WRITE
  • Prompt: $J($E(X_"00",2,3),4)
  • Line Location: CLINIC+73
Function Call: WRITE
  • Prompt: !,"Patient Name",?64,Y_" Administration Times"
  • Line Location: WRDHDR+4
Function Call: WRITE
  • Prompt: !,"Room-Bed",?32
  • Line Location: WRDHDR+5
Function Call: WRITE
  • Prompt: $J($E(X_"00",2,3),4)
  • Line Location: WRDHDR+6
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM)," ","-")
  • Line Location: WRDHDR+7
Function Call: WRITE
  • Prompt: !,"Patient Name",?64,Y_" Administration Times"
  • Line Location: CLNHDR+5
Function Call: WRITE
  • Prompt: !,"SSN",!,"Location",?32
  • Line Location: CLNHDR+6
Function Call: WRITE
  • Prompt: $J($E(X_"00",2,3),4)
  • Line Location: CLNHDR+7
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM)," ","-")
  • Line Location: CLNHDR+8
Function Call: WRITE
  • Prompt: !,"Date/Time",?10,"Self Med",?20,"Medication",?55,"Dose/Route"
  • Line Location: PTHDR+4
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM)," ","-")
  • Line Location: PTHDR+5
Function Call: WRITE
  • Prompt: !!,Y,!
  • Line Location: PTHDR+7
Info |  Source |  Entry Points |  Interaction Calls