Servidores Rest

[Neeruu]

Una consulta:

Tengo un JSON, con esta estructura:

{
    "PROVEEDORES": {
        "COD_PROV": 4,
        "NOM_PROV": "PRUEBA3_EDIT",
        "COD_USER": 0
    }
}

Si esta de esa forma, cuando mapea asi:

Código Delphi [-]
    [MVCPath('/api/proveedor')]
    [MVCHTTPMethod([httpPOST])]
    procedure CreateProveedor([MVCFromBody] Proveedor: TProveedor);

No me carga los valores en el objecto Proveedor.


Ahora si saco la palabra "PROVEEDORES" de JSON mapea correcto los valores.
Hay alguna configuración para indicarle el nombre del Objecto.

Código Delphi [-]
  TProveedor = class
  private
    [JSONName('COD_PROV')]
    FCODPROV: Integer;
    [JSONName('NOM_PROV')]
    FNOMPROV: string;
    [JSONName('COD_USER')]
    FCODUSER: Integer;
  published
    property COD_PROV: Integer read FCODPROV write FCODPROV;
    property NOM_PROV: string read FNOMPROV write FNOMPROV;
    property COD_USER: Integer read FCODUSER write FCODUSER;
  end;

Disculpen si mi terminología no es correcta.

[Neeruu]

WHILENOTEOF, voy a aprovecharme de tu solidaridad. Tu que tienes el libro, dice algo del lo que consulte respecto a la estructura del JSON, busque por todos lados y hasta donde llega mi entendimiento y no puedo solucionarlo.

[Neeruu]

Hola nuevamente, logre que el objeto json que viene en el post se lea con el formato que le paso.

Agregue las siguientes propiedades:

Código Delphi [-]
    [MVCPath('/api/proveedor')]
    [MVCHTTPMethod([httpPOST])]
    //[MapperJSONSer('PROVEEDORES')]
    //[MVCConsumes('application/json')]
    [MVCConsumes(TMVCMediaType.APPLICATION_JSON)]
    procedure CreateProveedor;

Y luego en el procedimiento:

Código Delphi [-]
procedure ControllerProveedores.CreateProveedor;//(const [ MVCFromBody] Proveedor:TProveedor);
var Proveedor: TProveedor;
begin
  Proveedor := Context.Request.BodyAs('PROVEEDORES');

'PROVEEDORES' es el RootName;

De esta forma puedo levantar la informacion enviada con este formato de JSON:

Código Delphi [-]
{
    "PROVEEDORES": {
        "COD_PROV": 4,
        "NOM_PROV": "PRUEBA3_EDIT",
        "COD_USER": 0
    }
}