|
Hola Uli_crazy, puedes hacer lo siguiente: en la propiedad CAPTION de tu botón colocale 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, Exitos.
Saludos desde Cúcuta - Colombia
|
