mas DATAs en un BTNBMP? (SOLUCIONADO)

mas DATAs en un BTNBMP? (SOLUCIONADO)

Postby Armando » Fri Dec 17, 2021 2:48 pm

Hola Foreros:

Cómo puedo definir mas de una DATA de cargo en un BTNBMP ???

Esto es lo que necesito

oBtn[nVez]:cargo := oRsHab:Fields("HAB_NUM"):Value
oBtn[nVez]:Status := oRsHab:Fields("HAB_STS"):Value

Gracias de antemano

Saludos
Last edited by Armando on Fri Dec 17, 2021 5:19 pm, edited 1 time in total.
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3104
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Re: mas DATAs en un BTNBMP?

Postby karinha » Fri Dec 17, 2021 2:58 pm

Code: Select all  Expand view

   ++nVez ??
 


Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7446
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: mas DATAs en un BTNBMP?

Postby gmart1 » Fri Dec 17, 2021 4:46 pm

Hola, puedes usar un hash :

Code: Select all  Expand view
oBtn[nVez]:cargo := { "HAB_NUM" => oRsHab:Fields("HAB_NUM"):Value, ;
                      "HAB_STS" => oRsHab:Fields("HAB_STS"):Value }

Para recuperar los valores :
Code: Select all  Expand view
? oBtn[nVez]:cargo ["HAB_NUM"]
? oBtn[nVez]:cargo ["HAB_STS"]
gmart1
 
Posts: 80
Joined: Wed Oct 24, 2007 12:48 pm
Location: Alhaurin de la Torre (MALAGA)

Re: mas DATAs en un BTNBMP?

Postby Armando » Fri Dec 17, 2021 5:07 pm

Gracias Karinha y Gmart:

Lo intento y me reporto.

Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3104
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Re: mas DATAs en un BTNBMP?

Postby Armando » Fri Dec 17, 2021 5:19 pm

Amigos:

Los hash funcionaron al 100%

Gracias GMart1 y todos los que me apoyaron con sus respuestas

Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3104
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 155 guests