Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Consulta Rest Formato JSon no Valido (https://www.clubdelphi.com/foros/showthread.php?t=95443)

Chaja 25-10-2021 15:20:13

Consulta Rest Formato JSon no Valido
 
Hola Gente del Club:
Tengo esta situacion, estoy haciendo una forma de acceder a datos desde un servido de un colega que hizo un API para consumir desde mi aplicacion. La cuestion es que uso el endpoint desde Rest Debuger, nada todo bien me responde , joya. Copio los COmponentes y los pegos en mi DataModule. Hago un test desde el Request y da Ok. Pareciera todo bien estan los componentes incluso un MemTable y el adapter. voy al MemTable y agrego los campos y todo bien... este es el jaseon que me da desde el restdebuger:

Código Delphi [-]
{
    "STATUS": true,
    "LISTADOCAJAS": [
        {
            "INDICE": "461025",
            "CTE_CODIGO": "017025",
            "NOMMBRESUCURSAL": "LURO CENTRO",
            "FECHA_APERTURA": "2021-10-24",
            "FECHA_CIERRE": "2021-10-24",
            "INFORME": "E",
            "PREFIJO": 1,
            "NUMERO": "458",
            "FAC_MONTO": 391.82,
            "FAC_IVA": 68.0018,
            "FAC_II": 0,
            "FAC_PERCEP": 0,
            "NC_MONTO": -4.9,
            "NC_IVA": -0.8504,
            "NC_II": 0,
            "NC_PERCEP": 0,
            "TOTAL_NETO_F": 396.71999999999997,
            "TOTAL_EGRESOS": "0.0000",
            "TOTAL_INGRESOS": "0.0000",
            "TOTAL_CAJA": "39682.0000",
            "ULTIMA_FAC_A": null,
            "ULTIMA_FAC_B": "32795",
            "ULTIMA_NC_A": null,
            "ULTIMA_NC_B": "83",
            "SUCURSAL": 25
        },
        {
            "INDICE": "460025",
            "CTE_CODIGO": "017025",
            "NOMMBRESUCURSAL": "LURO CENTRO",
            "FECHA_APERTURA": "2021-10-23",
            "FECHA_CIERRE": "2021-10-23",
            "INFORME": "E",
            "PREFIJO": 1,
            "NUMERO": "457",
            "FAC_MONTO": 596.4,
            "FAC_IVA": 103.5071,
            "FAC_II": 0,
            "FAC_PERCEP": 0,
            "NC_MONTO": 0,
            "NC_IVA": 0,
            "NC_II": 0,
            "NC_PERCEP": 0,
            "TOTAL_NETO_F": 596.4,
            "TOTAL_EGRESOS": "-100.0000",
            "TOTAL_INGRESOS": "0.0000",
            "TOTAL_CAJA": "59540.0000",
            "ULTIMA_FAC_A": null,
            "ULTIMA_FAC_B": "32722",
            "ULTIMA_NC_A": null,
            "ULTIMA_NC_B": null,
            "SUCURSAL": 25
        },
        {

y en el memtable me aparece los campos todo bien
en el response en el rootelement esta puesto "LISTADOCAJAS" que lo pone desde el restdebuger. (sin las comillas). Pruebo de nuevo el request y todo ok. Bien ahora desde mi aplicacion intento ejecutar la consulta:
Código Delphi [-]
    DSCajas.DataSet         :=FDMemTable1;
    DatosImportaPtoVtaMorphi.RESTClient1.BaseURL  := 'http://'+cbPathBases.Text+'/morphi/api1/sistema/listadocajas/';
    DatosImportaPtoVtaMorphi.RESTRequest1.Params.ParameterByName('apikey').Value    := edApikey.Text;//'682A596A206CACED5937';
    DatosImportaPtoVtaMorphi.RESTRequest1.Params.ParameterByName('sucursal').Value  := MTSucursalCOD_SUCURSAL.AsString;
    DatosImportaPtoVtaMorphi.RESTRequest1.Params.ParameterByName('desde').Value     := edFecha.Text;// MTSucursalCOD_SUCURSAL.AsString;
    RESTRequest1.Execute;
    MTCajas.Open;
y explota todo , me dice que el response no es un json valido : "Response content is not valid JSON".
la consulta al sitio es esta, no tiene clave por si alguien quiere probar y ayudarme:

http://lafonte.dyndns.tv:3055/morphi...sde=07/01/2021

no se por que me pasa que propiedad debo tocar...

desde ya Gracias

Luis Roldan
Mar del Plata
Argentina

egostar 25-10-2021 19:02:34

¿En que momento sucede?

¿Aquí?

Código Delphi [-]
    RESTRequest1.Execute;

¿O aquí?

Código Delphi [-]
    MTCajas.Open;

Saludos

Chaja 25-10-2021 20:34:57

Código Delphi [-]
RESTRequest1.Execute;

egostar 26-10-2021 02:43:44

Cita:

Empezado por Chaja (Mensaje 543721)
Código Delphi [-]
RESTRequest1.Execute;

Hola, realicé los pasos que mencionas en tu post inciial y funciona sin problema.



Saludos

aledieb 26-10-2021 02:57:47

Revisaste si los parámetros están bien, específicamente en el de la fecha.

Chaja 26-10-2021 03:57:44

Hola egostar..... mmmm si pero le pusiste un FDMemTable..
se supone que en el RootElement deberia poner LISTADOCAJAS

Chaja 26-10-2021 05:10:33

Egostar... gracias me diste con el clavo. era el formato de Fecha, ... pense que debia dar un error de parametros invalidos... pero parece que no...
Gracias por tu tiempo... ya lo resolvi.

egostar 26-10-2021 15:23:47

Cita:

Empezado por aledieb (Mensaje 543730)
Revisaste si los parámetros están bien, específicamente en el de la fecha.

Bueno yo solo puse los datos como los estabas enviando.

Cita:

Empezado por Chaja (Mensaje 543733)
Hola egostar..... mmmm si pero le pusiste un FDMemTable..
se supone que en el RootElement deberia poner LISTADOCAJAS

Este sería el segundo paso si lo primero funcionaba y no se podía serializar en el Dataset.

Como dijera "Jack the ripper" vamos por partes :D

Cita:

Empezado por Chaja (Mensaje 543734)
Egostar... gracias me diste con el clavo. era el formato de Fecha, ... pense que debia dar un error de parametros invalidos... pero parece que no...
Gracias por tu tiempo... ya lo resolvi.

Pues que bueno, me alegra.

Saludos

egostar 26-10-2021 16:37:25

Cita:

Empezado por Chaja (Mensaje 543734)
Egostar... gracias me diste con el clavo. era el formato de Fecha, ... pense que debia dar un error de parametros invalidos... pero parece que no...
Gracias por tu tiempo... ya lo resolvi.

Cita:

Empezado por aledieb (Mensaje 543730)
Revisaste si los parámetros están bien, específicamente en el de la fecha.

Leyendo bien, quien dio con el clavo fue aledieb

Saludos


La franja horaria es GMT +2. Ahora son las 21:40:58.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi