STANDARD DATA DICTIONARY #421 -- FUND DISTRIBUTION FILE                                                           3/24/25    PAGE 1
STORED IN ^PRCF(421,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                        (VERSION 5.1)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the transaction used to distribute funds to control points.  


IDENTIFIED BY: CONTROL POINT (#1)[R]

POINTED TO BY: TRANSFER/ROLLUP COUPLER field (#1.7) of the FUND DISTRIBUTION File (#421) 
               

CROSS
REFERENCED BY: CONTROL POINT(AC), TRANSACTION NUMBER(AD), BUDGET SORT CATEGORY(AE), TDA NUMBER(AF), CONTROL POINT(AG), BBFY(AG), 
               ON PRINT LIST #1(AH), ON PRINT LIST #2(AI), SIFY(AJ), TRANSACTION NUMBER(AK), RELEASE STATUS(AL), 
               ON SEARCH LIST(AM), ON CODE SHEET LIST(AN), TRANSACTION NUMBER(AO), TRANSACTION NUMBER(B), TDA NUMBER(C), 
               TRANSACTION NUMBER(D)



421,.01       TRANSACTION NUMBER     0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>12!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
              LAST EDITED:      JUL 09, 1990 
              HELP-PROMPT:      ANSWER MUST BE 3-12 CHARACTERS IN LENGTH 
              DESCRIPTION:      This is the transaction number. The number is composed of "-""-".  
                                 
                                Example:   688-10-00015    where   688 = station number 
                                                                    10 = fiscal year 2010 (YY) 
                                                                 00015 = 5 digit transaction # 

              CROSS-REFERENCE:  421^B 
                                1)= S ^PRCF(421,"B",$E(X,1,30),DA)=""
                                2)= K ^PRCF(421,"B",$E(X,1,30),DA)

              CROSS-REFERENCE:  421^AD^MUMPS 
                                1)= S ^PRCF(421,"AD",$P(X,"-",1,2),100000-$P(X,"-",3))=""
                                2)= K ^PRCF(421,"AD",$P(X,"-",1,2),100000-$P(X,"-",3))
                                This cross reference is set on the station number- fiscal year and a sequence number (100000 - last
                                5 digits of the transaction number).  


              CROSS-REFERENCE:  421^D^MUMPS 
                                1)= S ^PRCF(421,"D",$P(X,"-",3),DA)=""
                                2)= K ^PRCF(421,"D",$P(X,"-",3),DA)
                                This cross reference is set on the last 5 digits of the transaction number.  


              CROSS-REFERENCE:  421^AK^MUMPS 
                                1)= S $P(^PRCF(421,DA,0),"^",12)=$P(X,"-",1,2),^PRCF(421,"AJ",$P(X,"-",1,2),DA)=""
                                2)= S $P(^PRCF(421,DA,0),"^",12)="" K ^PRCF(421,"AJ",$P(X,"-",1,2),DA)
                                CREATE VALUE)= $P(TRANSACTION NUMBER,"-",1,2)
                                DELETE VALUE)= @
                                FIELD)= SIFY
                                This cross reference sets the station number- fiscal year on the transaction record.  It also sets
                                the "AJ" cross reference on the station number-fiscal year.  


              CROSS-REFERENCE:  421^AO^MUMPS 
                                1)= I $P(^PRCF(421,DA,0),"^",19)="" S $P(^(0),"^",19,20)="1^0",^PRCF(421,"AL",$P(X,"-",1,2),0,DA)="
                                "

                                2)= Q
                                This cross reference sets the indicator for whether the transaction is ready for code sheet
                                creation.  



421,.5        SIFY                   0;12 FREE TEXT

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>6!($L(X)<5) X
              LAST EDITED:      DEC 06, 1988 
              HELP-PROMPT:      ANSWER MUST BE 5-6 CHARACTERS IN LENGTH 
              DESCRIPTION:
                                This is an indicator for Station Number - Fiscal Year.  

              WRITE AUTHORITY:  ^
              NOTES:            TRIGGERED by the TRANSACTION NUMBER field of the FUND DISTRIBUTION File 

              CROSS-REFERENCE:  421^AJ 
                                1)= S ^PRCF(421,"AJ",$E(X,1,30),DA)=""
                                2)= K ^PRCF(421,"AJ",$E(X,1,30),DA)
                                This cross reference is set on the station number-fiscal year.  



