STANDARD DATA DICTIONARY #39.3 -- EMBOSSER EQUIPMENT FILE FILE 9/29/25 PAGE 1
STORED IN ^DIC(39.3, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.3)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file stores the devices that are used as embossers. For each embosser, the type of embosser (data card, addressograph, or
plain printer) and usage statistics (number printed and error statistics) are stored in this file.
DD ACCESS: @
RD ACCESS: d
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
POINTED TO BY: DEFAULT DEVICE field (#1) of the EMBOSSED CARD TYPE File (#39.1)
CROSS
REFERENCED BY: NAME(B)
39.3,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:'$D(^%ZIS(1,"B",$E(X,1,30))) X
LAST EDITED: MAY 13, 1985
HELP-PROMPT: MUST ENTER A DEVICE THAT IS IN THE DEVICE FILE
DESCRIPTION: This field is used to assign the names of the devices to be used to print data cards. This field
points to the DEVICE file (#3.5) therefore, a name entered here must match a name currently in that
file.
EXECUTABLE HELP: I DZ="??" W ! S N=0,L=0 F I=1:1 S N=$N(^%ZIS(1,"B",N)) Q:N<0 W !?5,N S L=L+1 I L>21 R !,"""^"" TO
QUIT: ",X:DTIME Q:X="^" W $C(13),$J("",15),$C(13) S L=0
DELETE TEST: 1,0)= I '$D(DGMENU) W !?4,*7,"Delete EMBOSSER DEVICE via the 'Edit Embosser Device File' menu optio
n."
SOURCE OF DATA: COMPUTER SITE MANAGER
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 39.3^B
1)= S ^DIC(39.3,"B",$E(X,1,30),DA)=""
2)= K ^DIC(39.3,"B",$E(X,1,30),DA)
39.3,1 EMBOSSER TYPE 0;2 SET
TYPE OF THIS EMBOSSER DEVICE
'1' FOR DATA CARD;
'2' FOR ADDRESSOGRAPH;
'0' FOR PLAIN PRINTER;
LAST EDITED: DEC 20, 1984
DESCRIPTION: This field is used to assign the type of the embosser device. Following are the available embosser
types and their associated code number: '1' for DATACARD, '2' for ADDRESSOGRAPH, and '0' for PLAIN
PRINTER.
SOURCE OF DATA: COMPUTER SITE MANAGER
39.3,2 NUMBER OF CARDS EMBOSSED 1;0 Multiple #39.31 (Add New Entry without Asking)
DESCRIPTION: This multiple field gives information that may be useful to site managers about data cards that
have been processed.
SOURCE OF DATA: SYSTEM GENERATED
39.31,.001 DATE DATE
DATE OF EMBOSSING
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X
LAST EDITED: JUL 12, 1985
DESCRIPTION: This field is used by the system to keep track of each date that cards have been embossed by a
certain embossing device. Information is kept by the system about the data cards embossed and
may be retrieved by using the date in this field as a basis for database searches.
SOURCE OF DATA: SYSTEM GENERATED
UNEDITABLE
39.31,.01 NUMBER OF CARDS 0;1 NUMBER (Multiply asked)
NUMBER OF CARDS EMBOSSED
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: DEC 14, 1990
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 999999
DESCRIPTION: This field is used by the system to keep track of the number of cards embossed on a certain
embossing device. This field can be used as a basis for database searches. (i.e. How many cards
were embossed on Device 1 on October 1, 1985?)
SOURCE OF DATA: SYSTEM GENERATED
39.31,1 NUMBER OF SOFT ERRORS 0;2 NUMBER
NUMBER OF SOFTWARE ERRORS
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: DEC 14, 1990
HELP-PROMPT: Type a Number between 0 and 999999, 0 Decimal Digits
DESCRIPTION: This field is used by the system to keep track of how many software errors have occurred that are
related to a certain embossing device. This field can be used as a basis for database searches.
(i.e. How many software errors have occurred that are related to Device 1 on October 1, 1985?)
SOURCE OF DATA: SYSTEM GENERATED
39.31,2 NUMBER OF HARD ERRORS 0;3 NUMBER
NUMBER OF HARDWARE ERRORS
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: DEC 14, 1990
HELP-PROMPT: Type a Number between 0 and 999999, 0 Decimal Digits
DESCRIPTION: This field is used by the system to keep track of how many card related errors have occurred on a
certain embossing device. For example, this field will be incremented if a card jams.
This field can be used as a basis for database searches. For example, How many hard errors
occured on Device 1 on October 1, 1985?
SOURCE OF DATA: SYSTEM GENERATED
39.31,3 NUMBER OF UNKNOWN TYPE ERRORS 0;4 NUMBER
NUMBER OF UNKNOWN TYPE ERRORS THAT OCCURRED
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: DEC 14, 1990
HELP-PROMPT: Type a Number between 0 and 999999, 0 Decimal Digits
DESCRIPTION: This field is used by the system to keep track of how many unknown type errors have occurred on a
certain device. If the system cannot determine if an error is hardware or software related, the
system will consider it an unknown type error. This field can be used as a basis for database
searches. (i.e. How many unknown type errors have occurred on Device 1 on October 1, 1985?)
SOURCE OF DATA: SYSTEM GENERATED
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):