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

Package: Engineering

Routine: ENFARC2


Information

ENFARC2 ;WIRMFO/SAB-FIXED ASSET RPT, TRANSACTION REGISTER (CONT); 12/16/1998

Source Information

Source file <ENFARC2.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 2 $$EXTERNAL^DILFD  $$GET1^DIQ  
Engineering 1 (FCPVAL,FRPVAL)^ENFARC3  
Kernel 1 $$FMTE^XLFDT  

Entry Points

Name Comments DBIA/ICR reference
F2 ; print FA details (5 lines)
F3 ; print FB details (2 lines)
F4 ; print FC details (1-9 lines)
F5 ; print FD details (2 lines)
F6 ; print FR details (0-5 lines)
HD ; call page header
HDC ; call page header continued
FT ; call page footer

External References

Name Field # of Occurrence
$$EXTERNAL^DILFD F2+15, F2+21, F3+7, F4+27, F4+28
$$GET1^DIQ F5+9
FCPVAL^ENFARC3 F4+3
FRPVAL^ENFARC3 F6+2
$$FMTE^XLFDT F4+32, F4+33, F4+41, F4+42

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?4,"FUND: ",$P(ENY3,U,10)
  • Line Location: F2+8
Function Call: WRITE
  • Prompt: ?25,"CSN: ",ENX
  • Line Location: F2+9
Function Call: WRITE
  • Prompt: " (",ENX("D"),")"
  • Condition for execution: ENX("D")]""
  • Line Location: F2+9
Function Call: WRITE
  • Prompt: !,?4,"CMR: ",$P(ENY3,U,31)
  • Line Location: F2+11
Function Call: WRITE
  • Prompt: !,?4,"NATIONAL EIL: ",$P(ENY3,U,8)
  • Line Location: F2+12
Function Call: WRITE
  • Prompt: ?25,"COST CENTER: ",$P(ENY3,U,28)
  • Line Location: F2+13
Function Call: WRITE
  • Prompt: ?48,"ACQ METH: ",$$EXTERNAL^DILFD(6914,20.1,"",ENX)
  • Line Location: F2+15
Function Call: WRITE
  • Prompt: !,?4,"ACQ DATE: ",$P(ENY3,U,17),"/",$P(ENY3,U,18),"/",$E($P(ENY3,U,16),3,4)
  • Line Location: F2+16
Function Call: WRITE
  • Prompt: ?25,"LE: ",$P(ENY3,U,24)
  • Line Location: F2+17
Function Call: WRITE
  • Prompt: ?48,"REPL DATE: ",$P(ENY3,U,22),"/",$P(ENY3,U,23),"/",$E($P(ENY3,U,21),3,4)
  • Line Location: F2+18
Function Call: WRITE
  • Prompt: !,?4,"BOC: ",$P(ENY3,U,14),?25,"A/O: ",$P(ENY3,U,11)
  • Line Location: F2+19
Function Call: WRITE
  • Prompt: ?48,"EQUITY ACCOUNT: ",$$EXTERNAL^DILFD(6914,64,"",ENX)
  • Line Location: F2+21
Function Call: WRITE
  • Prompt: !,?4,"P.O.#: "
  • Line Location: F2+22
Function Call: WRITE
  • Prompt: $P($G(^ENG(6914,ENDA("EQ"),2)),U,2)
  • Condition for execution: ENDA("EQ")
  • Line Location: F2+22
Function Call: WRITE
  • Prompt: ?25,"DESCRIPTION: ",$P(ENY3,U,8)
  • Line Location: F3+3
Function Call: WRITE
  • Prompt: !,?4,"P.O.#: "
  • Line Location: F3+4
Function Call: WRITE
  • Prompt: $P($G(^ENG(6914,ENDA("EQ"),2)),U,2)
  • Condition for execution: ENDA("EQ")
  • Line Location: F3+4
Function Call: WRITE
  • Prompt: ?25,"ACQ DATE: ",$P(ENY3,U,10),"/",$P(ENY3,U,11),"/",$E($P(ENY3,U,9),3,4)
  • Line Location: F3+5
Function Call: WRITE
  • Prompt: ?48,"ACQ METH: ",$$EXTERNAL^DILFD(6914,20.1,"",ENX)
  • Line Location: F3+7
Function Call: WRITE
  • Prompt: ?25,"P.O.#: "
  • Line Location: F4+2
Function Call: WRITE
  • Prompt: $P($G(^ENG(6914,ENDA("EQ"),2)),U,2)
  • Condition for execution: ENDA("EQ")
  • Line Location: F4+2
Function Call: WRITE
  • Prompt: !,?4,$S($P(ENY3,U,8)="00":"CSN",1:"DESCRIPTION")," CHANGED"
  • Line Location: F4+9
