EASEZP6F ;ALB/AMA,LBD - Print 1010EZ, Version 6 or greater ; 9/19/12 11:42am
Source file <EASEZP6F.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 |
---|---|---|
EN | ; Entry point to print 1010EZ, Version 6 or greater
|
|
ENQUIT | ; Clean up temp globals after printing is complete
|
|
SETUP(EALNE,EAINFO,EASAPP,EASDFN) | ; Set-up print variables
; Input ; EALNE - Line format array ; EAINFO - Misc Data ; ("CLRK") - Clerk's initials ; ("ID") - Web ID from #712 ; ("PGE") - Page number ; ("VET" ) - Veteran's name submitting the application ; ("SSN") - Veteran's SSN ; ("DISC") - Financial Disclosure status ; EASAPP - IEN of applicant on the 1010EZ HOLDING File, #712 ; EASDFN - DFN of applicant in the PATIENT File, #2 |
|
SETQ | ||
HDRMAIN(EALNE) | ; PRINT THE FIRST PAGE HEADER INFORMATION
|
|
HDR(EALNE,EAINFO) | ; PRINT THE PAGE HEADER INFO FOR PAGES GREATER THAN 1
|
|
FT(EALNE,EAINFO) | ; PRINT THE PAGE FOOTER INFORMATION
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | SETUP+23, SETUP+25, SETUP+32, SETUP+34, SETUP+36, SETUP+37 |
EN^EASEZC1 | SETUP+40 |
SORT^EASEZC3 | SETUP+41 |
EN^EASEZP61 | EN+7 |
EN^EASEZP62 | EN+10 |
EN^EASEZP63 | EN+12 |
EN^EASEZP64 | EN+13 |
EN^EASEZP6D | EN+27 |
EN^EASEZP6I | EN+20 |
EN^EASEZP6M | EN+40 |
PAGE1^EASEZP6U | EN+5 |
PAGE2^EASEZPU2 | EN+9 |
PAGEDFF^EASEZPU2 | EN+35 |
PAGEDFG^EASEZPU2 | EN+39 |
PAGE1^EASEZPU3 | EN+6 |
PAGEI^EASEZPU3 | EN+19 |
PAGEN^EASEZPU3 | EN+26 |
$$FMTE^XLFDT | SETUP+33 |
$$NOW^XLFDT | SETUP+33 |
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 |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^EAS(712 - [#712] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("EASEZ" | ENQUIT+1! |
^TMP("EZDATA" | ENQUIT+2! |
^TMP("EZDISP" | ENQUIT+5! |
^TMP("EZINDEX" | ENQUIT+3! |
^TMP("EZTEMP" | EN+17, EN+24, EN+33, EN+37, ENQUIT+4! |
Name | Line Occurrences |
---|---|
SETUP | EN+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
EAABRT | EN+1~, EN+16, EN+17*, EN+23*, EN+24*, EN+32*, EN+33*, EN+36*, EN+37* |
EAADL | EN+1~, EN+16*, EN+17, EN+19, EN+23*, EN+24, EN+26, EN+32*, EN+33, EN+35 , EN+36*, EN+37, EN+39 |
EAINFO | EN+1~, EN+3, EN+7, EN+10, EN+12, EN+13, EN+20, EN+27, EN+40, SETUP~ , HDR~, FT~ |
EAINFO("CLRK" | SETUP+23*, SETUP+24, SETUP+26*, SETUP+28*, FT+4 |
EAINFO("DISC" | SETUP+34* |
EAINFO("EASAPP" | SETUP+35* |
EAINFO("ID" | SETUP+32*, FT+4 |
EAINFO("PD" | SETUP+33*, FT+3 |
EAINFO("PGE" | SETUP+31*, FT+5* |
EAINFO("SSN" | SETUP+37*, HDR+3 |
EAINFO("VET" | SETUP+36*, HDR+3 |
EALNE | EN+1~, EN+3, EN+7, EN+10, EN+12, EN+13, EN+20, EN+27, EN+40, SETUP~ , HDRMAIN~, HDR~, FT~ |
EALNE("D" | SETUP+17*, SETUP+18* |
EALNE("DD" | SETUP+17*, SETUP+18*, HDRMAIN+6, FT+1 |
EALNE("UL" | SETUP+17*, SETUP+18*, HDR+4 |
EALNE("ULC" | SETUP+16*, SETUP+18, HDR+4 |
EAMULT | EN+1~, EN+18*, EN+20, EN+23*, EN+25*, EN+27, EN+32*, EN+34*, EN+38*, EN+40 |
EASAPP | EN+3, SETUP~, SETUP+32, SETUP+34, SETUP+35, SETUP+36, SETUP+37, SETUP+40, SETUP+41 |
EASDFN | EN+3, SETUP~ |
ERR | EN+1~ |
IOF | HDRMAIN+1, HDR+1 |
IOST | SETUP+16 |
X | SETUP+13~, SETUP+25*, SETUP+26 |
>> ZUSR | SETUP+21*, SETUP+22, SETUP+23, SETUP+25 |