Class TbsLOC_28

Unit

BSHL7DT28

Declaration

type TbsLOC_28 = class(TbsHL7Segment)

Description

Location Identification The LOC segment can identify any patient location referenced by information systems. This segment gives physical set up information about the location. This is not intended to include any current occupant or current use information. There should be one LOC segment for each patient location. If desired, there can also be one LOC segment for each nursing unit and room.

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TBSHL7Segment
• TbsLOC_28

Overview

Methods

	function LocationTypeLocRepCount : Integer;
	function OrganizationNameLocRepCount : Integer;
	function LocationAddressRepCount : Integer;
	function LocationPhoneRepCount : Integer;
	function LicenseNumberRepCount : Integer;
	function LocationEquipmentRepCount : Integer;

Properties

	property PrimaryKeyValueLoc : TbsPL_28 read GetPrimaryKeyValueLoc write SetPrimaryKeyValueLoc;
	property LocationDescription : TbsST_28 read GetLocationDescription write SetLocationDescription;
	property LocationTypeLoc[RepCount:Integer]: TbsCWE_28 read GetLocationTypeLoc write SetLocationTypeLoc;
	property OrganizationNameLoc[RepCount:Integer]: TbsXON_28 read GetOrganizationNameLoc write SetOrganizationNameLoc;
	property LocationAddress[RepCount:Integer]: TbsXAD_28 read GetLocationAddress write SetLocationAddress;
	property LocationPhone[RepCount:Integer]: TbsXTN_28 read GetLocationPhone write SetLocationPhone;
	property LicenseNumber[RepCount:Integer]: TbsCWE_28 read GetLicenseNumber write SetLicenseNumber;
	property LocationEquipment[RepCount:Integer]: TbsCWE_28 read GetLocationEquipment write SetLocationEquipment;
	property LocationServiceCode : TbsCWE_28 read GetLocationServiceCode write SetLocationServiceCode;

Description

Methods

	function LocationTypeLocRepCount : Integer;

	function OrganizationNameLocRepCount : Integer;

	function LocationAddressRepCount : Integer;

	function LocationPhoneRepCount : Integer;

	function LicenseNumberRepCount : Integer;

	function LocationEquipmentRepCount : Integer;

Properties

	property PrimaryKeyValueLoc : TbsPL_28 read GetPrimaryKeyValueLoc write SetPrimaryKeyValueLoc;
Primary Key Value - Loc, Min : 1, Max : 1

	property LocationDescription : TbsST_28 read GetLocationDescription write SetLocationDescription;
Location Description, Min : 0, Max : 1

	property LocationTypeLoc[RepCount:Integer]: TbsCWE_28 read GetLocationTypeLoc write SetLocationTypeLoc;
Location Type - Loc, Min : 1, Max : *

	property OrganizationNameLoc[RepCount:Integer]: TbsXON_28 read GetOrganizationNameLoc write SetOrganizationNameLoc;
Organization Name - Loc, Min : 0, Max : *

	property LocationAddress[RepCount:Integer]: TbsXAD_28 read GetLocationAddress write SetLocationAddress;
Location Address, Min : 0, Max : *

	property LocationPhone[RepCount:Integer]: TbsXTN_28 read GetLocationPhone write SetLocationPhone;
Location Phone, Min : 0, Max : *

	property LicenseNumber[RepCount:Integer]: TbsCWE_28 read GetLicenseNumber write SetLicenseNumber;
License Number, Min : 0, Max : *

	property LocationEquipment[RepCount:Integer]: TbsCWE_28 read GetLocationEquipment write SetLocationEquipment;
Location Equipment, Min : 0, Max : *

	property LocationServiceCode : TbsCWE_28 read GetLocationServiceCode write SetLocationServiceCode;
Location Service Code, Min : 0, Max : 1