Global: ^%ZIS(14.6

FileMan FileNo	FileMan Filename	Package
14.6	UCI ASSOCIATION	Kernel

Description

Most TaskMan tasks run in the same uci and volume set in which they were created. However, tasks that need a device that is only available from a different volume set can not. Such tasks must run on the volume set from which the device is available, in a uci equivalent to their current one. Equivalent ucis on different volume sets can have different names, so this file indicates which ucis on different volume sets are equivalent. TaskMan only directly uses the "AT" and "AV" indices. The "AT" index has this structure: ^%ZIS("AT",.01,1.5,2.5,3)="", and is used to find equivalent ucis on different volume sets. The "AV" index has this structure: ^%ZIS("AV",1.5,.01)="", and is used to determine whether a certain uci is part of a certain volume set. Whenever the VOLUME SET field of the VOLUME SET file is changed, a MUMPS cross-reference searches through this file and re-cross-references all pointers to that entry, thereby keeping the two files in synch.

Package	Total	Routines
Kernel	11	XUINTSK4 ^%ZIS(14.6 %ZTM %ZTM1 %ZTM2 %ZTM5 XQ8A XUINTSK3 XUTMG145 XUTMG146 XUTMTEIO

Package	Total	FileMan Files
Kernel	1	VOLUME SET(#14.5)[1, 2]

Fields, Total: 7

Field #	Name	Loc	Type	Details
.001	NUMBER		NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JAN 18, 1991` HELP-PROMPT: `Type a Number between 1 and 999, 0 Decimal Digits` DESCRIPTION: Answer should be a unique number, used to identify this file entry. TECHNICAL DESCR: The entries in this file have no unique data elements, so the internal number is used to distinguish them. SOURCE OF DATA: VA FileMan (arbitrary)
.01	FROM UCI	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>32!($L(X)<2)!'(X?2ANP.ANP) X` LAST EDITED: `FEB 13, 1991` HELP-PROMPT: `Answer must be 2-32 characters in length.` DESCRIPTION: Answer should be the name of a uci from which a task is being transferred. SOURCE OF DATA: System manager (from local system configuration). DATA DESTINATION: System manager (from local system configuration). CROSS-REFERENCE: `14.6^B` 1)= S ^%ZIS(14.6,"B",$E(X,1,30),DA)="" 2)= K ^%ZIS(14.6,"B",$E(X,1,30),DA) This cross-reference is used directly only by FileMan. CROSS-REFERENCE: `14.6^AC^MUMPS` 1)= I $D(^%ZIS(14.6,DA,0))#2,X]"" N ZT S ZT=^(0) D S01^XUTMG146 K ZT 2)= I $D(^%ZIS(14.6,DA,0))#2,X]"" N ZT S ZT=^(0) D K01^XUTMG146 K ZT This cross-reference updates the "AT" and "AV" indices.
1	FROM VOLUME SET	0;5	POINTER TO VOLUME SET FILE (#14.5)	**********************REQUIRED FIELD********************** VOLUME SET(#14.5) INPUT TRANSFORM: `S DIC("S")="I Y'=$P(^%ZIS(14.6,DA,0),U,6)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `FEB 12, 1991` DESCRIPTION: Answer should be the name of the volume set from which the task is being transferred. TECHNICAL DESCR: Altering the pointer value in this field triggers changes to the free text value in field 1.5, which is used to generate the correct cross-references. SCREEN: `S DIC("S")="I Y'=$P(^%ZIS(14.6,DA,0),U,6)"` EXPLANATION: `UCIs must be associated with UCIs on different volume sets.` SOURCE OF DATA: System manager (from local system configuration). DATA DESTINATION: System manager (from local system configuration). CROSS-REFERENCE: `^^TRIGGER^14.6^1.5` 1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^%ZIS(14.6,D0,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y X ^DD(14.6,1,1,1,1.1) X ^DD(14.6,1,1,1,1.4) 1.1)= S X=DIV S X=$S('$D(^%ZIS(14.5,+DIV,0)):"",1:$P(^(0),U,1)) 1.4)= S DIH=$S($D(^%ZIS(14.6,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,2)=DIV,DIH=14.6,DIG=1.5 D ^DICR:$O(^DD(DIH,DIG,1,0))>0 2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^%ZIS(14.6,D0,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y S X="" X ^DD(14.6,1,1,1,2.4) 2.4)= S DIH=$S($D(^%ZIS(14.6,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,2)=DIV,DIH=14.6,DIG=1.5 D ^DICR:$O(^DD(DIH,DIG,1,0))>0 CREATE VALUE)= FROM VOLUME SET DELETE VALUE)= @ FIELD)= FROM VOLUME SET This cross-reference triggers changing the free text value in field 1.5 that corresponds to the pointer value in this field.
1.5	FROM VOLUME SET (FREE TEXT)	0;2	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<2) X` LAST EDITED: `FEB 13, 1991` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: This field is write protected and uneditable. It is triggered by field 1, and holds the resolved pointer values for use in the file's cross- references. TECHNICAL DESCR: This field is used to generate the correct cross-references for field 1. This value can only be altered by the trigger on field 1, which ensures that only valid VOLUME SET names are used. WRITE AUTHORITY: ^ SOURCE OF DATA: System manager (from local system configuration). DATA DESTINATION: System manager (from local system configuration). NOTES: `TRIGGERED by the FROM VOLUME SET field of the UCI ASSOCIATION File` CROSS-REFERENCE: `14.6^AD^MUMPS` 1)= I $D(^%ZIS(14.6,DA,0))#2,X]"" N ZT S ZT=^(0) D S15^XUTMG146 K ZT 2)= I $D(^%ZIS(14.6,DA,0))#2,X]"" N ZT S ZT=^(0) D K15^XUTMG146 K ZT This cross-reference updates the "AT" and "AV" indices.
2	TO VOLUME SET	0;6	POINTER TO VOLUME SET FILE (#14.5)	VOLUME SET(#14.5) INPUT TRANSFORM: `S DIC("S")="I Y'=$P(^%ZIS(14.6,DA,0),U,5)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `FEB 12, 1991` DESCRIPTION: Answer should be the name of the volume set to which the task is being transferred. TECHNICAL DESCR: The pointer value placed in this field triggers placing the free text value in field 2.5 so that the correct cross-references are made. SCREEN: `S DIC("S")="I Y'=$P(^%ZIS(14.6,DA,0),U,5)"` EXPLANATION: `UCIs must be associated with UCIs on different volume sets.` SOURCE OF DATA: System manager (from local system configuration). DATA DESTINATION: System manager (from local system configuration). CROSS-REFERENCE: `^^TRIGGER^14.6^2.5` 1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^%ZIS(14.6,D0,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y X ^DD(14.6,2,1,1,1.1) X ^DD(14.6,2,1,1,1.4) 1.1)= S X=DIV S X=$S('$D(^%ZIS(14.5,+DIV,0)):"",1:$P(^(0),U,1)) 1.4)= S DIH=$S($D(^%ZIS(14.6,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,3)=DIV,DIH=14.6,DIG=2.5 D ^DICR:$O(^DD(DIH,DIG,1,0))>0 2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^%ZIS(14.6,D0,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X="" X ^DD(14.6,2,1,1,2.4) 2.4)= S DIH=$S($D(^%ZIS(14.6,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,3)=DIV,DIH=14.6,DIG=2.5 D ^DICR:$O(^DD(DIH,DIG,1,0))>0 CREATE VALUE)= TO VOLUME SET DELETE VALUE)= @ FIELD)= TO VOLUME SET This cross-reference triggers changing the free text value in field 2.5 to correspond to the pointer value in this field.
2.5	TO VOLUME SET (FREE TEXT)	0;3	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<2) X` LAST EDITED: `FEB 13, 1991` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: This field is write protected and uneditable. It is triggered by field 2, and holds the resolved pointer values for use in the file's cross- references. TECHNICAL DESCR: This field holds the free text value associated with the value in field 2, and is triggered by changing that field. This value is used to set the correct cross-references for field 2. WRITE AUTHORITY: ^ SOURCE OF DATA: System manager (from local system configuration). DATA DESTINATION: System manager (from local system configuration). NOTES: `TRIGGERED by the TO VOLUME SET field of the UCI ASSOCIATION File` CROSS-REFERENCE: `14.6^AE^MUMPS` 1)= I $D(^%ZIS(14.6,DA,0))#2,X]"" N ZT S ZT=^(0) D S25^XUTMG146 K ZT 2)= I $D(^%ZIS(14.6,DA,0))#2,X]"" N ZT S ZT=^(0) D K25^XUTMG146 K ZT This cross-reference updates the "AT" and "AV" indices.
3	TO UCI	0;4	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>32!($L(X)<2)!'(X?2ANP.ANP) X` LAST EDITED: `FEB 13, 1991` HELP-PROMPT: `Answer must be 2-32 characters in length.` DESCRIPTION: Answer should be the name of the uci to which the task will be transferred. SOURCE OF DATA: System manager (from local system configuration). DATA DESTINATION: System manager (from local system configuration). CROSS-REFERENCE: `14.6^AF^MUMPS` 1)= I $D(^%ZIS(14.6,DA,0))#2,X]"" N ZT S ZT=^(0) D S3^XUTMG146 K ZT 2)= I $D(^%ZIS(14.6,DA,0))#2,X]"" N ZT S ZT=^(0) D K3^XUTMG146 K ZT This cross-reference updates the "AT" and "AV" indices.

