Clipper/FiveWin - Alguien usa la TSBROWSE »

Hola foro :

Tengo un TSBROWSE con 6 columnas
la primera columna forma parte del campo clave, en ella guardo un correlativo :

001
002
003

cuando añado un registro nuevo ya sea con la tecla de flecha para abajo, o con un botton que implemente para ello necesito que por defecto el get de esta columna me muestre 004 (osea el sgte registro) , con la posibilidad de poder editarlo.
Debo de tener en cuenta que no necesariamente la lista tendra valores consecutivos, podria editar primero el 002 y luego el 001 de modo que la lista se vaya ordenando (en eso no tengo problemas).

Gracias por sus aportes.

Saludos.

Ricardo :

En la primera columna puedes hacer uso de la clausula PREEDIT que es un Code Block que se ejecuta antes de entrar a editar la celda.

ADD COLUMN TO oBrowse ; HEADER "REFERENCIA" SIZE 90 DATA ( FieldSetGetBlock( oBrowse:cAlias , 2 ) ) ;
3DLOOK TRUE ALIGN DT_LEFT, DT_CENTER, DT_RIGHT MOVE DT_MOVE_NEXT EDITABLE ;
PREEDIT {|| Mifuncion() }

En la funcion que se ejecuta puedes agregar el numero que deseas , revisando que consecutivo es el que sigue.

Saludos
Víctor Manuel Tomás Díaz
México

Victor te manejas con clase tsbrowse o como refrescar un tsbrowse