Class TbsEAR_U08_28

Unit

BSHL728

Declaration

type TbsEAR_U08_28 = class(TbsHL7Message)

Description

Represents a EAR_U08(Automated equipment response) message structure. This structure contains the following elements:

1. MSH, required

2. SFT, optional repeating

3. UAC, optional

4. EQU, required

5. COMMAND_RESPONSE, required repeating

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Group
• TBSHL7Message
• TbsEAR_U08_28

Overview

Methods

	function SFTRepCount : Integer ;
	function COMMAND_RESPONSERepCount : Integer ;
	procedure Init; override;

Properties

	property MSH : TbsMSH_28 read GetMSH write SetMSH;
	property SFT[RepCount:Integer]: TbsSFT_28 read GetSFT write SetSFT;
	property UAC : TbsUAC_28 read GetUAC write SetUAC;
	property EQU : TbsEQU_28 read GetEQU write SetEQU;
	property COMMAND_RESPONSE[RepCount:Integer]: TbsEAR_U08_COMMAND_RESPONSE_28 read GetCOMMAND_RESPONSE write SetCOMMAND_RESPONSE;

Description

Methods

	function SFTRepCount : Integer ;

	function COMMAND_RESPONSERepCount : Integer ;

	procedure Init; override;

Properties

	property MSH : TbsMSH_28 read GetMSH write SetMSH;
MSH, Min : 1, Max : 1

	property SFT[RepCount:Integer]: TbsSFT_28 read GetSFT write SetSFT;
SFT, Usage : O, Min : 0, Max : *

	property UAC : TbsUAC_28 read GetUAC write SetUAC;
UAC, Min : 0, Max : 1

	property EQU : TbsEQU_28 read GetEQU write SetEQU;
EQU, Min : 1, Max : 1

	property COMMAND_RESPONSE[RepCount:Integer]: TbsEAR_U08_COMMAND_RESPONSE_28 read GetCOMMAND_RESPONSE write SetCOMMAND_RESPONSE;
COMMAND_RESPONSE, Usage : R, Min : 1, Max : *