Voce pode fazer de duas maneiras

 

1) Voce manda ler o maior codigo e soma um. Assim

"select max(codigo) as maior_codigo from boleta"

proximo_codigo = rst.fields![maior_codigo] + 1

 

ou

2) voce pode criar um arquivo de parametros e nele ter um campo chamado ULT_CODIGO. Todas vez que voce gravar uma boleta voce soma um a este campo e depois grava. Para saber o proximo numero da boleta basta ler o arquivo (que deve ter so um registro) e somar 1 depois grava-o novamente.

 

Eu prefiro o primeiro pois assim voce não corre o risco de alguem alterar o codigo do parametros e o numero repetir.

 

Ajudou ?