Sub-Field: 9.65

Parent File	Name	Number	Package
BUILD(#9.6)	GLOBAL	9.65	Kernel

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	GLOBAL	0;1	FREE TEXT	INPUT TRANSFORM: `D GLOBALE^XPDET(.X)` OUTPUT TRANSFORM: `S Y=$TR(Y,"'","""")` LAST EDITED: `JAN 06, 1995` HELP-PROMPT: `Answer must be 2-30 characters in length and not begining with "^".` DESCRIPTION: `Enter a global name or a closed global root you want to transport. The global should not begin with a "^". i.e. %ZIS(2).` PRE-LOOKUP: `S X=$TR(X,"""","'")` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9.65^B` `1)= S ^XPD(9.6,DA(1),"GLO","B",$E(X,1,30),DA)=""` `2)= K ^XPD(9.6,DA(1),"GLO","B",$E(X,1,30),DA)`
1	KILL GLOBAL BEFORE INSTALL	0;2	SET	'y' FOR YES; 'n' FOR NO; LAST EDITED: `JAN 05, 1995` DESCRIPTION: `YES means that you want this global killed before it is installed at the installing site.` `NO means you want this global install on top of the existing global at the installing site.`

GLOBAL

0;1

FREE TEXT

INPUT TRANSFORM: D GLOBALE^XPDET(.X)
OUTPUT TRANSFORM: S Y=$TR(Y,"'","""")
LAST EDITED: JAN 06, 1995
HELP-PROMPT: Answer must be 2-30 characters in length and not begining with "^".
DESCRIPTION:
Enter a global name or a closed global root you want to transport. The global should not begin with a "^". i.e. %ZIS(2).
PRE-LOOKUP: S X=$TR(X,"""","'")
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 9.65^B
1)= S ^XPD(9.6,DA(1),"GLO","B",$E(X,1,30),DA)=""
2)= K ^XPD(9.6,DA(1),"GLO","B",$E(X,1,30),DA)

KILL GLOBAL BEFORE INSTALL

0;2

SET

LAST EDITED: JAN 05, 1995
DESCRIPTION: YES means that you want this global killed before it is installed at the installing site.
NO means you want this global install on top of the existing global at the installing site.