STANDARD DATA DICTIONARY #446.5 -- CUSTOM LABEL FILE                                                              6/27/25    PAGE 1
STORED IN ^PRCT(446.5,  (6 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                     (VERSION 5.1)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the custom labels to be used as part of the Barcode Inventory process.  


              DD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @

CROSS
REFERENCED BY: NAME(B)



446.5,.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 is a general description for the label that is designed for this entry.  

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


446.5,.02     FILE                   0;2 POINTER TO FILE FILE (#1)

              INPUT TRANSFORM:  I $P(^PRCT(446.5,D0,0),"^",2),$P(^(0),"^",2)'=X W *7,!!,"Since you have change the file, be sure to
                                 review all 'FIELD' type parameters",!
              LAST EDITED:      DEC 07, 1989 
              DESCRIPTION:      This is the file that the label will print from during a search and sort functions.  For example:
                                If you want to print a label for all drugs in the drug file, you would enter 50 or DRUG for this
                                field and labels will print from this file.  If this field is not defined, then the label will be
                                considered to be just free text and not associated with a file.  

              DELETE AUTHORITY: @
              WRITE AUTHORITY:  @
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


446.5,.03     LABEL ROUTINE          0;3 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1)!($L(X)>8&(X'["-")) X D:$D(X) RTN^PRCTUTL
              LAST EDITED:      MAY 06, 1991 
              HELP-PROMPT:      ANSWER MUST BE FROM 1-15 CHARACTERS 
              DESCRIPTION:      If this field has a routine entered, this routine will be called to print the labels rather than
                                the generic label routine.  

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


446.5,.06     SPECIALTY COMMANDS     0;6 POINTER TO SPECIALTY COMMANDS FILE (#446.6)

              LAST EDITED:      MAR 01, 1993 
              DESCRIPTION:
                                This field stores the specialty command for the label.  


446.5,1       TEXT                   1;0   WORD-PROCESSING #446.51   (NOWRAP)

              DESCRIPTION:      This is the user defined description of the report.  The report can contain parameters (|1|, |2|,
                                etc...).  


                DESCRIPTION:
                                  This is the user defined description of the report.  




446.5,2       PARAMETER              2;0 Multiple #446.52

              DESCRIPTION:
                                This field stores the definition of the parameter used on the label.  

              IDENTIFIED BY:    DESCRIPTION(#.09)

446.52,.01      PARAMETER              0;1 NUMBER (Multiply asked)

                INPUT TRANSFORM:  K:+X'=X!(X>15)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X
                LAST EDITED:      NOV 30, 1989 
                HELP-PROMPT:      Type a Number between 1 and 15, 0 Decimal Digits 
                DESCRIPTION:
                                  This field stores the parameter number on the label.  

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


446.52,.02      TYPE                   0;2 SET (Required)

                                  '0' FOR COUNTER; 
                                  '1' FOR FIELD; 
                                  '2' FOR XECUTABLE CODE; 
                                  '3' FOR FORM FEED; 
                LAST EDITED:      NOV 30, 1989 
                DESCRIPTION:
                                  This field stores the type of the parameter.  


446.52,.03      BARCODE TYPE           0;3 SET

                                  '0' FOR NO BARCODE; 
                                  '1' FOR SMALL BARCODE; 
                                  '2' FOR MEDIUM BARCODE; 
                                  '3' FOR LARGE BARCODE; 
                LAST EDITED:      DEC 01, 1989 
                DESCRIPTION:
                                  This field stores the barcode type of the parameter.  


446.52,.04      FIELD                  0;4 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X D:$D(X) ^PRCTFLD
                LAST EDITED:      NOV 29, 1989 
                HELP-PROMPT:      ANSWER MUST BE 1-20 CHARACTERS IN LENGTH 
                DESCRIPTION:
                                  This field stores the name of the field for the parameter.  

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


446.52,.05      PRE-TEXT               0;5 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
                HELP-PROMPT:      ANSWER MUST BE 1-20 CHARACTERS IN LENGTH 
                DESCRIPTION:
                                  This field stores the pre-text printed before the parameter.  


446.52,.06      POST-TEXT              0;6 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
                HELP-PROMPT:      ANSWER MUST BE 1-20 CHARACTERS IN LENGTH 
                DESCRIPTION:
                                  This field stores the post-text printed after the parameter.  


446.52,.07      START AT NUMBER        0;7 NUMBER

                INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<-9999999)!(X?.E1"."3N.N) X
                LAST EDITED:      NOV 29, 1989 
                HELP-PROMPT:      Type a Number between -9999999 and 9999999, 2 Decimal Digits 
                DESCRIPTION:
                                  This field stores the start at number.  


446.52,.08      INCREMENT BY           0;8 NUMBER

                INPUT TRANSFORM:  K:+X'=X!(X>1000)!(X<-1000)!(X?.E1"."3N.N) X
                LAST EDITED:      NOV 29, 1989 
                HELP-PROMPT:      Type a Number between -1000 and 1000, 2 Decimal Digits 
                DESCRIPTION:
                                  This field stores the increment by value.  


446.52,.09      DESCRIPTION            0;9 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
                LAST EDITED:      NOV 30, 1989 
                HELP-PROMPT:      ANSWER MUST BE 1-30 CHARACTERS IN LENGTH 
                DESCRIPTION:
                                  This field stores the description of the parameter.  


446.52,.1       TAB                    0;10 NUMBER

                INPUT TRANSFORM:  K:+X'=X!(X>250)!(X<1)!(X?.E1"."1N.N) X
                LAST EDITED:      DEC 04, 1989 
                HELP-PROMPT:      Type a Number between 1 and 250, 0 Decimal Digits 
                DESCRIPTION:
                                  This field is the number of tabs.  


446.52,.11      LEFT JUSTIFY           0;11 NUMBER

                INPUT TRANSFORM:  K:+X'=X!(X>250)!(X<1)!(X?.E1"."1N.N) X
                LAST EDITED:      MAR 01, 1993 
                HELP-PROMPT:      Type a Number between 1 and 250, 0 Decimal Digits 
                DESCRIPTION:
                                  This field stores the left justification for the parameter.  


446.52,.12      RIGHT JUSTIFY          0;12 NUMBER

                INPUT TRANSFORM:  K:+X'=X!(X>250)!(X<1)!(X?.E1"."1N.N) X
                HELP-PROMPT:      Type a Number between 1 and 250, 0 Decimal Digits 
                DESCRIPTION:
                                  This field stores the right justification of the parameter.  


446.52,1        XECUTABLE CODE         1;E1,250 FREE TEXT

                INPUT TRANSFORM:  D PROG^PRCTUTL
                LAST EDITED:      DEC 05, 1989 
                HELP-PROMPT:      ANSWER MUST BE 1-250 CHARACTERS IN LENGTH 
                DESCRIPTION:
                                  This field stores the executable mumps code for the parameter.  

                DELETE AUTHORITY: @
                WRITE AUTHORITY:  @
                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER




446.5,3       FILEMAN CODE           3;0   WORD-PROCESSING #446.53   (NOWRAP)

              DESCRIPTION:
                                This word-processing field contains the compiled FILEMAN code necessary to run the report.  


                LAST EDITED:      NOV 30, 1989 
                DESCRIPTION:
                                  This word-processing field contains the compiled FILEMAN code necessary to run the report.  

                DELETE AUTHORITY: @
                WRITE AUTHORITY:  @



446.5,4       MUMPS CODE             4;0   WORD-PROCESSING #446.54   (NOWRAP)

              DESCRIPTION:
                                This word-processing field contains the compiled MUMPS code necessary to run the report.  


                LAST EDITED:      DEC 04, 1989 
                DESCRIPTION:
                                  This word-processing field contains the compiled MUMPS code necessary to run the report.  

                DELETE AUTHORITY: @
                WRITE AUTHORITY:  @




      FILES POINTED TO                      FIELDS

FILE (#1)                         FILE (#.02)

SPECIALTY COMMANDS (#446.6)       SPECIALTY COMMANDS (#.06)



INPUT TEMPLATE(S):
PRCT BASIC PARAM              JUL 12, 1990@09:54  USER #0    

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):