Function Call: WRITE
  • Prompt: ?25,"OLD: ",EN(30)
  • Line Location: F4+10
Function Call: WRITE
  • Prompt: !,?25,"NEW: ",$P(ENY3,U,11)
  • Line Location: F4+15
Function Call: WRITE
  • Prompt: !,?4,"NATIONAL EIL CHANGED "
  • Line Location: F4+22
Function Call: WRITE
  • Prompt: ?25,"OLD: ",EN(29),?53,"NEW: ",$P(ENY3,U,10)
  • Line Location: F4+23
Function Call: WRITE
  • Prompt: !,?4,"ACQ METHOD CHANGED "
  • Line Location: F4+26
Function Call: WRITE
  • Prompt: ?25,"OLD: ",$$EXTERNAL^DILFD(6914,20.1,"",EN(34))
  • Line Location: F4+27
Function Call: WRITE
  • Prompt: ?53,"NEW: ",$$EXTERNAL^DILFD(6914,20.1,"",$P(ENY3,U,15))
  • Line Location: F4+28
Function Call: WRITE
  • Prompt: !,?4,"ACQ DATE CHANGED "
  • Line Location: F4+31
Function Call: WRITE
  • Prompt: ?25,"OLD: ",$$FMTE^XLFDT(EN(105))
  • Line Location: F4+32
Function Call: WRITE
  • Prompt: ?53,"NEW: ",$$FMTE^XLFDT($P(ENY100,U,6))
  • Line Location: F4+33
Function Call: WRITE
  • Prompt: !,?4,"USEFUL LIFE CHANGED "
  • Line Location: F4+36
Function Call: WRITE
  • Prompt: ?25,"OLD: ",EN(37),?53,"NEW: ",$P(ENY4,U,3)
  • Line Location: F4+37
Function Call: WRITE
  • Prompt: !,?4,"REPL DATE CHANGED "
  • Line Location: F4+40
Function Call: WRITE
  • Prompt: ?25,"OLD: ",$$FMTE^XLFDT(EN(106))
  • Line Location: F4+41
Function Call: WRITE
  • Prompt: ?53,"NEW: ",$$FMTE^XLFDT($P(ENY100,U,7))
  • Line Location: F4+42
Function Call: WRITE
  • Prompt: !,?4,"ASSET VALUE CHANGED "
  • Line Location: F4+45
Function Call: WRITE
  • Prompt: ?25,"OLD: ",$P(ENY100,U,4),?53,"NEW: ",$P(ENY4,U,6)
  • Line Location: F4+46
Function Call: WRITE
  • Prompt: ?25,$S(ENTY="T":"TURN-IN",1:"DISP")," DATE: "
  • Line Location: F5+4
Function Call: WRITE
  • Prompt: $P(ENY5,U,6),"/",$P(ENY5,U,7),"/",$E($P(ENY5,U,5),3,4)
  • Line Location: F5+5
Function Call: WRITE
  • Prompt: ?49,"DISP AUTHORITY: ",$P(ENY5,U,9)
  • Line Location: F5+6
Function Call: WRITE
  • Prompt: !,?4,"SELLING PRICE: ",$P(ENY5,U,8)
  • Line Location: F5+8
Function Call: WRITE
  • Prompt: ?34,"DISP METHOD: ",$$GET1^DIQ(6915.5,ENDA("F?"),"103:1")
  • Line Location: F5+9
Function Call: WRITE
  • Prompt: !,?4,"FUND CHANGED ",?25,"OLD: ",EN(28),?53,"NEW: ",$P(ENY3,U,9)
  • Line Location: F6+6
Function Call: WRITE
  • Prompt: !,?4,"A/O CHANGED ",?25,"OLD: ",EN(29),?53,"NEW: ",$P(ENY3,U,10)
  • Line Location: F6+9
Function Call: WRITE
  • Prompt: !,?4,"BOC CHANGED ",?25,"OLD: ",EN(32),?53,"NEW: ",$P(ENY3,U,13)
  • Line Location: F6+12
Function Call: WRITE
  • Prompt: !,?4,"CMR CHANGED "
  • Line Location: F6+15
Function Call: WRITE
  • Prompt: ?25,"OLD: ",EN(37),?53,"NEW: ",$P(ENY3,U,18)
  • Line Location: F6+16
Function Call: WRITE
  • Prompt: !,?4,"NATIONAL EIL CHANGED "
  • Line Location: F6+20
Function Call: WRITE
  • Prompt: ?25,"OLD: ",EN(33),?53,"NEW: ",$P(ENY3,U,14)
  • Line Location: F6+21
Function Call: WRITE
  • Prompt: !,?4,"COST CENTER CHANGED "
  • Line Location: F6+24
