FiveTech Software tech support forums

... #xcommand SwapValues( <a>, <b> ) => StackPush( <a> ); <a> := <b>; <b> := StackPop() Uso: var1 := 100 var2 := 900 SwapValues( var1, var2 ) // no SwapValues( @var1, @var2 ) ? var1,var2 // --> 900,100 aData := { 3, 4, 5, 6, 7 } SwapValues( aData[ 2 ...

... #xcommand SwapValues( <a>, <b> ) => StackPush( <a> ); <a> := <b>; <b> := StackPop() Usage: var1 := 100 var2 := 900 SwapValues( var1, var2 ) // not SwapValues( @var1, @var2 ) ? var1,var2 // --> 900,100 aData := { 3, 4, 5, 6, 7 } SwapValues( aData[ 2 ...

... #xcommand SwapValues( <a>, <b> ) => StackPush( <a> ); <a> := <b>; <b> := StackPop() Usage: var1 := 100 var2 := 900 SwapValues( var1, var2 ) // not SwapValues( @var1, @var2 ) ? var1,var2 // --> 900,100 aData := { 3, 4, 5, 6, 7 } SwapValues( aData[ 2 ...

Saludos a Todos, amigos foristas. Nuevamente acudo a Uds. en busca de ayuda. Tengo esta situacion usando dos Combobox dentro de un TFolderEx en el primer combo, al seleccionar cualquier elemento, se ejecuta bien el On Change ... esa es la idea. Aqui no hay problema. no asi el segundo combo, el cual ...

... and hit a match, we can retrieve other info relative to oCbx:nAt from another array... Like 'name' in oCbx:aItem to var1 and aAddr[ oCbx:nAt ] to var2 and so on ... Any thoughts :?:

... EndIf Return NIL Veo todos los registros sin problema de la tabla Usuarios SQL, el problema es para agregar datos: Var1:="AAA0100101FFF" Var2:="NOMBRE DE PRUEBA" Var3:="correo@hotmail.com" Var4:="DATO 1" oRecordSet:Addnew() oRecordSet:Fields("rfc"):value ...

Mr.Tim,

. USE olddbf
. REPLACE ALL var1 WITH .t. FOR var2 = "Y" .and. var3 = "Y" .and. tDate = CTOD( "12/01/16")

You can try xHarbour's xPrompt. It does the same job.

-Ramesh Babu

The old . prompt made some tasks so simple.

. USE olddbf
. REPLACE ALL var1 WITH .t. FOR var2 = "Y" .and. var3 = "Y" .and. tDate = CTOD( "12/01/16")

That doesn't always work very well with our edit and dbu programs.

Tim

Hi Antonio

with previous versions it was possible to have a xbrowse of a hash

Function Main()
Local hVar := {=>}

hVar [ "var1" ] = 1234
hVar [ "var2" ] = "abcd"

xbrowse(hVar)

Return nil

Regards Maurizio
www.nipeservice.com

Hola,,,
Sintaxis pata INSERT
INSERT INTO productos (campo1, campo2, campo3) VALUES (var1, car2, var3) WHERE <condición>
Para UPDATE
UPDATE productos SET campo1 = var1, campo2 = var2, campo3 = var3 WHERE <condición>

Hello

I prefer use hash, example

h = any()

You can access h[ "var1" ], h[ "var2" ]

Functions any()

Local hVar = {=>}

...

hVar [ "var1" ] = 1234
hVar [ "var2" ] = "abcd"

Return hVar

Buen día amigos: Acudo a ustedes para su colaboración trataré de explicarme, poniendo el código. Local Var1:= "CARTERA" Local Var2:= "VENCIDA" Local num_Var := "0" Antes yo podía concatenar de la siguiente manera: num_Var := Alltrim(Str( val(num_Var)+1 )) // Incremento ...

Saludos ! Para concatenar datos en Mysql esta la funcion CONCAT(), Select CONCAT(Nombre, ' ', Apellidos) As Nombre From usuarios; En tu caso SELECT * FORM TABLA rutcli + numvta + tipodoc....(nose como se realiza) Seria asi Select * from tu tabla where rutacli=tu_var1, and numvta = tu_var2 and tipodo...

... a como lo vienes haciendo por cada Get, pero al final, en el boton Aceptar, vuelve a validar. Ej: Redefine Get oGet1 Var... Valid TuFuncion(var1,var2...) Redefine Get oGet2 Var... Valid TuFuncion(var1,var2...) Redefine Get oGet3 Var... Valid TuFuncion(var1,var2...) Redefine button oBt1....... ...

... a como lo vienes haciendo por cada Get, pero al final, en el boton Aceptar, vuelve a validar. Ej: Redefine Get oGet1 Var... Valid TuFuncion(var1,var2...) Redefine Get oGet2 Var... Valid TuFuncion(var1,var2...) Redefine Get oGet3 Var... Valid TuFuncion(var1,var2...) Redefine button oBt1....... ...