RESPONDER UNA PREGUNTA

Si para responder la pregunta, crees necesario enviar un archivo adjunto, puedes hacerlo a traves del correo [email protected]

    Pregunta:  67422 - CODIGO AUTOGENERADO
Autor:  Jhon Veramendi
quiero lo siguente: hacer codigo auto generado y ese codigo usar en mis registros para eso tengo
siguente tablas
CONTADOR
campo CodRegistro

y la tabla Registros
campos Idregistro,nombre, fecha ,..etc

el Autogenerado debe guardarse en COTADOR
asi 00001,00002,00003,00004.. y seguir la secuencia

para esto he crea un DataStore

Evento open //ventana mantenimeinto Registros
dw_1.settransobject(sqlca)
dw_1.retrieve()

Contador=Create DataStore
Contador.DataObject="odw_contador1"
Contador.SettransObject(Sqlca)
Contador.Retrieve()

boton nuevo evento clicked
Integer N,Codigo
//Agrega un articulo en blanco
N=dw_1.insertRow(0)
dw_1.scrollToRow(N)
//Generar y mostrar el codigo
Codigo=Contador.GetItemNumber(1,"codregistro")+1
dw_1.SetItem(1,"idregistro",string(Codigo,"0000"))

cuando ejecuto me sale siguente Error:
/**Datawindow column type does not match GetItem type at line 7 in clicked event**/


Nombre
Apellidos
Correo
Comentarios