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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
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>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
VA FileMan 5 $$EZBLD^DIALOG  ^DIC  FILE^DIE  GETS^DIQ  ^DIR  
List Manager 4 EN^VALM  FULL^VALM1  FLDTEXT^VALM10  EN^VALM2  
Registration 3 AUTOUPD^DGENA2  ($$DELMST,$$GETSTAT,$$NAME,$$NEWSTAT)^DGMSTAPI  ($$ASKDATE,$$ASKPROV,$$CHKNUL,$$EXTMST,ADDSTR,NUL)^DGMSTL2  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 9

Package Total Caller Graph
Registration 8 DG53P379  DGMST DELETE ENTRY  DGMST DISPLAY PATIENT  DGMST EDIT ENTRY  DGMST ENTER BY STATUS  DGMST PATIENT ENTER  DGMSTAPI  DGMSTL  
Kernel 1 ^ORD(101  

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.

External References

Name Field # of Occurrence
AUTOUPD^DGENA2 SEND+4
$$DELMST^DGMSTAPI DL+14
$$GETSTAT^DGMSTAPI ASKP+3, ASKS1+2
$$NAME^DGMSTAPI EL+50
$$NEWSTAT^DGMSTAPI ASKP+19, ASKS1+10
$$ASKDATE^DGMSTL2 ASKP+13, ASKS1+4, EL+29
$$ASKPROV^DGMSTL2 ASKP+16, ASKS1+7, EL+25
$$CHKNUL^DGMSTL2 EL+3, DL+3
$$EXTMST^DGMSTL2 CONFIRM+4
ADDSTR^DGMSTL2 ASKP+21, ASKS1+12, DL+25
NUL^DGMSTL2 DL+27
$$EZBLD^DIALOG ASKP+25, ASKS1+16
^DIC SELECT+6
FILE^DIE EL+45
GETS^DIQ EL+12, DL+11, DL+24
^DIR ASKP+6, ASKS+1, EL+20, EL+35, CONFIRM+7
EN^VALM DP+12
FULL^VALM1 PAT+3, STAT+3, EL+4, DL+5, DP+5, SENDMST+3
FLDTEXT^VALM10 EL+49, EL+50, EL+51
EN^VALM2 EL+5, DL+7
$$FMTE^XLFDT EL+49

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
Routine Call
  • DIALOG
  • Line Location:
    • ASKP+25
    • ASKS1+16
Routine Call
  • DIC
  • Line Location:
    • SELECT+6
Routine Call
  • DIE
  • Line Location:
    • EL+45
Routine Call
  • DIR
  • Line Location:
    • ASKP+6
    • ASKS+1
    • EL+20
    • EL+35
    • CONFIRM+7
Routine Call
  • VALM
  • Line Location:
    • DP+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGMS(29.11 - [#29.11] GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGMS(29.11 - [#29.11] EL+44, EL+46
^DPT - [#2] CONFIRM+4
^TMP("DGMST DP" DP+3!
^TMP("DGMST RENUM" DL+8*, DL+16!, DL+22, DL+23
^TMP("DGMST" EL+7, DL+8, DL+10, DL+21!, SENDMST+4, SENDMST+7, SENDMST+8

Label References

Name Line Occurrences
$$CONFIRM DL+13
$$SELECT ASKP, ASKS1, DP+6
ASKP ASKP+7, ASKP+9, ASKP+14, ASKP+17, ASKP+27
ASKS ASKS1+1
ASKS1 ASKS1+5, ASKS1+8, ASKS1+18
HANG SENDMST+5, SENDMST+11
SEND SENDMST+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN SEND~, SEND+2*, SEND+4
DGDTFLG PAT+1~, STAT+1~
DGERR DL+1~, DL+12
DGMSG EL+1~, EL+13
DGMST PAT+1~, ASKP+3*, ASKP+5, ASKP+9, ASKP+13, ASKP+16, STAT+1~, ASKS1+2*, EL+1~, DL+1~
DGMST( EL+16, EL+19, EL+25, EL+29, DL+13, DL+25
DGPTHANG HANG+1*!
DGRSLT DL+1~, DL+14*, DL+15, DL+18, SENDMST+1~, SELECT+1~, SELECT+7*, SELECT+9*, SELECT+10
DIC DP+2~, SELECT+4*, SELECT+6!
DIC("A" SELECT+4*
DIC("S" SELECT+5*
DIC(0 SELECT+4*
DIR ASKP+6!, ASKS+1!, EL+20!, EL+35!, CONFIRM+7!
DIR("A" ASKP+5*, ASKS*, EL+19*, EL+34*, CONFIRM+3*, CONFIRM+4*, CONFIRM+6*
DIR("B" ASKP+5*, EL+19*, EL+34*, CONFIRM+5*
DIR(0 ASKP+5*, ASKS*, EL+19*, EL+34*, CONFIRM+5*
DIRUT ASKP+4!, ASKP+7, ASKS!, ASKS+2, EL+18!, EL+21, EL+33!, EL+36, SELECT+3!, SELECT+7
, CONFIRM+2!, CONFIRM+8
DUZ EL+42
EVNT SEND~, SEND+3*, SEND+4
HLRSLT SEND+1~
IDX DL+20*, DL+22*, DL+23, SENDMST+1~, SENDMST+6*, SENDMST+7*, SENDMST+8
MSG DL+1~
MSTCNT DL+1~, DL+20*
MSTDFN PAT+1~, ASKP*, ASKP+1, ASKP+3, ASKP+19, ASKP+21, STAT+1~, ASKS1*, ASKS1+1, ASKS1+2
, ASKS1+10, ASKS1+12, EL+1~, DL+1~, DP+2~, DP+6*, DP+8, SENDMST+1~, SENDMST+2*, SENDMST+8*
, SENDMST+9, SENDMST+10, CONFIRM~, CONFIRM+4
MSTDT PAT+1~, ASKP+13*, ASKP+14, ASKP+19, ASKP+21, STAT+1~, ASKS1+4*, ASKS1+5, ASKS1+10, ASKS1+12
, EL+1~, EL+29*, EL+30, EL+39, EL+49
MSTIEN EL+1~, EL+7*, EL+8, EL+11, EL+44, EL+46, DL+1~, DL+10*, DL+11, DL+13
, DL+14, DL+23*, DL+25
MSTIENC EL+1~, EL+11*, EL+12, EL+16, EL+19, EL+25, EL+29, EL+39, EL+40, EL+41
, EL+42, DL+1~, DL+23*, DL+24, DL+25
MSTNEW EL+1~
MSTNEW(1 EL+39*, EL+40*, EL+41*, EL+42*
MSTPRV EL+1~, EL+25*, EL+26, EL+41, EL+50
MSTPV PAT+1~, ASKP+16*, ASKP+17, ASKP+19, ASKP+21, STAT+1~, ASKS1+7*, ASKS1+8, ASKS1+10, ASKS1+12
MSTST PAT+1~, ASKP+11*, ASKP+19, ASKP+21, STAT+1~, ASKS+3*, ASKS1+10, ASKS1+12, EL+1~, EL+22*
, EL+40, EL+51, DL+1~, CONFIRM~, CONFIRM+4
MSTX PAT+1~, ASKP+19*, ASKP+20, ASKP+21, ASKP+23, ASKP+25, ASKS1+10*, ASKS1+11, ASKS1+12, ASKS1+14
, ASKS1+16
U ASKP+5, ASKP+9, ASKP+13, ASKP+16, ASKP+25, ASKS1+16, DL+18, CONFIRM+4
>> VALMBCK DP+10*, DP+13*
>> VALMCNT DL+20*
>> VALMI EL+6*, EL+7, EL+49, EL+50, EL+51, DL+7*, DL+9*, DL+10, DL+16
>> VALMY( EL+6, DL+9
>> XQORNOD(0 EL+5, DL+7
Y PAT+1~, ASKP+9, ASKP+11, STAT+1~, ASKS+2, ASKS+3, EL+22, EL+36, SELECT+7, SELECT+9
, CONFIRM+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All