Class TbsPIP_28

Unit

BSHL7DT28

Declaration

type TbsPIP_28 = class(TbsHL7Object)

Description

Practitioner Institutional Privileges

Hierarchy

• TBSTypedObject
• TBSTypedComposite
• TBSHL7Object
• TbsPIP_28

Overview

Methods

procedure Init; override;

Properties

	property Privilege: TbsCWE_28 read GetPrivilege write SetPrivilege;
	property PrivilegeClass: TbsCWE_28 read GetPrivilegeClass write SetPrivilegeClass;
	property ExpirationDate: TbsDT_28 read GetExpirationDate write SetExpirationDate;
	property ActivationDate: TbsDT_28 read GetActivationDate write SetActivationDate;
	property Facility: TbsEI_28 read GetFacility write SetFacility;

Description

Methods

	procedure Init; override;

Properties

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

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

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

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

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