acomodo de datos
Publicado por Marcos Alonso (6 intervenciones) el 18/06/2005 07:08:52
tengo 2 botones con el siguiente codigo
Guardar Entradas
append blank
replace folioauto with folio
replace fentra with entrada
replace remision with remision1
replace cantsale with thisform.text17.value
reindex
tengo este codigo en el boton GUARDAR SALIDAS
go top
reg2=reccount()+1
IF EMPTY(tabla_rex.remisionf)=.f.
skip + reg2
append blank
replace folioauto with folio
replace fsale with fsalida
replace rforestal with remision
replace cantsale with thisform.text17.value
replace bandera2 with reg2
reindex
else
replace folioauto with folio
replace fsale with fsalida
replace rforestal with remision
replace cantsale with thisform.text17.value
replace bandera2 with reg2
reindex
endif
quiero hacer lo siguiente
entradas salidas
1 05/05/05 2.345 501 05/05/05 .36
pero me hace esto
1 05/05/05 2.345
2 05/05/05 4.879
501 05/05/05 .36
502 05/05/05 1.25
alguienme pueda ayduar a encontrar el fallo y poder solucionarlo
Guardar Entradas
append blank
replace folioauto with folio
replace fentra with entrada
replace remision with remision1
replace cantsale with thisform.text17.value
reindex
tengo este codigo en el boton GUARDAR SALIDAS
go top
reg2=reccount()+1
IF EMPTY(tabla_rex.remisionf)=.f.
skip + reg2
append blank
replace folioauto with folio
replace fsale with fsalida
replace rforestal with remision
replace cantsale with thisform.text17.value
replace bandera2 with reg2
reindex
else
replace folioauto with folio
replace fsale with fsalida
replace rforestal with remision
replace cantsale with thisform.text17.value
replace bandera2 with reg2
reindex
endif
quiero hacer lo siguiente
entradas salidas
1 05/05/05 2.345 501 05/05/05 .36
pero me hace esto
1 05/05/05 2.345
2 05/05/05 4.879
501 05/05/05 .36
502 05/05/05 1.25
alguienme pueda ayduar a encontrar el fallo y poder solucionarlo
Valora esta pregunta


0