STANDARD DATA DICTIONARY #39.1 -- EMBOSSED CARD TYPE FILE 3/24/25 PAGE 1
STORED IN ^DIC(39.1, (5 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.3)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the various card types which are printed on embossers. The parameters of each card, i.e., what prints where,
are defined in this file for each card type.
This file has a .001 field and is, therefore, IEN dependent. It should not be altered at the site level. The DGQE* routines
depend on the entries in the file to remain stable.
DD ACCESS: @
RD ACCESS: d
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
CROSS
REFERENCED BY: NAME(B), TYPE(C)
39.1,.001 CARD TYPE NUMBER
NUMBER ASSOCIATED WITH THIS CARD TYPE
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
DESCRIPTION:
This field contains the internal record number that is associated with this data card type.
SOURCE OF DATA: GENERATED BY FILE MANAGER
39.1,.01 NAME 0;1 (Required)
INPUT TRANSFORM: K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
LAST EDITED: JAN 02, 1985
DESCRIPTION: This field contains the name of this card type. Card type names must be between 3 and 30
characters in length.
SOURCE OF DATA: DEVELOPER
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 39.1^B
1)= S ^DIC(39.1,"B",$E(X,1,30),DA)=""
2)= K ^DIC(39.1,"B",$E(X,1,30),DA)
39.1,1 DEFAULT DEVICE 0;2 POINTER TO EMBOSSER EQUIPMENT FILE FILE (#39.3)
DEFAULT EMBOSSER DEVICE FOR THIS CARD TYPE
LAST EDITED: JUL 12, 1985
DESCRIPTION: This field is used to assign the default embosser device to be associated with each card type
(Service Connected, Non-Service Connected, Non-Veteran, Free Text, etc.). Each card type may be
associated with a different embosser device. Default devices are assigned at each site by the
computer site manager. If a default device is not entered here, the user will be prompted for a
device.
This field points to the EMBOSSER EQUIPMENT file (#39.3). Therefore, the device selected here must
match an entry in that file.
SOURCE OF DATA: COMPUTER SITE MANAGER
39.1,2 MANDATORY HOLD 0;3 SET
AUTOMATIC 'HOLD' STATUS FOR CARDS OF THIS CARD TYPE?
'1' FOR YES;
'2' FOR NO;
'0' FOR ASK;
LAST EDITED: FEB 08, 1985
DESCRIPTION: This field is used to determine whether or not data cards should be printed immediately or put into
'Hold' status, or if the user should be prompted for the correct action. This field can be set up
with a different action for each card type (Service Connected, Non-Service Connected, Non-Veteran,
Free Text, etc.)..
The computer site manager should set this field to YES to automatically place the cards in 'Hold'
status, to NO to automatically 'Print' the cards immediately, or to ASK to ask the user to 'Print'
or 'Hold'. If this field is not edited, the system defaults to ASK.
SOURCE OF DATA: COMPUTER SITE MANAGER
39.1,3 DEFAULT NUMBER OF CARDS 0;4 NUMBER
DEFAULT NUMBER OF CARDS FOR THIS CARD TYPE
INPUT TRANSFORM: K:+X'=X!(X>8)!(X<1)!(X?.E1"."1N.N) X
DESCRIPTION: This field is used to assign the number of duplicate cards to be embossed for each card type
(Service Connected, Non-Service Connected, Non-Veteran, Free Text, etc.). Each card type may be
assigned a different default number of cards. The default number of cards must be a number between
one and eight.
SOURCE OF DATA: COMPUTER SITE MANAGER
39.1,5 TYPE 0;6 SET (Required)
NAME AND CODE NUMBER ASSOCIATED WITH THIS CARD TYPE
'1' FOR NON SERVICE CONNECTED;
'2' FOR SERVICE CONNECTED;
'9' FOR FREE TEXT;
'3' FOR NON-VETERAN;
'10' FOR WRISTBAND;
LAST EDITED: FEB 16, 1995
HELP-PROMPT: Enter the type of card.
DESCRIPTION: This field should contain the name and code number associated with this data card type. ('1' for
NON SERVICE CONNECTED, '2' for 'SERVICE CONNECTED, '3' fNON-VETERAN, or '9' for FREE TEXT, '10' for
WRISTBAND.)
SOURCE OF DATA: DEVELOPER
CROSS-REFERENCE: 39.1^C
1)= S ^DIC(39.1,"C",$E(X,1,30),DA)=""
2)= K ^DIC(39.1,"C",$E(X,1,30),DA)
39.1,10 LINE NUMBER 1;0 Multiple #39.11
DESCRIPTION:
This multiple field contains information about each line to be printed on the data cards.
SOURCE OF DATA: DEVELOPER
39.11,.01 LINE NUMBER 0;1 NUMBER (Multiply asked)
INPUT TRANSFORM: K:+X'=X!(X>9)!(X<1)!(X?.E1"."1N.N) X I $D(X) S DINUM=X
LAST EDITED: MAR 21, 1995
DESCRIPTION:
This field contains a number between 1 and 9 to indicate a line of the data card.
SOURCE OF DATA: DEVELOPER
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
39.11,1 DATA ITEM 1;0 POINTER Multiple #39.12
DESCRIPTION: This multiple field contains information about each data item to be printed on a line of the data
card.
SOURCE OF DATA: DEVELOPER
39.12,.001 FIELD POSITION NUMBER
NUMBER ASSOCIATED WITH THIS FIELD POSITION
INPUT TRANSFORM: K:+X'=X!(X>26)!(X<1)!(X?.E1"."1N.N) X
DESCRIPTION:
This field contains the internal record number that is associated with this field position.
SOURCE OF DATA: GENERATED BY FILE MANAGER
39.12,.01 DATA ITEM 0;1 POINTER TO EMBOSSING DATA FILE (#39.2) (Multiply asked)
NAME OF THIS DATA ITEM
DESCRIPTION:
This field points to the EMBOSSING DATA file (#39.2) to indicate the name of this data item.
SOURCE OF DATA: DEVELOPER
39.12,1 STARTING COLUMN 0;2 NUMBER
STARTING COLUMN OF THIS DATA ITEM
INPUT TRANSFORM: K:+X'=X!(X>35)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: FEB 16, 1995
HELP-PROMPT: Type a Number between 1 and 35, 0 Decimal Digits
DESCRIPTION: This field contains a number between 1 and 35 to indicate the starting column position of this
data item.
SOURCE OF DATA: DEVELOPER
39.12,2 LENGTH 0;3 NUMBER
LENGTH OF THIS DATA ITEM
INPUT TRANSFORM: K:+X'=X!(X>40)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: FEB 16, 1995
HELP-PROMPT: Type a Number between 1 and 40, 0 Decimal Digits
DESCRIPTION:
This field contains a number between 1 and 40 to indicate the length of this data item.
SOURCE OF DATA: DEVELOPER
39.1,11 MAIL TO REQUESTOR 0;5 SET (Required)
SHOULD ERROR MESSAGE BE SENT TO REQUESTOR?
'Y' FOR YES;
'N' FOR NO;
LAST EDITED: NOV 01, 1985
DESCRIPTION: This field is used to determine if users who request data cards who are not in the DGEMBOSSER mail
group should receive embosser error messages. If this field is set to YES, then a user who
requests a card that does not get embossed due to an error will receive an error message. If this
field is set to NO, only members of the DGEMBOSSER mail group will receive the message.
SOURCE OF DATA: COMPUTER SITE MANAGER
39.1,12 CARDS IN HOLD HOLD;0 POINTER Multiple #39.13
DESCRIPTION:
This multiple contains the number of this card type that are presently in hold awaiting printing.
39.13,.01 CARDS IN HOLD 0;1 POINTER TO PATIENT FILE (#2)
LAST EDITED: FEB 14, 1986
DESCRIPTION: This field contains a pointer to the PATIENT file indicating the patient for which this card is
presently in a hold status.
39.13,1 FREE TEXT 1;0 Multiple #39.14 (Add New Entry without Asking)
DESCRIPTION:
This multiple contains all of the data necessary to emboss a card for this patient.
39.14,.01 FREE TEXT 0;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>27!($L(X)<1) X
LAST EDITED: FEB 14, 1986
HELP-PROMPT: ANSWER MUST BE 1-27 CHARACTERS IN LENGTH
DESCRIPTION: This field contains a free text comment that will appear at the bottom of the patient's data
card.
FILES POINTED TO FIELDS
EMBOSSER EQUIPMENT FILE (#39.3) DEFAULT DEVICE (#1)
EMBOSSING DATA (#39.2) DATA ITEM:DATA ITEM (#.01)
PATIENT (#2) CARDS IN HOLD:CARDS IN HOLD (#.01)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):