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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: DGMTSCC

Package: Registration

Routine: DGMTSCC


Information

DGMTSCC ;ALB/RMO,CAW,LBD,EG,LMD,HM,JAM - Means Test Screen Completion ;03/24/2006

Source Information

Source file <DGMTSCC.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
Registration 12 $$SEL1010^DG1010P  INIT^DGDEP  $$UPD^DGENDBS  $$INDSTATUS^DGENELA2  $$ASKNW^DGMTCOU  $$GETNAME^DGMTH  ($$LYR,$$YN)^DGMTSCU1  (CAT,DEP,STA)^DGMTSCU2  
INC^DGMTSCU3  $$MTS^DGMTU  GETREL^DGMTU11  GETIENS^DGMTU2  
VA FileMan 3 (BLD,MSG)^DIALOG  ^DIE  ^DIR  
Enrollment Application System 1 ($$ENEZ,$$ENEZR)^EASEZPDG  

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

Package Total Caller Graph
Registration 1 DGMTSC  

Entry Points

Name Comments DBIA/ICR reference
EN
Q
COM ;Check if user wants to complete the means test
REF ;Check if patient declines to provide income information
REFQ
CHK ;Check if means test can be completed
ADJ ;Adjudicate the means test
ADJQ
PRT ;Print the 10-10EZR or 10-10EZ
PRTQ
QUE ;

External References

Name Field # of Occurrence
$$SEL1010^DG1010P PRT+7
INIT^DGDEP CHK+17
$$UPD^DGENDBS EN+18
$$INDSTATUS^DGENELA2 EN+22
$$ASKNW^DGMTCOU CHK+13
$$GETNAME^DGMTH CHK+12
$$LYR^DGMTSCU1 CHK+2
$$YN^DGMTSCU1 REF+5
CAT^DGMTSCU2 EN+11
DEP^DGMTSCU2 EN+3
STA^DGMTSCU2 EN+11, REF+11, ADJ+8
INC^DGMTSCU3 EN+3
$$MTS^DGMTU EN+19
GETREL^DGMTU11 CHK+2
GETIENS^DGMTU2 CHK+19
BLD^DIALOG EN+23
MSG^DIALOG EN+24
^DIE EN+16
^DIR COM+3, COM+8, REF+10, ADJ+7
$$ENEZ^EASEZPDG QUE+2
$$ENEZR^EASEZPDG QUE+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DECLINES TO GIVE INCOME INFORMATION: YES"
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !?3,*7,$S(DGMTYPT=1:"Means",1:"Copay")_" test cannot be completed."
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !,"NOTE: If you do not complete the LTC copay exemption test, the incomplete test",!?6,"will be deleted."
  • Line Location: COM+6
Function Call: WRITE
  • Prompt: !?3,"Marital section must be completed."
  • Line Location: CHK+4
Function Call: WRITE
  • Prompt: !?3,"Married is 'YES'. An active spouse for this means test does not exist."
  • Line Location: CHK+5
Function Call: WRITE
  • Prompt: !?3,"An active spouse exists for this means test. Married should be 'YES'."
  • Line Location: CHK+6
Function Call: WRITE
  • Prompt: !?3,"Dependent Children section must be completed."
  • Line Location: CHK+7
Function Call: WRITE
  • Prompt: !?3,"Dependent Children is 'YES'. No active children exist."
  • Line Location: CHK+8
Function Call: WRITE
  • Prompt: !?3,"Active children exist. Dependent Children should be 'YES'."
  • Line Location: CHK+9
Function Call: WRITE
  • Prompt: !?3,"A status of ",$$GETNAME^DGMTH(DGMTS)," requires property information."
  • Line Location: CHK+12
Function Call: WRITE
  • Prompt: !?3,"Patient is in an 'EXEMPT' status and requires property information."
  • Line Location: CHK+13
Function Call: WRITE
  • Prompt: !?3,"Patient's deductible expenses cannot exceed income."
  • Line Location: CHK+14
Function Call: WRITE
  • Prompt: !?3,"Patient has more than one spouse for this means test."
  • Line Location: CHK+21
Routine Call
  • DIALOG
  • Line Location:
    • EN+23
Routine Call
  • DIALOG
  • Line Location:
    • EN+24
Routine Call
  • DIE
  • Line Location:
    • EN+16
