DGBT1 ;ALB/SCK/BLD - BENEFICIARY TRAVEL DISPLAY SCREEN 1 ; 10/31/05
Source file <DGBT1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SCREEN | ; clear screen and write headers
|
|
SETVAR | ||
SC | ; service connected status/information
|
|
INCOME | ; income and eligibility information
|
|
QUIT | ;
|
|
MONTOT(TOTRIPS,ONEWAY,RT,MONTHDED,WAIVER,WTYPE,TTRIPS,TDED) | ;
|
|
MONTDISP(TOTRIPS,ONEWAY,RT,MONTHDED,WAIVER,WTYPE) | ;
|
|
PAUSE | ||
DAYSTEST(DFN,DAYFLG,RXDAYS,RXCPST,LOWINC,NOTEST) | ;determines whether or not a valid MT in last 365 days.
|
|
ADDCHG(DFN) | ;this will print the permanent Address last changed date or the Temporary Address last change date
|
|
WVEXP() | ; Waiver expiration date ; /* Tagline added DGBT*1.0*20 RFE */
|
|
TESTDATE() | ;
|
|
DTFORM(INTDT) | ;
|
|
DTFORMI(TESTDATE) | ;
|
|
WVELG() | ; Eligibility for waiver being PENSION DGBT*1.0*20 RFE
|
|
YEAR(DT1) | ; DT2 will be a year after DT1 ; /*Tagline added DGBT*1.0*20 RFE */
|
|
WVREQ(INEX) | ; Manual deductible waiver request DGBT*1.0*20 RFE
|
|
LSTMTDT(DFN) | ;this will return the last means test date
|
|
LSTMTRIN(DFN,DGBTDTI) | ;this will return whether the patient refused to give income
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^DGBT(392.7 - [#392.7] | GET1^DIQ |
^DGMT(408.31 - [#408.31] | GET1^DIQ |
^DG(43 - [#43] | GET1^DIQ |
^DIC(8.1 - [#8.1] | GET1^DIQ |