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: ENFAACQ

Package: Engineering

Routine: ENFAACQ


Information

ENFAACQ ;WASHINGTON IRMFO/SAB; EQUIPMENT ACQUISITION; 1/3/97

Source Information

Source file <ENFAACQ.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Engineering 6 $$AVP^ENFAAV  ADJBAL^ENFABAL  $$DEC^ENFAUTL  ^ENFAVAL  ^ENFAXMT  LISTP^ENFAXMTM  
VA FileMan 4 FILE^DICN  ^DIE  ^DIK  ^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: 4

Package Total Caller Graph
Engineering 4 ENEQ1  ENEQ3  ENFADEL  ENFAXMTM  

Entry Points

Name Comments DBIA/ICR reference
SETUP ;
  • ICR #6561
    • Status: Pending
    • Usage: Private
    VALEQ ; validate equipment
  • ICR #6561
    • Status: Pending
    • Usage: Private
    ADDFA ; create entry for FA code sheet
  • ICR #6561
    • Status: Pending
    • Usage: Private
    DEL ;
    UPDATE ;
    ; update equipment file
    ; populate station number field when blank
  • ICR #6561
    • Status: Pending
    • Usage: Private
    WRAPUP ;
    BAD(X) ; add text to validation problem list

    External References

    Name Field # of Occurrence
    FILE^DICN ADDFA+3
    ^DIE UPDATE+27
    ^DIK DEL+2
    ^DIR DEL+6
    $$AVP^ENFAAV ENFAACQ+17
    ADJBAL^ENFABAL UPDATE+21
    $$DEC^ENFAUTL UPDATE+8
    ^ENFAVAL VALEQ+2
    ^ENFAXMT UPDATE+24
    LISTP^ENFAXMTM VALEQ+3

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"Adjustment voucher was NOT created."
    • Line Location: ENFAACQ+18
    Function Call: WRITE
    • Prompt: !!,"Can't update the FA DOCUMENT LOG file. Better contact IRM."
    • Line Location: ADDFA+6
    Function Call: WRITE
    • Prompt: !!,"The FA document that you just created can not be locked."
    • Line Location: ADDFA+10
    Function Call: WRITE
    • Prompt: !,"Please notify your ADPAC."
    • Line Location: ADDFA+11
    Function Call: WRITE
    • Prompt: $C(7),!,"No action taken. Database unchanged."
    • Line Location: DEL+5
    Function Call: WRITE
    • Prompt: !,"Adjustment Voucher was created.",!
    • Line Location: UPDATE+28
    Routine Call
    • DIE
    • Line Location:
      • UPDATE+27
    Routine Call
    • DIR
    • Line Location:
      • DEL+6

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^ENG(6915.2 - [#6915.2] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^ENG(6914 - [#6914] SETUP+4, UPDATE+4*, UPDATE+9*, UPDATE+13*, UPDATE+17*
    ^ENG(6915.1 - [#6915.1] SETUP+5
    ^ENG(6915.2 - [#6915.2] ADDFA+8, ADDFA+12, UPDATE+19*, WRAPUP+1
    ^TMP($J VALEQ+1!, VALEQ+3, BAD+2, BAD+3*, BAD+4*

    Label References

    Name Line Occurrences
    ADDFA ENFAACQ+15
    BAD ADDFA+5, ADDFA+9
    DEL ENFAACQ+19
    SETUP ENFAACQ+13
    UPDATE ENFAACQ+20
    VALEQ ENFAACQ+14
    WRAPUP ENFAACQ+21

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DA DEL+2*, UPDATE+27*, WRAPUP+4!
    DD ADDFA+3!
    DIC ADDFA+1*, WRAPUP+4!
    DIC("DR" ADDFA+2*
    DIC(0 ADDFA+1*
    DIE UPDATE+27*, WRAPUP+4!
    DIK DEL+2*!, WRAPUP+4!
    DIR DEL+6!, WRAPUP+4!
    DIR(0 DEL+6*
    DIROUT WRAPUP+4!
    DIRUT WRAPUP+4!
    DLAYGO ADDFA+1*, ADDFA+3!
    DO ADDFA+3!
    DR UPDATE+27*, WRAPUP+4!
    DTOUT WRAPUP+4!
    DUOUT WRAPUP+4!
    ENAV ENFAACQ+16!, ENFAACQ+17*, ENFAACQ+18, UPDATE+26, WRAPUP+3!
    >> ENBAT("SEL" ENFAACQ+16
    >> ENBAT("SILENT" VALEQ+3, ADDFA+5, ADDFA+9, DEL+3, DEL+4, UPDATE+23
    ENDO ENFAACQ+14, ENFAACQ+15, ENFAACQ+16*, ENFAACQ+19, ENFAACQ+20, SETUP+1*, VALEQ+3*, ADDFA+4*, ADDFA+8*, WRAPUP+3!
    >> ENEQ( SETUP+4*, WRAPUP+2!
    >> ENEQ("DA" SETUP+4, VALEQ+1, VALEQ+3, ADDFA+2, UPDATE+4, UPDATE+9, UPDATE+13, UPDATE+17, BAD+2, BAD+3
    , BAD+4
    >> ENEQ(2 UPDATE+7, UPDATE+8*, UPDATE+9, UPDATE+11, UPDATE+12*, UPDATE+13, UPDATE+15, UPDATE+16*, UPDATE+17, UPDATE+19
    UPDATE+21
    >> ENEQ(8 UPDATE+21
    >> ENEQ(9 UPDATE+3, UPDATE+5*, UPDATE+21
    ENFA WRAPUP+3!
    ENFA("DA" ENFAACQ+17, SETUP+2*, ADDFA+7*, ADDFA+12, DEL+1, DEL+2, UPDATE+19, UPDATE+27, WRAPUP+1
    ENFAP WRAPUP+3!
    ENFAP("DOC" SETUP+3*
    ENFAP("SITE" SETUP+5*, UPDATE+4, UPDATE+5
    ENFAP(0 ADDFA+12*, UPDATE+21
    ENUT ENFAACQ+16!
    I SETUP+4*, WRAPUP+2*, WRAPUP+4!, BAD+1~, BAD+2*, BAD+3, BAD+4
    U UPDATE+3, UPDATE+4, UPDATE+5, UPDATE+7, UPDATE+8, UPDATE+9, UPDATE+11, UPDATE+12, UPDATE+13, UPDATE+15
    UPDATE+16, UPDATE+17, UPDATE+19, UPDATE+21, BAD+2
    X ADDFA+2*, WRAPUP+4!, BAD~, BAD+3
    Y ADDFA+4, ADDFA+7, ADDFA+8, WRAPUP+4!
    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