GUARDAR EN TABLAS DISTISTINTAS DESDE UN BOTON
Publicado por ARNALDO EDMUNDO (1 intervención) el 06/06/2021 21:33:06
TEGO DOS TABLAS UNA INVENTA Y OTRA FACTURA EN EL BOTON GUARDAR PUSE EL SIGUIENTE PROCEDIMIENTO QUE LO TENGO EN MI FORMULARIO INGRESOS PERO ME INVIA UN MENSAJE DE TABLA EN USO
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
USE factura
GO TOP
NOM=ALLTRIM(f_articulo)
sele 3
use movimientos
go bottom
pack
DO WHILE !EOF()
SELEC 1
SEEK NOM
IF FOUND()
SELEC 1
REPLACE f_cantidad WITH factura->f_cantidad+inventa->f_cantidad
replace f_SUMATO with inventa->f_cantidad+inventa->f_valorini
replace f_valoract with factura->f_valortot+inventa->f_valoract
replace f_valorpro with inventa->f_valoract/(inventa->f_sumato)
*replace f_costoant with anteriorreplace f_costoant with val(thisform.text5.text)
ELSE
ENDIF
SELEC 2
SKIP
NOM=ALLTRIM(f_articulo)
ENDDO
sele 3
append from factura
sele 2
delete all
pack
CLOSE DATA ALL
CLOSE DATA
CLOSE DATA
thisform.releasedo forma ingresos
- IMAGENES.rar(94,5 KB)
- TABLAS.rar(3,8 KB)
Valora esta pregunta
0