Crear un Array

558 views
Skip to first unread message

Norberto Mario Alvarez

unread,
Jan 10, 2020, 12:47:16 PM1/10/20
to Comunidad de Visual Foxpro en Español
Hola Lista, dado que con la librería JSON.PRG puedo enviar un Array, y como nunca use Array en VFP, necesitaría una ayuda para crearlo.

Yo tengo la siguiente tabla con x registros

tabla.dbf

código n 6
saldo_desudor n (15,2)
saldo_acreedor n (15,2)

y quiero pasarlo a un ARRAY todos lo registros con sus tres campos

para luego usarlo en la librería JSON

JSON.stringify(ARRAY)

Desde ya muchas gracias por vuestra atención.

Norberto Alvarez
Buenos Aires, Argentina

Victor Aguilar

unread,
Jan 10, 2020, 2:22:24 PM1/10/20
to Comunidad de Visual Foxpro en Español
USE BD_DATOS

COPY TO ARRAY NOMBRE_ARRAY
 
Saludos

Esteban H

unread,
Jan 10, 2020, 4:39:15 PM1/10/20
to publice...@googlegroups.com

Help Dimension…

--
Visita el 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.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/0302eeeb-e9c7-4359-bd37-26026eb4d8aa%40googlegroups.com.

Carlos Miguel FARIAS

unread,
Jan 11, 2020, 8:36:12 AM1/11/20
to Grupo Fox
Haces un select de la tabla
SELECT * FROM tabla INTO ARRAY elarray
luego
JSON.stringify(elarray)
el select te permite filtrar registros (where) y ordenarlos (ORDER BY)  

Saludos: Miguel

Mario Cesar Moreno Jaen

unread,
Jan 11, 2020, 9:05:16 AM1/11/20
to Comunidad de Visual Foxpro en Español
Hola, Saludos

Para las personas que conocemos Foxpro desde sus inicios (DOS), trabajar con arreglos ha sido desde mi punto de vista Indispensable. Y con el crecimiento de la herramienta hasta Visual Foxpro, los comandos en relacion a Arreglos es impresionante.
Si no logras resolver con las respuestas anteriores por alguna razon. Te recomiendo entonces ir a los principios de programación. Seria algo como esto:


select tabla
count to cont
Dimension Arreglo(cont,3)
for a = 1 to cont
  Arreglo(a,1) = 0
  Arreglo(a,2) = 0
  Arreglo(a,3) = 0
endfor

lugar = 1
Scan
  Arreglo(lugar ,1) = código
  Arreglo(lugar ,2) = saldo_desudor
  Arreglo(lugar ,3) = saldo_acreedor
  lugar = lugar + 1
endscan


JSON.stringify(Arreglo).

No existe ninguna ventaja en realizarlo como te indico Victor Aguilar o Esteban H, todo lo contrario, es menos eficiente como yo te estoy sugiriendo, pero me atrevi a hacerlo por tu comentario de no haber trabajado nunca con arreglos.

Saludos.




Carlos Miguel FARIAS

unread,
Jan 11, 2020, 5:28:22 PM1/11/20
to Grupo Fox
Lo mas eficiente es hacerlo con el SELECT INTO ARRAY que postie antes.

--
Visita el 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.
Reply all
Reply to author
Forward
0 new messages