421,.6        ON CODE SHEET LIST     0;19 SET

                                '1' FOR YES; 
              LAST EDITED:      DEC 12, 1988 
              DESCRIPTION:
                                This is used as an indicator to identify entries that are ready for code sheet creation.  

              CROSS-REFERENCE:  421^AN 
                                1)= S ^PRCF(421,"AN",$E(X,1,30),DA)=""
                                2)= K ^PRCF(421,"AN",$E(X,1,30),DA)
                                This cross reference is set on the transaction number.  



421,.7        ON PRINT LIST #1       0;21 SET

                                '1' FOR YES; 
              LAST EDITED:      APR 16, 1989 
              DESCRIPTION:      This is used as an indicator for printing purposes.  Represented are a set of codes to determine
                                whether the funds transaction is on the Batch list.  

              CROSS-REFERENCE:  421^AH 
                                1)= S ^PRCF(421,"AH",$E(X,1,30),DA)=""
                                2)= K ^PRCF(421,"AH",$E(X,1,30),DA)
                                This cross reference is set on the first print list code, which is "1" for inclusion on the list.  



421,.8        ON PRINT LIST #2       2;13 SET

                                '1' FOR YES; 
              LAST EDITED:      DEC 07, 1988 
              DESCRIPTION:      This is used as an indicator for printing purposes.  Represented are a set of codes to determine
                                whether the funds transaction is on the Transmission list.  

              CROSS-REFERENCE:  421^AI 
                                1)= S ^PRCF(421,"AI",$E(X,1,30),DA)=""
                                2)= K ^PRCF(421,"AI",$E(X,1,30),DA)
                                This cross reference is set on the second print list code, which is "1" for inclusion on the list.  



421,.9        ON SEARCH LIST         2;14 SET

                                '1' FOR YES; 
              LAST EDITED:      DEC 07, 1988 
              DESCRIPTION:      This is used as an indicator for printing purposes.  Represented are a set of codes to determine
                                whether the funds transaction is on the Search list.  

              CROSS-REFERENCE:  421^AM 
                                1)= S ^PRCF(421,"AM",$E(X,1,30),DA)=""
                                2)= K ^PRCF(421,"AM",$E(X,1,30),DA)
                                This cross reference is set on the search list code, which is "1" for inclusion on the list.  



421,1         CONTROL POINT          0;2 FREE TEXT (Required)

              INPUT TRANSFORM:  S DIC="^PRC(420,"_+^PRCF(421,DA,0)_",1,",DIC(0)="EMNQZ" D ^DIC K DIC K:Y'>0 X Q:'$D(X)  S X=$P(Y(0)
                                ,U,1)
              LAST EDITED:      JUL 19, 1995 
              HELP-PROMPT:      ANSWER WITH CONTROL POINT NUMBER 
              DESCRIPTION:
                                This is the Fund Control point for this transaction.  

              EXECUTABLE HELP:  S ZD=D,X="?",Z0=+(^PRCF(421,DA,0)) Q:'$D(^PRC(420,Z0,1,0))  S DIC="^PRC(420,Z0,1,",DIC(0)="QEM",DIC
                                ("S")="I +$P(^(0),U)<9999" D ^DIC K DIC("S") S DIC=DIE,D=ZD K ZD,Z0
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  421^AC^MUMPS 
                                1)= S ^PRCF(421,"AC",$P($P(^PRCF(421,DA,0),U,1),"-",1,2)_"-"_+X,DA)=""
                                2)= K ^PRCF(421,"AC",$P($P(^PRCF(421,DA,0),U,1),"-",1,2)_"-"_+X,DA)
                                This cross reference is set on the station number- fiscal year and the control point.  


              CROSS-REFERENCE:  421^AG^MUMPS 
                                1)= S ZX=$$APP421^PRC0F(DA) I ZX'="" S ^PRCF(421,"AG",ZX,DA)="",$P(^PRCF(421,DA,0),"^",16)=ZX K ZX
                                2)= S ZX=$$APP421^PRC0F(DA) K:ZX'="" ^PRCF(421,"AG",ZX,DA) S $P(^PRCF(421,DA,0),"^",16)="" K ZX
                                This cross reference sets the appropriation for the transaction into the transaction record.  It
                                also sets the "AG" cross reference on the station number-fiscal year.  



