Class TbsADT_A54_251

Unit

BSHL7251

Declaration

type TbsADT_A54_251 = class(TbsHL7Message)

Description

Represents a ADT_A54(Change attending doctor) message structure. This structure contains the following elements:

1. MSH, required

2. SFT, optional repeating

3. EVN, required

4. PID, required

5. PD1, optional

6. ROL, optional repeating

7. PV1, required

8. PV2, optional

9. ROL, optional repeating

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Group
• TBSHL7Message
• TbsADT_A54_251

Overview

Methods

	function SFTRepCount : Integer ;
	function ROLRepCount : Integer ;
	function ROL2RepCount : Integer ;
	procedure Init; override;

Properties

	property MSH : TbsMSH_251 read GetMSH write SetMSH;
	property SFT[RepCount:Integer]: TbsSFT_251 read GetSFT write SetSFT;
	property EVN : TbsEVN_251 read GetEVN write SetEVN;
	property PID : TbsPID_251 read GetPID write SetPID;
	property PD1 : TbsPD1_251 read GetPD1 write SetPD1;
	property ROL[RepCount:Integer]: TbsROL_251 read GetROL write SetROL;
	property PV1 : TbsPV1_251 read GetPV1 write SetPV1;
	property PV2 : TbsPV2_251 read GetPV2 write SetPV2;
	property ROL2[RepCount:Integer]: TbsROL_251 read GetROL2 write SetROL2;

Description

Methods

	function SFTRepCount : Integer ;

	function ROLRepCount : Integer ;

	function ROL2RepCount : Integer ;

	procedure Init; override;

Properties

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

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

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

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

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

	property ROL[RepCount:Integer]: TbsROL_251 read GetROL write SetROL;
ROL, Usage : O, Min : 0, Max : *

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

	property PV2 : TbsPV2_251 read GetPV2 write SetPV2;
PV2, Min : 0, Max : 1

	property ROL2[RepCount:Integer]: TbsROL_251 read GetROL2 write SetROL2;
ROL, Usage : O, Min : 0, Max : *