Routine Call
  • DIR
  • Line Location:
    • COM+3
    • COM+8
    • REF+10
    • ADJ+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGMT(408.31 - [#408.31] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGMT(408.22 - [#408.22] CHK+20
^DGMT(408.31 - [#408.31] REF+5

Label References

Name Line Occurrences
ADJ EN+14, EN+15
ADJQ ADJ+7
CHK EN+13
COM EN+2
PRT EN+26
Q EN+2, EN+10, EN+13, EN+14, EN+15, EN+16
QUE PRT+9
REF EN+10
REFQ REF+10

Naked Globals

Name Field # of Occurrence
^(0 REF+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACT CHK+16~
>> ANSPFIN EN+5, REF+6, REF+8, REF+12*
CNT CHK+16~, CHK+17*, CHK+18*, CHK+19
DA EN+16*!
DATA EN+18~
DATA( EN+18*
DATA(2 EN+18*
>> DFN EN+19, EN+22, CHK+2, CHK+19, QUE+2, QUE+3
DGA CHK+1~, CHK+3*, CHK+4
DGCAT EN~, EN+15, EN+20, REF+11*, CHK+13, ADJ+8*
DGCOMF EN~, EN+3*
DGCOPS EN~
DGCOST EN~
DGD CHK+1~, CHK+3*, CHK+7, CHK+8, CHK+9
DGDC EN~
DGDEP CHK+1~, CHK+16~
DGDEP( CHK+18, CHK+19
DGDET EN~, EN+14, CHK+14
>> DGERR EN+1*, EN+13, EN+16*, CHK+4*, CHK+5*, CHK+6*, CHK+7*, CHK+8*, CHK+9*, CHK+12*
CHK+13*, CHK+14*, CHK+15, CHK+18, CHK+21*
DGFIN EN+16, Q!
>> DGFINOP PRT+2
DGIN0 EN~
DGIN1 EN~
DGIN2 EN~
DGINCP CHK+16~, CHK+20*
DGINT EN~, EN+14, CHK+14
DGINTF EN~, EN+6*, EN+10, REF+9
>> DGIRI CHK+20
DGL CHK+1~, CHK+3*, CHK+4
DGM CHK+1~, CHK+3*, CHK+4, CHK+5, CHK+6
>> DGMTACT EN+2, EN+17, CHK+12, ADJ+1
>> DGMTDT EN+17, CHK+2, CHK+19
>> DGMTI EN+16, EN+18, REF+5, CHK+2, QUE+2, QUE+3
>> DGMTNWC EN+14
>> DGMTPAR EN+14
DGMTS EN~, EN+19, CHK+12
>> DGMTYPT EN+13, EN+14, EN+15, EN+19, EN+20, COM+2, COM+5, REF+11, CHK+10, CHK+13
ADJ+3, ADJ+4, ADJ+5, ADJ+8
DGNC EN~
DGND EN~
DGNWT EN~, EN+14
DGNWTF EN~, EN+6*, EN+10, REF+9, CHK+10, CHK+13
>> DGREF EN+5, EN+13, REF+11*, CHK+5, CHK+10
DGREF1 EN~, EN+8*, EN+10*, REF+11
DGREL CHK+1~
DGREL("C" CHK+8, CHK+9
DGREL("S" CHK+5, CHK+6
DGSP EN~
DGTHA EN~, ADJ+5, ADJ+8
DGTHB EN~
DGTHG EN~, ADJ+5, ADJ+8
DGTYC EN~, EN+14, CHK+10
DGVIR0 EN~, CHK+3
DIE EN+16*!
DIE("NO^" EN+16*
DIR COM+1~, REF+2~, REF+10!, ADJ+2~
DIR("?" ADJ+3*, ADJ+4*, ADJ+5*
DIR("A" COM+2*, COM+7*, REF+4*, ADJ+6*
DIR("B" COM+3*, COM+8*, REF+5*, REF+6*, REF+8*, REF+9*, ADJ+7*
DIR(0 COM+3*, COM+8*, REF+10*, ADJ+7*
DR EN+16*!
DT EN+17, EN+18
DTOUT EN+2, EN+10, EN+14, EN+15, Q!, REF+10, ADJ+7
DUOUT EN+2, EN+10, EN+14, EN+15, Q!, REF+10, ADJ+7
EZFLAG PRT+1~, PRT+7*, PRT+8, QUE+2, QUE+3
FLAG CHK+16~, CHK+20*, CHK+21
I CHK+1~
U REF+2~, REF+3*, CHK+18, CHK+19
X QUE+1~, QUE+2*, QUE+3*
Y EN+2, Q!, COM+5, REF+2~, REF+11, ADJ+2~, ADJ+8
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 |  Naked Globals |  Local Variables  | All