421,1.5       CONTROL POINT NUMBER    ;  COMPUTED

              FCP#   
              MUMPS CODE:       S Y(421,1.5,1)=$S($D(^PRCF(421,D0,0)):^(0),1:"") S X=$P(Y(421,1.5,1),U,2),Y(421,1.5,2)=X S X=" ",Y(
                                421,1.5,3)=X S X=1,X=$P(Y(421,1.5,2),Y(421,1.5,3),X)
              ALGORITHM:        $P(#1," ",1)
              DESCRIPTION:
                                This is the first 3-4 numeric characters of the Fund Control Point (FCP) name.  


421,1.6       BBFY                   0;23 DATE (Required)

              INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y,X=X-(X#10000) K:3990000X) X
              LAST EDITED:      JUL 23, 1996 
              HELP-PROMPT:      Enter a year between 1900 and 2099. 
              DESCRIPTION:
                                This is used to store BBFY DATA.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  421^AG^MUMPS 
                                1)= S ZX=$$APP421^PRC0F(DA) I ZX'="" S ^PRCF(421,"AG",ZX,DA)="",$P(^PRCF(421,DA,0),"^",16)=ZX K ZX
                                2)= S ZX=$$APP421^PRC0F(DA) K:ZX'="" ^PRCF(421,"AG",ZX,DA) S $P(^PRCF(421,DA,0),"^",16)="" K ZX
                                This cross reference sets the appropriation for the transaction into the transaction record.  It
                                also sets the "AG" cross reference on the station number fiscal year.  



421,1.7       TRANSFER/ROLLUP COUPLER 0;22 POINTER TO FUND DISTRIBUTION FILE (#421)

              LAST EDITED:      MAR 30, 1994 
              DESCRIPTION:
                                This is used to store transfer/rollup FCP data.  


421,2         BUDGET SORT CATEGORY   0;3 POINTER TO BUDGET DISTRIBUTION CODES FILE (#420.7)

              LAST EDITED:      DEC 19, 1988 
              HELP-PROMPT:      ENTER CATEGORY FOR BUDGET REPORT FOR MEDICAL CARE APPROPRIATION ITEMS ONLY 
              DESCRIPTION:
                                This is the category for RD285 report for medical care appropriation items only.  

              CROSS-REFERENCE:  421^AE 
                                1)= S ^PRCF(421,"AE",$E(X,1,30),DA)=""
                                2)= K ^PRCF(421,"AE",$E(X,1,30),DA)
                                This cross reference is set on the budget sort category.  



421,2.5       BUDGET SORT ORDER       ;  COMPUTED

              MUMPS CODE:       X ^DD(421,2.5,9.2) S Y(421,2.5,101)=$S($D(^PRCF(420.7,D0,0)):^(0),1:"") S X=$P(Y(421,2.5,101),U,3) 
                                S D0=Y(421,2.5,80)
                                9.2 = S Y(421,2.5,80)=$S($D(D0):D0,1:""),Y(421,2.5,1)=$S($D(^PRCF(421,D0,0)):^(0),1:""),D0=$P(Y(421
                                ,2.5,1),U,3) S:'$D(^PRCF(420.7,+D0,0)) D0=-1
              ALGORITHM:        RD285 SORT CATEGORY:SORT ORDER
              DESCRIPTION:
                                This is the budget sort order.  


