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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: DGMTHL

Package: Registration

Routine: DGMTHL


Information

DGMTHL ;ALB/CJM,SCG,TMK - Hardship Determinations - List Manager Screen; 1/02/2002

Source Information

Source file <DGMTHL.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Registration 6 $$INST^DGENU  $$CONVERT^DGENUPL1  ($$FIND,$$GET)^DGMTH  EN^DGMTHL1  GETPAT^DGRPTU  PID^VADPT  
List Manager 3 EN^VALM  ($$SETSTR,CLEAR)^VALM1  CLEAN^VALM10  
Kernel 2 $$FMTE^XLFDT  DISP^XQORM1  
VA FileMan 2 WAIT^DICD  ^DIR  

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

Package Total Caller Graph
Registration 3 DGMTH HARDSHIP  DGMTH HARDSHIPS  DGMTHL1  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
HARDSHIP ;Entry point for hardships
; Input -- None
; Output -- None
ENQ
EN(DFN) ;Entry point for the DGMT HARDSHIP List Template
; Input -- DFN Patient IEN
; Output -- None
INIT ;Init variables and list array
HELP ;Help code
EXIT ;Exit code
EXPND ;Expand code
HDR ;Header code

External References

Name Field # of Occurrence
$$INST^DGENU HARDSHIP+16
$$CONVERT^DGENUPL1 HARDSHIP+15, HARDSHIP+21
$$FIND^DGMTH HARDSHIP+12, INIT+2
$$GET^DGMTH INIT+3
EN^DGMTHL1 INIT+6
GETPAT^DGRPTU HARDSHIP+6
WAIT^DICD EN+6
^DIR HARDSHIP+22
PID^VADPT HDR+2
EN^VALM EN+7
$$SETSTR^VALM1 HDR+5
CLEAR^VALM1 EXIT+2
CLEAN^VALM10 INIT+4, EXIT+1
$$FMTE^XLFDT HARDSHIP+9
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Patient died on: ",$$FMTE^XLFDT(DGMDOD,"1D")
  • Line Location: HARDSHIP+9
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Routine Call
  • DIR
  • Line Location:
    • HARDSHIP+22
Routine Call
  • VALM
  • Line Location:
    • EN+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(391 - [#391] HDR+4
^DGMT(408.31 - [#408.31] HARDSHIP+13
^DIC(4 - [#4] HARDSHIP+21
^DPT - [#2] HARDSHIP+8, HARDSHIP+19, HDR+3, HDR+4

Label References

Name Line Occurrences
EN HARDSHIP+25
ENQ HARDSHIP+6

Naked Globals

Name Field # of Occurrence
^("TYPE" HDR+4
^(0 HDR+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN HARDSHIP+3~, HARDSHIP+6, HARDSHIP+8, HARDSHIP+12, HARDSHIP+19, HARDSHIP+25, EN~, EN+4, INIT+2, HDR+3
HDR+4
DGDUZ HARDSHIP+3~, HARDSHIP+15*, HARDSHIP+16
DGDUZ(2 HARDSHIP+15*
DGMDOD HARDSHIP+7~*, HARDSHIP+8*, HARDSHIP+9
DGOK HARDSHIP+3~, HARDSHIP+11*, HARDSHIP+16*, HARDSHIP+18
DGSITE HARDSHIP+3~, HARDSHIP+11*, HARDSHIP+16*, HARDSHIP+18
DIR HARDSHIP+22~
DIR("A" HARDSHIP+22*
DIR(0 HARDSHIP+22*
DT HARDSHIP+12, INIT+2
DUZ HARDSHIP+15
DUZ(2 HARDSHIP+18
HARDSHIP EN+5~, INIT+3, INIT+6
MTIEN HARDSHIP+3~, HARDSHIP+11*, HARDSHIP+12*, HARDSHIP+13, INIT+1~, INIT+2*, INIT+3
SGHRD HARDSHIP+3~, HARDSHIP+11*, HARDSHIP+13*, HARDSHIP+14, HARDSHIP+15, HARDSHIP+18, HARDSHIP+21
U HARDSHIP+8, HARDSHIP+13, HARDSHIP+19, HARDSHIP+21, HDR+3, HDR+4
VA HDR+1~
VA("BID" HDR+3
VAERR HDR+1~
>> VALMCNT INIT+5*, INIT+6
>> VALMHDR(1 HDR+3*, HDR+5*
X HELP+1*, HDR+1~, HDR+4*, HDR+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All