STANDARD DATA DICTIONARY #119.74 -- SUPPLEMENTAL FEEDING SITE FILE                                                3/24/25    PAGE 1
STORED IN ^FH(119.74,  (1 ENTRY)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                        (VERSION 5.5)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains a list of Supplemental Feeding Sites and associated parameters. A Supplemental Feeding Site prepares orders for
a group of wards for which it is responsible.  


FILE SCREEN (SCR-node) : I '$D(^FH(119.74,+Y,"I"))!$D(^XUSEC("FHMGR",DUZ))!(DUZ(0)["@")
              DD ACCESS: #
              RD ACCESS: #F
              WR ACCESS: #f
             DEL ACCESS: #f
           LAYGO ACCESS: #f
IDENTIFIED BY: 
      "WRITE": I $D(^("I")) D EN^DDIOL("(** Inactive **)","","?3")

POINTED TO BY: SUPP. FDG. SITE field (#7) of the NUTRITION LOCATION File (#119.6) 
               

CROSS
REFERENCED BY: INACTIVE?(AC), NAME(B), SHORT NAME(C)



119.74,.01    NAME                   0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
              HELP-PROMPT:      NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION 
              DESCRIPTION:      This field contains the name of the Supplemental Feeding Site. It is responsible for the assembly
                                and delivery of supplemental feedings to a group of Dietetic Wards.  

              DELETE TEST:      1,0)= I 1 D EN^DDIOL("Cannot delete. Inactivate instead.","","?3")

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


119.74,1      SHORT NAME             0;2 FREE TEXT

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>6!($L(X)<1) X
              LAST EDITED:      APR 27, 1993 
              HELP-PROMPT:      Answer must be 1-6 characters in length. 
              DESCRIPTION:
                                This field contains a short 6-character name to be used on various reports.  

              CROSS-REFERENCE:  119.74^C 
                                1)= S ^FH(119.74,"C",$E(X,1,30),DA)=""
                                2)= K ^FH(119.74,"C",$E(X,1,30),DA)


119.74,2      PRODUCTION FACILITY    0;3 POINTER TO PRODUCTION FACILITY FILE (#119.71) (Required)

              LAST EDITED:      NOV 08, 1991 
              DESCRIPTION:      This field indicates the production facility that is responsible for preparing the food used in the
                                supplemental feedings distributed by this site.  


119.74,20     SEPARATE SUPP FDG LABELS? 0;4 SET

                                'Y' FOR YES; 
                                'N' FOR NO; 
              LAST EDITED:      APR 23, 1993 
              DESCRIPTION:      This field, if answered YES, indicates that each supplemental feeding item should be on an
                                individual label rather than having all items on the item.  


119.74,21     INGREDIENTS ON WARD LISTS? 0;5 SET

                                'Y' FOR YES; 
                                'N' FOR NO; 
              LAST EDITED:      MAR 08, 1985 
              DESCRIPTION:      This field, if answered YES, will result in the Ward Supplemental Feeding lists printing the
                                consolidated ingredient requirements following each ward.  


119.74,99     INACTIVE?              I;1 SET

                                'Y' FOR YES; 
                                'N' FOR NO; 
              LAST EDITED:      FEB 23, 2000 
              DESCRIPTION:
                                This field, if answered YES, will prohibit further selection of this entry.  

              CROSS-REFERENCE:  119.74^AC^MUMPS 
                                1)= K:X'="Y" ^FH(119.74,DA,"I")
                                2)= K ^FH(119.74,DA,"I")
                                This cross-reference is used to create an 'I' node for inactive entries.  




      FILES POINTED TO                      FIELDS

PRODUCTION FACILITY (#119.71)     PRODUCTION FACILITY (#2)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):