PROBLEMAS CON MATRIZ... Pregunta de Novato

[Luis]

Sres del Foro :
Disculpen la molestia nuevamente tengo este problema.

Si hago esto :

Local aDia := {"01","02","03","04","05"}
Local mMatriz:= {{}}
Asize(mMatriz,0)

Aadd(mMatriz,aDia)
xBrowse(mMatriz)

Aparece en Xbrowse :

A B C D E
01 02 03 04 05

Pero si hago esto :

Local pari:= '{'
Local parf:= '}'
Local coma:= ','
Local nlon:='', npar:=''
Local mMatriz:= {{}}
Asize(mMatriz,0)

For i:=1 to 5
npar := '"'+Ltrim(Str(i))+'"'
If i > 1 .AND. i < 6
nlon := nlon+coma+npar
Else
nlon := nlon+npar
Endi
Next
nlon := PARI+NLON+PARF

Aadd(mMatriz,nlon)

xBrowse(mMatriz)

Aparece en Xbrowse :

                  A                     B   C   D   E
{"01"," 02","03","04","05 "}

Solo en la columna A como un String.

Que estoy haciendo mal. Por favor alguna ayuda.

Gracias.

[informaticaeloy]

Hola,

prueba a cambiar esto

Code: Select all

nlon := PARI+NLON+PARF

Aadd(mMatriz,nlon)

xBrowse(mMatriz)

por

Code: Select all

nlon := PARI+NLON+PARF

Aadd(mMatriz,&nlon)

xBrowse(mMatriz)

a ver si te funciona

[Luis]

Estimado Eloy:

Agradezco tu pronta respuesta y disculpa la pregunta. Como te habrás dado cuenta no soy muy experto. Muchas Gracias.