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

Package: Registration

Routine: DPTLK5


Information

DPTLK5 ;BAY/JAT,EG - Patient lookup APIs for patient safety issues ; 11 Aug 2005 8:20 AM

Source Information

Source file <DPTLK5.m>

Entry Points

Name Comments DBIA/ICR reference
BS5(DPTDFN) ;function checks if other patients on "BS5" xref
; with same last name
; returns 1 if other patients exist
; input: ien of Patient file
DMT(DPTDFN,DPTUSER) ; function checks if the 'Display Means Test Required'
; message is to be displayed for this Division
; returns Division ien if message is to be displayed
; input: a) ien of Patient file
; b) user's Institution for current session (DUZ(2))
; DD(200.02,.01)<==>DD(4,DINUM)<==>DD(40.8,.07)
FFP ; This function checks if the 'Display Fugitive Felon Message'
; message is to be displayed. Message displays only for DG and SD
; menu options

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?17,$CHAR(7)
  • Line Location: FFP+10
Function Call: WRITE
  • Prompt: IORVON
  • Condition for execution: $D(IORVON)
  • Line Location: FFP+10
Function Call: WRITE
  • Prompt: "*** WARNING - FFP FLAG ACTIVE ***"
  • Line Location: FFP+10
Function Call: WRITE
  • Prompt: IORVOFF
  • Condition for execution: $D(IORVOFF)
  • Line Location: FFP+10
Function Call: WRITE
  • Prompt: !?19,$CHAR(7)
  • Line Location: FFP+11
Function Call: WRITE
  • Prompt: IORVON
  • Condition for execution: $D(IORVON)
  • Line Location: FFP+11
Function Call: WRITE
  • Prompt: "PLEASE NOTIFY YOUR SUPERVISOR"
  • Line Location: FFP+11
Function Call: WRITE
  • Prompt: IORVOFF
  • Condition for execution: $D(IORVOFF)
  • Line Location: FFP+11
Function Call: WRITE
  • Prompt: !
  • Line Location: FFP+12
Info |  Source |  Entry Points |  Interaction Calls