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

Package: Engineering

Routine: ENFAR5B


Information

ENFAR5B ;WIRMFO/SAB-FIXED ASSET RPT, VOUCHER SUMMARY (CONT); 5/22/97

Source Information

Source file <ENFAR5B.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 5 DD^%DT  NOW^%DTC  $$FIND1^DIC  $$GET1^DIQ  ^DIR  
Kernel 2 $$S^%ZTLOAD  $$FMTE^XLFDT  
Engineering 1 $$GETBAL^ENFABAL  

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

Package Total Caller Graph
Engineering 1 ENFAR5  

Entry Points

Name Comments DBIA/ICR reference
GETBAL ; get balances from file #6915.9
; find station
PRINT ; print results
HD ; page header
HDSGL ; header for continued SGL

External References

Name Field # of Occurrence
DD^%DT PRINT+1
NOW^%DTC PRINT+1
$$S^%ZTLOAD HD+1
$$FIND1^DIC GETBAL+2
$$GET1^DIQ GETBAL+5, GETBAL+9
^DIR PRINT+41, HD+2
$$GETBAL^ENFABAL GETBAL+11, GETBAL+12
$$FMTE^XLFDT PRINT+4, PRINT+26, HD+7, HD+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No activity in selected period",!
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !!,?2,"SGL: ",ENSGL
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: " ",ENSGL("A")
  • Condition for execution: ENSGL("A")]""
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !,?12,"Opening Balance for ",ENDTMO,":"
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: ?43,$J("$"_$FN(+$P(ENBAL,U,1),",",2),16)
  • Line Location: PRINT+16
Function Call: WRITE
  • Prompt: !,?4,$P(ENY1,U,6),?9,$P(ENY1,U,9),?21,$$FMTE^XLFDT(ENDT,"2D")
  • Line Location: PRINT+26
Function Call: WRITE
  • Prompt: ?31,ENDA,?43,$J($FN(ENAMT,",",2),16)
  • Line Location: PRINT+27
Function Call: WRITE
  • Prompt: ?61,$P($G(^ENG(6914,ENDA,2)),U,2)
  • Line Location: PRINT+28
Function Call: WRITE
  • Prompt: !,?9,"Desc: ",ENNOTE
  • Line Location: PRINT+31
Function Call: WRITE
  • Prompt: !,?9,"Sold: $",$FN(ENNOTE,",",2)
  • Line Location: PRINT+34
Function Call: WRITE
  • Prompt: !,?12,"G/L Acct "_ENSGL_" Net Activity: "
  • Line Location: PRINT+37
Function Call: WRITE
  • Prompt: ?43,$J($FN(ENT("SGL"),",",2),16)
  • Line Location: PRINT+38
Function Call: WRITE
  • Prompt: !,?12,"Closing Balance for ",ENDTMC,":"
  • Line Location: PRINT+39
Function Call: WRITE
  • Prompt: ?43,$J("$"_$FN(+$P(ENBAL,U,2),",",2),16)
  • Line Location: PRINT+40
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: !,"VOUCHER SUMMARY FOR STATION: ",ENSNR,?49,ENDTR,?72,"page ",ENPG
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: !," FUND: ",ENFUND
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: " ",ENFUND("A")
  • Condition for execution: $G(ENFUND("A"))]""
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: ?32," ACCOUNTING PERIOD FROM ",$$FMTE^XLFDT(ENDTS,"2D")
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: " TO ",$$FMTE^XLFDT(ENDTE,"2D")
  • Line Location: HD+8
Function Call: WRITE
  • Prompt: !!,?4,"TRANSACTION",?31,"EQUIP ID#",?43,"NET AMOUNT",?61,"EQUIP P.O.#"
  • Line Location: HD+9
Function Call: WRITE
  • Prompt: !,?4,"CODE NUMBER DATE"
  • Line Location: HD+10
Function Call: WRITE
  • Prompt: !,?4,"---- ----------- --------",?31,"----------"
  • Line Location: HD+11
Function Call: WRITE
  • Prompt: ?43,"----------------",?61,"------------"
  • Line Location: HD+12
Function Call: WRITE
  • Prompt: !,?2,"SGL: ",ENSGL
  • Line Location: HDSGL+1
Function Call: WRITE
  • Prompt: " ",ENSGL("A")
  • Condition for execution: ENSGL("A")]""
  • Line Location: HDSGL+1
Function Call: WRITE
  • Prompt: " (continued)"
  • Line Location: HDSGL+1
