Class TbsRMC_28

Unit

BSHL7DT28

Declaration

type TbsRMC_28 = class(TbsHL7Object)

Description

Room Coverage

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TbsRMC_28

Overview

Methods

procedure Init; override;

Properties

	property RoomType: TbsCWE_28 read GetRoomType write SetRoomType;
	property AmountType: TbsCWE_28 read GetAmountType write SetAmountType;
	property CoverageAmount: TbsST_28 read GetCoverageAmount write SetCoverageAmount;
	property MoneyOrPercentage: TbsMOP_28 read GetMoneyOrPercentage write SetMoneyOrPercentage;

Description

Methods

	procedure Init; override;

Properties

	property RoomType: TbsCWE_28 read GetRoomType write SetRoomType;
Room Type, Min : 0, Max : 1

	property AmountType: TbsCWE_28 read GetAmountType write SetAmountType;
Amount Type, Min : 0, Max : 1

	property CoverageAmount: TbsST_28 read GetCoverageAmount write SetCoverageAmount;
Coverage Amount, Min : 0, Max : 1

	property MoneyOrPercentage: TbsMOP_28 read GetMoneyOrPercentage write SetMoneyOrPercentage;
Money Or Percentage, Min : 0, Max : 1