Ok

Here is the SQL from the SQL property of the TIBOQuery.

select PG.*, O.OwnerName, O.OwnerCode
from ProductGroup PG join Owner O on O.OwnerID = PG.OwnerOrgID
where PG.OwnerOrgID = :OwnerID

Other properties are (just cut out of the form DFM)

object qryProductGroup: TIBOQuery
Params = <
item
DataType = ftInteger
Name = 'OwnerID'
ParamType = ptInput
Value = 0
end>
DatabaseName = 'DBStockControl'
IB_Connection = IBODBStockControl
SQL.Strings = (
'select PG.*, O.OwnerName, O.OwnerCode'
'from ProductGroup PG join Owner O on O.OwnerID = PG.OwnerOrgID'
'where PG.OwnerOrgID = :OwnerID')
Left = 52
Top = 324
ParamData = <
item
DataType = ftInteger
Name = 'OwnerID'
ParamType = ptInput
Value = 0
end>
object qryProductGroupPRODUCTGROUPID: TIntegerField
FieldName = 'PRODUCTGROUPID'
end
object qryProductGroupDESCRIPTION1: TStringField
FieldName = 'DESCRIPTION1'
ProviderFlags = [pfInUpdate]
Size = 50
end
object qryProductGroupLASTMODIFIEDUSERID: TIntegerField
FieldName = 'LASTMODIFIEDUSERID'
ProviderFlags = [pfInUpdate]
end
object qryProductGroupLASTMODIFIEDDATE: TDateTimeField
FieldName = 'LASTMODIFIEDDATE'
ProviderFlags = [pfInUpdate]
end
object qryProductGroupNOTES: TBlobField
FieldName = 'NOTES'
ProviderFlags = [pfInUpdate]
BlobType = ftBlob
Size = 1
end
object qryProductGroupCONVERSIONFACTOR: TIBOFloatField
FieldName = 'CONVERSIONFACTOR'
ProviderFlags = [pfInUpdate]
end
object qryProductGroupOWNERORGID: TIntegerField
FieldName = 'OWNERORGID'
ProviderFlags = [pfInUpdate]
end
object qryProductGroupIUSERFIELD1: TStringField
FieldName = 'IUSERFIELD1'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupIUSERFIELD2: TStringField
FieldName = 'IUSERFIELD2'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupIUSERFIELD3: TStringField
FieldName = 'IUSERFIELD3'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupIUSERFIELD4: TStringField
FieldName = 'IUSERFIELD4'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupIUSERFIELD5: TStringField
FieldName = 'IUSERFIELD5'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupSUSERFIELD1: TStringField
FieldName = 'SUSERFIELD1'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupSUSERFIELD2: TStringField
FieldName = 'SUSERFIELD2'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupSUSERFIELD3: TStringField
FieldName = 'SUSERFIELD3'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupSUSERFIELD4: TStringField
FieldName = 'SUSERFIELD4'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupSUSERFIELD5: TStringField
FieldName = 'SUSERFIELD5'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupDUSERFIELD1: TStringField
FieldName = 'DUSERFIELD1'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupDUSERFIELD2: TStringField
FieldName = 'DUSERFIELD2'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupDUSERFIELD3: TStringField
FieldName = 'DUSERFIELD3'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupDUSERFIELD4: TStringField
FieldName = 'DUSERFIELD4'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupDUSERFIELD5: TStringField
FieldName = 'DUSERFIELD5'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupDRANGE: TStringField
FieldName = 'DRANGE'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupSRANGE: TStringField
FieldName = 'SRANGE'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupIRANGE: TStringField
FieldName = 'IRANGE'
ProviderFlags = [pfInUpdate]
FixedChar = True
Size = 1
end
object qryProductGroupGROUPCODE: TStringField
FieldName = 'GROUPCODE'
ProviderFlags = [pfInUpdate]
end
object qryProductGroupOWNERNAME: TStringField
FieldName = 'OWNERNAME'
ProviderFlags = []
Size = 50
end
object qryProductGroupOWNERCODE: TStringField
FieldName = 'OWNERCODE'
ProviderFlags = []
Size = 30
end
end

I did the recommended search and replace as presented in the help - this
used to be a TQuery under the BDE so it should have similar properties.

The RDM has a TIBODatabase on it, and the TIBOQuery is connected to it. The
transaction is set to default. I let the TIBODatabase define the
Transaction.

The provider is pretty bog standard with the exception that it can be called
to load the SQL with a specific query if asked. If I alter the SQL at
runtime, do I have to initialise the Params settings again ie OwnerID in
this case is an integer.

The client just calls applyupdates and I get the mentioned error "Unable to
initialize default EditDSQL." This appears on every applyupdates I have
tried. So just wanting to know what I have missed.

As I only started with IBO on last Thursday and haven't found a lot of
information on Midas and IBO, and for some reason have had a hell of a job
getting to this list, just wanting a few pointers.

Is there anything else that you need to know?

> -----Original Message-----
> From: Jason Wharton [mailto:jwharton@...]
> Sent: Tuesday, 12 December 2000 4:17 AM
> To: IBObjects@egroups.com
> Subject: Re: [IBO] MIDAS conversion
>
>
> You need to provide us a lot more information than that. What
> is the SQL?
> For starters...
>
> Thanks,
> Jason Wharton
> CPS - Mesa AZ
> http://www.ibobjects.com
>
>
> ----- Original Message -----
> From: "Peter Speden" <Peters@...>
> To: <ibobjects@egroups.com>
> Sent: Sunday, December 10, 2000 3:06 PM
> Subject: [IBO] MIDAS conversion
>
>
> > I have an existing MIDAS BDE app with some issues. I am in
> the process of
> > converting it to use a direct interbase connection method.
> All converted
> > now except when I go to post a record from a client dataset
> back to the
> > server I am getting the following error message
> >
> > "Unable to initialize default EditDSQL."
> >
> > Suggestions would be appreciated.
> >
> >
> > Peter Speden (Multipick Developer)
> > Sanderson Computers Limited
> > 100 Ponsonby Road
> > PO Box 3288
> > Auckland,New Zealand
> > Ph: +64 9 378 9055
> > Fax: +64 9 376 7223
> > WWW: www.sanderson.co.nz
> >
> >
> >
> >
> >
>
>
> -------------------------- eGroups Sponsor
> -------------------------~-~>
> eGroups eLerts
> It's Easy. It's Fun. Best of All, it's Free!
> http://click.egroups.com/1/9698/1/_/685810/_/976548221/
> --------------------------------------------------------------
> -------_->
>
>
>