Sub-Field: 101.0775

Parent File	Name	Number	Package
PROTOCOL(#101)	SUBSCRIBERS	101.0775	Kernel

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	SUBSCRIBERS	0;1	POINTER TO PROTOCOL FILE (#101)	PROTOCOL(#101) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),U,4)=""S""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `JUL 22, 1999` DESCRIPTION: This contains Protocols of Type, Subscribers, who are subscribing to this Event Drivers. SCREEN: `S DIC("S")="I $P(^(0),U,4)=""S"""` EXPLANATION: `Type must be Subscriber` CROSS-REFERENCE: `101.0775^B` 1)= S ^ORD(101,DA(1),775,"B",$E(X,1,30),DA)="" 2)= K ^ORD(101,DA(1),775,"B",$E(X,1,30),DA) CROSS-REFERENCE: `101^AB` 1)= S ^ORD(101,"AB",$E(X,1,30),DA(1),DA)="" 2)= K ^ORD(101,"AB",$E(X,1,30),DA(1),DA)

SUBSCRIBERS

0;1

POINTER TO PROTOCOL FILE (#101)

INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,4)=""S""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JUL 22, 1999

DESCRIPTION:

This contains Protocols of Type, Subscribers, who are subscribing to this Event Drivers.

CROSS-REFERENCE: 101.0775^B

1)= S ^ORD(101,DA(1),775,"B",$E(X,1,30),DA)=""

2)= K ^ORD(101,DA(1),775,"B",$E(X,1,30),DA)

CROSS-REFERENCE: 101^AB

1)= S ^ORD(101,"AB",$E(X,1,30),DA(1),DA)=""

2)= K ^ORD(101,"AB",$E(X,1,30),DA(1),DA)