421,3         TDA NUMBER             0;4 NUMBER

              TDA #   
              INPUT TRANSFORM:  K:+X'=X!(X<.001)!(X>9999) X
              LAST EDITED:      OCT 28, 1988 
              HELP-PROMPT:      ENTER A ONE TO FOUR DIGIT TDA NUMBER FROM ACCS REPORT 
              DESCRIPTION:
                                This is the Transfer of Disbursing Authority (TDA) 1 to 3 digit number from the ACCS report.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  421^AF^MUMPS 
                                1)= S ^PRCF(421,"AF",$P($P(^PRCF(421,DA,0),U,1),"-",1,2)_"-"_+X,DA)=""
                                2)= K ^PRCF(421,"AF",$P($P(^PRCF(421,DA,0),U,1),"-",1,2)_"-"_+X,DA)
                                This cross reference is set on the station number- fiscal year and TDA (Transfer of Disbursing
                                Authority) number.  


              CROSS-REFERENCE:  421^C 
                                1)= S ^PRCF(421,"C",$E(X,1,30),DA)=""
                                2)= K ^PRCF(421,"C",$E(X,1,30),DA)
                                This cross reference is set on the TDA (Transfer of Disbursing Authority) number.  



421,5         TDA DATE               0;5 DATE

              INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
              DESCRIPTION:
                                This is the Transfer of Disbursing Authority (TDA) date.  


421,6         TRANSACTION DATE       0;6 DATE (Required)

              INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      APR 30, 1985 
              DESCRIPTION:
                                This is the transaction date.  


421,7         1ST QTR                0;7 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>99999999)!(X<-99999999) X I $D(X) D DOLLAR^PRCBE
              LAST EDITED:      DEC 14, 1988 
              HELP-PROMPT:      Type a Dollar Amount between -99999999 and 99999999, 2 Decimal Digits 
              DESCRIPTION:
                                This is the first quarter funding figure.  


421,7.2       1ST QTR CPA NUMBER     4;7 POINTER TO CONTROL POINT ACTIVITY FILE (#410)

              LAST EDITED:      MAY 25, 1990 
              DESCRIPTION:      This is a pointer to the Control Point Activity File, #410.  This field indicates the corresponding
                                entry created in the Control Point Activity (CPA) file.  


421,7.5       1Q CODE SHEET RELEASED? 4;1 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      APR 20, 1988 
              DESCRIPTION:
                                Enter YES if the first quarter code sheet was released.  


421,8         2ND QTR                0;8 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>99999999)!(X<-99999999) X I $D(X) D DOLLAR^PRCBE
              LAST EDITED:      DEC 14, 1988 
              HELP-PROMPT:      Type a Dollar Amount between -99999999 and 99999999, 2 Decimal Digits 
              DESCRIPTION:
                                This is the second quarter funding figure.  


421,8.2       2ND QTR CPA NUMBER     4;8 POINTER TO CONTROL POINT ACTIVITY FILE (#410)

              LAST EDITED:      MAY 25, 1990 
              DESCRIPTION:      This is a pointer to the Control Point Activity File, #410.  This field indicates the corresponding
                                entry created in the Control Point Activity (CPA) file.  


421,8.5       2Q CODE SHEET RELEASED 4;2 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              DESCRIPTION:
                                Enter YES if the second quarter code sheet was released.  


421,9         3RD QTR                0;9 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>99999999)!(X<-99999999) X I $D(X) D DOLLAR^PRCBE
              LAST EDITED:      DEC 14, 1988 
              HELP-PROMPT:      Type a Dollar Amount between -99999999 and 99999999, 2 Decimal Digits 
              DESCRIPTION:
                                This is the third quarter funding figure.  


421,9.2       3RD QTR CPA NUMBER     4;9 POINTER TO CONTROL POINT ACTIVITY FILE (#410)

              DESCRIPTION:      This is a pointer to the Control Point Activity File, #410.  This field indicates the corresponding
                                entry created in the Control Point Activity (CPA) file.  


421,9.5       3Q CODE SHEET RELEASED? 4;3 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      APR 20, 1988 
              DESCRIPTION:
                                Enter YES if the third quarter code sheet was released.  


421,10        4TH QTR                0;10 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>99999999)!(X<-99999999) X I $D(X) D DOLLAR^PRCBE
              LAST EDITED:      DEC 14, 1988 
              HELP-PROMPT:      Type a Dollar Amount between -99999999 and 99999999, 2 Decimal Digits 
              DESCRIPTION:
                                This is the fourth quarter funding figure.  


