Mi contador se hace cero y no suma el siguiente valor en visual foxpro

Hola expertos, bueno la situación es esta estoy realizando un programita para guardar datos en un a base de datos he utilizado la forma de crear el código automático, pero cuando guardo un registro en valor se visualiza cero aunque en la base de datos hacen incremento, tengo que cerrar el formulario y volverlo abrir para que visualice el incremento. Aquí el código
SELECT recintos
GO bottom
thisform.txtCodigo.Value=código+1
thisform.Refresh
que puede estar pasando ahí

1 Respuesta

Respuesta
1
Tengo un excelente código que crea un contador automático, muy válido para autorellenar IDs, contestame, así te paso, ¿o quieres arreglar tu código?
bueno, si puedo utilizar ese no hay problema lo pruebo y ver que pasa
Ve a administrador de proyectos
Luego a DATOS, Click en Procedimientos almacenados, luego NUEVO:
FUNCTION SGTENRO
PARAMETER largocampo
LOCAL ultnro, nvonro, campo
ultnro=RECCOUNT()+1
IF ultnro>1
GO BOTTOM
campo=FIELD(1)
ultnro=VAL(&campo)+1
SKIP
ENDIF
nvonro=STR(ultnro,largocampo,0)
nvonro=REPLICATE(“0”,largocampo)+ALLTRIM(nvonro)
nvonro=RIGH(nvonro,largocampo)
RETURN nvonro
ENDFUNC
Ahora debes aplicar la función autonumérica al campo que quieres:
Modificar la tabla y buscar el campo que quieres ("nombre_del_campo_de_la_tabla")
En VALOR PREDETERMINADO escribes:
sgtenro(LEN("nombre_del_campo_de_la_tabla"))
Eso es todo! ¿Bonito, no? Jeje, no te olvides de puntuar si te sirvió! Ante otra duda, estoy a las ordenes! Suerte en tu proyecto!

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Problemas con el botón guardar en visual foxpro 9.0

Tengo un problema con el botón guardar, tengo la siguiente codificación, 1ero en el Init del form SELECT agregarymodificar SET ORDER to CÓDIGO && CÓDIGO GO bott thisform.txtCodigo.value=agregarymodificar.código+1 thisform.refresh y luego en el click...
1 respuesta

Contador que incrementa valor al cumplir condición

Los molesto por lo siguiente dado que me doy la cabeza contra el teclado y nada. La solución no viene. La consulta es esta: Tengo una tabla llamada "Ingresos" con los siguientes datos. Fecha, hora, turno, PLM, y contador. Y otra tabla llamada Lotes,...
1 respuesta

Como puedo enviar variables a un reporte

Necesito generar un reporte en visual fox pro 9 y quiero saber si al reporte le puedo enviar los valores que tienen los text. Value o si puedo enviar alguna variable si es asi me gustaria saber cual es la forma más indicada.
1 respuesta

Arreglo xml

Logre almacenar los datos en una matriz de dos dimensiones lo que quiero ahora es que quede de forma dinámica que cuando la matriz este llena continué almacenando a partir del ultimo registro y no que vuelva a sobre escribir todo de nuevo, agradezco...
1 respuesta

Incrementar clave automáticamente(folio para recibos) en programación en Visual Foxpro

Pues estoy empezando a programar en Visual Foxrpo 6.0 y no se como hacer para que una clave se vaya incrementando automáticamente, el campo es un tipo de folio para unos recibos.
1 respuesta

Filtro de códigos visual foxpro

Tengo una tabla llamada partidos de la cuales deseo reportar 6 campos de los 10 que tiene pero del un campo llamado galpón me muestra la descripción del galpón mas no me muestra el nombre del galpón osea: tablas==> jugador, equipo =>> cada jugador...
1 respuesta

Moverme en mis registros dentro de un formulario

Me podrías decir como puedo ir al anterior, siguiente, primero y último registro que despliego en un formulario y así mismo como puedo imprimir esta salida.
1 respuesta

Consecutivo automático en vba

Tengo en excel (Visual Basic) un Commandbutton en el que deseo que ak darle clic me lleve automáticamente un numero consecutivo en un label. El código que tengo para el commandbutton es: Private Sub CommandButton3_Click() Dim contador As Integer...
1 respuesta