Class TbsOUL_R23_28

Unit

BSHL728

Declaration

type TbsOUL_R23_28 = class(TbsHL7Message)

Description

Represents a OUL_R23(Unsolicited Specimen Container Oriented Observation Message) message structure. This structure contains the following elements:

1. MSH, required

2. SFT, optional repeating

3. UAC, optional

4. NTE, optional

5. PATIENT, optional

6. NK1, optional repeating

7. SPECIMEN, required repeating

8. DSC, optional

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Group
• TBSHL7Message
• TbsOUL_R23_28

Overview

Methods

	function SFTRepCount : Integer ;
	function NK1RepCount : Integer ;
	function SPECIMENRepCount : 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 NTE : TbsNTE_28 read GetNTE write SetNTE;
	property PATIENT : TbsOUL_R23_PATIENT_28 read GetPATIENT write SetPATIENT;
	property NK1[RepCount:Integer]: TbsNK1_28 read GetNK1 write SetNK1;
	property SPECIMEN[RepCount:Integer]: TbsOUL_R23_SPECIMEN_28 read GetSPECIMEN write SetSPECIMEN;
	property DSC : TbsDSC_28 read GetDSC write SetDSC;

Description

Methods

	function SFTRepCount : Integer ;

	function NK1RepCount : Integer ;

	function SPECIMENRepCount : 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 NTE : TbsNTE_28 read GetNTE write SetNTE;
NTE, Min : 0, Max : 1

	property PATIENT : TbsOUL_R23_PATIENT_28 read GetPATIENT write SetPATIENT;
PATIENT, Min : 0, Max : 1

	property NK1[RepCount:Integer]: TbsNK1_28 read GetNK1 write SetNK1;
NK1, Usage : O, Min : 0, Max : *

	property SPECIMEN[RepCount:Integer]: TbsOUL_R23_SPECIMEN_28 read GetSPECIMEN write SetSPECIMEN;
SPECIMEN, Usage : R, Min : 1, Max : *

	property DSC : TbsDSC_28 read GetDSC write SetDSC;
DSC, Min : 0, Max : 1