421,10.2      4TH QTR CPA NUMBER     4;10 POINTER TO CONTROL POINT ACTIVITY FILE (#410)

              DESCRIPTION:      This is a pointer to the Control Point Activity File, #410.  This field indicates the corresponding
                                entry created in the Control Point Activity (CPA) file.  


421,10.5      4Q CODE SHEET RELEASED? 4;4 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              DESCRIPTION:
                                This is the total funds for the fourth quarter.  


421,11        TOTAL                   ;  COMPUTED

              MUMPS CODE:       S Y(421,11,1)=$S($D(^PRCF(421,D0,0)):^(0),1:"") S X=$P(Y(421,11,1),U,7)+$P(Y(421,11,1),U,8)+$P(Y(42
                                1,11,1),U,9)+$P(Y(421,11,1),U,10)
              ALGORITHM:        1ST QTR AMT+2ND QTR AMT+3RD QTR AMT+4TH QTR AMT
              DESCRIPTION:
                                This is the computed total of the funding figures for all four quarters.  


421,11.5      RELEASE STATUS         0;20 SET

                                '0' FOR INCOMPLETE; 
                                '1' FOR SCHEDULED FOR RELEASE; 
                                '2' FOR RELEASED; 
                                '3' FOR COMPLETE; 
              LAST EDITED:      OCT 30, 1991 
              DESCRIPTION:
                                This is the set of codes for the release status.  

              CROSS-REFERENCE:  421^AL^MUMPS 
                                1)= S ZX=$P(^PRCF(421,DA,0),"^",12) S:ZX]"" ^PRCF(421,"AL",ZX,$E(X,1,30),DA)="" K ZX
                                2)= S ZX=$P(^PRCF(421,DA,0),"^",12) K:ZX]"" ^PRCF(421,"AL",ZX,$E(X,1,30),DA) K ZX
                                This cross reference is set on the station number- fiscal year and the release status.  



421,12        RELEASED BY            0;11 POINTER TO NEW PERSON FILE (#200)

              LAST EDITED:      NOV 16, 1992 
              DESCRIPTION:
                                This is the name of the official releasing the funds.  


421,12.5      VALIDATION CODE        0;17 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
              OUTPUT TRANSFORM: S Y(0)=Y S Y="/ES/"_$$DECODE^PRCBES1(D0)
              LAST EDITED:      JAN 27, 1993 
              HELP-PROMPT:      Answer must be 2-30 characters in length. 
              DESCRIPTION:      This is the electronic signature of the official releasing the funds.  ------THIS FIELD USED TO BE
                                CALLED ELECTRONIC SIGNATURE------- 

              DELETE AUTHORITY: ^
              WRITE AUTHORITY:  ^
                                UNEDITABLE

421,12.51     DATE RELEASED          0;18 DATE

              INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      JUN 24, 1986 
              DESCRIPTION:
                                This is the date the funds were released.  


421,12.6      VALIDATION VERSION     4;11 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<0)!(X?.E1"."6N.N) X
              OUTPUT TRANSFORM: S Y="" Q
              LAST EDITED:      JAN 25, 1993 
              HELP-PROMPT:      Type a Number between 0 and 99999, 5 Decimal Digits 
              DESCRIPTION:
                                RECORD VERSION NUMBER 

              TECHNICAL DESCR:
                                RECORD VERSION NUMBER 


421,12.7      ESIG CODE              4;12 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
              LAST EDITED:      APR 10, 1993 
              HELP-PROMPT:      Answer must be 1-10 characters in length. 
              DESCRIPTION:
                                Encoded value used by IFCAP security utilities when confirming the integrity of this record.  


421,12.8      VALIDATION DATE/TIME   4;13 DATE

              INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      JAN 27, 1993 
              HELP-PROMPT:      ENTER DATE DOCUMENT IS SIGNED. 
              DESCRIPTION:
                                THIS IS DATE AND TIME DOCUMENT WAS SIGNED.  

              TECHNICAL DESCR:
                                THIS IS DATE AND TIME DOCUMENT WAS SIGNED.  


