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

Package: Inpatient Medications

Routine: PSJOE0


Information

PSJOE0 ;BIR/CML3-INPATIENT PROFILE AND ORDER ENTRY ;Mar 06, 2020@10:39

Source Information

Source file <PSJOE0.m>

Entry Points

Name Comments DBIA/ICR reference
START ; print orders
ENVW ; ask user to select or view any of the orders shown
LMNEW(PSGP,PSJPROT) ;Entry point for new order entry from listman.
; PSGP = DFN
; PSJPROT=1:UD ONLY; 2:IV ONLY; 3:BOTH
DONE ;
CM ; Clinic Medication Order ;*p319
CMK ; Clean-up CM variables *p319
CKNEW ;
CONT ;
GODO ;Display selected order.
GODO1 ;
ASKTYP ; Ask if completing as IV or UD.
OLDCOM(DFN,PSJORD) ;
AM ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?2,"Patient is shown as deceased. You may not enter orders for this patient."
  • Line Location: CKNEW+2
Function Call: WRITE
  • Prompt: !
  • Line Location: CKNEW+5
Function Call: WRITE
  • Prompt: !!,"(NOTE: You cannot enter Unit Dose orders for this patient.)"
  • Line Location: CKNEW+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: ASKTYP+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKTYP+4
Function Call: WRITE
  • Prompt: !!!!!?21," * WARNING * "
  • Line Location: OLDCOM+3
Function Call: WRITE
  • Prompt: !!!?5,"The following order contains a Requested Duration"
  • Line Location: OLDCOM+4
Function Call: WRITE
  • Prompt: !?12,"and may be part of a complex dose!"
  • Line Location: OLDCOM+5
Function Call: WRITE
  • Prompt: !!," Review the entire profile to determine appropriate action(s).",!!!!!!!
  • Line Location: OLDCOM+6
Function Call: WRITE
  • Prompt: !!?2,"Enter a 'Y' (or press the RETURN key) to enter new INPATIENT orders for this",!,"patient. Enter an 'N' (or an '^') if there are no new orders for this patient."
  • Line Location: AM+1
Info |  Source |  Entry Points |  Interaction Calls