Global: ^GECS(2101.7

FileMan FileNo	FileMan Filename	Package
2101.7	GENERIC CODE SHEET SITE	Generic Code Sheet

Directly Accessed By Routines, Total: 4

Package	Total	Routines
Generic Code Sheet	3	^GECS(2101.7 GECSPOST GECSSITE

Package	Total	Routines
Generic Code Sheet	2	GECSETUP GECSSITE

Package	Total	FileMan Files
Kernel	1	INSTITUTION(#4)[.01]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	NAME	0;1	POINTER TO INSTITUTION FILE (#4)	**********************REQUIRED FIELD********************** INSTITUTION(#4) INPUT TRANSFORM: `S DINUM=X Q` LAST EDITED: `APR 03, 1990` DESCRIPTION: `This field is used to store the name of the site from the INSTITUTION file which will be using the Generic Code Sheet Package to create and transmit code sheets.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `2101.7^B` `1)= S ^GECS(2101.7,"B",$E(X,1,30),DA)=""` `2)= K ^GECS(2101.7,"B",$E(X,1,30),DA)` `This is a standard VA FileMan "B" cross reference.`
1	PRIMARY SITE?	0;2	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `JUN 28, 1994` DESCRIPTION: `This field (if set to Yes) indicates whether the site is a primary (defaulted) site for the Generic Code Sheet Package.` CROSS-REFERENCE: `2101.7^AC^MUMPS` `1)= I X="Y" S ^GECS(2101.7,"PRIMARY")=DA` `2)= I X="Y" K ^GECS(2101.7,"PRIMARY")` `This cross-reference is used to indicate the station which should be used as the default Generic Code Sheet primary site.`

NAME

0;1

POINTER TO INSTITUTION FILE (#4)

************************REQUIRED FIELD************************

INPUT TRANSFORM: S DINUM=X Q
LAST EDITED: APR 03, 1990
DESCRIPTION:
This field is used to store the name of the site from the INSTITUTION file which will be using the Generic Code Sheet Package to create and transmit code sheets.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 2101.7^B
1)= S ^GECS(2101.7,"B",$E(X,1,30),DA)=""
2)= K ^GECS(2101.7,"B",$E(X,1,30),DA)
This is a standard VA FileMan "B" cross reference.

PRIMARY SITE?

0;2

SET

LAST EDITED: JUN 28, 1994
DESCRIPTION:
This field (if set to Yes) indicates whether the site is a primary (defaulted) site for the Generic Code Sheet Package.
CROSS-REFERENCE: 2101.7^AC^MUMPS
1)= I X="Y" S ^GECS(2101.7,"PRIMARY")=DA
2)= I X="Y" K ^GECS(2101.7,"PRIMARY")
This cross-reference is used to indicate the station which should be used as the default Generic Code Sheet primary site.

Name	Line Occurrences (* Changed, ! Killed)
^DIE("B"	\|dd2101.2
^GECS(2100 - [#2100]	\|sort
^GECS(2100.1 - [#2100.1]	\|dd2100.1!, \|dd2100.12!, \|dd2100.121*!
^GECS(2101.1 - [#2101.1]	\|dd2101.1!, \|dd2101.12!, \|sort
^GECS(2101.2 - [#2101.2]	\|dd2101.2*!
^GECS(2101.3 - [#2101.3]	\|dd2101.3*!
^GECS(2101.4 - [#2101.4]	\|dd2101.4*!
^GECS(2101.5 - [#2101.5]	\|dd2101.5*!
^GECS(2101.6 - [#2101.6]	\|dd2101.6*!
^GECS(2101.7 - [#2101.7]	.01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), \|dd2101.7*!
^UTILITY("GECSBATCH"	\|prnt*
^UTILITY("GECSLIST"	\|prnt*

Name	Field # of Occurrence
^(0	\|dd2101.2, \|sort

Name	Field # of Occurrence
%	\|dd2100.1*~
>> %DT	\|dd2100.1, \|dd2101.3, \|dd2101.6*
>> D0	\|prnt, \|sort
>> DA	.01(XREF 1S), .01(XREF 1K), 1(XREF 1S), \|dd2100.1, \|dd2101.1, \|dd2101.12, \|dd2101.2, \|dd2101.3, \|dd2101.4, \|dd2101.5 , \|dd2101.6, \|dd2101.7
>> DA(1	\|dd2100.12, \|dd2100.121, \|dd2101.12
>> DINUM	.01+1, \|dd2100.12, \|dd2100.121, \|dd2101.7
FLAG	\|inpt*!
>> GECS("SITE"	\|inpt
>> GECSBATC	\|prnt
>> GECSCNT	\|prnt*
>> GECSCOUN	\|prnt*
GECSHBHC	\|inpt*!
>> GECSMAX	\|prnt
>> GECSMM	\|prnt*
GECSSYS	\|opt*!
U	\|dd2101.2, \|sort
>> X	.01+1, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), \|dd2100.1!, \|dd2100.12!, \|dd2100.121!, \|dd2101.1!, \|dd2101.12! , \|dd2101.2!, \|dd2101.3!, \|dd2101.32!, \|dd2101.4!, \|dd2101.41!, \|dd2101.5!, \|dd2101.6!, \|dd2101.7, \|inpt, \|inpt* , \|inpt, \|prnt, \|sort
X(4	\|sort*
X1	\|dd2101.3*!
>> Y	\|dd2100.1, \|dd2101.3, \|dd2101.6, \|inpt*
>> Y(1	\|sort*
>> Z	\|dd2101.2*