¿Cómo genero un código con un contador?
Hola amigos tengo una tarea y no se como hacerla tengo un form donde manejo dos tablas la primera es la principal que (docentes) y la segunda (horarios) bueno en la primera tabla tienes sus botones de agregar modificar etc, bueno el problema que tengo que a la primera tabla al agregar un registro se tiene que gererar un código por ejemplo
Doce-0001
Doce-0002
.
.
.
Doce-0010
Doce-0011
No se como hacer para que automáticamente te genere ese código...
De antemano muchas gracias
Doce-0001
Doce-0002
.
.
.
Doce-0010
Doce-0011
No se como hacer para que automáticamente te genere ese código...
De antemano muchas gracias
1 respuesta
Respuesta de rydesoft
1
Bueno sabemos que el tamaño del campo es nueve
y que los numero empiezan a partir de la sexta posición
Bueno podemos hacerlo de 2 formas
1) Solución
supongamos que el campo donde guardas el codigo se llama id_docente
store "" to codigod
select docentes
go top
if reccount()=0
codigod= "doce-0001"
else
go top
store 0 to codocen
** calculamos cual es el numero siguiente
calculate max(val(substr(alltrim(docentes.id_docente),6,9))) to codocen+1
**miramos el tamaño y agregamos los ceros necesarios
store "" to codlet
for i=1 4-len(alltrim(str(codocen)))
codlet=codlet+"0"
endfor
codigod="doce-"+codlet+alltrim(str(codocen))
endif
select docentes
append blank
replace docentes.id_docente with codigod
y que los numero empiezan a partir de la sexta posición
Bueno podemos hacerlo de 2 formas
1) Solución
supongamos que el campo donde guardas el codigo se llama id_docente
store "" to codigod
select docentes
go top
if reccount()=0
codigod= "doce-0001"
else
go top
store 0 to codocen
** calculamos cual es el numero siguiente
calculate max(val(substr(alltrim(docentes.id_docente),6,9))) to codocen+1
**miramos el tamaño y agregamos los ceros necesarios
store "" to codlet
for i=1 4-len(alltrim(str(codocen)))
codlet=codlet+"0"
endfor
codigod="doce-"+codlet+alltrim(str(codocen))
endif
select docentes
append blank
replace docentes.id_docente with codigod
2) Solución
Es que guardes unicamente el numero consecutivo y al llamar los datos le agregues adelante la palabra "docen-" y los ceros correspondientes según el tamaño del numero que estés consultando
Es que guardes unicamente el numero consecutivo y al llamar los datos le agregues adelante la palabra "docen-" y los ceros correspondientes según el tamaño del numero que estés consultando
En el for me falto la instrucción to, queda de la siguiente matera
for i=1 to 4-len(alltrim(str(codocen)))
for i=1 to 4-len(alltrim(str(codocen)))
