STANDARD DATA DICTIONARY #420.131 -- PRCD SD FCP/PRJ FILE                                                         3/24/25    PAGE 1
STORED IN ^PRCD(420.131,  *** 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 FCP/PRJ used by the fund control points.  


IDENTIFIED BY: 
         "D1": W "   ",$P(^(0),U,2)

POINTED TO BY: FCP/PRJ field (#27) of the CONTROL POINT NAME sub-field (#420.01) of the FUND CONTROL POINT File (#420) 
               FY FCP/PRJ field (#18) 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) 
               

CROSS
REFERENCED BY: FIX VALUE(AC), CODE(B), DESCRIPTION(C)



420.131,.01   CODE                   0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>9!($L(X)<1)!'(X?1.9ANU) X I $G(X)]"" S %=$O(^PRCD(420.131,"B",X,"")) K:%-$G(DA)&% X
              LAST EDITED:      APR 01, 1994 
              HELP-PROMPT:      Answer must be 1-9 characters in length. 
              DESCRIPTION:
                                This field is the code of document data elemant.  

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


420.131,1     DESCRIPTION            0;2 FREE TEXT (Required)

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>45!($L(X)<1)!'(X'?1." ".E) X
              LAST EDITED:      NOV 24, 1993 
              HELP-PROMPT:      Answer must be 1-45 characters in length. 
              DESCRIPTION:
                                This field is the desription of the code.  

              CROSS-REFERENCE:  420.131^C 
                                1)= S ^PRCD(420.131,"C",$E(X,1,30),DA)=""
                                2)= K ^PRCD(420.131,"C",$E(X,1,30),DA)
                                This is used to look-up entries by description.  



420.131,2     STATUS                 0;3 POINTER TO PRCD SD STATUS FILE (#420.1999) (Required)

              LAST EDITED:      NOV 26, 1993 
              DESCRIPTION:
                                This field is the status of the entry in file.  


420.131,3     FIX VALUE              0;4 FREE TEXT

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>15!($L(X)<1)!'(X'?1." ".E) X
              LAST EDITED:      DEC 10, 1993 
              HELP-PROMPT:      Answer must be 1-15 characters in length. 
              DESCRIPTION:
                                This field's value is used by programer for hard coding in programs.  

              TECHNICAL DESCR:  This field's value is used by programer for hard coding in programs.  Always hardcode with fixed
                                values. If this value is edited all programs referring to this value need to edited.  

              CROSS-REFERENCE:  420.131^AC 
                                1)= S ^PRCD(420.131,"AC",$E(X,1,30),DA)=""
                                2)= K ^PRCD(420.131,"AC",$E(X,1,30),DA)
                                This is used to search entries in this file.  




      FILES POINTED TO                      FIELDS

PRCD SD STATUS (#420.1999)        STATUS (#2)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):
PRC SD PRINT                  APR 01, 1994@16:39  USER #0                                                 PRCD SD ORGANIZATION LIST

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):