Namespace: OpenEdge.DataAdmin.Binding
Class
ExtentContext
Parent classes:
Progress.Lang.Object
OpenEdge.DataAdmin.Binding.DataAdminContext
OpenEdge.DataAdmin.Binding.ExtentContext

Inherits: OpenEdge.DataAdmin.Binding.DataAdminContext
Implements: OpenEdge.DataAdmin.Binding.IDataAdminContext

/* Copyright (c) 2010 by progress Software Corporation
/*
/* all rights reserved. no part of this program or document
/* may be reproduced in any form or by any means without
/* permission in writing from progress Software Corporation.
File:AreaContext
Author(s):hdaniels
Created:Aug 2010




Method Summary
Options Name Purpose
LOGICAL CanFind (character)
LOGICAL CanFind (character, integer)
LOGICAL CanFind (integer)
LOGICAL CanFindFirstOfArea (character)
CopyTable (IDataAdminModel)
CopyTable (table)
OpenEdge.DataAdmin.IDataAdminCollection CreateCollection (IDataAdminContext)
OpenEdge.DataAdmin.IDataAdminElement CreateEntity (IRequestInfo)
OpenEdge.DataAdmin.Binding.Query.FilteredContext CreateFilteredContext (IRow, IRequestInfo)
CreateRow (character, IExtent, integer)
CreateRow (IDataAdminElement) /* if class cast error - the default syserror seems sufficent */
CreateRow (IExtent)
DataRefreshed (IFetchResponse)
LOGICAL Find (character)
LOGICAL Find (character, integer)
LOGICAL Find (integer)
CHARACTER FindExpression (integer)
CHARACTER GetCreateError (IExtent)
CHARACTER GetJoinFields (character)
HANDLE InitDataset () /* temporary until all sub classes are using createDataset */
InitRow () /* override - unsupported in super */
InitRow (character)
InitRow (integer)
RefreshTable (table) /* copy-temp-table replace does not work (unique index on non primary ?) so do it record by record */
UpdateAreaName (character, character)
ValidateBuffer (handle)
ValidateProperty (character, character, character) /** override to validate path and size */
ValidateSize (integer, character) /** checked in data access, seems safer in case this is moved to a client method private void ValidatePath(piKey as int,pnewvalue as char). if pnewvalue <> "" then do: file-info:file-name = pnewvalue. if substring(file-info:file-type,1,1) <> "D" then undo, throw new InvalidPropertyValueError(Name,string(pikey),"Path",pnewvalue). end. if pNewValue = "" then undo, throw new ValidationError("Extent",string(pikey),"Path","cannot be blank. Specify a valid directory name or use period to specify the current directory"). end method. */

Constructor Summary
Options Name Purpose
ExtentContext ()
ExtentContext (IAreaScope)

Property Summary
Options Name Purpose
INTEGER Count
CHARACTER KeyFields
HANDLE TableHandle


Method Detail
Top

LOGICAL CanFind (character)
Parameters:
c CHARACTER
Returns LOGICAL
Top

LOGICAL CanFind (character, integer)
Parameters:
areaname CHARACTER
iext INTEGER
Returns LOGICAL
Top

LOGICAL CanFind (integer)
Parameters:
id INTEGER
Returns LOGICAL
Top

LOGICAL CanFindFirstOfArea (character)
Parameters:
areaname CHARACTER
Returns LOGICAL
Top

CopyTable (IDataAdminModel)
Parameters:
cntxt OpenEdge.DataAdmin.Binding.IDataAdminModel
Top

CopyTable (table)
Parameters:
copyTable TABLE
Top

OpenEdge.DataAdmin.IDataAdminCollection CreateCollection (IDataAdminContext)
Parameters:
cntxt OpenEdge.DataAdmin.Binding.IDataAdminContext
Returns OpenEdge.DataAdmin.IDataAdminCollection
Top

