DGMTSCU ;ALB/RMO/CAW,LBD - Means Test Screen Driver Utilities ;21 JAN 1992 8:00 pm
Source file <DGMTSCU.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Registration | 11 | DG311PIR DGMTDD3 DGMTP DGMTSC DGMTSC2 DGMTSC2V DGMTSC3 DGMTSC3V DGMTSC4 DGMTSC4V DGMTSCR |
Enrollment Application System | 1 | EASECMT |
Income Verification Match | 1 | IVMUM6 |
Patient Data Exchange | 1 | VAQDBIM |
Name | Comments | DBIA/ICR reference |
---|---|---|
SETUP | ;Set-up the screen driver array and required screen variables
; Input -- DFN Patient IEN ; DGMTDT Date of Test ; DGMTYPT Type of Test ; Output -- DGMTSC Screen Driver Array ; DGVPRI Veteran Patient Relation IEN ; DGVINI Veteran Individual Annual Income IEN ; DGVIRI Veteran Income Relation IEN ; DGMTPAR Annual Means Test Parameter Array ; DGMTGMT GMT Threshold Values ; DGMTNWC Net Worth Calculation flag ; DGERR 1=ERROR and 0=NO ERROR |
|
Q | ||
PAR | ;Annual Means Test Parameters
; Input -- DGLY Last Year ; Output -- DGMTPAR Means Test Parameter 0th node ; DGMTGMT GMT Threshold values ; DGMTNWC Net Worth Calculation flag ; Returned if the current year's parameters are not available: ; DGMTPAR("PREV") Previous Year Income Parameters |
|
HD | ;Print screen header
; Input -- DGMTSCI Screen number ; DGVPRI Veteran Patient Relation IEN ; DGMTDT Date of Test ; DGHLPF Help Flag (Optional) ; Output -- Screen Header |
|
HDNH | ;
|
|
SCR(DGMTSCI) | ;Screen name and number
; Input -- DGMTSCI Screen number ; Output -- Screen number;Screen name |
|
ROU(DGMTSCI) | ;Screen entry routine
; Input -- DGMTSCI Screen number ; Output -- Routine name |
|
ROURET(DGMTSCI) | ;Screen read processor return routine
; Input -- DGMTSCI Screen number ; Output -- Routine name |
|
SCRNS | ;Screen Number;Screen Name;Screen Entry Routine;Reader Return Routine
|
|
SCRNS1 | ;Screen Number;Screen Name;Screen Entry Routine;Reader Return Routine
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("RM" | HD+12 |
^DD("DD" | HDNH+2 |
^DG(43 - [#43] | PAR+8, PAR+9, PAR+11, HD+11 |
^DGMT(408.31 - [#408.31] | SETUP+17, SETUP+20 |
^EAS(712.5 - [#712.5] | PAR+16 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DFN | SETUP+24, PAR+14 |
>> DGERR | SETUP+13*, SETUP+23*, SETUP+24, SETUP+25* |
DGHDR | HD+6~, HD+9*, HD+10, HDNH+1 |
DGHLPF | HD+7*, HD+9, HDNH+2, HDNH+4! |
DGINI | SETUP+12~, SETUP+24 |
DGIOM | HD+6~, HD+8*, HD+10, HDNH+2 |
DGIRI | SETUP+12~, SETUP+24 |
DGLNE | HD+6~, HD+8*, HDNH+3 |
DGLY | SETUP+12~, SETUP+13*, PAR+8, PAR+9, PAR+14 |
>> DGMTDT | SETUP+13, SETUP+24, HDNH+2 |
>> DGMTGMT | PAR+13*, PAR+16* |
>> DGMTI | SETUP+17, SETUP+20 |
>> DGMTNWC | PAR+11* |
>> DGMTPAR | SETUP+25, PAR+8*, PAR+9* |
>> DGMTPAR("PREV" | PAR+9* |
DGMTSC | SETUP+13! |
DGMTSC( | SETUP+18*, SETUP+21*, SCR+4, ROU+4, ROURET+4 |
DGMTSCI | HD+9, SCR~, SCR+4, ROU~, ROU+4, ROURET~, ROURET+4 |
DGMTSCR | HD+6~, SCR+3~, SCR+4*, SCR+5 |
>> DGMTYPT | SETUP+14 |
DGPRI | SETUP+12~, SETUP+23, SETUP+24 |
DGPRTY | SETUP+12~ |
DGROU | ROU+3~, ROU+4*, ROU+5, ROURET+3~, ROURET+4*, ROURET+5 |
DGSCR | SETUP+12~, SETUP+14*, SETUP+18, SETUP+21 |
DGTAB | HD+6~, HD+10*, HDNH+1 |
>> DGVI | HD+11*, HD+12*, HDNH+1 |
>> DGVINI | SETUP+24* |
>> DGVIRI | SETUP+24* |
>> DGVO | HD+11*, HD+12*, HDNH+1 |
>> DGVPRI | SETUP+23*, HDNH+2 |
GMT | PAR+7~, PAR+14 |
GMT("GMTIEN" | PAR+15, PAR+16 |
I | SETUP+12~, SETUP+18*, SETUP+21* |
IOF | HDNH+1 |
>> IOINHI | HD+12 |
>> IOINLOW | HD+12 |
IOM | HD+8 |
IOST(0 | HD+11 |
X | SETUP+12~, SETUP+18*, SETUP+21*, HD+12*! |
Y | HD+6~, HDNH+2* |