Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | ICR | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All

Print Page as PDF

Global: ^DIC(6910.1

Package: Engineering

Global: ^DIC(6910.1

Information

FileMan FileNo	FileMan Filename	Package
6910.1	ENGINEERING COMPUTER PORT	Engineering

Description

Used by package specific device selection logic to assist users in identifying output devices. As a rule, only hardcopy print devices should be contained in this file. The intent is to discourage users from inadvertently sending output to a CRT or some other device not intended for printing. This file also contains device-specific instructions for customized formats and data layouts for use when printing bar coded equipment and location labels from AEMS/MERS. It is quite conceiveable for more than one entry in the Engineering Computer Port file to point to the same entry in the Device file (#3.5), the difference could be the bar code instructions.

Directly Accessed By Routines, Total: 6

Package	Total	Routines
Engineering	6	ENBCPM4 ENLBL4 ENLBL7 ENLIB ^DIC(6910.1 ^OFM(7336.9

Accessed By FileMan Db Calls, Total: 1

Package	Total	Routines
Engineering	1	ENMAN

Pointer To FileMan Files, Total: 1

Package	Total	FileMan Files
Kernel	1	DEVICE(#3.5)[.01]

Fields, Total: 8

Field #	Name	Loc	Type	Details
.01	DEVICE #	0;1	POINTER TO DEVICE FILE (#3.5)	**********************REQUIRED FIELD********************** DEVICE(#3.5) LAST EDITED: `JAN 27, 1991` DESCRIPTION: `Pointer to DEVICE file. Entries should be made for output devices (printers) only.` CROSS-REFERENCE: `6910.1^B` `1)= S ^DIC(6910.1,"B",$E(X,1,30),DA)=""` `2)= K ^DIC(6910.1,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `6910.1^AC^MUMPS` `1)= S Z=$P(^DIC(6910.1,DA,0),U),Z1=$S($D(^%ZIS(1,Z,1)):$P(^(1),U,4),1:"") S $P(^DIC(6910.1,DA,0),U,2)=$S($E(^%ZOSF("OS"),1,3)="DSM":$P(^%ZIS(1,Z,0),U,2),1:$S(Z1]"":Z1,1:$P(^%ZIS(1,Z,0),U))) K Z,Z1` `2)= Q`
1	DEVICE # TRIGGERED	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1)!(X'?.ANP) X` LAST EDITED: `JUL 17, 1989` HELP-PROMPT: `ANSWER MUST BE 1-20 CHARACTERS IN LENGTH` DESCRIPTION: `Text that would be recognizable by routine ^%ZIS.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
2	DEVICE DESCRIPTION	0;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1)!(X'?.ANP) X` LAST EDITED: `APR 29, 1993` HELP-PROMPT: `ANSWER MUST BE 1-15 CHARACTERS IN LENGTH` DESCRIPTION: `Brief text that would enable a user to recognize this device.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
3	BAR CODE EQUIPMENT FORMAT	1;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `OCT 13, 1997` HELP-PROMPT: `This is Standard MUMPS code, not to exceed 245 characters.` DESCRIPTION: `There should be an entry for this field if and only if this device is used to print bar coded equipment labels using a customized format. Entries must contain no more then 245 characters of executable M code.` `If this device does not require formatting, just enter a 'Q' as the BAR CODE EQUIPMENT FORMAT field and no formatting instructions will be sent.` `If the device does require formatting (and most thermal transfer bar code printers do) and you wish to customize it, then you are advised to enter the name of a formatting program segment in the form 'D EQFRMAT^ENZLBL'` `where program segment EQFRMAT^ENZLBL contains the M code that sends your formatting commands (for equipment labels) to the printer.` `If there is no entry in this field and the device is used to print bar coded equipment labels, then the standard formatting instructions will be issued automatically. These commands are found in program segment` `FORMAT1^ENLBL7 and were designed for the Intermec 8600 series of thermal transfer bar code printers.` `At the time that the formatting program segment is called, this device will be open as the 'current device'.` `WRITE AUTHORITY: @`
4	BAR CODE LOCATION FORMAT	2;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `OCT 10, 1997` HELP-PROMPT: `This is Standard MUMPS code, no more than 245 char long.` DESCRIPTION: `There should be an entry for this field if and only if this device is used to print bar coded location labels using a customized format. Entries must contain no more then 245 characters of executable M code.` `If this device does not require formatting, just enter a 'Q' as the BAR CODE LOCATION FORMAT field and no formatting instructions will be sent.` `If the device does require formatting (and most thermal transfer bar code printers do) and you wish to customize it, then you are advised to enter the name of a formatting program segment in the form 'D LOCFRMAT^ENZLBL'` `where program segment LOCFRMAT^ENZLBL contains the M code that sends your formatting commands to this printer.` `If there is no entry in this field and the device is used to print bar coded location labels, then the standard formatting instructions will be issued automatically. These commands are found in program segment` `FORMAT1^ENLBL7 and were designed for the Intermec 8600 series of thermal transfer bar code printers.` `At the time that the formatting program segment is called, this device will be open as the 'current device'.` `WRITE AUTHORITY: @`
5	BAR CODE EQUIPMENT DATA	3;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `OCT 10, 1997` HELP-PROMPT: `This is Standard MUMPS code, not to exceed 245 characters.` DESCRIPTION: `There should be an entry for this field if and only if this device is used to print bar coded equipment labels including a customized arrangement of fields from within the Equipment file (#6914). Entries must contain no` `more than 245 characters of executable M code.` `If there is no entry in this field and the device is used to print bar coded equipment labels, then the standard field layout will be used automatically. The standard field layout includes the equipment entry number and` `facility name in human readable format. Sites may use the Engineering Site Parameters Enter/Edit option [ENSITE] to have the name of the EQUIPMENT CATEGORY (if any) included at the top of the equipment label. This option` `also allows sites to print one or two equipment fields of their own choosing in human readable format instead of the facility name.` `Sites wishing to do more customization than that allowed by the Engineering Site Parameters Enter/Edit option are free to write their own print routines using M code and enter the appropriate calling point (in the form 'D` `EQDATA^ENZLBL') in this BAR CODE EQUIPMENT DATA field.` `NOTE: If there is an entry for BAR CODE EQUIPMENT DATA then the` `standard field layout will not be invoked.` `At the time that the user-defined print routine is called, this device will be open as the 'current device' and local variable DA will be set to the equipment entry number.` `WRITE AUTHORITY: @`
6	BAR CODE LOCATION DATA	4;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `OCT 13, 1997` HELP-PROMPT: `This is Standard MUMPS code, not to exceed 245 characters.` DESCRIPTION: `There should be an entry for this field if and only if this device is used to print bar coded location labels using a customized arrangement of fields from within the Space file (#6928). Entries must contain no more than` `30 characters of executable M code.` `If there is no entry in this field and the device is used to print bar coded location labels, then the standard field layout will be used automatically. The standard field layout includes the physical location (as` `ROOM-BUILDING-DIVISION) and facility name in human readable format. Sites may use the Engineering Site Parameters Enter/Edit option [ENSITE] to have the name of the SPACE FUNCTION (if any) printed at the top of the` `location label.` `Sites wishing to do more customization than what the Engineering Site Parameters option allows are free to write their own print routines using M code and enter the appropriate entry point (in the form 'D LOCDATA^ENZLBL')` `in this BAR CODE LOCATION DATA field.` `NOTE: If there is an entry for the BAR CODE LOCATION DATA field` `then the standard field layout will not be invoked.` `At the time that the user-defined print routine is called, this device the will be open as the 'current device' and local variable DA will be set to the internal entry number of the physical location in the Space file` `(#6928).` `WRITE AUTHORITY: @`
7	SUPPRESS LISTING	0;4	SET	'0' FOR INCLUDE IN LIST; '1' FOR EXCLUDE FROM LIST; LAST EDITED: `OCT 14, 1997` DESCRIPTION: `Enter a 1 to prevent system from displaying this device as a selectable entry. It's usually a good idea to do this for bar code printers that have been included in the Engineering Computer Port file in order that their` `labels may be customized.`

ICR, Total: 1

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #6855	ABOVE PAR	BAR CODE EQUIPMENT FORMAT (3). Access: Direct Global Read & w/Fileman BAR CODE LOCATION FORMAT (4). Access: Direct Global Read & w/Fileman BAR CODE EQUIPMENT DATA (5). Access: Direct Global Read & w/Fileman BAR CODE LOCATION DATA (6). Access: Direct Global Read & w/Fileman	Cross Reference by Station Name, field STATION NAME(#.01)

External References

Name	Field # of Occurrence
^DIM	3+1, 4+1, 5+1, 6+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(1 - [#3.5]	.01(XREF 2S)
^%ZOSF("OS"	.01(XREF 2S)
^DIC(6910.1 - [#6910.1]	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S)

Naked Globals

Name	Field # of Occurrence
^("0"	ID2+1
^(1	.01(XREF 2S)

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S)
U	ID2+1, .01(XREF 2S)
X	.01(XREF 1S), .01(XREF 1K), 1+1!, 2+1!, 3+1!, 4+1!, 5+1!, 6+1!
Z	.01(XREF 2S)
Z1	.01(XREF 2S)

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | ICR | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All