Ver Mensaje Individual
  #13  
Antiguo 06-06-2024
Neeruu Neeruu is offline
Miembro
 
Registrado: oct 2007
Posts: 512
Reputación: 19
Neeruu Va por buen camino
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
    }
}
__________________
Saluda Atte Neeruu!!! :)
Responder Con Cita