Como generar un JSON en VFP 9.2

132 views
Skip to first unread message

Juan Miguel Solis

unread,
Nov 27, 2025, 6:50:37 AM (5 days ago) Nov 27
to Comunidad de Visual Foxpro en Español
Bueno sigo con el tema e verifactu, ahora necesito generar un JSON par el tema del verifactu, para enviarlo con una llamada  RESTful de tipo PUT a una direccion https://............

En fin si alguien tiene algo de esto estaría muy agradecido por la ayuda.

Un saludo

Victor Espina

unread,
Nov 27, 2025, 7:23:23 AM (5 days ago) Nov 27
to Comunidad de Visual Foxpro en Español
Si es un JSON sencillo lo puedes generar con un simple TEXT - ENDTEXT.  Si tienes un objeto que necesitas expresar como un string JSON, te recomiendo mi libreria JSON.

Saludos

Victor Esina

Juan Miguel Solis

unread,
Nov 27, 2025, 7:58:33 AM (5 days ago) Nov 27
to publice...@googlegroups.com
No sencillo no es, porque tengo que meter como 80 campos o así dependiendo varias cosas. 

Como se usa tu librería, hay algún manual ?

Dónde ja consigo?

Un saludo 


--
Blog de la Comunidad Visual FoxPro en Español http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito a un tema del grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este tema, visita https://groups.google.com/d/topic/publicesvfoxpro/XETROAjrFEk/unsubscribe.
Para cancelar la suscripción a este grupo y a todos sus temas, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver este debate, visita https://groups.google.com/d/msgid/publicesvfoxpro/55a11a7a-3df0-441d-bff5-903b71c68b16n%40googlegroups.com.

Zarlu

unread,
Nov 27, 2025, 8:21:29 AM (5 days ago) Nov 27
to Comunidad de Visual Foxpro en Español
Buenos días Juan Miguel!

Creo que el maestro Victor con sencillo se refiere a la estructura.
Y con automatización, es decir una rutina para generarlo, es rápido.
Usa su herramienta. o puedes implementar la tuya recorriendo campos para obtener nombres de campos y sus valores,
si son campos fijos será más sencillo.

Ésta es una muestra de un json que recién generé con un editor de texto, se guarda con la extensión .json

[
{
  "id": "1-5-3",
  "etiqueta1": "PODER Y REVOCACIÓN DE PODER",
  "etiqueta2": "Revocación de Poder persona física",
  "modo": "tasa",
  "tasaConcepto": 40
},  
{
  "id": "1-5-4",
  "etiqueta1": "PODER Y REVOCACIÓN DE PODER",
  "etiqueta2": "Revocación de Poder persona moral",
  "modo": "tasa",
  "tasaConcepto": 49
},  
{
  "id": "1-5-5",
  "etiqueta1": "PODER Y REVOCACIÓN DE PODER",
  "etiqueta2": "Notificación de Revocación de Poder",
  "modo": "tasa",
  "tasaConcepto": 55
}
]

Algunos comentarios...
Cada par de llaves encierran un registro (row)
En cada linea un campo y su dato
Delimitar cada campo y registro con una coma
El  último registro o campo no lleva la coma
Nombres de campos en minúsculas
Usar dos puntos (:) en lugar del signo de igual (=)
Valores de texto entre comillas, números sin comillas, verdadero (.t. ) true, falso (.f.) false

Suerte
zarlu
Chetumal, Quintana Roo, México

Juan Miguel Solis

unread,
Nov 27, 2025, 8:48:02 AM (5 days ago) Nov 27
to publice...@googlegroups.com
Muchas gracias como siempre por la info, veré esa librería JSON, para usarla que tendría que hacer añadirla al proyecto ? Como 

Un saludo

Sergio Rojas

unread,
Nov 27, 2025, 8:50:15 AM (5 days ago) Nov 27
to publice...@googlegroups.com

La librería de Victor es muy buena, sobre todo para leer devoluciones largas. Para Json de pocos elementos, modo texto es lo más rápido.

Saludos

Sergio

Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver este debate, visita https://groups.google.com/d/msgid/publicesvfoxpro/b89d9524-3829-457e-9bfd-2629394d3eb6n%40googlegroups.com.

Juan Miguel Solis

unread,
Nov 27, 2025, 8:58:04 AM (5 days ago) Nov 27
to publice...@googlegroups.com
No no son pocos elementos, es para generar lus registros del verifactu, en su versión CSV son 80 campos 😃😃

Un saludo 

Daniel Sánchez

unread,
Nov 28, 2025, 12:41:22 PM (4 days ago) Nov 28
to publice...@googlegroups.com
Saludos Victor, habría alguna forma de indicar que cuando se maneje valores verdadero/falso en vez de colocar true/false ponga 0/1.

Seria excelente ya que al grabar en un campo de texto el json en una tabla en sql server el sql server tiene sus funciones que pueden leer o trabajar directamente con el json almacenado, si mando true/false me da error en los campos que son lógicos bajo vfp.
Sería excelente pudieras permitir trabajar con las dos formas con los valores lógicos, tal como lo hace ahora o con 0 y 1 si se desea.
Otro punto que he notado lentitud es cuando tengo un campo de texto con un valor binario o que almacena el contenido de un archivo en base64 el cual se obtuvo con filetostr y aplicado strconv, y el objeto lo paso por json este demora demasiado con este tipo de datos que son algo grandes y pesados, podrá optimizarse.

Gracias por la atención prestada maestro Victor



--
Blog de la Comunidad Visual FoxPro en Español http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.


--
Daniel Sánchez Escobar
Investigación y Desarrollo
Reset Software SAC
Móvil y WhatsApp +051-949398047 / Móvil 948615385
Trujillo - Perú

P  Sugerimos no imprimir este e-mail a menos que sea absolutamente necesario. Protejamos el medio ambiente.

Victor Espina

unread,
Dec 1, 2025, 10:02:07 AM (yesterday) Dec 1
to Comunidad de Visual Foxpro en Español
Acabo de subir una nueva version que implementa la propiedad mssqlCompat (boolean) de modo que puedas activarr la compatibilidad con SQL Server.  Con ese moo activo, JSON ya puede generar y leer JSONs que sean compatibles con SQL Server.

Saludos

Victor Espina
Reply all
Reply to author
Forward
0 new messages