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

Package: Barcode Medication Administration

Routine: PSBMLEN


Information

PSBMLEN ;BIRMINGHAM/EFC-BCMA MEDICATION LOG FUNCTIONS ;03/06/16 3:06pm

Source Information

Source file <PSBMLEN.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
EN1 ;
EN2 ;
HDR() ;
EDIT
EDIT1
VALID ;
UNITS ;Check UNITS field for entry of PATCH

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"Manual Medication Entry",!
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"This option is NOT AVAILABLE in PSB READ ONLY mode.",!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,"Notice: No validation of medications is done with this option."
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"Entries in the Med Log created with this option will reflect this"
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !,"in the comments.",!!
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !,"Searching for Orders..."
  • Line Location: EN1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+44
Function Call: WRITE
  • Prompt: !!?5,"No Med Orders Found!",!
  • Line Location: EN2+1
Function Call: WRITE
  • Prompt: !?7,"Admin Times: ",$$CNVRT4^PSBUTL($P(^TMP("PSB",$J,PSBSCHT,PSBMED,PSBX),U,2),"-")
  • Line Location: EN2+20
Function Call: WRITE
  • Prompt: !
  • Line Location: EN2+27
Function Call: WRITE
  • Prompt: @IOF,"Manual Medication Entry",!," #",?4,"Sc",?7,"Medication",?41,"St"
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM)," ","-")
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: EDIT1+2
Function Call: WRITE
  • Prompt: Y
  • Line Location: EDIT1+4
Function Call: WRITE
  • Prompt: Y
  • Line Location: EDIT1+16
Function Call: WRITE
  • Prompt: ?5," ("_$$GET1^DIQ(53.79,PSBIEN_",",.26)_")"
  • Line Location: EDIT1+21
Function Call: WRITE
  • Prompt: !!?5,"No Meds Found!"
  • Line Location: EDIT1+28
Function Call: WRITE
  • Prompt: !,$C(7)
  • Line Location: EDIT1+56
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: VALID+1
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: VALID+5
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: VALID+6
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: VALID+7
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: UNITS+4

FileMan Files Accessed Via FileMan Db Call

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