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

Print Page as PDF

Sub-Field: 779.41

Package: Health Level Seven

HLO SUBSCRIPTION REGISTRY(#779.4)-->779.41

Sub-Field: 779.41

Information

Parent File	Name	Number	Package
HLO SUBSCRIPTION REGISTRY(#779.4)	RECIPIENTS	779.41	Health Level Seven

Details

Field #	Name	Loc	Type	Details
.01	RECEIVING APPLICATION	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>60!($L(X)<3) X` LAST EDITED: `MAY 06, 2013` HELP-PROMPT: `Enter the name of the application that will receive the messages. (3-60 characters)` CROSS-REFERENCE: `779.41^B` `1)= S ^HLS(779.4,DA(1),2,"B",$E(X,1,30),DA)=""` `2)= K ^HLS(779.4,DA(1),2,"B",$E(X,1,30),DA)` FIELD INDEX: `AD (#93) MUMPS IR SORTING ONLY` `Short Descr: Used to determine if the recipient is already on the subscription list.` `Set Logic: S ^HLD(779.4,DA(1),2,"AD",X2(1),+X2(2),X2(3),DA)=""` `Kill Logic: K ^HLD(779.4,DA(1),2,"AD",X1(1),+X1(2),X1(3),DA)` `X(1): RECEIVING APPLICATION (779.41,.01) (Subscr 1) (forwards)` `X(2): Computed Code: S X=$$TLINK^HLOASUB(DA(1),DA)` `(Subscr 2) (Len 10) (forwards)` `X(3): Computed Code: S X=$TR($P(^HLD(779.4,DA(1),2,DA,0),"^",3,5),"^","")` `(Subscr 3) (forwards)` RECORD INDEXES: `AE (#306)`
.02	MIDDLEWARE LOGICAL LINK	0;2	POINTER TO HL LOGICAL LINK FILE (#870)	HL LOGICAL LINK(#870) INPUT TRANSFORM: `S DIC("S")="I $P($G(^HLCS(870,Y,400)),""^"",3)=""C""" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X` LAST EDITED: `MAY 28, 2009` HELP-PROMPT: `If messages should be routed via middleware, such as an interface engine, what is the HL Logical Link?` DESCRIPTION: `This field determines the HL Logical Link over which to transmit messages to this recipient. It determines the IP address and port, but not the receiving facility field that appears in the message header.` `This field is optional and should be entered only if messages should be routed through middleware, such as an interface engine. Otherwise it should not be entered, and the field FACILITY LOGICAL LINK will be used to` `determine the IP address and port over which to send messages.` SCREEN: `S DIC("S")="I $P($G(^HLCS(870,Y,400)),""^"",3)=""C"""` EXPLANATION: `Allows only TCP clients.` RECORD INDEXES: `AE (#306)`
.021	FACILITY LOGICAL LINK	0;6	POINTER TO HL LOGICAL LINK FILE (#870)	**********************REQUIRED FIELD********************** HL LOGICAL LINK(#870) INPUT TRANSFORM: `S DIC("S")="I $P($G(^HLCS(870,Y,400)),""^"",3)=""C""" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X` LAST EDITED: `MAY 28, 2009` HELP-PROMPT: `What is the HL Logical Link for the receiving facility?` DESCRIPTION: `This field determines the receiving facility field that appears in the message header for messages sent to this recipient. If the MIDDLEWARE LOGICAL LINK field is blank, then this field also determines the IP address` `and port over which to send the message.` SCREEN: `S DIC("S")="I $P($G(^HLCS(870,Y,400)),""^"",3)=""C"""` EXPLANATION: `Allows only TCP clients.` RECORD INDEXES: `AE (#306)`
.03	RECEIVING FACILITY COMPONENT 1	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>50!($L(X)<1) X` LAST EDITED: `MAR 25, 2009` HELP-PROMPT: `Answer must be 1-50 characters in length` DESCRIPTION: `This is the value that should be placed in component 1 of the receiving facility field of the message header.`
.04	RECEIVING FACILITY COMPONENT 2	0;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>50!($L(X)<1) X` LAST EDITED: `MAR 25, 2009` HELP-PROMPT: `Answer must be 1-50 characters in length` DESCRIPTION: `This is the value that should be placed in component 2 of the receiving facility field of the message header.`
.05	RECEIVING FACILITY COMPONENT 3	0;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `MAR 25, 2009` HELP-PROMPT: `Answer must be 1-10 characters in length` DESCRIPTION: `This is the value that should be placed in component 3 of the receiving facility field of the message header.`
1.01	DATE/TIME ADDED	1;1	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:X<1 X` LAST EDITED: `MAY 26, 2004` HELP-PROMPT: `Enter the date and time that this recipient was added to the subscription list.` RECORD INDEXES: `AC (#92), AC (#713)`
1.02	DATE/TIME TERMINATED	1;2	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:X<1 X` LAST EDITED: `MAY 26, 2004` HELP-PROMPT: `Enter the date and time that this recipient was dropped from the subscription list` RECORD INDEXES: `AC (#92), AC (#713)`