STANDARD DATA DICTIONARY #194.4 -- LABEL FORMAT FILE 3/24/25 PAGE 1
STORED IN ^DIC(194.4, (8 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
IDENTIFIED BY: APPLICATION (#3)
POINTED TO BY: BORROWER BARCODE FORMAT field (#3) of the RECORD TRACKING APPLICATION File (#195.1)
RECORD LABEL FORMAT field (#5) of the RECORD TYPES File (#195.2)
REQUEST NOTICE FORMAT field (#6) of the RECORD TYPES File (#195.2)
CROSS
REFERENCED BY: FIELD(AB), NAME(B), APPLICATION(C)
194.4,.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 identifies different label formats for records, requests, and borrowers and allows copies of
standard formats to be customized by application and site.
CROSS-REFERENCE: 194.4^B
1)= S ^DIC(194.4,"B",$E(X,1,30),DA)=""
2)= K ^DIC(194.4,"B",$E(X,1,30),DA)
194.4,2 NUMBER OF ROWS IN FORMAT 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>66)!(X<1)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 66
DESCRIPTION:
This identifies the number of lines on the label
194.4,3 APPLICATION 0;3 POINTER TO RECORD TRACKING APPLICATION FILE (#195.1)
LAST EDITED: JAN 15, 1987
DESCRIPTION:
This allows applications to use different label formats for records or requestors.
CROSS-REFERENCE: 194.4^C
1)= S ^DIC(194.4,"C",$E(X,1,30),DA)=""
2)= K ^DIC(194.4,"C",$E(X,1,30),DA)
194.4,4 TYPE OF LABEL 0;4 SET
'r' FOR RECORD;
'b' FOR BORROWER;
'q' FOR REQUEST;
LAST EDITED: JAN 10, 1987
DESCRIPTION: Record labels are barcoded for the record file, Request labels for the request file, and Borrower
labels for the borrower/file areas file.
UNEDITABLE
194.4,50 PRINT FIELDS 1;0 POINTER Multiple #194.41 (Add New Entry without Asking)
DESCRIPTION:
This identifies the data to be printed on the label.
194.41,.01 FIELD 0;1 POINTER TO LABEL PRINT FIELD FILE (#194.5) (Multiply asked)
INPUT TRANSFORM: S DIC("S")="D BC^RTL2" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: AUG 08, 1986
SCREEN: S DIC("S")="D BC^RTL2"
EXPLANATION: Allows fields to be printed for this type of label including only one barcode field
CROSS-REFERENCE: 194.41^B
1)= S ^DIC(194.4,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^DIC(194.4,DA(1),1,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 194.41^AC^MUMPS
1)= S:$P(^DIC(194.5,X,0),U,6)="y" $P(^DIC(194.4,DA(1),1,DA,0),U,2,3)="^"
2)= Q
CROSS-REFERENCE: 194.4^AB
1)= S ^DIC(194.4,"AB",$E(X,1,30),DA(1),DA)=""
2)= K ^DIC(194.4,"AB",$E(X,1,30),DA(1),DA)
194.41,2 ROW 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>66)!(X<1)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 66
DESCRIPTION:
This defines the row where the data will be printed.
194.41,3 COLUMN 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>80)!(X<1)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 80
DESCRIPTION:
This defines the column of the row where the data will be printed.
194.41,4 TITLE(OPTIONAL) 0;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>15!($L(X)<1) X
HELP-PROMPT: ANSWER MUST BE 1-15 CHARACTERS IN LENGTH
DESCRIPTION:
This allows free text to be printed with the data on the label.
194.41,5 LITERAL TEXT 0;5 FREE TEXT
INPUT TRANSFORM: K:$L(X)>80!($L(X)<1) X
HELP-PROMPT: ANSWER MUST BE 1-80 CHARACTERS IN LENGTH
DESCRIPTION:
This allow text to be printed on the label which is not associated with with any data fields.
194.4,100 COMPILED LOGIC E;0 WORD-PROCESSING #194.42 (NOWRAP)
DESCRIPTION:
This is the executable code which prints the label.
WRITE AUTHORITY: ^
FILES POINTED TO FIELDS
LABEL PRINT FIELD (#194.5) PRINT FIELDS:FIELD (#.01)
RECORD TRACKING APPLICATION
(#195.1) APPLICATION (#3)
INPUT TEMPLATE(S):
RT LABEL EDIT SEP 04, 1986 USER #0
PRINT TEMPLATE(S):
RT FORMATS MAR 09, 1987 USER #0 LABEL FORMAT LIST
SORT TEMPLATE(S):
RT FORMATS MAR 09, 1987 USER #0
SORT BY: APPLICATION// (User is asked range)
FORM(S)/BLOCK(S):