Name	Field # of Occurrence
^DIC	1+1, 2+1
^DICR	1(XREF 1n1.4), 1(XREF 1n2.4), 2(XREF 1n1.4), 2(XREF 1n2.4)
Y^DIQ	ID1+1, ID2+1
K01^XUTMG146	.01(XREF 2K)
K15^XUTMG146	1.5(XREF 1K)
K25^XUTMG146	2.5(XREF 1K)
K3^XUTMG146	3(XREF 1K)
S01^XUTMG146	.01(XREF 2S)
S15^XUTMG146	1.5(XREF 1S)
S25^XUTMG146	2.5(XREF 1S)
S3^XUTMG146	3(XREF 1S)

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(14.5 - [#14.5]	ID1+1, ID2+1, 1(XREF 1n1.1), 2(XREF 1n1.1)
^%ZIS(14.6 - [#14.6]	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), 1(XREF 1S), 1(XREF 1n1.4), 1(XREF 1K), 1(XREF 1n2.4), 1.5(XREF 1S), 1.5(XREF 1K) , 2(XREF 1S), 2(XREF 1n1.4), 2(XREF 1K), 2(XREF 1n2.4), 2.5(XREF 1S), 2.5(XREF 1K), 3(XREF 1S), 3(XREF 1K)
^DD(	1(XREF 1n1.4), 1(XREF 1n2.4), 2(XREF 1n1.4), 2(XREF 1n2.4)
^DD(14.5	ID1+1, ID2+1
^DD(14.6	1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K)

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%I	ID1+1!, ID2+1!
>> C	ID1+1, ID2+1
>> D0	1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K)
>> DA	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), 1(XREF 1S), 1(XREF 1K), 1.5(XREF 1S), 1.5(XREF 1K), 2(XREF 1S), 2(XREF 1K) , 2.5(XREF 1S), 2.5(XREF 1K), 3(XREF 1S), 3(XREF 1K)
DIC	ID1+1, ID2+1, 1+1!, 2+1!
DIC("S"	1+1, 1SCR+1, 2+1, 2SCR+1
>> DIE	1+1, 2+1
>> DIG	1(XREF 1n1.4), 1(XREF 1n2.4), 2(XREF 1n1.4), 2(XREF 1n2.4)
>> DIH	1(XREF 1n1.4), 1(XREF 1n2.4), 2(XREF 1n1.4), 2(XREF 1n2.4)
>> DIU	1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K)
DIV	1(XREF 1S), 1(XREF 1n1.1), 1(XREF 1n1.4), 1(XREF 1K), 1(XREF 1n2.4), 2(XREF 1S), 2(XREF 1n1.1), 2(XREF 1n1.4), 2(XREF 1K), 2(XREF 1n2.4)
DIV(0	1(XREF 1S), 1(XREF 1n1.4), 1(XREF 1K), 1(XREF 1n2.4), 2(XREF 1S), 2(XREF 1n1.4), 2(XREF 1K), 2(XREF 1n2.4)
U	ID1+1, ID2+1, ID3+1, 1(XREF 1S), 1(XREF 1n1.1), 1(XREF 1n1.4), 1(XREF 1K), 1(XREF 1n2.4), 2(XREF 1S), 2(XREF 1n1.1) , 2(XREF 1n1.4), 2(XREF 1K), 2(XREF 1n2.4)
X	.001+1!, .01+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), 1+1!, 1(XREF 1S), 1(XREF 1n1.1), 1(XREF 1n1.4) , 1(XREF 1K), 1(XREF 1n2.4), 1.5+1!, 1.5(XREF 1S), 1.5(XREF 1K), 2+1!, 2(XREF 1S), 2(XREF 1n1.1), 2(XREF 1n1.4), 2(XREF 1K) , 2(XREF 1n2.4), 2.5+1!, 2.5(XREF 1S), 2.5(XREF 1K), 3+1!, 3(XREF 1S), 3(XREF 1K)
Y	ID1+1, ID2+1, 1+1, 1(XREF 1S), 1(XREF 1K), 2+1, 2(XREF 1S), 2(XREF 1K)
Y(1	1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K)
ZT	.01(XREF 2S), .01(XREF 2K), 1.5(XREF 1S), 1.5(XREF 1K), 2.5(XREF 1S), 2.5(XREF 1K), 3(XREF 1S), 3(XREF 1K)

Customize PDF page

Package: Kernel

Global: ^%ZIS(14.6

Information

Description

Directly Accessed By Routines, Total: 11

Pointer To FileMan Files, Total: 1

Fields, Total: 7

External References

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend: