Mysql Enum not supported

[Rohit_Nz (Gupta Rohit)]

I am getting this error

Project VCLServer.exe raised exception class EUnsupportedMemberType with message 'Mapping error: Unsupported type Variant declared in member Tregistrations.FType_'.

ExceptionMessage="Mapping error: Unsupported type Variant declared in member Tregistrations.FType_"
ExceptionName="EUnsupportedMemberType"
ExceptionDisplayName="EUnsupportedMemberType"

I assume this is because MySql type Enum is not supported. Is there a workaround for it?

[wlandgraf (Wagner Landgraf)]

The error indicates that the field Registrations.FType is declared as Variant. Such field/property type is not supported by Aurelius, so you must use a type that is supported.

I don't know exactly how Enum is treated by FireDAC (if that's what you are using), but you can simply map such field to the field type returned by FireDAC.

[Rohit_Nz (Gupta Rohit)]

Its actually a character. Defining it as a enum with values means that the database does the final validation on it. But firedac is treating it as a variant.

Mapping is going to be a problem. Every time I change the database, I have to generate the entities again. Which creates a new file.

Related question. How can I get the Generate Entities function to use the same filename I used last time (and the same location).

[wlandgraf (Wagner Landgraf)]

@Rohit_Nz

Mapping is going to be a problem. Every time I change the database, I have to generate the entities again. Which creates a new file.

Well, it's a single field and you can manually change the type. Or use customization scripts in TMS Data Modeler and simply automate it, so every time the entities are generated the script automatically change the type from Variant to string (or Char).

References:

Enumerated types

Hi Mark, Sorry for the delay in answering. The easiest approach is just declare your enumerated types in a separated unit (for example, "Entities.EnumeratedTypes", and then use the script to change the type of the field/property to the enumerated you want. For example: procedure OnColumnGenerated(Args: TColumnGeneratedArgs); begin if Args.DBField.FieldName = 'VehicleType' then begin Args.Prop.Prop…

ENABLE INTEGERS - Oracle Integers when exporting to Aurelius Classes

You can manage this using customization scripts in TMS Data Modeler. Here is an example: procedure OnColumnGenerated(Args: TColumnGeneratedArgs); var NewType: string; begin if (Args.DBField.DataTypeName = 'Number') and (Args.DBField.Size2 = 0) then begin if Args.DBField.Size <= 10 then NewType := 'Integer' else NewType := 'Int64'; if not Args.DBField.Required then NewType := 'Nullable<' + NewType + '>'; A…

Please provide support for MySQL ENUM type

Here is a small script that modifies the data type to string when computed fields have their expression starting with enum. procedure OnColumnGenerated(Args: TColumnGeneratedArgs); var Expr: string; begin Expr := Args.DBField.Expression; if LowerCase(Copy(Expr, 1, 5)) = 'enum(' then begin Args.Field.FieldType.BaseType := 'string'; Args.Prop.PropertyType.Basetype := 'string'; end; end;

@Rohit_Nz

Related question. How can I get the Generate Entities function to use the same filename I used last time (and the same location).

Use TMS Data Modeler, it's more convenient, save the project file, it saves the location.

[Rohit_Nz (Gupta Rohit)]

Another excellent product, thanks