421,13.5      APPROPRIATION          0;16 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<4) X
              LAST EDITED:      FEB 08, 2007 
              HELP-PROMPT:      ANSWER MUST BE 4-30 CHARACTERS IN LENGTH 
              DESCRIPTION:
                                This is the appropriation providing the funds.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


421,14        RECURRING FTEE         0;13 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>5000)!(X<-5000)!(X?.E1"."2N.N) X
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -5000 AND 5000 
              DESCRIPTION:
                                This is the number of recurring Full Time Employee Equivalent (FTEE).  


421,15        NON RECUR FTEE         0;14 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>5000)!(X<-5000)!(X?.E1"."2N.N) X
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -5000 AND 5000 
              DESCRIPTION:
                                This is the number of non-recurring FTEE.  


421,16        TRNG FTEE              0;15 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>1000)!(X<-1000)!(X?.E1"."2N.N) X
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -1000 AND 1000 
              DESCRIPTION:
                                This is the number of training FTEE.  


421,16.5      TOTAL FTEE              ;  COMPUTED

              MUMPS CODE:       S Y(421,16.5,1)=$S($D(^PRCF(421,D0,0)):^(0),1:"") S X=$P(Y(421,16.5,1),U,13)+$P(Y(421,16.5,1),U,14)
                                +$P(Y(421,16.5,1),U,15)
              ALGORITHM:        RECURRING FTEE+NON RECUR FTEE+TRNG FTEE
              DESCRIPTION:
                                This is the number of the total FTEE.  


421,17        DESCRIPTION            1;0   WORD-PROCESSING #421.01

              DESCRIPTION:
                                This is a description of the transaction.  


                DESCRIPTION:
                                  This is a description of the transaction.  




421,20        OCT - CUM              2;1 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      MAR 25, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the cumulative FTEE for October.  


421,21        NOV - CUM              2;2 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      MAR 25, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the cumulative FTEE for November.  


421,22        DEC - CUM              2;3 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      MAR 25, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the cumulative FTEE for December.  


421,23        JAN - CUM              2;4 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      MAR 25, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the cumulative FTEE for January.  


421,24        FEB - CUM              2;5 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>99999999)!(X<-9999999) X
              LAST EDITED:      MAR 25, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 99999999 
              DESCRIPTION:
                                This is the cumulative FTEE for February.  


421,25        MAR - CUM              2;6 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      MAR 25, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the cumulative FTEE for March.  


421,26        APR - CUM              2;7 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      MAR 25, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the cumulative FTEE for April.  


421,27        MAY - CUM              2;8 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      MAR 25, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the cumulative FTEE for May.  


421,28        JUN - CUM              2;9 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      MAR 25, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the cumulative FTEE for June.  


421,29        JUL - CUM              2;10 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      MAR 25, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the cumulative FTEE for July.  


421,30        AUG - CUM              2;11 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      MAR 25, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the cumulative FTEE for August.  


421,31        SEP - CUM              2;12 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      MAR 25, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the cumulative FTEE for September.  


421,40        OCT - NON CUM          3;1 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      APR 18, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the non-cumulative FTEE for October.  


421,41        NOV - NON CUM          3;2 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      APR 18, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the non-cumulative FTEE for November.  


421,42        DEC - NON CUM          3;3 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      APR 18, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the non-cumulative FTEE for December.  


421,43        JAN - NON CUM          3;4 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      APR 18, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the non-cumulative FTEE for January.  


421,44        FEB - NON CUM          3;5 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      APR 18, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the non-cumulative FTEE for February.  


421,45        MAR - NON CUM          3;6 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      APR 18, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the non-cumulative FTEE for March.  


421,46        APR - NON CUM          3;7 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      APR 18, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the non-cumulative FTEE for April.  


421,47        MAY - NON CUM          3;8 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      APR 18, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the non-cumulative FTEE for May.  


421,48        JUN - NON CUM          3;9 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      APR 18, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the non-cumulative FTEE for June.  


