Class TbsMDM_T10_28

Unit

BSHL728

Declaration

type TbsMDM_T10_28 = class(TbsHL7Message)

Description

Represents a MDM_T10(Document replacement notification and content) message structure. This structure contains the following elements:

1. MSH, required

2. SFT, optional repeating

3. UAC, optional

4. EVN, required

5. PID, required

6. PV1, required

7. COMMON_ORDER, optional repeating

8. TXA, required

9. CON, optional repeating

10. OBSERVATION, required repeating

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Group
• TBSHL7Message
• TbsMDM_T10_28

Overview

Methods

	function SFTRepCount : Integer ;
	function COMMON_ORDERRepCount : Integer ;
	function CONRepCount : Integer ;
	function OBSERVATIONRepCount : 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 EVN : TbsEVN_28 read GetEVN write SetEVN;
	property PID : TbsPID_28 read GetPID write SetPID;
	property PV1 : TbsPV1_28 read GetPV1 write SetPV1;
	property COMMON_ORDER[RepCount:Integer]: TbsMDM_T10_COMMON_ORDER_28 read GetCOMMON_ORDER write SetCOMMON_ORDER;
	property TXA : TbsTXA_28 read GetTXA write SetTXA;
	property CON[RepCount:Integer]: TbsCON_28 read GetCON write SetCON;
	property OBSERVATION[RepCount:Integer]: TbsMDM_T10_OBSERVATION_28 read GetOBSERVATION write SetOBSERVATION;

Description

Methods

	function SFTRepCount : Integer ;

	function COMMON_ORDERRepCount : Integer ;

	function CONRepCount : Integer ;

	function OBSERVATIONRepCount : 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 EVN : TbsEVN_28 read GetEVN write SetEVN;
EVN, Min : 1, Max : 1

	property PID : TbsPID_28 read GetPID write SetPID;
PID, Min : 1, Max : 1

	property PV1 : TbsPV1_28 read GetPV1 write SetPV1;
PV1, Min : 1, Max : 1

	property COMMON_ORDER[RepCount:Integer]: TbsMDM_T10_COMMON_ORDER_28 read GetCOMMON_ORDER write SetCOMMON_ORDER;
COMMON_ORDER, Usage : O, Min : 0, Max : *

	property TXA : TbsTXA_28 read GetTXA write SetTXA;
TXA, Min : 1, Max : 1

	property CON[RepCount:Integer]: TbsCON_28 read GetCON write SetCON;
CON, Usage : O, Min : 0, Max : *

	property OBSERVATION[RepCount:Integer]: TbsMDM_T10_OBSERVATION_28 read GetOBSERVATION write SetOBSERVATION;
OBSERVATION, Usage : R, Min : 1, Max : *