Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: ENFARC1

Package: Engineering

Routine: ENFARC1


Information

ENFARC1 ;WIRMFO/SAB-FIXED ASSET RPT, TRANSACTION REGISTER (CONT); 5.16.97

Source Information

Source file <ENFARC1.m>

Entry Points

Name Comments DBIA/ICR reference
QEN ; queued entry
; in
; ENDTS - start date
; ENDTE - end date
; ENAV - flag, when true then print adjustment voucher data
GETDATA ; collect/sort data
; loop thru FAP document file transactions within selected date range
PRINT ; print
; load table for converting FA Type to SGL
WRAPUP ; wrap up
HD ; page header
HDC ; header for continued transaction
FT ; footer

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No activity in selected period",!
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: !!,?2,ENTRC,?8,$P(ENY1,U,9)
  • Line Location: PRINT+37
Function Call: WRITE
  • Prompt: ?20,$TR($$FMTE^XLFDT($P(ENY0,U,2),"2DF")," ",0)
  • Line Location: PRINT+38
Function Call: WRITE
  • Prompt: ?30,ENSN,?37,ENFUND,?45,ENSGL
  • Line Location: PRINT+39
Function Call: WRITE
  • Prompt: ?51,$J($FN(ENAMT,",",2),16)
  • Line Location: PRINT+44
Function Call: WRITE
  • Prompt: ?69,$E($P($$GET1^DIQ(ENFILE,ENDA("F?"),1.5),","),1,10)
  • Line Location: PRINT+45
Function Call: WRITE
  • Prompt: !,?37,ENFUNDNW,?45,ENSGL
  • Line Location: PRINT+48
Function Call: WRITE
  • Prompt: ?51,$J($FN(-ENAMT,",",2),16)
  • Line Location: PRINT+49
Function Call: WRITE
  • Prompt: !,?4,"ENTRY #: ",ENDA("EQ")
  • Line Location: PRINT+51
Function Call: WRITE
  • Prompt: !,?4,"AV REASON: ",$E($$GET1^DIQ(ENFILE,ENDA("F?"),303),1,20)
  • Line Location: PRINT+56
Function Call: WRITE
  • Prompt: ?37,"DATE: ",$P($$GET1^DIQ(ENFILE,ENDA("F?"),301),"@")
  • Line Location: PRINT+57
Function Call: WRITE
  • Prompt: ?57,"BY: ",$P($$GET1^DIQ(ENFILE,ENDA("F?"),302),",")
  • Line Location: PRINT+58
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: "TRANSACTION REGISTER"
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: " FROM ",$$FMTE^XLFDT(ENDTS,"2")," TO ",$$FMTE^XLFDT(ENDTE,"2")
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: ?49,ENDTR,?72,"page ",ENPG
  • Line Location: HD+8
Function Call: WRITE
  • Prompt: !!,?2,"...... TRANSACTION .......",?30,"STN",?37,"FUND"
  • Line Location: HD+9
Function Call: WRITE
  • Prompt: ?45,"SGL",?51,"NET AMOUNT",?69,"SENDER"
  • Line Location: HD+10
Function Call: WRITE
  • Prompt: !,?2,"CODE* NUMBER DATE"
  • Line Location: HD+11
Function Call: WRITE
  • Prompt: !,?2,"----- ----------- --------",?30,"-----",?37,"------"
  • Line Location: HD+12
Function Call: WRITE
  • Prompt: ?45,"----",?51,"----------------",?69,"----------"
  • Line Location: HD+13
Function Call: WRITE
  • Prompt: !,?5,"Transaction: ",$P(ENY1,U,6),"-",$P(ENY1,U,9)," (continued)"
  • Line Location: HDC+1
Function Call: WRITE
  • Prompt: !!," * Betterment # follows FB and FC. T (Turn-In) or D (Final Disp.) follows FD."
  • Line Location: FT+1
Info |  Source |  Entry Points |  Interaction Calls