Function Call: WRITE
  • Prompt: ?25,"OLD: ",EN(34),?53,"NEW: ",$P(ENY3,U,15)
  • Line Location: F6+25

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ENCSN(6917 - [#6917] F2+4, F2+5, F4+12, F4+13, F4+17, F4+18
^ENG(6914 - [#6914] F2+22, F3+4, F4+2
^ENG(6915.2 - [#6915.2] F2+2, F2+20
^ENG(6915.3 - [#6915.3] F3+2
^ENG(6915.4 - [#6915.4] F4+4, F4+5, F4+6
^ENG(6915.5 - [#6915.5] F5+2, F5+3
^ENG(6915.6 - [#6915.6] F6+3

Label References

Name Line Occurrences
@( HD+1, HDC+1, FT+1
FT F4+8, F4+21, F4+25, F4+30, F4+35, F4+39, F4+44, F6+5, F6+8, F6+11
, F6+14, F6+19, F6+23
HD F4+8, F4+21, F4+25, F4+30, F4+35, F4+39, F4+44, F6+5, F6+8, F6+11
, F6+14, F6+19, F6+23
HDC F4+8, F4+21, F4+25, F4+30, F4+35, F4+39, F4+44, F6+5, F6+8, F6+11
, F6+14, F6+19, F6+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
EN F4+1~, F6+1~
EN(105 F4+29, F4+32
EN(106 F4+38, F4+41
EN(28 F6+4, F6+6
EN(29 F4+20, F4+23, F6+7, F6+9
EN(30 F4+7, F4+10, F4+12
EN(32 F6+10, F6+12
EN(33 F6+18, F6+21
EN(34 F4+24, F4+27, F6+22, F6+25
EN(37 F4+34, F4+37, F6+13, F6+16
>> END F4+7, F4+8, F4+20, F4+21, F4+24, F4+25, F4+29, F4+30, F4+34, F4+35
, F4+38, F4+39, F4+43, F4+44, F6+4, F6+5, F6+7, F6+8, F6+10, F6+11
, F6+13, F6+14, F6+18, F6+19, F6+22, F6+23
>> ENDA("EQ" F2+22, F3+4, F4+2
>> ENDA("F?" F2+2, F2+20, F3+2, F4+3, F4+4, F4+5, F4+6, F5+2, F5+3, F5+9
, F6+2, F6+3
>> ENDA("FA" F4+3, F6+2
>> ENTAG("FT" FT+1
>> ENTAG("HD" F2+8, HD+1
>> ENTAG("HDC" HDC+1
ENTY F5+1~, F5+3*, F5+4, F5+7
ENX F2+1~, F2+3*, F2+4, F2+9, F2+14*, F2+15, F2+20*, F2+21, F3+1~, F3+6*
, F3+7, F4+1~
ENX("D" F2+5*, F2+9, F4+13*, F4+14, F4+18*, F4+19
ENX(0 F2+4*, F2+5, F4+12*, F4+13, F4+17*, F4+18
ENY100 F4+1~, F4+6*, F4+29, F4+33, F4+38, F4+42, F4+43, F4+46
ENY3 F2+1~, F2+2*, F2+3, F2+8, F2+11, F2+12, F2+13, F2+14, F2+16, F2+17
, F2+18, F2+19, F3+1~, F3+2*, F3+3, F3+5, F3+6, F4+1~, F4+4*, F4+7
, F4+9, F4+11, F4+15, F4+16, F4+17, F4+20, F4+23, F4+24, F4+28, F6+1~
, F6+3*, F6+4, F6+6, F6+7, F6+9, F6+10, F6+12, F6+13, F6+16, F6+18
, F6+21, F6+22, F6+25
ENY4 F4+1~, F4+5*, F4+34, F4+37, F4+43, F4+46
ENY5 F5+1~, F5+2*, F5+5, F5+6, F5+8
IOSL F4+8, F4+21, F4+25, F4+30, F4+35, F4+39, F4+44, F6+5, F6+8, F6+11
, F6+14, F6+19, F6+23
U F2+3, F2+5, F2+8, F2+11, F2+12, F2+13, F2+14, F2+16, F2+17, F2+18
, F2+19, F2+20, F2+22, F3+3, F3+4, F3+5, F3+6, F4+2, F4+7, F4+9
, F4+11, F4+13, F4+15, F4+16, F4+17, F4+18, F4+20, F4+23, F4+24, F4+28
, F4+29, F4+33, F4+34, F4+37, F4+38, F4+42, F4+43, F4+46, F5+3, F5+5
, F5+6, F5+8, F6+4, F6+6, F6+7, F6+9, F6+10, F6+12, F6+13, F6+16
, F6+18, F6+21, F6+22, F6+25
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All