Pequeño problema al rellenar campos de un recordset

[bingen]

Buenas xTeam, resulta que tengo un código fuente que antes andaba y ahora anda 1 vez y falla el resto.... me explico.


If ::oRS:lOnAppend
::oRS:FechaInicio:=Date()
::oRS:ImporteDiario:=30
::oDias:cText:=""
::oRS:Total:=0
::oRS:MetrosLineales:=7
::oRS:TipoAparcamiento:=1

relleno los campos del RecordSet y la primera vez va las sucesivas no a no ser que salga de la app.

En cambio funciona perfectamente con:

::oFechainicio:Value:=Date()
::oImportediario:Value:=30
::oDias:cText:=""
::oTotal:=30
::oMetrosLineales:Value:=7

Que a su vez tienen los campos asignados.

Salu2.

[ignacio]

Buenos días,

Haría falta un ejemplo que muestre el error. Lo siento.

No obstante, te aconsejo que pongas alguna traza con Logdebug() para ver que está pasando. En cualquier caso intenta simplificar el código. El control de lOnAppend lo veo algo enrevesado. No es más sencillo: oRS:AdNew(); ... ; oRs:Update()

Un saludo