Routine Call
  • DIC
  • Line Location:
    • GETBAL+2
Routine Call
  • DIR
  • Line Location:
    • PRINT+41
    • HD+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG(6915.9 - [#6915.9] FIND1^DIC
6915.91 GET1^DIQ
6915.911 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ENG( PRINT+24, PRINT+25, PRINT+30, PRINT+33
^ENG(6914 - [#6914] PRINT+28
^ENG(6914.3 - [#6914.3] PRINT+11, PRINT+12
^ENG(6914.6 - [#6914.6] PRINT+6, PRINT+7
^ENG(6915.9 - [#6915.9] GETBAL+4, GETBAL+8
^TMP($J GETBAL+14*, PRINT+3, PRINT+5, PRINT+9, PRINT+10, PRINT+18, PRINT+20, PRINT+23

Label References

Name Line Occurrences
HD PRINT+3, PRINT+8, PRINT+21
HDSGL PRINT+21

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PRINT+1
DIR PRINT+41!, HD+2!
DIR(0 PRINT+41*, HD+2*
>> ENAMT PRINT+23*, PRINT+27, PRINT+35
>> ENBAL PRINT+10*, PRINT+16, PRINT+40
>> ENBAL1 GETBAL+11*, GETBAL+14
>> ENBAL2 GETBAL+12*, GETBAL+14
>> END PRINT+1*, PRINT+5, PRINT+8, PRINT+9, PRINT+18, PRINT+20, PRINT+21, PRINT+36, PRINT+41, HD+1*
, HD+2*
>> ENDA PRINT+25*, PRINT+27, PRINT+28
>> ENDA("F?" PRINT+22*, PRINT+24, PRINT+25, PRINT+30, PRINT+33
>> ENDT PRINT+17*, PRINT+18*, PRINT+20, PRINT+23, PRINT+26
>> ENDTE HD+8
>> ENDTM1 GETBAL+11
>> ENDTM2 GETBAL+12, PRINT+4
ENDTMC PRINT+4*, PRINT+39, PRINT+42!
ENDTMO PRINT+4*, PRINT+15, PRINT+42!
>> ENDTR PRINT+1*, HD+5
>> ENDTS PRINT+4, HD+7
>> ENFILE PRINT+22*, PRINT+24, PRINT+25, PRINT+29, PRINT+30, PRINT+32, PRINT+33
>> ENFUND GETBAL+5*, GETBAL+14, PRINT+3*, PRINT+5*, PRINT+6, PRINT+9, PRINT+10, PRINT+18, PRINT+20, PRINT+23
, HD+6
>> ENFUND("A" PRINT+7*, HD+6
>> ENFUND("I" PRINT+6*, PRINT+7
>> ENI(1 GETBAL+2*, GETBAL+4, GETBAL+5, GETBAL+8, GETBAL+9, GETBAL+11, GETBAL+12
>> ENI(2 GETBAL+4*, GETBAL+5, GETBAL+8, GETBAL+9, GETBAL+11, GETBAL+12
>> ENI(3 GETBAL+7*, GETBAL+8*, GETBAL+9, GETBAL+11, GETBAL+12
>> ENL PRINT+2*
>> ENNOTE PRINT+30*, PRINT+31, PRINT+33*, PRINT+34
>> ENPG PRINT+1*, HD+2, HD+3, HD+4*, HD+5
>> ENSGL GETBAL+9*, GETBAL+14, PRINT+9*, PRINT+10, PRINT+11, PRINT+13, PRINT+18, PRINT+20, PRINT+23, PRINT+37
, HDSGL+1
>> ENSGL("A" PRINT+12*, PRINT+13, HDSGL+1
>> ENSGL("I" PRINT+11*, PRINT+12
>> ENSNR GETBAL+2, HD+5
>> ENT("SGL" PRINT+14*, PRINT+35*, PRINT+38
>> ENY PRINT+19*, PRINT+20*, PRINT+22, PRINT+23
>> ENY1 PRINT+24*, PRINT+26
IOF HD+3
IOM PRINT+2
IOSL PRINT+21
IOST PRINT+41, HD+2, HD+3
U GETBAL+14, PRINT+7, PRINT+12, PRINT+16, PRINT+23, PRINT+25, PRINT+26, PRINT+28, PRINT+30, PRINT+33
, PRINT+40
>> Y PRINT+1*, HD+2
>> ZTQUEUED HD+1
>> ZTSTOP HD+1*
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