Namespace: OpenEdge.DataAdmin.Server
Class
DataService
Parent classes:
Progress.Lang.Object
OpenEdge.DataAdmin.Server.DataService

Inherits: Progress.Lang.Object

/* Copyright (c) 2011,2012 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.
Purpose:Handle data requests for a single service/database
This is the server side adapter
Syntax:new ServiceAdapter("sports2000").
Author(s):hdaniels
Created:Fri Aug 06 09:10:06 EDT 2010
Notes:Currently the name of the service is the name
of the database.
This is currently called directly from the client side ServiceAdapter
It could be run from a .p if the client is on a separate session




Method Summary
Options Name Purpose
OpenEdge.DataAdmin.Message.IUtilityResponse ExecuteUtility (IUtilityRequest)
FetchData (IFetchRequest)
OpenEdge.DataAdmin.DataAccess.IDataAccess GetDataAccess (character)
RetrieveData (IFetchRequest)
OpenEdge.DataAdmin.Message.ISaveRequest SaveData (ISaveRequest) /* method private void xxRetrieveData(name as char, datasetHdl as handle, url as char, filter as char): define var hCopy as handle no-undo. if name = "SchemaChanges" then GetDataAccess(name):FetchData(datasetHdl,url,filter). else do: create dataset hCopy. hCopy:create-like(datasetHdl). if filter > "" then GetDataAccess(name):FetchData(hCopy,url,filter). else GetDataAccess(name):FetchData(hCopy, url). datasetHdl:copy-dataset(hCopy,yes,yes). end. RequestCompleted:Publish(name). end method. */
ValidateConnection () /* method public handle SaveData(name as char, datasetHdl as handle, url as char): define variable da as IDataAccess no-undo. da = GetDataAccess(name). return da:SaveData(datasetHdl,url). /* compiler confused: return GetDataAccess(name):SaveData(datasetHdl,url).*/ end method. method public handle SaveRow(name as char, bufferHdl as handle, url as char): define variable da as IDataAccess no-undo. da = GetDataAccess(name). return da:SaveData(bufferHdl:handle,url). /* compiler confused return GetDataAccess(name):SaveData(bufferHdl:handle,url).*/ end method. */

Constructor Summary
Options Name Purpose
DataService ()
DataService (character)
DataService (character, character)

Event Summary
Options Name Purpose
RequestComplete (character, character)
RequestCompleted (character)

Property Summary
Options Name Purpose
OpenEdge.DataAdmin.Binding.IConnection Connection
OpenEdge.DataAdmin.DataAccess.DataAccessFactory DataAccessFactory
OpenEdge.DataAdmin.ServerCommand.ServerCommandFactory ServerCommandFactory
CHARACTER ServiceName


Method Detail
Top

OpenEdge.DataAdmin.Message.IUtilityResponse ExecuteUtility (IUtilityRequest)
Parameters:
msg OpenEdge.DataAdmin.Message.IUtilityRequest
Returns OpenEdge.DataAdmin.Message.IUtilityResponse
Top

FetchData (IFetchRequest)
Parameters:
msg OpenEdge.DataAdmin.Message.IFetchRequest
Top

OpenEdge.DataAdmin.DataAccess.IDataAccess GetDataAccess (character)
Parameters:
name CHARACTER
Returns OpenEdge.DataAdmin.DataAccess.IDataAccess
Top

RetrieveData (IFetchRequest)
Parameters:
msg OpenEdge.DataAdmin.Message.IFetchRequest
Top

OpenEdge.DataAdmin.Message.ISaveRequest SaveData (ISaveRequest)
/*
method private void xxRetrieveData(name as char, datasetHdl as handle, url as char, filter as char):
define var hCopy as handle no-undo.
if name = "SchemaChanges" then
GetDataAccess(name):FetchData(datasetHdl,url,filter). FetchData(datasetHdl,url,filter).
else
do:
create dataset hCopy.
hCopy:create-like(datasetHdl). create-like(datasetHdl).
if filter > "" then
GetDataAccess(name):FetchData(hCopy,url,filter). FetchData(hCopy,url,filter).
else
GetDataAccess(name):FetchData(hCopy, FetchData(hCopy, url).
datasetHdl:copy-dataset(hCopy,yes,yes). copy-dataset(hCopy,yes,yes).
end.
RequestCompleted:Publish(name). Publish(name).
end method.
Parameters:
msg OpenEdge.DataAdmin.Message.ISaveRequest
Returns OpenEdge.DataAdmin.Message.ISaveRequest
Top

ValidateConnection ()
/*
method public handle SaveData(name as char, datasetHdl as handle, url as char):
define variable da as IDataAccess no-undo.
da = GetDataAccess(name).
return da:SaveData(datasetHdl,url).
/* compiler confused:
return GetDataAccess(name):SaveData(datasetHdl,url).
end method.
method public handle SaveRow(name as char, bufferHdl as handle, url as char):
define variable da as IDataAccess no-undo.
da = GetDataAccess(name).
return da:SaveData(bufferHdl:handle,url).
/* compiler confused
return GetDataAccess(name):SaveData(bufferHdl:handle,url).
end method.


Constructor Detail
Top

DataService ()
Top

DataService (character)
Parameters:
pname CHARACTER
Top

DataService (character, character)
Parameters:
path CHARACTER
name CHARACTER


Event Detail
Top

RequestComplete (character, character)
Parameters:
contextid CHARACTER
serializename CHARACTER
Top

RequestCompleted (character)
Parameters:
name CHARACTER


Property Detail
Top

OpenEdge.DataAdmin.Binding.IConnection Connection
Returns OpenEdge.DataAdmin.Binding.IConnection
Top

OpenEdge.DataAdmin.DataAccess.DataAccessFactory DataAccessFactory
Returns OpenEdge.DataAdmin.DataAccess.DataAccessFactory
Top

OpenEdge.DataAdmin.ServerCommand.ServerCommandFactory ServerCommandFactory
Returns OpenEdge.DataAdmin.ServerCommand.ServerCommandFactory
Top

CHARACTER ServiceName
Returns CHARACTER


Copyright © 2017 Progress Software Corporation. All rights Reserved.

Progress® OpenEdge® Release 11.7