Sugerencia para errsysw.prg y VRDBCODE (codigos de barras)
Posted: Thu Sep 14, 2006 4:21 pm
Desde tiempo inmemoriales llevo retocando este fichero para que el recno() y el reccount() de las bases de datos que se listan en el log del error aparezcan legibles:
cErrorLog += " " + Transform( ( Alias( n ) )->( RecNo() ), "99999" ) + ;
" " + Transform( ( Alias( n ) )->( RecCount() ), "99999" ) +
" " + cValToChar( ( Alias( n ) )->( BoF() ) ) + ;
" " + cValToChar( ( Alias( n ) )->( EoF() ) ) + CRLF + CRLF
Es la muchas aplicaciones que estan en etapa de produccion se llega a superar los 100.000 registros, por lo que creo que estaria muy bien que la plantilla del Transform se ampliase al menos en un par de digitos.
Para aquellos que me escribieron pidiendome la clase revisada de los codigos de barras pedirles disculpas por el retraso, pero es que mi nuevo portatil se averió y no me lo han devuelto hasta hoy mismo, asi que me pongo manos a la obra para sacar la version publica lo antes posible..
cErrorLog += " " + Transform( ( Alias( n ) )->( RecNo() ), "99999" ) + ;
" " + Transform( ( Alias( n ) )->( RecCount() ), "99999" ) +
" " + cValToChar( ( Alias( n ) )->( BoF() ) ) + ;
" " + cValToChar( ( Alias( n ) )->( EoF() ) ) + CRLF + CRLF
Es la muchas aplicaciones que estan en etapa de produccion se llega a superar los 100.000 registros, por lo que creo que estaria muy bien que la plantilla del Transform se ampliase al menos en un par de digitos.
Para aquellos que me escribieron pidiendome la clase revisada de los codigos de barras pedirles disculpas por el retraso, pero es que mi nuevo portatil se averió y no me lo han devuelto hasta hoy mismo, asi que me pongo manos a la obra para sacar la version publica lo antes posible..
