Class TbsPIP_24

Unit

BSHL7DT24

Declaration

type TbsPIP_24 = class(TbsHL7Object)

Description

Privileges

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TbsPIP_24

Overview

Methods

procedure Init; override;

Properties

	property Privilege: TbsCE_24 read GetPrivilege write SetPrivilege;
	property PrivilegeClass: TbsCE_24 read GetPrivilegeClass write SetPrivilegeClass;
	property ExpirationDate: TbsDT_24 read GetExpirationDate write SetExpirationDate;
	property ActivationDate: TbsDT_24 read GetActivationDate write SetActivationDate;
	property Facility: TbsEI_24 read GetFacility write SetFacility;

Description

Methods

	procedure Init; override;

Properties

	property Privilege: TbsCE_24 read GetPrivilege write SetPrivilege;
Privilege, Min : 0, Max : 1

	property PrivilegeClass: TbsCE_24 read GetPrivilegeClass write SetPrivilegeClass;
Privilege Class, Min : 0, Max : 1

	property ExpirationDate: TbsDT_24 read GetExpirationDate write SetExpirationDate;
Expiration Date, Min : 0, Max : 1

	property ActivationDate: TbsDT_24 read GetActivationDate write SetActivationDate;
Activation Date, Min : 0, Max : 1

	property Facility: TbsEI_24 read GetFacility write SetFacility;
Facility, Min : 0, Max : 1