Class TbsRMC_26

Unit

BSHL7DT26

Declaration

type TbsRMC_26 = class(TbsHL7Object)

Description

Room Coverage

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TbsRMC_26

Overview

Methods

procedure Init; override;

Properties

	property RoomType: TbsIS_26 read GetRoomType write SetRoomType;
	property AmountType: TbsIS_26 read GetAmountType write SetAmountType;
	property CoverageAmount: TbsNM_26 read GetCoverageAmount write SetCoverageAmount;
	property MoneyorPercentage: TbsMOP_26 read GetMoneyorPercentage write SetMoneyorPercentage;

Description

Methods

	procedure Init; override;

Properties

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

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

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

	property MoneyorPercentage: TbsMOP_26 read GetMoneyorPercentage write SetMoneyorPercentage;
Money or Percentage, Min : 0, Max : 1