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

Package: Inpatient Medications

Routine: PSIVUTL1


Information

PSIVUTL1 ;BIR/MLM-IV UTILITIES ; 2/2/09 9:17am

Source Information

Source file <PSIVUTL1.m>

Entry Points

Name Comments DBIA/ICR reference
DRGSC(Y,PSJSCT) ; Called to set DIC("S") when selecting orderable item.
IVDRGSC(Y) ; Set DIC("S") for IV additive/solution selection.
; Naked reference below refers to full reference in Y, which is either ^PS(52.6, or ^PS(52.7
ENU(Y) ;Get IV additive strength.
CODES(X,Y) ; Get name from code.
GTPCI(Y) ; Set up "work" area for provider comments.
WDTE(Y) ; Format and print date.
GTOT(DFN,ON) ; Get order type for display.
PIV(ON) ; Display IV orders.
SOL ;
PIVAD ; Print IV Additives.
PIV1 ; Print Sched type, start/stop dates, and status.
59 ; Validate the Infusion rate entered using IV Quick order code.
WRTDRG(X,L)
NAME(X,L,NAME,AD)
CNVTOM(RATE,TVOL) ; Convert volume to minutes
; Input:
; RATE - Infusion Rate
; TVOL - Volume being infused, EX: m100 (100 Milliliters) or l5 (5 Liters)
; Output:
; MINS - Minutes required to infuse volume
GETMIN(LIM,DFN,PSJORD,DAYS) ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?11,"Give: ",P("DO")," ",$P(P("MR"),U,2)," ",$S(P(9)]"":P(9),1:P(8))
  • Line Location: PIV+8
Function Call: WRITE
  • Prompt: !
  • Line Location: SOL+4
Function Call: WRITE
  • Prompt: ?9,"in "
  • Condition for execution: DRG=1
  • Line Location: SOL+4
Function Call: WRITE
  • Prompt: ?9,NAME(X)
  • Line Location: PIVAD+3
Function Call: WRITE
  • Prompt: ?50,TYP,?53,P(2),?60,P(3),?67,P(17)
  • Line Location: PIV1+2
Function Call: WRITE
  • Prompt: ?50,TYP,?53,P(2),?63,P(3),?73,P(17)
  • Line Location: PIV1+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(53.45 - [#53.45] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call