Hola
Tengo una pequeña rutina para crear un codigo de servicios que debe comenzar con SI si es servicio o OI si es una obra, luego le agrego un valor incremental independiente para cada caso, y finalmente le agrego las dos ultimas cifras del año. Todavia quiero ver que funcione y le agrego en automatico el año variable ya que eso es facil pero para no complicarme he puesto algunos datos como constantes.
Mi consulta va en como puedo hacer para luego de filtrar la tabla por codiobra pueda ir al ultimo registro filtrado, use en principio go bottom pero va al ultimo registro de la tabla sin filtro. Tengan piedad al responder porque no programo hace 20 años y el retorno es doloroso.
Adjunto parte del codigo explicado
DO CASE
CASE vobra=6
SET FILTER TO SUBSTR(codiobra,1,2)="OI"
GO bottom
vcodiobra=m.codiobra
vcodiobra=SUBSTR(vcodiobra,3,4)
ncodiobra=VAL(vcodiobra)+1
nccodiobra=PADL(ALLTRIM(STR(ncodiobra)),4,"0")
thisform.tb_codiobra.Value="OI"+nccodiobra+"12"
Saludos y gracias por las respuestas