Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: PSJUTL5

Package: Inpatient Medications

Routine: PSJUTL5


Information

PSJUTL5 ;BIR/MLM-UTILITY TO HANDLE NATURE OF ORDER FOR OE/RR ;04 AUG 97 / 2:20 PM

Source Information

Source file <PSJUTL5.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Order Entry Results Reporting 1 ($$NA,NA)^ORX1  
Registration 1 FULL^VALM1  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 13

Package Total Caller Graph
Inpatient Medications 13 PSGOD  PSGOEC  PSGOECS  PSGOEE  PSGOEE0  PSGOEF  PSGOEH0  PSGOEH1  
PSGOER0  PSGOES  PSIVOREN  PSJOE1  PSJUTL99  

Entry Points

Name Comments DBIA/ICR reference
XH
E
D
DH
VH
H
SH
N
IH
EH
R
PH
WH
ENNOO(X) ; nature of order (for oe/rr)
; X - Action taken on order.
HELP ;Extended Help

External References

Name Field # of Occurrence
^DIR ENNOO+13
$$NA^ORX1 N, E, R, D, H
NA^ORX1 N, N+1, E, E+1, R, R+1, D, D+1, H, H+1
FULL^VALM1 ENNOO+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?55,"Prompted for Chart Copy",!?55,"Signature in Printed?",!?55,"CPRS?",!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !?2,"Written",?12," - The source of the order is a written",?59,"No",?74,"No",!?15,"doctor's order."
  • Line Location: WH+0
Function Call: WRITE
  • Prompt: !?2,"Verbal",?12," - A doctor verbally requested the order.",?59,"Yes",?74,"Yes"
  • Line Location: VH+0
Function Call: WRITE
  • Prompt: !?2,"Telephoned",?12," - A doctor phoned the service to request",?59,"Yes",?74,"Yes",!?15,"the order."
  • Line Location: PH+0
Function Call: WRITE
  • Prompt: !?2,"Service",?12," - The service is discontinuing or adding",?59,"No",?74,"No",!?2,"Correction",?15,"new orders to carry out the intent of",!?15,"an order already received."
  • Line Location: SH+0
Function Call: WRITE
  • Prompt: !?2,"Rejected",?12," - The service discontinued the order",?59,"No",?74,"No",!?15,"because it was unable to perform the",!?15,"task."
  • Line Location: XH+0
Function Call: WRITE
  • Prompt: !?2,"Duplicate",?12," - This applies to orders that are",?59,"No",?74,"Yes",!?15,"discontinued because they are a",!?15,"duplicate of another order."
  • Line Location: DH+0
Function Call: WRITE
  • Prompt: !?2,"Policy",?12," - These are orders that are created as",?59,"No",?74,"Yes",!?15,"a matter of hospital policy."
  • Line Location: IH+0
Function Call: WRITE
  • Prompt: !?2,"Physician",?12," - These are orders that are entered by",?59,"Yes",?74,"Yes",!?2,"Entered",?15,"the ordering provider."
  • Line Location: EH+0
Routine Call
  • DIR
  • Line Location:
    • ENNOO+13

Label References

Name Line Occurrences
@( ENNOO+5, HELP+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACT ENNOO+3~*, ENNOO+5, HELP+2
DA ENNOO+3~
DIR ENNOO+3~
DIR("?" ENNOO+9*, ENNOO+10*, ENNOO+11*
DIR("??" ENNOO+12*
DIR("A" ENNOO+8*
DIR("B" ENNOO+8*
DIR(0 N+1*, E+1*, R+1*, D+1*, H+1*
DIRUT ENNOO+13!
>> PSJSYSU ENNOO+2
X ENNOO~, ENNOO+3
Y ENNOO+2~*, ENNOO+3!, ENNOO+6*, ENNOO+7, ENNOO+13*, ENNOO+14, N*, E*, R*, D*
, H*

Marked Items

Name Field # of Occurrence
$T(NA^ORX1 N, N+1, E, E+1, R, R+1, D, D+1, H, H+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  Marked Items |  All