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

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 ;

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGMT(408.31 - [#408.31] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call