Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: EASEZPDG

Package: Enrollment Application System

Routine: EASEZPDG


Information

EASEZPDG ;ALB/AMA/GTS/CMF - PRINT 10-10EZ OR EZR FROM DG OPTIONS ; 8/1/08 1:23pm

Source Information

Source file <EASEZPDG.m>

Call Graph

Call Graph

Call Graph Total: 28

Package Total Call Graph
Enrollment Application System 24 SORT^EASEZC3  EN^EASEZP61  EN^EASEZP62  EN^EASEZP63  EN^EASEZP64  EN^EASEZP6D  EN^EASEZP6I  EN^EASEZP6M  
PAGE1^EASEZP6U  (NETEZ,NETEZR,SETUP)^EASEZPDU  (PAGE2,PAGEDFF,PAGEDFG)^EASEZPU2  (PAGE1,PAGEI,PAGEN)^EASEZPU3  VISTA^EASEZPVD  $$PICK^EASEZPVU  EN^EASEZRP1  EN^EASEZRP2  
EN^EASEZRP3  EN^EASEZRPD  EN^EASEZRPI  EN^EASEZRPM  (PAGE2,PAGEDFF,PAGEDFG)^EASEZRPP  (PAGE1,PAGEI,PAGEN)^EASEZRPU  $$KEY711^EASEZU1  LOCAL711^EASEZU2  
Kernel 2 (,HOME)^%ZIS  ^%ZTLOAD  
VA FileMan 2 $$GET1^DIQ  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Registration 2 DG1010P  DGMTSCC  

Entry Points

