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

Package: Registration

Routine: DGMSTL1


Information

DGMSTL1 ;ALB/SCK - MST Status entry cont. ; 11/15/01 2:27pm

Source Information

Source file <DGMSTL1.m>

Entry Points

Name Comments DBIA/ICR reference
PAT ;
ASKP
STAT ;
ASKS
ASKS1
EL ; Edit MST status in current List Manager Display
DL ; Delete entry from list and from the MST HISTORY File (#29.11)
DP ; Display patient MST status history for a patient not in the current liST
SENDMST ; Send HL7 messages for current list
SEND(DFN,EVNT) ; Send HL7 message
SELECT() ;
CONFIRM(MSTDFN,MSTST) ; Confirm deletion of patient's MST status
; Confirm deletion for this patient
HANG ; This logic allows the messages to display briefly to the User.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," MST Status has not been changed, Nothing done.",!
  • Line Location: ASKP+10
Function Call: WRITE
  • Prompt: !!,"The following occurred when saving this status:"
  • Line Location: ASKP+24
Function Call: WRITE
  • Prompt: !,$$EZBLD^DIALOG($P(MSTX,U,2)),!
  • Line Location: ASKP+25
Function Call: WRITE
  • Prompt: !!,"The following occurred when saving this status:"
  • Line Location: ASKS1+15
Function Call: WRITE
  • Prompt: !,$$EZBLD^DIALOG($P(MSTX,U,2)),!
  • Line Location: ASKS1+16
Function Call: WRITE
  • Prompt: !!,"Unable to retrieve data at this time."
  • Line Location: EL+14
Function Call: WRITE
  • Prompt: !!,"Edit MST status for "_DGMST(29.11,MSTIENC,2,"E")
  • Line Location: EL+16
Function Call: WRITE
  • Prompt: !
  • Line Location: EL+32
Function Call: WRITE
  • Prompt: !!,$P(DGRSLT,U,2)
  • Line Location: DL+18
Function Call: WRITE
  • Prompt: !?5,"No patient found"
  • Line Location: DP+9
Function Call: WRITE
  • Prompt: !!,"Queuing MST updates for HL7 processing..."
  • Line Location: SENDMST+5
Function Call: WRITE
  • Prompt: !!,"Queuing completed..."
  • Line Location: SENDMST+11
Function Call: READ
  • Variable: DGPTHANG
  • Timeout: 4
  • Line Location: HANG+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGMS(29.11 - [#29.11] GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call