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

Package: Inpatient Medications

Routine: PSIVORE2


Information

PSIVORE2 ;BIR/RGY,PR,MLM - ACT, NEW ORDER (CONT. OF PSIVORE1) ;Nov 10, 2020@14:01:05

Source Information

Source file <PSIVORE2.m>

Entry Points

Name Comments DBIA/ICR reference
DEQ ;
K ;
TL ;
TL1 ;
C ;
CONVER(X,Y) ;
CONVER1(ORDDT,X,Y)
INCOMP ; Delete order missing critical information.
DEL55 ; Delete order from 55.
NEW ; New order entry
GTPD ; Find Orderable Item/dosage ordered for IM.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: TL+1
Function Call: WRITE
  • Prompt: " ",$S($L(X)=1:" ",1:""),X
  • Line Location: TL+1
Function Call: WRITE
  • Prompt: !
  • Line Location: TL+2
Function Call: WRITE
  • Prompt: "..:"
  • Line Location: TL+2
Function Call: WRITE
  • Prompt: ?3*$E(Y_"000",2,3)-1+$S($E(Y_"000",4,5)>40:2,$E(Y_"000",4,5)>20:1,1:0),PSI,PSI(Y)
  • Line Location: TL1+1
Function Call: WRITE
  • Prompt: !!,$C(7),"THIS ORDER IS NOT USABLE!",!,"Enter ""D"" to Delete, or ""B"" to Bypass",!
  • Line Location: INCOMP+1
Info |  Source |  Entry Points |  Interaction Calls