EASEZRPF ;ALB/AMA,TDM - Print 1010EZR ; 2/8/13 12:00pm
Source file <EASEZRPF.m>
| 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 | 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 |