OpenEdge.DataAdmin.IDataAdminElement CreateEntity (IRequestInfo)
Parameters:
preq OpenEdge.DataAdmin.IRequestInfo
Returns OpenEdge.DataAdmin.IDataAdminElement
Top

OpenEdge.DataAdmin.Binding.Query.FilteredContext CreateFilteredContext (IRow, IRequestInfo)
Parameters:
pParent OpenEdge.DataAdmin.Binding.IRow
pReq OpenEdge.DataAdmin.IRequestInfo
Returns OpenEdge.DataAdmin.Binding.Query.FilteredContext
Top

CreateRow (character, IExtent, integer)
Parameters:
pcAreaName CHARACTER
pNewExtent OpenEdge.DataAdmin.IExtent
piNum INTEGER
Top

CreateRow (IDataAdminElement)
/* if class cast error - the default syserror seems sufficent
Parameters:
entity OpenEdge.DataAdmin.IDataAdminElement
Top

CreateRow (IExtent)
Parameters:
pNewExtent OpenEdge.DataAdmin.IExtent
Top

DataRefreshed (IFetchResponse)
Parameters:
pResponse OpenEdge.DataAdmin.Message.IFetchResponse
Top

LOGICAL Find (character)
Parameters:
name CHARACTER
Returns LOGICAL
Top

LOGICAL Find (character, integer)
Parameters:
areaname CHARACTER
iext INTEGER
Returns LOGICAL
Top

LOGICAL Find (integer)
Parameters:
id INTEGER
Returns LOGICAL
Top

CHARACTER FindExpression (integer)
Parameters:
i INTEGER
Returns CHARACTER
Top

CHARACTER GetCreateError (IExtent)
Parameters:
newextent OpenEdge.DataAdmin.IExtent
Returns CHARACTER
Top

CHARACTER GetJoinFields (character)
Parameters:
parentid CHARACTER
Returns CHARACTER
Top

HANDLE InitDataset ()
/* temporary until all sub classes are using createDataset
Returns HANDLE
Top

InitRow ()
/* override - unsupported in super
Top

InitRow (character)
Parameters:
pname CHARACTER
Top

InitRow (integer)
Parameters:
pid INTEGER
Top

RefreshTable (table)
/* copy-temp-table replace does not work (unique index on non primary ?)
so do it record by record
Parameters:
copyTable TABLE
Top

UpdateAreaName (character, character)
Parameters:
pcOldname CHARACTER
pcNewname CHARACTER
Top

ValidateBuffer (handle)
Parameters:
phExtent HANDLE
Top

ValidateProperty (character, character, character)
Purpose: override to validate path and size
Parameters:
pcfield CHARACTER
poldvalue CHARACTER
pnewvalue CHARACTER
Top

ValidateSize (integer, character)
Purpose: checked in data access, seems safer in case this is moved to a client
method private void ValidatePath(piKey as int,pnewvalue as char).
if pnewvalue <> "" then
do:
file-info:file-name file-name = pnewvalue.
if substring(file-info:file-type,1,1) <> "D" then
undo, throw new InvalidPropertyValueError(Name,string(pikey),"Path",pnewvalue).
end.
if pNewValue = "" then
undo, throw new ValidationError("Extent",string(pikey),"Path","cannot be blank. Specify a valid directory name or use period to specify the current directory").
end method.
Parameters:
piKey INTEGER
pnewvalue CHARACTER


Constructor Detail
Top

ExtentContext ()
Top

ExtentContext (IAreaScope)
Parameters:
pscope OpenEdge.DataAdmin.Binding.Factory.IAreaScope


Property Detail
Top

INTEGER Count
Returns INTEGER
Top

CHARACTER KeyFields
Returns CHARACTER
Top

HANDLE TableHandle
Returns HANDLE


Copyright © 2022 Progress Software Corporation. All rights Reserved.

Progress® OpenEdge® Release 11.7.15