Class TbsLCC_25

Unit

BSHL7DT25

Declaration

type TbsLCC_25 = class(TbsHL7Segment)

Description

Location Charge Code The Technical Steward for the LCC segment is PA.

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Segment
• TbsLCC_25

Overview

Methods

	function AccommodationTypeRepCount : Integer;
	function ChargeCodeRepCount : Integer;

Properties

	property PrimaryKeyValueLCC : TbsPL_25 read GetPrimaryKeyValueLCC write SetPrimaryKeyValueLCC;
	property LocationDepartment : TbsCE_25 read GetLocationDepartment write SetLocationDepartment;
	property AccommodationType[RepCount:Integer]: TbsCE_25 read GetAccommodationType write SetAccommodationType;
	property ChargeCode[RepCount:Integer]: TbsCE_25 read GetChargeCode write SetChargeCode;

Description

Methods

	function AccommodationTypeRepCount : Integer;

	function ChargeCodeRepCount : Integer;

Properties

	property PrimaryKeyValueLCC : TbsPL_25 read GetPrimaryKeyValueLCC write SetPrimaryKeyValueLCC;
Primary Key Value - LCC, Min : 1, Max : 1

	property LocationDepartment : TbsCE_25 read GetLocationDepartment write SetLocationDepartment;
Location Department, Min : 1, Max : 1

	property AccommodationType[RepCount:Integer]: TbsCE_25 read GetAccommodationType write SetAccommodationType;
Accommodation Type, Min : 0, Max : *

	property ChargeCode[RepCount:Integer]: TbsCE_25 read GetChargeCode write SetChargeCode;
Charge Code, Min : 1, Max : *