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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ENFAAV

Package: Engineering

Routine: ENFAAV


Information

ENFAAV ;IRMFO/SAB-ADJUSTMENT VOUCHER ENTRY ;6.30.97

Source Information

Source file <ENFAAV.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 6 ^DIC  ^DIE  $$GET1^DIQ  ^DIR  ^DIWP  ^DIWW  
Engineering 1 ($$AFA,$$FUND)^ENFAR5A  
Kernel 1 $$FMTE^XLFDT  

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

Package Total Caller Graph
Engineering 6 ENFA AV  ENFAACQ  ENFABETR  ENFACHG  ENFADEL  ENFAXFR  

Entry Points

Name Comments DBIA/ICR reference
EN ; Entry point for option
; load table for converting FA Type to SGL
ASKDOC ; ask FAP Document
SHOWDOC ; show info for FAP Document/Adjustment Voucher
CHECKAV ;
EDITAV ;
EXIT ;
AVP(ENF,ENDA) ; adjustment voucher preparation
; This program gathers all the information required for an adjustment
; voucher. The calling program must evaluate the return value and
; actually create the adjustment voucher at the appropriate time
; by storing NOW in the appropriate A.V. DATE field.
AVPED
AVPX ; exit
AVC(ENF,ENDA) ; Adjustment Voucher Clean Up
; This code is used to clean up an aborted adjustment voucher.
; in
; ENF - file number (e.g. 6915.2)
; ENDA - ien
; returns 1 (done) or 0 (can't because a.v. completed)

External References

Name Field # of Occurrence
^DIC ASKDOC+13
^DIE EDITAV+5, AVPED, AVC+9
$$GET1^DIQ SHOWDOC+1, SHOWDOC+35, SHOWDOC+36, CHECKAV+1, AVC+8
^DIR ASKDOC+8, SHOWDOC+41, AVP+26, AVPED+2, AVPED+5
^DIWP SHOWDOC+41
^DIWW SHOWDOC+42
$$AFA^ENFAR5A SHOWDOC+5
$$FUND^ENFAR5A SHOWDOC+9
$$FMTE^XLFDT SHOWDOC+22, SHOWDOC+24

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKDOC+1
Function Call: WRITE
  • Prompt: @IOF,!,"ADJ. VOUCHER",?16,"TRANSACTION .............",?43,"STN"
  • Line Location: SHOWDOC+17
Function Call: WRITE
  • Prompt: ?50,"FUND",?58,"SGL",?63,"NET AMOUNT"
  • Line Location: SHOWDOC+18
Function Call: WRITE
  • Prompt: !,"DATE/TIME",?16,"CODE NUMBER DATE"
  • Line Location: SHOWDOC+19
Function Call: WRITE
  • Prompt: !,"--------------",?16,"---- ----------- --------",?43,"-----"
  • Line Location: SHOWDOC+20
Function Call: WRITE
  • Prompt: ?50,"------",?58,"----",?63,"----------------"
  • Line Location: SHOWDOC+21
Function Call: WRITE
  • Prompt: !,$E($TR($$FMTE^XLFDT(ENDT,"2F")," ",0),1,14)
  • Line Location: SHOWDOC+22
Function Call: WRITE
  • Prompt: ?16,$P(ENY1,U,6),?21,$P(ENY1,U,9)
  • Line Location: SHOWDOC+23
Function Call: WRITE
  • Prompt: ?33,$TR($$FMTE^XLFDT($P(ENY0,U,2),"2DF")," ",0)
  • Line Location: SHOWDOC+24
Function Call: WRITE
  • Prompt: ?43,ENSN,?50,ENFUND,?58,ENSGL
  • Line Location: SHOWDOC+25
Function Call: WRITE
  • Prompt: ?63,$J($FN(ENAMT,",",2),16)
  • Line Location: SHOWDOC+30
Function Call: WRITE
  • Prompt: !,?43,ENSN,?50,ENFUNDNW,?58,ENSGL
  • Line Location: SHOWDOC+33
Function Call: WRITE
  • Prompt: ?63,$J($FN(-ENAMT,",",2),16)
  • Line Location: SHOWDOC+34
Function Call: WRITE
  • Prompt: !,?5,"EQUIP #: ",ENDA,?26,$$GET1^DIQ(6914,ENDA,3)
  • Line Location: SHOWDOC+35
Function Call: WRITE
  • Prompt: !,?5,"REASON: ",ENX
  • Line Location: SHOWDOC+37
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SHOWDOC+41
Function Call: WRITE
  • Prompt: $C(7),!,"This FAP Document already has an Adjustment Voucher!",!
  • Line Location: CHECKAV+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EDITAV+1
Function Call: WRITE
  • Prompt: !,"Adjustment voucher was NOT created."
  • Line Location: EDITAV+3
Function Call: WRITE
  • Prompt: !,"Adjustment Voucher was created.",!
  • Line Location: EDITAV+6
Function Call: WRITE
  • Prompt: $C(7),!,"Both Reason Code and Comments are required!"
  • Line Location: AVPED+7
Routine Call
  • DIC
  • Line Location:
    • ASKDOC+13
Routine Call
  • DIE
  • Line Location:
    • EDITAV+5
    • AVPED
    • AVC+9
Routine Call
  • DIR
  • Line Location:
    • ASKDOC+8
    • SHOWDOC+41
    • AVP+26
    • AVPED+2
    • AVPED+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG(6914 - [#6914] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ENG( SHOWDOC+2, SHOWDOC+3, SHOWDOC+4, SHOWDOC+12, SHOWDOC+13, SHOWDOC+14, SHOWDOC+15, SHOWDOC+16, SHOWDOC+27, SHOWDOC+38
, SHOWDOC+41, AVPED+6
^ENG(6914.3 - [#6914.3] EN+2, EN+3
^ENG(6915.2 - [#6915.2] SHOWDOC+6
^UTILITY($J SHOWDOC+39!

Label References

Name Line Occurrences
$$AVC AVPED+3
$$AVP EDITAV+2
ASKDOC CHECKAV+1, EDITAV+7
AVPED AVPED+3, AVPED+6
AVPX AVP+26, AVPED+2, AVPED+3
EXIT ASKDOC+8, ASKDOC+13, SHOWDOC+38, EDITAV+3

Naked Globals

Name Field # of Occurrence
^( SHOWDOC+41

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EDITAV+5*, EXIT+1!, AVP+17~, AVPED*, AVC+9*
DIC ASKDOC+11*, EXIT+1!
DIC("A" ASKDOC+12*
DIC(0 ASKDOC+11*
DIE EDITAV+5*, EXIT+1!, AVP+17~, AVPED*, AVC+9*
DIR ASKDOC+8!, SHOWDOC+41!, EXIT+1!, AVP+17~, AVP+26!, AVPED+2!, AVPED+5!
DIR("?" ASKDOC+4*, ASKDOC+5*, ASKDOC+6*, ASKDOC+7*, AVP+22*, AVP+23*, AVP+24*, AVP+25*
DIR("A" ASKDOC+3*, AVP+21*, AVPED+1*, AVPED+4*
DIR("B" AVP+21*
DIR(0 ASKDOC+2*, SHOWDOC+41*, AVP+20*, AVPED+1*, AVPED+4*
DIROUT EXIT+1!
DIRUT ASKDOC+8, SHOWDOC+38, SHOWDOC+41, EXIT+1!, AVP+26, AVPED+2, AVPED+5
>> DIWF SHOWDOC+39*
>> DIWL SHOWDOC+39*
>> DIWR SHOWDOC+39*
DR EDITAV+5*, EXIT+1!, AVP+17~, AVPED*, AVC+9*
DTOUT EXIT+1!
DUOUT EXIT+1!
ENAMT SHOWDOC+11*, SHOWDOC+12*, SHOWDOC+13*, SHOWDOC+14*, SHOWDOC+15*, SHOWDOC+16*, SHOWDOC+28*, SHOWDOC+29*, SHOWDOC+30, SHOWDOC+34
, EXIT+2!
ENAV EDITAV+2*, EDITAV+3, EDITAV+4, EXIT+2!, AVP+17~, AVP+18*, AVPED+8*, AVPX+1
ENDA EN+2*, EN+3, SHOWDOC+4*, SHOWDOC+35, EXIT+2!, AVP~, AVPED, AVPED+3, AVPED+6, AVC~
, AVC+8, AVC+9
ENDA("F?" ASKDOC+14*, SHOWDOC+1, SHOWDOC+2, SHOWDOC+3, SHOWDOC+4, SHOWDOC+5, SHOWDOC+9, SHOWDOC+12, SHOWDOC+13, SHOWDOC+14
, SHOWDOC+15, SHOWDOC+16, SHOWDOC+27, SHOWDOC+36, SHOWDOC+38, SHOWDOC+41, CHECKAV+1, EDITAV+2, EDITAV+5
ENDA("FA" SHOWDOC+5*, SHOWDOC+6, SHOWDOC+9
ENDT SHOWDOC+1*, SHOWDOC+22, EXIT+2!
ENF AVP~, AVPED, AVPED+3, AVPED+6, AVC~, AVC+7, AVC+8, AVC+9
ENFAPTY EN+2!, EXIT+2!
ENFAPTY( EN+4*, SHOWDOC+10
ENFAY3 SHOWDOC+6*, SHOWDOC+7, SHOWDOC+8, SHOWDOC+10, EXIT+2!
ENFILE ASKDOC+9*, ASKDOC+11, SHOWDOC+1, SHOWDOC+2, SHOWDOC+3, SHOWDOC+4, SHOWDOC+5, SHOWDOC+8, SHOWDOC+9, SHOWDOC+12
, SHOWDOC+13, SHOWDOC+14, SHOWDOC+15, SHOWDOC+16, SHOWDOC+26, SHOWDOC+27, SHOWDOC+31, SHOWDOC+36, SHOWDOC+38, SHOWDOC+41
, CHECKAV+1, EDITAV+2, EDITAV+5, EXIT+2!
ENFUND SHOWDOC+8*, SHOWDOC+9*, SHOWDOC+25, SHOWDOC+28, SHOWDOC+31, EXIT+2!
ENFUNDNW SHOWDOC+27*, SHOWDOC+28, SHOWDOC+31, SHOWDOC+33, EXIT+2!
>> ENI SHOWDOC+40*, SHOWDOC+41*
ENSGL SHOWDOC+10*, SHOWDOC+25, SHOWDOC+33, EXIT+3!
ENSN SHOWDOC+7*, SHOWDOC+25, SHOWDOC+33, EXIT+3!
ENUT EDITAV+3, EXIT+3!, AVP+18!, AVP+26*, AVPED+2*, AVPED+5*
>> ENX SHOWDOC+14*, SHOWDOC+36*, SHOWDOC+37
ENY0 EN+3*, EN+4, SHOWDOC+2*, SHOWDOC+24, EXIT+3!
ENY1 SHOWDOC+3*, SHOWDOC+23, EXIT+3!
IOF SHOWDOC+17, SHOWDOC+41
IOM SHOWDOC+39
IOSL SHOWDOC+41
U EN+4, SHOWDOC+4, SHOWDOC+7, SHOWDOC+8, SHOWDOC+10, SHOWDOC+12, SHOWDOC+13, SHOWDOC+14, SHOWDOC+15, SHOWDOC+16
, SHOWDOC+23, SHOWDOC+24, SHOWDOC+27, AVPED+6
X SHOWDOC+40*, SHOWDOC+41*, EXIT+1!, AVP+17~
Y ASKDOC+8, ASKDOC+9, ASKDOC+12, ASKDOC+13, ASKDOC+14, SHOWDOC+41, EXIT+1!, AVP+17~, AVP+26, AVPED+3*
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 |  Naked Globals |  Local Variables  | All