Routine: ENFAR6

Information

ENFAR6 ;WIRMFO/SAB-FIXED ASSET RPT, EQUIP NOT REPORTED TO FAP; 7/19/96

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
VA FileMan	4	DD^%DT NOW^%DTC $$GET1^DIQ ^DIR
Kernel	3	(,HOME)^%ZIS ^%ZISC (,$$S)^%ZTLOAD
Engineering	1	$$CHKFA^ENFAUTL

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Engineering	1	ENFAR6

Entry Points

Name	Comments	DBIA/ICR reference
EN	; The option which calls this routine should normally be queued ; to print weekly via TaskManager.
QEN	; queued entry
EXIT
HD	; header

External References

Name	Field # of Occurrence
DD^%DT	QEN+2
NOW^%DTC	QEN+2
^%ZIS	EN+6
HOME^%ZIS	EN+10
^%ZISC	QEN+32
^%ZTLOAD	EN+10
$$S^%ZTLOAD	QEN+10, HD+1
$$GET1^DIQ	QEN+6, QEN+18, QEN+19, QEN+20, QEN+21, QEN+22, QEN+23
^DIR	QEN+31, HD+2
$$CHKFA^ENFAUTL	QEN+14

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This report searches the entire equipment file and may take some" Line Location: EN+4
Function Call: WRITE	Prompt: !,"time to complete. Consider queuing this report to run after-hours." Line Location: EN+5
Function Call: WRITE	Prompt: !,ENDA,?11,ENAQDT,?24,$J("$"_$FN(ENVALUE,",",2),14),?40,ENSN Line Location: QEN+25
Function Call: WRITE	Prompt: ?48,ENFUND,?55,ENSGL,?61,ENCSN,?74,ENCMR Line Location: QEN+26
Function Call: WRITE	Prompt: !!,"REPORT STOPPED AT USER REQUEST" Line Location: QEN+27
Function Call: WRITE	Prompt: !!,"All capitalized NX equipment has been reported to Fixed Assets." Line Location: QEN+29
Function Call: WRITE	Prompt: !!,ENT," capitalized NX equipment entries have not been reported to Fixed Assets." Line Location: QEN+30
Function Call: WRITE	Prompt: @IOF Line Location: HD+3
Function Call: WRITE	Prompt: !,"CAPITALIZED NX EQUIP. NOT REPORTED TO FAP" Line Location: HD+5
Function Call: WRITE	Prompt: ?49,ENDT,?72,"page ",ENPG Line Location: HD+6
Function Call: WRITE	Prompt: !!,"ENTRY#",?11,"ACQ. DATE",?24,"ASSET VALUE",?40,"STATION" Line Location: HD+7
Function Call: WRITE	Prompt: ?48,"FUND",?55,"SGL",?61,"CSN",?74,"CMR" Line Location: HD+8
Function Call: WRITE	Prompt: !,$E(ENL,1,10),?11,$E(ENL,1,12),?24,$E(ENL,1,14),?40,$E(ENL,1,7) Line Location: HD+9
Function Call: WRITE	Prompt: ?48,$E(ENL,1,6),?55,$E(ENL,1,4),?61,$E(ENL,1,11),?74,$E(ENL,1,5) Line Location: HD+10
Routine Call	DIR Line Location: QEN+31 HD+2
Routine Call	%ZIS Line Location: EN+6
Routine Call	%ZIS Line Location: EN+10

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ENG(6914 - [#6914]	QEN+8, QEN+11, QEN+12, QEN+13, QEN+24

Label References

Name	Line Occurrences
EXIT	EN+6, EN+7
HD	QEN+4, QEN+16
QEN	EN+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	QEN+2
>> %ZIS	EN+6*
DIR	QEN+31!, EXIT+1!, HD+2!
DIR(0	QEN+31, HD+2
DIROUT	EXIT+1!
DIRUT	EXIT+1!
DIWF	EXIT+1!
DIWL	EXIT+1!
DTOUT	EXIT+1!
DUOUT	EXIT+1!
ENAQDT	QEN+18*, QEN+25, EXIT+2!
ENC	QEN+5, QEN+9, QEN+10, EXIT+2!
ENCMR	QEN+23*, QEN+26, EXIT+2!
ENCSN	QEN+22*, QEN+26, EXIT+2!
END	QEN+5, QEN+8, QEN+10, QEN+16, QEN+27, EXIT+3!, HD+1, HD+2
ENDA	QEN+8*, QEN+11, QEN+12, QEN+13, QEN+14, QEN+18, QEN+19, QEN+20, QEN+21, QEN+22 , QEN+23, QEN+24, QEN+25, EXIT+2!
ENDT	QEN+2*, EXIT+3!, HD+6
ENFUND	QEN+20*, QEN+26, EXIT+2!
ENL	QEN+3*, EXIT+3!, HD+9, HD+10
ENPG	QEN+2, EXIT+3!, HD+2, HD+3, HD+4, HD+6
ENSGL	QEN+21*, QEN+26, EXIT+2!
ENSN	QEN+24*, QEN+25, EXIT+2!
ENSND	QEN+6*, QEN+24, EXIT+2!
ENT	QEN+5, QEN+17, QEN+29, QEN+30, EXIT+2!
ENVALUE	QEN+19*, QEN+25, EXIT+2!
IO	QEN+1
IO("Q"	EN+7
IOF	HD+3
IOM	QEN+3
IOSL	QEN+16
IOST	QEN+31, HD+2, HD+3
>> POP	EN+6
U	QEN+11, QEN+12, QEN+13, QEN+24
X	EXIT+1!
Y	QEN+2*, EXIT+1!, HD+2
>> ZTDESC	EN+9*
>> ZTQUEUED	EN+2, QEN+10, EXIT, HD+1
>> ZTREQ	EXIT*
>> ZTRTN	EN+8*
ZTSK	EN+10!
>> ZTSTOP	QEN+10, HD+1

Customize PDF page

Package: Engineering