FiveTech Software tech support forums

Segun lo que entiendo, debería darte la suma de los precios promedios...
Puedes cambiarle la formula de calculo del total a la columna 3,
oReport:aColumns[3]:btotalexpr = {|| Tufuncion()}
Pero nunca lo he hecho, habría que buscar en el foro a ver si hay ejemplos.

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

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

Goos,

oLbx:bKeyDown := {|nKey| TuFuncion( nKey ) }

TuFuncion( nKey )

if nKey == VK_KF9
....
endif

return nil

Saludos

Compuin

En el valid del get

REDEFINE GET oGet VAR oVar ID 100 OF oDlg ;
VALID( IIF( EMPTY( oVar ), ( oVar := TUFUNCION DE MOSTRAR EL BROWSE CON LOS DATOS, .T.), .F. )

SGS,

Podrias utilizar bGotFocus :

oLb:bGotFocus := { || tufuncion() }

Para que hagas lo que quieras hacer cuando el usuario este usando el browse.


Espero te sirva la idea.


Saludos

Oscar,

Yo no uso Windows, normalmente todo lo hago con Dialogs.

Hay un par de opcion que podrias checar :

oWnd:bStart := { || TuFuncion() }
- bInit
- bPainted

Cuestion que probaras con tu codigo si alguno de estos te sirven.


Saludos

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

... oCol ) } oBrw:aCols[3]:nDataStrAlign:= AL_RIGHT oBrw:aCols[3]:nHeadStrAlign:= AL_CENTER oBrw:aCols[3]:nWidth := 70 oBrw:aCols[3]:bEditWhen := { || tufuncion() } oBrw:aCols[3]:oHeaderFont := oFnt espero te sea de ayuda, hay varios ejemplos en la carpeta SAMPLES saludos... :shock:

... asi como te indica Esteban Tenés que leer la tabla aMenu y harias así MENU oMenu 2007 MENU MENUITEM aMenu[1] MESSAGE "mensage" ACTION tufuncion() ENDMENU ENDMENU Saludos Adhemar

Julio, asi como te indica Esteban
Tenés que leer la tabla aMenu

y harias así

MENU oMenu 2007
MENU
MENUITEM aMenu[1] MESSAGE "mensage" ACTION tufuncion()
ENDMENU
ENDMENU

Saludos

Adhemar

ICO

Intentalo con

oReporte:bPostEnd := { || TuFuncion(oReporte)}


STATIC FUNCTION TuFuncion(oReporte)
....
....
Aqui es donde pones las líneas del resumen
...
...
RETURN(NIL)

Saludos

Pedro: Si tienes armado el GROUP puedes aprovechar el método ON ENDGROUP TuFuncion(oReporte) Y en la función TuFuncion() pruebalo así FUNCTION TuFuncion(oReporte) oReporte:TotalLine( RPT_SINGLELINE) // o RPT_DOUBLELINE RETURN(NIL) Tambien puedes apoyarte en ...

Jhon:

Con doble clic:
oLbx:blDblClick := { | nRow, nCol, nKey | TuFuncion()}

Y con ENTER:
oLbx:bKeyDown := { | nKey, nFlags | TuFuncion()}

Saludos

redefine button .... action (tufuncion(),oget:setfocus())

o si lo prefieres

redefine button .... action (tufuncion(obtn))
...

function tufuncion(obtnfoco)
....
....
oget:setfocus()
return

Salu2