421,49        JUL - NON CUM          3;10 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      APR 18, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the non-cumulative FTEE for July.  


421,50        AUG - NON CUM          3;11 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      APR 18, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the non-cumulative FTEE for August.  


421,51        SEP - NON CUM          3;12 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?."-".N1"."2N)!(X>9999999)!(X<-9999999) X
              LAST EDITED:      APR 18, 1985 
              HELP-PROMPT:      TYPE A NUMBER BETWEEN -9999999 AND 9999999 
              DESCRIPTION:
                                This is the non-cumulative FTEE for September.  


421,52        RECURRING/NON-RECURRING 4;6 SET (Required)

              R/NR   
                                'NR' FOR NON-RECURRING; 
                                'R' FOR RECURRING; 
              LAST EDITED:      APR 15, 1989 
              DESCRIPTION:
                                This field identifies a ceiling transaction as a recurring/non-recurring expenditure.  


421,53        ANNUALIZATION AMOUNT   4;5 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>99999999)!(X<-99999999) X
              LAST EDITED:      APR 16, 1989 
              HELP-PROMPT:      Type a Dollar Amount between -99999999 and 99999999, 2 Decimal Digits 
              DESCRIPTION:      This field indicates the amount to be received in full the following fiscal year and is used only
                                in conjunction with recurring funds. For example, a station receives $20,000 funding for two (2)
                                Full Time Employee Equivalent (FTEE) authorizations for April through September. The annualization
                                amount indicates the amount that the station will receive for the next fiscal year.  



      FILES POINTED TO                      FIELDS

