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

Package: Inpatient Medications

Routine: PSIVORC


Information

PSIVORC ;BIR/MLM-COMPLETE IV ORDERS ENTERED THROUGH OE/RR ;02 Mar 99 / 10:16 AM

Source Information

Source file <PSIVORC.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; Set IV parameters.
SELECT ;
GTORDRS ;
PROFILE ; Display profile of all incomplete orders.
DISPLAY ; Display order on profile.
GTYP ; Get formatted heading for type
ASK ; Ask which orders to view.
SHOW ; Display selected order and prompt for action
SHOW1 ; Entry point from backdoor.
G
W
P
GG ; put patient(s) with incomplete orders into array
GW
GP ;
DISCONT ; Cancel incomplete order
D2 ; Called from PNDRN for pending order
D3 ; called from PNDRN for original order
EDIT ; Edit incomplete order
FINISH ; Finish incomplete order
PNDRN(PSJDCTYP) ; Discontinue pending renewal only or both pending and original orders

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"NO PENDING ORDERS FOR ",$S(PSGSS="P":"PATIENT",1:"WARD"),$S(PSGSS="G":" GROUP",1:"")," SELECTED."
  • Line Location: GTORDRS+2
Function Call: WRITE
  • Prompt: !?3,PSGLMT
  • Line Location: DISPLAY+2
Function Call: WRITE
  • Prompt: !,X_PSIV_X
  • Line Location: GTYP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: G+0
Function Call: WRITE
  • Prompt: S
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,$C(7),"Order Unchanged."
  • Line Location: D2+1
Function Call: WRITE
  • Prompt: !,$C(7),"Order Unchanged."
  • Line Location: D2+3
Function Call: WRITE
  • Prompt: !
  • Line Location: D2+4
Function Call: WRITE
  • Prompt: !,"Order discontinued.",!
  • Line Location: D3+4
Function Call: WRITE
  • Prompt: !,$C(7),"This order LOCKED by another user."
  • Line Location: EDIT+1
Function Call: WRITE
  • Prompt: !,$C(7),"This order LOCKED by another user."
  • Line Location: FINISH+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(42 - [#42] Classic Fileman Calls
^PS(53.1 - [#53.1] FIELD^DID
^PS(57.5 - [#57.5] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call