Agregar datos a distintas tablas
Que onda expertos, necesito de su gran ayuda:
Necesito agregar ciertos datos a una tabla, cada que pulse un botón.
El problema es que necesito que cada que pulse este botón me
Agregue los datos a una distinta tabla (son 7 tabas distintas en total).
¿Cómo le puedo hacer?
GRACIAS a quien pueda ayudarme
Necesito agregar ciertos datos a una tabla, cada que pulse un botón.
El problema es que necesito que cada que pulse este botón me
Agregue los datos a una distinta tabla (son 7 tabas distintas en total).
¿Cómo le puedo hacer?
GRACIAS a quien pueda ayudarme
Respuesta de jmartinez6
1
Puedes hacer lo siguiente: en la propiedad CAPTION de tu botón colócale algo como AGREGAR A nombre_tabla_1 en donde "nombre_tabla1" seria el nombre de tu primera tabla, luego en el evento CLICK de tu botón coloca la siguiente rutina:
DIMENSION aNOMBRES_TABLAS(7)
STORE "nombre_tabla1" TO aNOMBRES_TABLAS(1)
STORE "nombre_tabla2" TO aNOMBRES_TABLAS(2)
.
.
.
STORE "nombre_tabla7" TO aNOMBRES_TABLAS(7)
FOR X = 1 TO 7
IF THIS.CAPTION="AGREGAR A "+aTABLAS(X)
INSERT INTO (aTABLAS(X)) (nombres_de_campos) VALUES (valores_de_los_campos)
THIS.CAPTION=IIF(X=7,aTABLAS(1),aTABLAS(X+1))
EXIT
ENDIF
NEXT X
Ya esta, con esto será suficiente para solucionar tu inconveniente, si tienes alguna inquietud no dudes en preguntarme, Éxitos.
Saludos desde Cúcuta - Colombia
DIMENSION aNOMBRES_TABLAS(7)
STORE "nombre_tabla1" TO aNOMBRES_TABLAS(1)
STORE "nombre_tabla2" TO aNOMBRES_TABLAS(2)
.
.
.
STORE "nombre_tabla7" TO aNOMBRES_TABLAS(7)
FOR X = 1 TO 7
IF THIS.CAPTION="AGREGAR A "+aTABLAS(X)
INSERT INTO (aTABLAS(X)) (nombres_de_campos) VALUES (valores_de_los_campos)
THIS.CAPTION=IIF(X=7,aTABLAS(1),aTABLAS(X+1))
EXIT
ENDIF
NEXT X
Ya esta, con esto será suficiente para solucionar tu inconveniente, si tienes alguna inquietud no dudes en preguntarme, Éxitos.
Saludos desde Cúcuta - Colombia
