FiveTech Software tech support forums

... 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 := alltrim(Var1) oRecordSet:Fields("nombre"):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

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>

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...

... oGet2 Var... Valid TuFuncion(var1,var2...) Redefine Get oGet3 Var... Valid TuFuncion(var1,var2...) Redefine button oBt1....... Action TodoOK(var1,var3,varx...) //---------------------------------------------------------------------- Function TodoOk (var1,var3,varx...) if empty(var1) .or. empty(var3...) ...

... oGet2 Var... Valid TuFuncion(var1,var2...) Redefine Get oGet3 Var... Valid TuFuncion(var1,var2...) Redefine button oBt1....... Action TodoOK(var1,var3,varx...) //---------------------------------------------------------------------- Function TodoOk (var1,var3,varx...) if empty(var1) .or. empty(var3...) ...

The DBF does not matter.

get var1 valid ...
get var2 valid ...
get var3 valid ...
read

field_to_save := var1 +var2 + var3

si pasas variables a una funcion de la forma: function (VAR1,VAR2,VAR3) Las variables VAR1,VAR2,VAR3 en la funcion se manejan como locales Si pasas las variables de la forma function parameters VAR1,VAR2,VAR3 las variables VAR1,VAR2,VAR3 se manejan como privates ...

Adhemar, eso está perfecto y entendido, el tema es cuando a la 2da funcion, no paso las variables var1,var2,var3, sino, valores propiamente dicho: #include "FiveWin.ch" * memvar Var1,Var2,Var3 Function Main() Public Var1,Var2,Var3 progrma(.t.,"titulo",0) //no ...

Pude encontrar que haciendo: function main() static var1,var2,var3 programa_1(var1,var2,var3) return nil function programa_1 parameters var1,var2,var3.. return nil pero cuando no son variables las que tengo que pasar, por ejemplo: programa_1(.t.,"titulo",0) ...

... Necesito pasar unos parametros de una Función a otra, por ejemplo: Aquí viene mi programa: function main() . .. ... .... programa_1(var1,var2,var3) .... ... .. return nil function programa_1 parameters var1,var2,var3 //necesito recibirla así, porque estas variables siguen por varias funciones, ...

... los despliega. Intenté verificar que estuviera actualizando las variables, dentro de la clausula "ON CHANGE" puse un msgalert(var1+var2+var3,var4) y como debe ser cada que hago un cambio de registro me aparece una ventanita con los datos de las variables que si se actualizan, sin embargo ...

Jose, claro que se pueden definir Function tufuncion() Local var1,var2 Public var3,var4 Private var5,var6 ... Return Tendrías que mostrar el error, quizas sea ambiguas de advertencia por el nivel de advertencia en tu enlazador, en UEstudio viene por defecto 1 hay ...

You need use:

oWordObject:Run( NameOfMacro )

later of NameOfMacro you can use too 30 vars, EXemplo oWordObject:Run( NameOfMacro, var1, var2, var3 ........... var30)

Only if you need of course