STANDARD DATA DICTIONARY #420.3 -- PRCD FUND/APPROPRIATION CODE FILE 9/29/25 PAGE 1
STORED IN ^PRCD(420.3, (9 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.1)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains all ALD codes specified in MP4 Part V. In addition it contains the appropriation symbol associated with the ALD
code and a pattern necessary to create the YALD code for the 921 transaction.
IDENTIFIED BY: FY PATTERN (#3)
"WRITE": W:$D(PRCALD("APPR")) " ",$P(^(0),"^") W:'$D(PRCALD("APPR")) " ",$P(^(0),"^",3)
POINTED TO BY: FUND field (#1) of the CONTROL POINT NAME sub-field (#420.01) of the FUND CONTROL POINT File (#420)
FY ALD/FUND CODE field (#15) of the COMMITTED/OBLIGATED BALANCES sub-field (#420.06) of the CONTROL POINT NAME
sub-field (#420.01) of the FUND CONTROL POINT File (#420)
ALD CODE field (#4) of the FISCAL YEAR sub-field (#430.01) of the ACCOUNTS RECEIVABLE File (#430)
ALD CODE field (#4) of the ACCOUNTS RECEIVABLE CATEGORY File (#430.2)
CROSS
REFERENCED BY: ALD CODE(AC), FUND(B), APPROP. PATTERN FOR A/R SVC(C), APPROPRIATION(D)
420.3,.01 FUND 0;1 FREE TEXT (Required)
APPROPRIATION DATA
INPUT TRANSFORM: K:$L(X)>6!($L(X)<1)!(X?1P.E) X I $D(X) K:'$O(^PRCD(420.14,"B",X,"")) X
LAST EDITED: JUL 13, 1994
HELP-PROMPT: Enter a fund code defined in FUND file.
DESCRIPTION:
This is fund code defined in fund file (420.14).
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 420.3^B
1)= S ^PRCD(420.3,"B",$E(X,1,30),DA)=""
2)= K ^PRCD(420.3,"B",$E(X,1,30),DA)
CROSS-REFERENCE: ^^TRIGGER^420.3^6
1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^PRCD(420.3,D0,0)):^(0),1:"") S X=$P(Y(1),U,7),X=X S
DIU=X K Y S X=DIV S X=DIV X ^DD(420.3,.01,1,2,1.4)
1.4)= S DIH=$S($D(^PRCD(420.3,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,7)=DIV,DIH=420.3,DIG=6 D ^DIC
R:$O(^DD(DIH,DIG,1,0))>0
2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^PRCD(420.3,D0,0)):^(0),1:"") S X=$P(Y(1),U,7),X=X S
DIU=X K Y S X="" X ^DD(420.3,.01,1,2,2.4)
2.4)= S DIH=$S($D(^PRCD(420.3,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,7)=DIV,DIH=420.3,DIG=6 D ^DIC
R:$O(^DD(DIH,DIG,1,0))>0
CREATE VALUE)= NAME
DELETE VALUE)= @
FIELD)= FUND CODE
420.3,1 PROGRAM.LIM.ANALYSIS ACCOUNT 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>11!($L(X)<3)!(X'?.NP) X
LAST EDITED: AUG 27, 1986
HELP-PROMPT: ENTER THE PROGRAM, LIMITATION AND ANALYSIS ACCOUNT NUMBERS APPLICABLE TO THIS APPROPRIATION AS A
STRING (E.G., 870.001.01). ANSWER MUST BE 3-11 CHARACTERS IN LENGTH
DESCRIPTION:
This is the program, limitation, and analysis account numbers applicable to this appropriation.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
420.3,2 APPROPRIATION 0;3 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>24!($L(X)<6)!(X'?.ANP) X
LAST EDITED: SEP 25, 1992
HELP-PROMPT: Enter the applicable appropriation data (e.g., 36_0160.001.01 or 36_/_0161.001(016) ). Answer must
be 6-24 characters.
DESCRIPTION:
This is the applicable appropriation code.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 420.3^D
1)= S ^PRCD(420.3,"D",$E(X,1,30),DA)=""
2)= K ^PRCD(420.3,"D",$E(X,1,30),DA)
This cross reference is set on the appropriation.
420.3,3 FY PATTERN 0;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>4!($L(X)<2) X
LAST EDITED: AUG 26, 1986
HELP-PROMPT: ENTER YALD CODE. Replace Current FY with "x" and second FY with "y".
DESCRIPTION: This is the fiscal year (FY) associated with the Appropriation Limitation Department (YALD) code.
The current FY is indicated with an "x" and the second FY with a "y".
420.3,4 APPROP. PATTERN FOR A/R SVC 0;5 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>24!($L(X)<4) X
LAST EDITED: JAN 07, 1988
HELP-PROMPT: Enter the appropriation symbol, with a space for the Fiscal Year. (ie 36 2431)
DESCRIPTION:
This is the appropriation pattern for the Accounts Receivable Service.
CROSS-REFERENCE: 420.3^C
1)= S ^PRCD(420.3,"C",$E(X,1,30),DA)=""
2)= K ^PRCD(420.3,"C",$E(X,1,30),DA)
This cross reference is set on the appropriation pattern for A/R Service.
420.3,5 ALD CODE 0;6 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>3!($L(X)<1) X
LAST EDITED: JUL 06, 1994
HELP-PROMPT: Enter the ALD (appropriation, limitation, department) code in accordance with MP-4, Part V, Chapter
12. Answer must be 2-3 characters.
DESCRIPTION:
This is used to store ALD CODE data.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 420.3^AC
1)= S ^PRCD(420.3,"AC",$E(X,1,30),DA)=""
2)= K ^PRCD(420.3,"AC",$E(X,1,30),DA)
420.3,6 FUND CODE 0;7 FREE TEXT
INPUT TRANSFORM: K:$L(X)>6!($L(X)<1) X I $D(X) K:'$O(^PRCD(420.14,"B",X,"")) X
LAST EDITED: JUL 12, 1994
HELP-PROMPT: Enter a fund code defined in FUND file.
DESCRIPTION:
This is used to store FUND CODE data.
WRITE AUTHORITY: ^
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
TRIGGERED by the FUND field of the PRCD FUND/APPROPRIATION CODE File
420.3,7 REVOLVING FUND 0;8 SET
'Y' FOR YES;
'N' FOR NO;
LAST EDITED: OCT 06, 1995
DESCRIPTION:
This is a revolving fund indicator.
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
PRCD FUND/APPROPRIATION OCT 24, 1994@14:17 USER #0 PRCD FUND/APPROPRIATION CODE LIST
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):