Class TbsPEX_P07_24

Unit

BSHL724

Declaration

type TbsPEX_P07_24 = class(TbsHL7Message)

Description

Represents a PEX_P07(Unsolicited initial individual product experience report) message structure. This structure contains the following elements:

1. MSH, required

2. EVN, required

3. PID, required

4. PD1, optional

5. NTE, optional repeating

6. VISIT, optional

7. EXPERIENCE, required repeating

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Group
• TBSHL7Message
• TbsPEX_P07_24

Overview

Methods

	function NTERepCount : Integer ;
	function EXPERIENCERepCount : Integer ;
	procedure Init; override;

Properties

	property MSH : TbsMSH_24 read GetMSH write SetMSH;
	property EVN : TbsEVN_24 read GetEVN write SetEVN;
	property PID : TbsPID_24 read GetPID write SetPID;
	property PD1 : TbsPD1_24 read GetPD1 write SetPD1;
	property NTE[RepCount:Integer]: TbsNTE_24 read GetNTE write SetNTE;
	property VISIT : TbsPEX_P07_VISIT_24 read GetVISIT write SetVISIT;
	property EXPERIENCE[RepCount:Integer]: TbsPEX_P07_EXPERIENCE_24 read GetEXPERIENCE write SetEXPERIENCE;

Description

Methods

	function NTERepCount : Integer ;

	function EXPERIENCERepCount : Integer ;

	procedure Init; override;

Properties

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

	property EVN : TbsEVN_24 read GetEVN write SetEVN;
EVN, Min : 1, Max : 1

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

	property PD1 : TbsPD1_24 read GetPD1 write SetPD1;
PD1, Min : 0, Max : 1

	property NTE[RepCount:Integer]: TbsNTE_24 read GetNTE write SetNTE;
NTE, Usage : O, Min : 0, Max : *

	property VISIT : TbsPEX_P07_VISIT_24 read GetVISIT write SetVISIT;
VISIT, Min : 0, Max : 1

	property EXPERIENCE[RepCount:Integer]: TbsPEX_P07_EXPERIENCE_24 read GetEXPERIENCE write SetEXPERIENCE;
EXPERIENCE, Usage : R, Min : 1, Max : *