Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^PRCF(421

Package: IFCAP

Global: ^PRCF(421


Information

FileMan FileNo FileMan Filename Package
421 FUND DISTRIBUTION IFCAP

Description

Directly Accessed By Routines, Total: 30

Package Total Routines
IFCAP 27 PRC0F    PRC5B7    PRCB BY APP/FCP    PRCB BY APPROP/TDA    PRCB BY TRANSACTION NUMBER    PRCB NEW TRANSACTION    PRCB SORT BY 285/TRANS/TDA    PRCB SORT BY SIFY/TDA
PRCB139P    PRCBBUL    PRCBCS    PRCBE    PRCBE0    PRCBES1    PRCBMT1    PRCBP
PRCBP1    PRCBR    PRCBR0    PRCBR2    PRCBSTF    PRCFSITE    PRCSEM2    PRCUCV1
^PRCF(421    PRCBR1    ^PRCF(421.6    

Accessed By FileMan Db Calls, Total: 8

Package Total Routines
IFCAP 8 PRCBCS    PRCBE    PRCBE0    PRCBMT1    PRCBP    PRCBP1    PRCBR    PRCBSTF

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
IFCAP 1 FUND DISTRIBUTION(#421)[1.7]    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
IFCAP 3 BUDGET DISTRIBUTION CODES(#420.7)[2]    FUND DISTRIBUTION(#421)[1.7]    CONTROL POINT ACTIVITY(#410)[7.28.29.210.2]    
Kernel 1 NEW PERSON(#200)[12]    

Fields, Total: 67

Field # Name Loc Type Details
.01 TRANSACTION NUMBER 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • 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.
.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.
.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.
.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.
.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.
.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.
1 CONTROL POINT 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • 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.
1.5 CONTROL POINT NUMBER COMPUTED

  • 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.
1.6 BBFY 0;23 DATE
************************REQUIRED FIELD************************

  • 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.
1.7 TRANSFER/ROLLUP COUPLER 0;22 POINTER TO FUND DISTRIBUTION FILE (#421) FUND DISTRIBUTION(#421)

  • LAST EDITED:  MAR 30, 1994
  • DESCRIPTION:  
    This is used to store transfer/rollup FCP data.
2 BUDGET SORT CATEGORY 0;3 POINTER TO BUDGET DISTRIBUTION CODES FILE (#420.7) BUDGET DISTRIBUTION CODES(#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.
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.
3 TDA NUMBER 0;4 NUMBER

  • 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.
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.
6 TRANSACTION DATE 0;6 DATE
************************REQUIRED FIELD************************

  • 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.
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.
7.2 1ST QTR CPA NUMBER 4;7 POINTER TO CONTROL POINT ACTIVITY FILE (#410) CONTROL POINT ACTIVITY(#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.
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.
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.
8.2 2ND QTR CPA NUMBER 4;8 POINTER TO CONTROL POINT ACTIVITY FILE (#410) CONTROL POINT ACTIVITY(#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.
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.
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.
9.2 3RD QTR CPA NUMBER 4;9 POINTER TO CONTROL POINT ACTIVITY FILE (#410) CONTROL POINT ACTIVITY(#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.
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.
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.
10.2 4TH QTR CPA NUMBER 4;10 POINTER TO CONTROL POINT ACTIVITY FILE (#410) CONTROL POINT ACTIVITY(#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.
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.
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(421,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.
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.
12 RELEASED BY 0;11 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  NOV 16, 1992
  • DESCRIPTION:  
    This is the name of the official releasing the funds.
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
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.
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
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.
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.
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
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).
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.
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.
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.
17 DESCRIPTION 1;0 WORD-PROCESSING #421.01

  • DESCRIPTION:  
    This is a description of the transaction.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
52 RECURRING/NON-RECURRING 4;6 SET
************************REQUIRED FIELD************************
  • '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.
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.

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #3684
  • M DATA EXTRACTOR
  • External References

    Name Field # of Occurrence
    ^%DT 1.6+1, 5+1, 6+1, 12.51+1, 12.8+1
    ^DIC 1+1, 1(HELP )
    $$APP421^PRC0F 1(XREF 2S), 1(XREF 2K), 1.6(XREF 1S), 1.6(XREF 1K)
    DOLLAR^PRCBE 7+1, 8+1, 9+1, 10+1
    $$DECODE^PRCBES1 12.5OT+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD(421 2.5+1
    ^PRC(420 - [#420] 1(HELP )
    ^PRCF(420.7 - [#420.7] 2.5+1, 2.5OF9.2+1
    ^PRCF(421 - [#421] .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .01(XREF 5S), .5(XREF 1S)
    .5(XREF 1K), .6(XREF 1S), .6(XREF 1K), .7(XREF 1S), .7(XREF 1K), .8(XREF 1S), .8(XREF 1K), .9(XREF 1S), .9(XREF 1K), 1+1
    1(HELP ), 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 1.5+1, 1.6(XREF 1S), 1.6(XREF 1K), 2(XREF 1S), 2(XREF 1K)
    , 2.5OF9.2+1, 3(XREF 1S), 3(XREF 1K), 3(XREF 2S), 3(XREF 2K), 11+1, 11.5(XREF 1S), 11.5(XREF 1K), 16.5+1

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID1+1, .01(XREF 5S), 1.5+1, 2.5+1, 2.5OF9.2+1, 11+1, 16.5+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT 1.6+1*, 5+1*, 6+1*, 12.51+1*, 12.8+1*
    >> D 1(HELP )
    >> D0 1.5+1, 2.5+1*, 2.5OF9.2+1*, 11+1, 12.5OT+1, 16.5+1
    >> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .01(XREF 5S), .5(XREF 1S), .5(XREF 1K), .6(XREF 1S)
    .6(XREF 1K), .7(XREF 1S), .7(XREF 1K), .8(XREF 1S), .8(XREF 1K), .9(XREF 1S), .9(XREF 1K), 1+1, 1(HELP ), 1(XREF 1S)
    1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 1.6(XREF 1S), 1.6(XREF 1K), 2(XREF 1S), 2(XREF 1K), 3(XREF 1S), 3(XREF 1K), 3(XREF 2S)
    3(XREF 2K), 11.5(XREF 1S), 11.5(XREF 1K)
    DIC 1+1*!, 1(HELP )
    DIC("S" 1(HELP )
    DIC(0 1+1*, 1(HELP )
    >> DIE 1(HELP )
    U ID1+1, 1+1, 1(XREF 1S), 1(XREF 1K), 1.5+1, 2.5+1, 2.5OF9.2+1, 3(XREF 1S), 3(XREF 1K), 11+1
    , 16.5+1
    X .01+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .01(XREF 5S)
    , .5+1!, .5(XREF 1S), .5(XREF 1K), .6(XREF 1S), .6(XREF 1K), .7(XREF 1S), .7(XREF 1K), .8(XREF 1S), .8(XREF 1K), .9(XREF 1S)
    .9(XREF 1K), 1+1!*, 1(HELP ), 1(XREF 1S), 1(XREF 1K), 1.5+1*, 1.6+1*!, 2(XREF 1S), 2(XREF 1K), 2.5+1*
    , 3+1!, 3(XREF 1S), 3(XREF 1K), 3(XREF 2S), 3(XREF 2K), 5+1*!, 6+1*!, 7+1*!, 8+1*!, 9+1*!
    , 10+1*!, 11+1*, 11.5(XREF 1S), 11.5(XREF 1K), 12.5+1!, 12.51+1*!, 12.6+1!, 12.7+1!, 12.8+1*!, 13.5+1!
    , 14+1!, 15+1!, 16+1!, 16.5+1*, 20+1*!, 21+1*!, 22+1*!, 23+1*!, 24+1*!, 25+1*!
    , 26+1*!, 27+1*!, 28+1*!, 29+1*!, 30+1*!, 31+1*!, 40+1*!, 41+1*!, 42+1*!, 43+1*!
    , 44+1*!, 45+1*!, 46+1*!, 47+1*!, 48+1*!, 49+1*!, 50+1*!, 51+1*!, 53+1*!
    >> Y 1+1, 1.6+1, 5+1, 6+1, 12.5OT+1*, 12.51+1, 12.6OT+1*, 12.8+1
    >> Y(0 1+1, 12.5OT+1*, 12.6OT+1*
    >> Y(421 1.5+1*, 2.5+1*, 2.5OF9.2+1*, 11+1*, 16.5+1*
    Z0 1(HELP )
    ZD 1(HELP )
    ZX 1(XREF 2S), 1(XREF 2K), 1.6(XREF 1S), 1.6(XREF 1K), 11.5(XREF 1S), 11.5(XREF 1K)
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All