Class TJCoreOPFPID

Unit

JCoreOPFMetadata

Declaration

type TJCoreOPFPID = class(TInterfacedObject, IJCorePID)

Description

Hierarchy

• TInterfacedObject
• TJCoreOPFPID

Overview

Methods

	constructor Create(const AEntity: TObject; const AMetadata: TJCoreOPFClassMetadata);
	destructor Destroy; override;
	function AcquireADM(const AAttributeName: string): TJCoreOPFADM;
	function ADMByName(const AAttributeName: string): IJCoreADM;
	function ADMMappingCount: Integer;
	procedure AssignOwner(const AOwner: TJCoreOPFPID; const AOwnerADM: TJCoreOPFADMCollection);
	procedure AttachManager(const APIDManager: IJCoreOPFPIDManager);
	procedure Commit;
	function IsDirty: Boolean;
	function Lazyload(const AAttrAddr: Pointer): Boolean;
	procedure ReadSequenceField(const AResultSet: IJCoreOPFResultSet);
	procedure WriteSequenceField(const AParams: IJCoreOPFParams);

Properties

	property ADMMapping[constAIndex:Integer]: TJCoreOPFADMMapping read GetADMMapping;
	property IsPersistent: Boolean read FIsPersistent;
	property Entity: TObject read FEntity;
	property Metadata: TJCoreOPFClassMetadata read FMetadata;
	property OID: IJCoreOPFOID read FOID write SetOID;
	property Owner: TJCoreOPFPID read FOwner;
	property Sequence: Integer read FSequence write FSequence;
	property SequenceCache: Integer read FSequenceCache;

Description

Methods

	constructor Create(const AEntity: TObject; const AMetadata: TJCoreOPFClassMetadata);

	destructor Destroy; override;

	function AcquireADM(const AAttributeName: string): TJCoreOPFADM;

	function ADMByName(const AAttributeName: string): IJCoreADM;

	function ADMMappingCount: Integer;

	procedure AssignOwner(const AOwner: TJCoreOPFPID; const AOwnerADM: TJCoreOPFADMCollection);

	procedure AttachManager(const APIDManager: IJCoreOPFPIDManager);

	procedure Commit;

	function IsDirty: Boolean;

	function Lazyload(const AAttrAddr: Pointer): Boolean;

	procedure ReadSequenceField(const AResultSet: IJCoreOPFResultSet);

	procedure WriteSequenceField(const AParams: IJCoreOPFParams);

Properties

	property ADMMapping[constAIndex:Integer]: TJCoreOPFADMMapping read GetADMMapping;

	property IsPersistent: Boolean read FIsPersistent;

	property Entity: TObject read FEntity;

	property Metadata: TJCoreOPFClassMetadata read FMetadata;

	property OID: IJCoreOPFOID read FOID write SetOID;

	property Owner: TJCoreOPFPID read FOwner;

	property Sequence: Integer read FSequence write FSequence;

	property SequenceCache: Integer read FSequenceCache;