Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Invoice Grid Recalculates Erroneous Sub-Totals
Message
De
27/05/2002 00:25:13
 
 
À
26/05/2002 15:29:00
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00661499
Message ID:
00661568
Vues:
21
Por que no haces la pregunta en español? y de preferencia en el foro en español de UT.
Es común que este problema suceda si es que estás trabajando con los valores de los controles del grid, en cambio deberias trabajar con los valores de la tabla. Quizas esto te ayude:
1.- Crea un metodo en el formulario que realice el cálculo, llamado digamos Calcula_valores()
2.- No debes calcular todo el tiempo, solo cuando se cambian los valores, esto evita todavia mas problemas, en el Gotfocus() del control (ya sea Text1 o si pones combos u otro control), pones lo siguiente:
This.Tag = ""
3.- En el Interactivechange() del mismo control pones lo siguiente:
This.Tag = "C" && Puede ser cualquier letra o valor C=cambio, S=Si hizo cambio o algo asi que te de idea de que hubo un cambio
4.- En el Lostfocus()del mismo control pones lo siguiente:
If This.Tag = "C" && Hubo cambios
Thisform.Calcula_valores()
EndIf
5.- En el Método Calcula_valores() pones el codigo que haga los calculos, ej:
** Metodo Calcula_valores()
Local nResultado
nResultado = MITABLA.CAMPO1 * MITABLA.CAMPO2
* Donde Campo1 puede ser la cantidad y campo dos el precio
Replace MITABLA.CAMPO3 With nResultado
* Donde CAMPO2 puede ser el Importe

Espero que esto te ayude

Mauricio
Be fast like the Fox
Be free like the Penguin
Se Rápido como el Zorro
Se libre como el Pingüino
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform