EASECSCU ;ALB/LBD - LTC Co-Pay Test Screen Driver Utilities ;10 AUG 2001
Source file <EASECSCU.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 |
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 ; DGFORM 10-10EC Form (1=Revised; 0=Original) ; DGERR 1=ERROR and 0=NO ERROR |
|
Q | ||
PAR | ;Annual Means Test Parameters
; Input -- DGLY Last Year ; Output -- DGMTPAR Means Test Parameter 0th node ; 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
|
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+5, PAR+6, HD+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DFN | SETUP+15 |
>> DGERR | SETUP+12*, SETUP+14*, SETUP+15, SETUP+16* |
>> DGFORM | SETUP+21* |
DGHDR | HD+6~, HD+9*, HD+10, HDNH+1 |
DGHLPF | HD+7*, HD+9, HDNH+2, HDNH+4! |
DGINI | SETUP+11~, SETUP+15 |
DGIOM | HD+6~, HD+8*, HD+10, HDNH+2 |
DGIRI | SETUP+11~, SETUP+15 |
DGLNE | HD+6~, HD+8*, HDNH+3 |
DGLY | SETUP+11~, SETUP+12*, PAR+5, PAR+6 |
>> DGMTDT | SETUP+12, SETUP+15, HDNH+2 |
>> DGMTI | SETUP+21 |
>> DGMTPAR | SETUP+16, PAR+5*, PAR+6* |
>> DGMTPAR("PREV" | PAR+6* |
DGMTSC | SETUP+12! |
DGMTSC( | SETUP+13*, 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 |
DGPRI | SETUP+11~, SETUP+14, SETUP+15 |
DGPRTY | SETUP+11~ |
DGROU | ROU+3~, ROU+4*, ROU+5, ROURET+3~, ROURET+4*, ROURET+5 |
DGSCR | SETUP+11~ |
DGTAB | HD+6~, HD+10*, HDNH+1 |
>> DGVI | HD+11*, HD+12*, HDNH+1 |
>> DGVINI | SETUP+15* |
>> DGVIRI | SETUP+15* |
>> DGVO | HD+11*, HD+12*, HDNH+1 |
>> DGVPRI | SETUP+14*, HDNH+2 |
I | SETUP+11~, SETUP+13* |
IOF | HDNH+1 |
IOINHI | HD+6~, HD+12 |
IOINLOW | HD+6~, HD+12 |
IOM | HD+8 |
IOST(0 | HD+11 |
X | SETUP+11~, SETUP+13*, HD+12*! |
Y | HD+6~, HDNH+2* |
Name | Field # of Occurrence |
---|---|
$T(SCRNS+I | SETUP+13 |