Hola a todos, deseo asignarle a un campo de mi DW llamado numeracion tipo string, un numero personalizado de acuerdo al año en curso, por decir.
Durante el año 2013, he registrado un promedio de 5,040 registros aproximadamente, luego estoy pensando que para el otro año estos registros se tienen que volver a guardar desde 000 nuevamente, entonces deseo que mediante un código al detectar el año actual, si ya paso del año 2013, automáticamente reinicie de 2014 - 00001, 2014 - 00002, 2014 - 00003, 2014 - 00004, 2014 - 00005 .... etc y se asigne a este campo.
Claro siempre teniendo en cuenta la incrementación a partir del último numero, que se encuentra guardado, ya que si eliminé como por decir el registro Nro. 009 y en el campo queda como último registro el 008 , entonces incremente el nuevo como 009...
este código me permite asignar solo 00001.... en forma consecutiva pero cuando le cambio la fecha sigue incrementando y no reinicia el numerador en 2014 -00001.
Durante el año 2013, he registrado un promedio de 5,040 registros aproximadamente, luego estoy pensando que para el otro año estos registros se tienen que volver a guardar desde 000 nuevamente, entonces deseo que mediante un código al detectar el año actual, si ya paso del año 2013, automáticamente reinicie de 2014 - 00001, 2014 - 00002, 2014 - 00003, 2014 - 00004, 2014 - 00005 .... etc y se asigne a este campo.
Claro siempre teniendo en cuenta la incrementación a partir del último numero, que se encuentra guardado, ya que si eliminé como por decir el registro Nro. 009 y en el campo queda como último registro el 008 , entonces incremente el nuevo como 009...
este código me permite asignar solo 00001.... en forma consecutiva pero cuando le cambio la fecha sigue incrementando y no reinicia el numerador en 2014 -00001.
long filas
string ls_cod
Select Count(numeracion)
into :Filas
From comision;
ls_cod=string(Filas+1,"00000")
if dw_1.Rowcount()=1 then
else
dw_1.InsertRow(1)
dw_1.ScrollToRow(1)
end if
dw_1.Setitem(dw_1.GetRow(),"numeracion",ls_cod)
ayuda con esto por favor
string ls_cod
Select Count(numeracion)
into :Filas
From comision;
ls_cod=string(Filas+1,"00000")
if dw_1.Rowcount()=1 then
else
dw_1.InsertRow(1)
dw_1.ScrollToRow(1)
end if
dw_1.Setitem(dw_1.GetRow(),"numeracion",ls_cod)
ayuda con esto por favor
---
Has recibido este mensaje porque estás suscrito al grupo "TechEra" de Grupos de Google.
Para anular la suscripción a este grupo y dejar de recibir sus correos electrónicos, envía un correo electrónico a techeraz9+unsubscribe@googlegroups.com.
Para obtener más opciones, visita https://groups.google.com/groups/opt_out.
0 comments:
Post a Comment