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

Package: Inpatient Medications

Routine: PSIVRDC


Information

PSIVRDC ;BIR/MV - RECYCLE, CANCEL, DESTROY ACTIONS ;30 Aug 2001 4:21 PM

Source Information

Source file <PSIVRDC.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
GTID(PSJRDC) ;
UPDID(PSJID,PSJRDC)
DSPLY ;Display the patient name, additives/solutions.
TXT(X) ;Expand the set of code to text.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"...Invalid ID number. Please try again.",!!
  • Line Location: UPDID+2
Function Call: WRITE
  • Prompt: !!,"...Invalid ID number. Please try again.",!!
  • Line Location: UPDID+4
Function Call: WRITE
  • Prompt: !
  • Line Location: UPDID+5
Function Call: WRITE
  • Prompt: !,"...The ID entered was marked as "
  • Line Location: UPDID+8
Function Call: WRITE
  • Prompt: $S(PSJLB(4)="C":"Completed.",PSJLB(4)="G":"Given.",PSJLB(4)="I":"Infusing.",PSJLB(4)="S":"Stop.",PSJLB(7)="CA":"Cancel.",PSJLB(7)="DT":"Destroy.",PSJLB(7)="RC":"Recycle.",1:""),!
  • Line Location: UPDID+9
Function Call: WRITE
  • Prompt: !,"...Barcode ID did not match. No action was taken."
  • Line Location: UPDID+14
Function Call: WRITE
  • Prompt: !
  • Line Location: UPDID+14
Function Call: WRITE
  • Prompt: !,"...Done!",!!
  • Line Location: UPDID+26
Function Call: WRITE
  • Prompt: !,VADM(1),!
  • Line Location: DSPLY+6
Function Call: WRITE
  • Prompt: !,^(X,0)
  • Line Location: DSPLY+7
Function Call: WRITE
  • Prompt: !
  • Line Location: DSPLY+8
Info |  Source |  Entry Points |  Interaction Calls