Habra una solucion para este problema????????
Publicado por alejandro (2 intervenciones) el 28/05/2002 02:01:28
Hola:
El motivo por el que le escribo es por que necesito que me ayude a solucionar un problema que tengo en una aplicacion, desde ya muchas gracias, el problema es el siguiente
Tenemos una plicacion en Foxw2.6 para llevar el inventario, estas tablas guardan al rededor de 3000,0000 registros en la cual se definen arreglos de las tablas
por ejemplo
SELE PROTABLA
if not empty(protabla.producto)
dimension aproducto(n,2)
scatter memvar
aproducto(n,1)=trim(m.producto)+space(13-len(trim(m.producto)))+rtrim(m.desc)
aproducto(n,2)=trim(m.producto)
n=n+1
endi
SHOW GETS
SELE PRODUCTO
************************************
SELE INVENT
GOTO TOP
n=1
do while not eof()
if not empty(invent.producto)
dimension aproducto(n)
store invent.producto to aproducto(n)
n=n+1
endi
skip
endd
SHOW GETS
************************************
y corre bien pero solo en las maquinas viejitas (486) en las mas rapidas me da error de "Memoria Insuficiente" y no se como solucionar este problema
ya tratre de aumentar el Buffers=100 y el Files=150 pero nada
Agradecere un monton si puede darme sus sugerencias, observaciones o rutinas
Muchas gracias
ICQ#: 143650286
[email protected]
[email protected]
El motivo por el que le escribo es por que necesito que me ayude a solucionar un problema que tengo en una aplicacion, desde ya muchas gracias, el problema es el siguiente
Tenemos una plicacion en Foxw2.6 para llevar el inventario, estas tablas guardan al rededor de 3000,0000 registros en la cual se definen arreglos de las tablas
por ejemplo
SELE PROTABLA
if not empty(protabla.producto)
dimension aproducto(n,2)
scatter memvar
aproducto(n,1)=trim(m.producto)+space(13-len(trim(m.producto)))+rtrim(m.desc)
aproducto(n,2)=trim(m.producto)
n=n+1
endi
SHOW GETS
SELE PRODUCTO
************************************
SELE INVENT
GOTO TOP
n=1
do while not eof()
if not empty(invent.producto)
dimension aproducto(n)
store invent.producto to aproducto(n)
n=n+1
endi
skip
endd
SHOW GETS
************************************
y corre bien pero solo en las maquinas viejitas (486) en las mas rapidas me da error de "Memoria Insuficiente" y no se como solucionar este problema
ya tratre de aumentar el Buffers=100 y el Files=150 pero nada
Agradecere un monton si puede darme sus sugerencias, observaciones o rutinas
Muchas gracias
ICQ#: 143650286
[email protected]
[email protected]
Valora esta pregunta


0