Código automático

¿Bueno para empezar tu aplicación no se conecta a una base de datos no? ¿Solo es una aplicación sencilla?. Bueno lo puedes trabajar bajo un contador, cada vez que se de clic al botón, me sume uno.
Variables de Instancia
-----------------------------
// Declaramos una variable contador
Integer ii_contador = 1
cb_aceptar (Evento Clicked)
-----------------------------------
// Por cada Clic el contador aumenta en uno
ii_contador++
// Mostramos el contador y le concatenamos con ceros a la izquierda
sle_codigo.Text = Right( "000000" + String( ii_contador), 6)
Bueno eso seria todo, te dejo los archivos para que le des una ojeada, si tienes más dudas me las haces saber.

DESCARGAR: 08. Autogenerado Simple.rar
De interés:
----------------
Right = Derecha
Left = Izquierda
Sintaxis:
     Right( "un dato en string", Cantidad a tomar)
     Right("PowerBuilder", 7) = PowerBuilder = Builder
        (aca me esta tomado los 7 ultimos caracteres de la palabra PowerBuilder)
     Left( "un dato en String", Cantidad a tomar)
     Left("PowerBuilder", 5) = PowerBuilder = Power
        (aca me esta tomado los 5 primeros caracteres de la palabra PowerBuilder)

Una aclaración si se conecta a una base de datos lo que quiero hacer es un numero de factura ejemplo tengo el numero 000345 al hacer clic en el button supuiestamente me guarda el numero en una tbla de la bd y automáticamente ne aparece 000346 en el single line edit gracias

Bueno se una manera para hacerlo, haciendo un select al código:
w_factura (Evento Open)
--------------------------------
// Cuando cargamos la ventana donde esta el formulario de factura, te debe de aparecer el nuevo código autogenereado
// Declaramos variables
Integer li_codigo
// Hacemos un Select a la tabla Factura
SELECT max(idFactura) + 1
INTO :li_codigo
FROM Factura ;
// Entonces obtenemos el código máximo y le sumamos 1, este seria nuestro código nuevo. Ejemplo si nuestra ultima factura es 56, con el select obtenemos el numero 56 y le sumamos 1, quedándonos 57. Ahora lo mostramos en el SLE.
sle_codigo.Text = Right( "000000" + String( li_codigo), 6)
Bueno eso seria todo, pruébalo y me avisas, si tienes más dudas hasmelas saber.

Nada no me jala el numero correla tivo tu ya lom probaste en tu compu