Re: help with Data-into

[Jon Paris <jon.paris@xxxxxxxxxxxxxx>]

We need to see your DS Raul - can;'t tell a thing without it.

Did you use the YAJL utility to generate the DS?


> On Apr 2, 2020, at 1:09 PM, raul <raul@xxxxxxxxxx> wrote:
>
>
>
> Trying my first program to receive a "post" from the credit card
> process. I stored the response in the IFS and tried to parse it, But I
> get an error: 
>
> Sorry the spanish 
>
> ID de mensaje . . . . : RNX0356 Gravedad . . . . . . . : 50 
> Tipo de mensaje . . . : Escape 
> Fecha envío . . . . . : 02/04/20 Hora envío . . . . . . : 12:57:40 
>
> Mensaje . . . . : El documento de la operación DATA-INTO no coincide con
> la 
> variable RPG; el código de razón es 5. 
> Causa . . . . . : Al analizar un documento para la operación DATA-INTO,
> el 
> analizador ha descubierto que el documento no se corresponde con la
> variable
> RPG "operation" y las opciones no lo permiten. El código de razón es 5.
> El 
> subcampo exacto para el que se detectó el error es "operation." Las
> opciones
> son "doc=file case=any allowmissing=yes". El nombre del documento es 
> /abc/resp; *N indica que el documento XML no es un archivo externo. El 
> analizador es 'YAJLINTO'. *N indica que el analizador es un puntero de 
> procedimiento. 
>
> The operation is: 
>
> data-into operation %DATA('/abc/resp': 
> 'doc=file case=any allowmissing=yes') %PARSER( 'YAJLINTO'); 
>
> The begining of "/abc/resp" is: 
>
> ************Principio de datos************* 
> { 
> "operation": { 
> "token": "b7f3e28f165e5b63e4fa6ea4989a5677", 
> "shop_process_id": 13563033, 
> "response": "S", 
> "response_details": "Procesado Satisfactoriamente", 
>
> The operation ds is: 
>
> dcl-ds operation qualified; 
> token char(32) inz(''); 
> shop_process_id packed(15) inz(0); 
> response char(1) inz(''); 
> response_details varchar(60) inz(''); 
> amount packed(15: 2) inz(0); 
> currency char(3) inz(''); 
>
> The program fails in the first data. 
>
> What am I doing wrong? 
>
> TIA, 
>
> Raul 
>
>
> -- Este e-mail fue enviado desde el Mail Server del diario ABC Color -- 
>            -- Verificado por Anti-Virus Corporativo Symantec --
> -- 
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/midrange-l.
>
> Please contact support@xxxxxxxxxxxx for any subscription related questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com