[OneSchemaMethod-Delphi] var lDataSet:IDADataSet; begin { This method body was auto-generated to retrieve the schema of your datasets. You can now modify it to suite your needs. } { ToDO: Rename the Schema reference below to match the name of your Schema component } result := Binary.Create(); lDataSet := %SCHEMA%.NewDataset(Connection, aDataSet); BinAdapter.WriteDataset(result, lDataSet, [woSchema], 0); end; [OneGetMethod-Delphi] var lDataSet:IDADataSet; begin { This method body was auto-generated to retrieve the rows of your datasets. You can now modify it to suite your needs. } { ToDO: Rename the Schema reference below to match the name of your Schema component } result := Binary.Create(); lDataSet := %SCHEMA%.NewDataset(Connection, aDataSet); BinAdapter.WriteDataset(result, lDataSet, [woRows], -1); end; [OneUpdateMethod-Delphi] begin { Implement yourself ;-} result := nil; end; [SchemaMethodPerDataSet-Delphi] var lDataSet:IDADataSet; begin { This method body was auto-generated to retrieve the schema of your %DATASET% dataset. You can now modify it to suite your needs. } { ToDO: Rename the Schema reference below to match the name of your Schema component } result := Binary.Create(); lDataSet := %SCHEMA%.NewDataset(Connection, %DATASET%); BinAdapter.WriteDataset(result, lDataSet, [woSchema], 0); end; [GetMethodPerDataSet-Delphi] var lDataSet:IDADataSet; begin { This method body was auto-generated to retrieve the rows of your %DATASET% dataset. You can now modify it to suite your needs. } { ToDO: Rename the Schema reference below to match the name of your Schema component } result := Binary.Create(); lDataSet := %SCHEMA%.NewDataset(Connection, %DATASET%); BinAdapter.WriteDataset(result, lDataSet, [woRows], -1); end; [UpdateMethodPerDataSet-Delphi] begin { Implement yourself ;-} result := nil; end; [GetSchemaXmlMethod-Delphi] begin { This method body was auto-generated to allow access to your XML schema. You might want to disable this functionality in release builds for security reasons by putting in the FDEFs below. } { ToDo: Rename the Schema reference below to match the name of your Schema component } {.$IFDEF RELEASE_BUILD} result := Binary.Create(); %SCHEMA%.SaveToStream(result); {.$ELSE} { result := nil; } {.$ENDIF RELEASE_BUILD} end;