Routine: PRCFY

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

PRCFY ;WISC@ALTOONA/CTB/DL-PLACE FY INFO INTO APPROPRIATION SYMBOL ; 1/30/98 0845

Source Information

Source file <PRCFY.m>

Call Graph

Call Graph Total: 1

Package	Total	Call Graph
VA FileMan	1	^%DT

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
IFCAP	1	PRCHPAT

Entry Points

Name	Comments	DBIA/ICR reference
V	;;5.1;IFCAP;;Oct 20, 2000
SE
EN1	;TWO YEAR APPROPRIATION
EN2	; SINGLE YEAR APPROPRIATION
EN3	; MULTI YEAR APPROPRIATION OR FUND

External References

Name	Field # of Occurrence
^%DT	SE

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"NO ACTION TAKEN, INCOMPLETE DATA GIVEN",!! Line Location: SE+1
Function Call: READ	Variable: X Timeout: $S($D(DTIME):DTIME,1:300) Line Location: EN1+1
Function Call: WRITE	Prompt: !,"ENTER FISCAL YEAR IN FORMAT '1' '81' OR '1981'",!! Line Location: EN1+1
Function Call: READ	Variable: X Timeout: $S($D(DTIME):DTIME,1:300) Line Location: EN2+1
Function Call: WRITE	Prompt: !,"ENTER FISCAL YEAR IN FORMAT '1', '81', OR '1981'",!! Line Location: EN2+1

Label References

Name	Line Occurrences
@(	SE+3
EN1	EN1+1
EN2	EN2+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	SE*
>> A	SE, SE+2, EN1+2, EN2+3
>> B	SE, SE+2, SE+3, EN1+2, EN2+3, EN3+1*
DTIME	EN1+1, EN2+1
>> PRC("APP"	SE+1, SE+2, SE+3*, EN3+1
>> PRC("FY"	SE*, EN1+1, EN1+2, EN2+1, EN2+2
>> PRC("FYI"	EN1+1, EN1+2
U	SE*, EN1+1, EN2+1
>> X	SE, EN1+1, EN1+2, EN2+1, EN2+2, EN2+3
>> Y	SE