append blank
Publicado por andres (42 intervenciones) el 03/12/2003 02:28:43
Hola mi problema es el siguiente_:
Ya puedo utilizar mi sistema en red pero al momento que encuentra un append blank me genera el siguiente error
cannot update the cursor, por ejemplo en este codigo me lo marca
Ya puedo utilizar mi sistema en red pero al momento que encuentra un append blank me genera el siguiente error
cannot update the cursor, por ejemplo en este codigo me lo marca
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
select * from tb_transm where f_fecha = fecha2 into cursor curplan
selec curplan
Do While !EOF()
horini = c_horini
cliente = c_cliente
version1 = c_version
canal = c_canal
duracion = c_duracion
transm = c_transm
select tb_transm
if flock()
***aqui me lo marca ******************************
append blank
**********************************************************
Replace f_fecha With fecha3
Replace c_horini With horini
Replace c_cliente With cliente
Replace c_version With version1
Replace c_canal With canal
Replace c_duracion With duracion
Replace c_transm With transm
unlock
wait window "Registro grabado" timeout 1.5
thisform.refresh
else
wait window "No se grabo el registro" timeout 2
endif
select curplan
Skip
Enddo
Valora esta pregunta


0