EASEZRPF ;ALB/AMA,TDM - Print 1010EZR ; 2/8/13 12:00pm
Source file <EASEZRPF.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 1010EZR
|
|
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^EASEZRP1 | EN+12 |
EN^EASEZRP2 | EN+15 |
EN^EASEZRP3 | EN+17 |
EN^EASEZRPD | EN+31 |
EN^EASEZRPI | EN+24 |
EN^EASEZRPM | EN+44 |
PAGE2^EASEZRPP | EN+14 |
PAGEDFF^EASEZRPP | EN+39 |
PAGEDFG^EASEZRPP | EN+43 |
PAGE1^EASEZRPU | EN+11 |
PAGEI^EASEZRPU | EN+23 |
PAGEN^EASEZRPU | EN+30 |
$$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 |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^EAS(712 - [#712] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("EASEZ" | EN+5! |
^TMP("EASEZR" | EN+5*, ENQUIT+1! |
^TMP("EZDATA" | EN+6! |
^TMP("EZDISP" | EN+9! |
^TMP("EZINDEX" | EN+7! |
^TMP("EZRDATA" | EN+6*, ENQUIT+2! |
^TMP("EZRDISP" | EN+9*, ENQUIT+5! |
^TMP("EZRINDEX" | EN+7*, ENQUIT+3! |
^TMP("EZRTEMP" | EN+8*, EN+21, EN+28, EN+37, EN+41, ENQUIT+4! |
^TMP("EZTEMP" | EN+8! |
Name | Line Occurrences |
---|---|
SETUP | EN+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
EAABRT | EN+1~, EN+20, EN+21*, EN+27*, EN+28*, EN+36*, EN+37*, EN+40*, EN+41* |
EAADL | EN+1~, EN+20*, EN+21, EN+23, EN+27*, EN+28, EN+30, EN+36*, EN+37, EN+39 , EN+40*, EN+41, EN+43 |
EAINFO | EN+1~, EN+3, EN+12, EN+15, EN+17, EN+24, EN+31, EN+44, SETUP~, HDR~ , FT~ |
EAINFO("CLRK" | SETUP+23*, SETUP+24, SETUP+26*, SETUP+28*, FT+3 |
EAINFO("DISC" | SETUP+34* |
EAINFO("EASAPP" | SETUP+35* |
EAINFO("ID" | SETUP+32*, FT+3 |
EAINFO("PD" | SETUP+33*, FT+2 |
EAINFO("PGE" | SETUP+31*, FT+4* |
EAINFO("SSN" | SETUP+37*, HDR+3 |
EAINFO("VET" | SETUP+36*, HDR+3 |
EALNE | EN+1~, EN+3, EN+12, EN+15, EN+17, EN+24, EN+31, EN+44, SETUP~, HDRMAIN~ , HDR~, FT~ |
EALNE("D" | SETUP+17*, SETUP+18* |
EALNE("DD" | SETUP+17*, SETUP+18*, HDRMAIN+2, HDRMAIN+3, FT+1 |
EALNE("UL" | SETUP+17*, SETUP+18*, HDR+4 |
EALNE("ULC" | SETUP+16*, SETUP+18, HDR+4 |
EAMULT | EN+1~, EN+22*, EN+24, EN+27*, EN+29*, EN+31, EN+36*, EN+38*, EN+42*, EN+44 |
EASAPP | EN+3, SETUP~, SETUP+32, SETUP+34, SETUP+35, SETUP+36, SETUP+37, SETUP+40, SETUP+41 |
EASDFN | EN+3, SETUP~ |
IOF | HDRMAIN+1, HDR+1 |
IOST | SETUP+16 |
X | SETUP+13~, SETUP+25*, SETUP+26 |
>> ZUSR | SETUP+21*, SETUP+22, SETUP+23, SETUP+25 |