Name Comments DBIA/ICR reference
ENEZR(EASDFN,EASMTIEN) ;DBIA 4600 - PRINT THE 10-10EZR FROM DG OPTIONS
; INPUT:
; EASDFN - POINTER TO THE PATIENT FILE (#2) - required
; EASMTIEN - POINTER TO MEANS TEST FILE (#408.31) - optional
; (+ien, "", or 0)
; OUTPUT:
; (+ien or ""):ZTSK - TASKMAN JOB NUMBER
; (0):mt ien (forces test lookup only)
  • ICR #4600
    • Status: Active
    • Usage: Private
    ENEZ(EASDFN,EASMTIEN) ;DBIA 4600 - PRINT THE 10-10EZ FROM DG OPTIONS
    ; INPUT:
    ; EASDFN - POINTER TO THE PATIENT FILE (#2) - required
    ; EASMTIEN - POINTER TO MEANS TEST FILE (#408.31) - optional
    ; (+ien, "", or 0)
    ; OUTPUT:
    ; (+ien or ""):ZTSK - TASKMAN JOB NUMBER
    ; (0):mt ien (forces test lookup only)
  • ICR #4600
    • Status: Active
    • Usage: Private
    DEV
    EXIT
    EN ;BACKGROUND JOB ENTRY POINT TO PRINT EZ/EZR FROM DG OPTIONS
  • ICR #4600
    • Status: Active
    • Usage: Private
    EZR ; Entry point to print 1010EZR
    EZ ;PRINT THE 10-10EZ FORM (copied from EASEZP6F)
    NETMSG ;PRINT THE MESSAGE FOR THE NET WORTH SECTION

    External References

    Name Field # of Occurrence
    ^%ZIS DEV+4
    HOME^%ZIS DEV+20
    ^%ZTLOAD DEV+19
    $$GET1^DIQ ENEZ+17
    ^DIR ENEZ+26
    SORT^EASEZC3 EN+13
    EN^EASEZP61 EZ+5
    EN^EASEZP62 EZ+8
    EN^EASEZP63 EZ+11
    EN^EASEZP64 EZ+17
    EN^EASEZP6D EZ+29
    EN^EASEZP6I EZ+23
    EN^EASEZP6M EZ+59
    PAGE1^EASEZP6U EZ+3
    NETEZ^EASEZPDU EZ+16
    NETEZR^EASEZPDU EZR+19
    SETUP^EASEZPDU EN+17
    PAGE2^EASEZPU2 EZ+7
    PAGEDFF^EASEZPU2 EZ+37
    PAGEDFG^EASEZPU2 EZ+58
    PAGE1^EASEZPU3 EZ+4
    PAGEI^EASEZPU3 EZ+22
    PAGEN^EASEZPU3 EZ+28
    VISTA^EASEZPVD EN+10
    $$PICK^EASEZPVU ENEZ+11, ENEZ+12
    EN^EASEZRP1 EZR+10
    EN^EASEZRP2 EZR+14
    EN^EASEZRP3 EZR+20
    EN^EASEZRPD EZR+32
    EN^EASEZRPI EZR+26
    EN^EASEZRPM EZR+61
    PAGE2^EASEZRPP EZR+12
    PAGEDFF^EASEZRPP EZR+40
    PAGEDFG^EASEZRPP EZR+60
    PAGE1^EASEZRPU EZR+9
    PAGEI^EASEZRPU EZR+25
    PAGEN^EASEZRPU EZR+31
    $$KEY711^EASEZU1 EN+9, EZR+38, EZR+58, EZ+35, EZ+56
    LOCAL711^EASEZU2 EN+7

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,"No data have been found for the selected patient, or"
    • Line Location: ENEZ+23
    Function Call: WRITE
    • Prompt: !,"the patient may have an on-line 10-10EZ application"
    • Line Location: ENEZ+24
    Function Call: WRITE
    • Prompt: !,"in progress. The 10-10EZ"_$S($G(EASFLAG)="EZR":"R",1:"")_" form shall not be printed."
    • Line Location: ENEZ+25
    Function Call: WRITE
    • Prompt: !!?5,*7,"Do not select a slave device for output."
    • Line Location: ENEZ+30
    Function Call: WRITE
    • Prompt: !?5,"This output requires a 132 column output printer."
    • Line Location: ENEZ+31
    Function Call: WRITE
    • Prompt: !?5,"Output to SCREEN will be unreadable.",!
    • Line Location: ENEZ+32
    Function Call: WRITE
    • Prompt: !,"Print request cancelled!"
    • Line Location: DEV+8
    Function Call: WRITE
    • Prompt: !,*7,"CANNOT QUEUE TO HOME DEVICE!",!
    • Line Location: DEV+11
    Function Call: WRITE
    • Prompt: !?131,$C(13)
    • Line Location: NETMSG+14
    Function Call: WRITE
    • Prompt: !
    • Condition for execution: EALNE("ULC")="-"
    • Line Location: NETMSG+14
    Function Call: WRITE
    • Prompt: EALNE("UL")
    • Line Location: NETMSG+14
    Function Call: WRITE
    • Prompt: !!,?131,$C(13)
    • Line Location: NETMSG+18
    Function Call: WRITE
    • Prompt: !
    • Condition for execution: EALNE("ULC")="-"
    • Line Location: NETMSG+18
    Function Call: WRITE
    • Prompt: EALNE("UL")
    • Line Location: NETMSG+18
    Function Call: WRITE
    • Prompt: !!?23,"ANY PREVIOUS CALENDAR YEAR NET WORTH AMOUNTS FROM ANY ADDITIONAL DEPENDENT CHILD(REN)"
    • Line Location: NETMSG+26
    Function Call: WRITE
    • Prompt: !!?29,"WILL BE INCLUDED IN THE VETERAN'S PREVIOUS CALENDAR YEAR NET WORTH AMOUNTS.",!
    • Line Location: NETMSG+27
    Routine Call
    • %ZIS
    • Line Location:
      • DEV+4
    Routine Call
    • %ZIS
    • Line Location:
      • DEV+20
    Routine Call
    • DIR
    • Line Location:
      • ENEZ+26

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^EAS(712 - [#712] GET1^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DGMT(408.31 - [#408.31] EZR+18, EZ+15
    ^EAS(712 - [#712] ENEZ+16, ENEZ+19, ENEZ+20
    ^TMP( NETMSG+4
    ^TMP("EASEZ" EN+23!, EZR+3!
    ^TMP("EASEZR" EN+23!, EZR+3*
    ^TMP("EZDATA" EN+24!, EZR+4!
    ^TMP("EZDISP" EN+27!, EZR+7!
    ^TMP("EZINDEX" EN+25!, EZR+5!
    ^TMP("EZRDATA" EN+24!, EZR+4*
    ^TMP("EZRDISP" EN+27!, EZR+7*
    ^TMP("EZRINDEX" EN+25!, EZR+5*
    ^TMP("EZRTEMP" EN+26!, EZR+6*, EZR+23, EZR+29, EZR+37, EZR+39*, EZR+57, EZR+59*
    ^TMP("EZTEMP" EN+26!, EZR+6!, EZ+20, EZ+26, EZ+34, EZ+36*, EZ+55, EZ+57*

    Label References

    Name Line Occurrences
    $$ENEZ ENEZR+14
    @( NETMSG+5, NETMSG+12, NETMSG+13, NETMSG+15, NETMSG+24, NETMSG+25, NETMSG+28
    DEV DEV+10
    EXIT DEV+6
    EZ EN+21
    EZR EN+20
    NETMSG EZR+52, EZ+50

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    %ZIS ENEZ+28~, DEV*
    %ZIS("B" DEV+2*
    %ZIS("S" DEV+1*
    ADFF EZR+47~, EZR+50*, EZ+45~, EZ+48*, NETMSG+15
    BEGF EZR+47~, EZR+49*, EZ+45~, EZ+47*, NETMSG+5, NETMSG+13
    BEGG EZR+47~, EZR+50*, EZ+45~, EZ+48*, NETMSG+25
    C2711 EN+2~, EN+9*
    DATE ENEZ+18~, ENEZ+19*, ENEZ+20
    DEPF NETMSG+2~, NETMSG+8*
    DFCNT NETMSG+2~, NETMSG+8*, NETMSG+9*, NETMSG+11, NETMSG+14, NETMSG+18, NETMSG+23, NETMSG+24
    DIR ENEZ+22~
    DIR(0 ENEZ+26*
    DUZ DEV+16
    EAABRT EN+16~
    EAAD EN+16~, EZR+2~, EZR+24*, EZR+26, EZR+29*, EZR+30*, EZR+32, EZR+37*, EZR+38*, EZR+46
    EZR+61, EZ+2~, EZ+21*, EZ+23, EZ+26*, EZ+27*, EZ+29, EZ+34*, EZ+35*, EZ+43
    EZ+59
    EAADG EZR+56~, EZR+57*, EZR+58*, EZR+61, EZ+54~, EZ+55*, EZ+56*, EZ+59
    EAADL EN+16~, EZR+2~, EZR+23*, EZR+25, EZR+29*, EZR+31, EZR+37*, EZR+39, EZR+40, EZR+57*
    EZR+59, EZR+60, EZ+2~, EZ+20*, EZ+22, EZ+26*, EZ+28, EZ+34*, EZ+36, EZ+37
    EZ+55*, EZ+57, EZ+58
    EACNT EN+16~, EZR+2~, EZ+2~
    EAINFO EN+16~, EN+17, EZR+10, EZR+14, EZR+19, EZR+20, EZR+26, EZR+32, EZR+61, EZ+5
    EZ+8, EZ+11, EZ+16, EZ+17, EZ+23, EZ+29, EZ+59
    EALNE EN+16~, EN+17, EZR+10, EZR+14, EZR+19, EZR+20, EZR+26, EZR+32, EZR+61, EZ+5
    EZ+8, EZ+11, EZ+16, EZ+17, EZ+23, EZ+29, EZ+59
    EALNE("UL" NETMSG+14, NETMSG+18
    EALNE("ULC" NETMSG+14, NETMSG+18
    EAMULT EN+16~
    EASAPP EN+2~, EN+3*
    EASDFN ENEZR~, ENEZR+11*, ENEZR+14, ENEZ~, ENEZ+9*, ENEZ+11, ENEZ+12, ENEZ+16, EN+10
    EASDG EZR+2~, EZR+13*, EZR+14, EZR+19, EZR+20, EZR+61, EZ+2~, EZ+10*, EZ+11, EZ+16
    EZ+17, EZ+59
    EASF NETMSG+2~, NETMSG+4*, NETMSG+5, NETMSG+8
    EASFLAG ENEZR+9~, ENEZR+10*, ENEZ+25, DEV+14, EN+20
    EASMTIEN ENEZR~, ENEZR+12*, ENEZR+14, ENEZ~, ENEZ+10*, ENEZ+11, ENEZ+12*, EN+10, EZR+18, EZ+15
    EASMTV EZR+17~, EZR+18*, EZR+19, EZR+43, EZ+14~, EZ+15*, EZ+16, EZ+40
    >> EASVRSN EN+4*
    ERR ENEZ+28~
    FNP EZR+47~, EZR+51*, EZ+45~, EZ+49*, NETMSG+11, NETMSG+14, NETMSG+18, NETMSG+23, NETMSG+24
    FTR EZR+47~, EZR+49*, EZ+45~, EZ+47*, NETMSG+12, NETMSG+24, NETMSG+28
    GNP EZR+47~, EZR+51*, EZ+45~, EZ+49*, NETMSG+18, NETMSG+24
    HDR EZR+47~, EZR+48*, EZ+45~, EZ+46*
    INPROG ENEZ+15~, ENEZ+16*, ENEZ+18, ENEZ+19, ENEZ+20*, ENEZ+21
    IO DEV+10
    IO("Q" DEV+7!
    >> IO(0 DEV+10
    IOST DEV+10
    IX ENEZ+18~*, ENEZ+19, ENEZ+20
    KEY EN+16~, EZR+38*, EZR+39, EZR+58*, EZR+59, EZ+35*, EZ+36, EZ+56*, EZ+57
    NEWPG NETMSG+2~, NETMSG+23*, NETMSG+24*
    POP ENEZ+28~, DEV+6
    TEMP EZR+47~, EZR+48*, EZ+45~, EZ+46*, NETMSG+4
    U EZR+18, EZ+15
    X ENEZR+9~, ENEZR+14*, ENEZR+15, ENEZ+15~, ENEZ+16*, ENEZ+17, ENEZ+20, DEV+18*
    ZTDESC ENEZ+28~, DEV+14*, DEV+15*
    ZTIO ENEZ+28~
    ZTRTN ENEZ+28~, DEV+16*
    ZTSAVE ENEZ+28~
    ZTSAVE( DEV+18*
    ZTSK ENEZ+28~, EXIT
    ZUSR ENEZ+28~, DEV+16*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All