BUDGET DISTRIBUTION CODES 
                   (#420.7)       BUDGET SORT CATEGORY (#2)

CONTROL POINT ACTIVITY (#410)     1ST QTR CPA NUMBER (#7.2)
                                  2ND QTR CPA NUMBER (#8.2)
                                  3RD QTR CPA NUMBER (#9.2)
                                  4TH QTR CPA NUMBER (#10.2)

FUND DISTRIBUTION (#421)          TRANSFER/ROLLUP COUPLER (#1.7)

NEW PERSON (#200)                 RELEASED BY (#12)



INPUT TEMPLATE(S):
PRCB NEW TRANSACTION          JUL 06, 1994@09:57  USER #0    
PRCB RD2-285 ALL              APR 18, 1985        USER #0    

PRINT TEMPLATE(S):
PRCB 285 1ST QTR              JUL 28, 1989        USER #0                               BUDGET DISTRIBUTION SUMMARY   FIRST QUARTER
PRCB 285 2ND QTR              JUL 28, 1989        USER #0                               BUDGET DISTRIBUTION REPORT   SECOND QUARTER
PRCB 285 3RD QTR              JUL 28, 1989        USER #0                               BUDGET DISTRIBUTION SUMMARY   THIRD QUARTER
PRCB 285 4TH QTR              JUL 28, 1989        USER #0                              BUDGET DISTRIBUTION SUMMARY   FOURTH QUARTER
PRCB 285 APR-SEP              JUL 28, 1989        USER #0                           BUDGET DISTRIBUTION SUMMARY   APRIL - SEPTEMBER
PRCB 285 FISCAL YEAR          JUL 28, 1989        USER #0                          BUDGET DISTRIBUTION SUMMARY   ENTIRE FISCAL YEAR
PRCB 285 OCT-MAR              JUL 28, 1989        USER #0                             BUDGET DISTRIBUTION SUMMARY   OCTOBER - MARCH
PRCB 285 SUMMARY              JUL 28, 1989        USER #0                                        BUDGET DISTRIBUTION SUMMARY REPORT
PRCB APPROP SUM  DETAIL       APR 17, 1989        USER #0                   FUND DISTRIBUTION APPROPRIATION SUMMARY (DETAIL) REPORT
PRCB APPROP SUM  TOTAL        MAY 15, 1985        USER #0                          FUND DISTRIBUTION APPROPRIATION SUMMARY (TOTALS)
PRCB DISPLAY APP SUM DETAIL   FEB 07, 1987        USER #0                   FUND DISTRIBUTION APPROPRIATION SUMMARY (DETAIL) REPORT
PRCB FCP DISPLAY              APR 16, 1989        USER #0                                   FUND DISTRIBUTION CONTROL POINT DISPLAY
PRCB FCP LIST                 APR 16, 1989        USER #0                                   FUND DISTRIBUTION CONTROL POINT LISTING
PRCB FTEE SUMMARY             MAR 14, 1986        USER #0                                             FTEE SUMMARY BY APPROPRIATION
PRCB TDA DISPLAY              FEB 09, 1987        USER #0          FUND DISTRIBUTION TRANSFER OF DISBURSING AUTHORITY (TDA) LISTING
PRCB TDA LIST                 APR 17, 1989        USER #0          FUND DISTRIBUTION TRANSFER OF DISBURSING AUTHORITY (TDA) LISTING
PRCB TRANS RANGE              MAY 14, 1985        USER #0                            FUND DISTRIBUTION RANGE OF TRANSACTIONS REPORT
PRCB TRANS RANGE DISPLAY      FEB 09, 1987        USER #0                           FUND DISTRIBUTION RANGE OF TRANSACTIONS DISPLAY
PRCB TRANS RANGE LIST         MAY 14, 1985        USER #0                            FUND DISTRIBUTION RANGE OF TRANSACTIONS REPORT

SORT TEMPLATE(S):
PRCB BY APP/FCP               APR 17, 1989        USER #0    
SORT BY: @SIFY//    (User is asked range)
  WITHIN SIFY, SORT BY: +APPROPRIATION;S2// (APPROPRIATION not null)
    WITHIN APPROPRIATION, SORT BY: +CONTROL POINT;S// (CONTROL POINT not null)

PRCB BY APPROP/TDA            APR 17, 1989        USER #0    
SORT BY: ]@SIFY//    (User is asked range)
  WITHIN SIFY, SORT BY: @'(RECURRING FTEE'=0!(NON RECUR FTEE'=0)!(TRNG FTEE'=0));L1//     From '0'  To '1'
    WITHIN (RECURRING FTEE'=0!(NON RECUR FTEE'=0)!(TRNG FTEE'=0)), SORT BY: +APPROPRIATION;S2//
      WITHIN APPROPRIATION, SORT BY: TDA NUMBER//

PRCB BY REL LIST/FCP/TRANS    DEC 07, 1988        USER #0    
SORT BY: @ON PRINT LIST//     From '1'
  WITHIN ON PRINT LIST, SORT BY: +#CONTROL POINT//
    WITHIN CONTROL POINT, SORT BY: TRANSACTION NUMBER//

PRCB BY SEARCH/FCP/TRANS      DEC 07, 1988        USER #0    
SORT BY: ]@ON SEARCH LIST//     From '1'
  WITHIN ON SEARCH LIST, SORT BY: +#CONTROL POINT//
    WITHIN CONTROL POINT, SORT BY: TRANSACTION NUMBER//

PRCB BY TRANS/TDA             JUN 20, 1994@13:22  USER #0    
SORT BY: ]@SIFY//
  WITHIN SIFY, SORT BY: TDA NUMBER//

PRCB BY TRANSACTION NUMBER    MAR 20, 1985        USER #0    
SORT BY: ]TRANSACTION NUMBER//    (User is asked range)

PRCB SORT BY 285/TRANS/TDA    AUG 16, 1989        USER #0    
SORT BY: ]+BUDGET SORT CATEGORY;S3//
  WITHIN BUDGET SORT CATEGORY, SORT BY: 'TRANSACTION NUMBER//    (User is asked range)
    WITHIN TRANSACTION NUMBER, SORT BY: TDA NUMBER//

PRCB SORT BY SIFY/TDA         AUG 16, 1989        USER #0    
SORT BY: @SIFY//    (User is asked range)
  WITHIN SIFY, SORT BY: @BUDGET SORT ORDER//
    WITHIN BUDGET SORT ORDER, SORT BY: +BUDGET SORT CATEGORY;S3//
      WITHIN BUDGET SORT CATEGORY, SORT BY: TRANSACTION NUMBER//


FORM(S)/BLOCK(S):