Consecutivos en red
Tengo un problema al desarrollar una aplicación en red. Necesito trabajar con facturas desde varios pc, pero al momento de grabar en la tabla de movimientos el numero consecutivo de facturación, lo que hace es que me repite el numero de factura y no genera un consecutivo... ¿cómo podría solucionar esto? Gracias
1 Respuesta
Respuesta de Víctor Arturo Mercado Fernández
1
El consecutivo se determina/calcula en el momento en que van a ser guardados los datos en la base de datos:
Select Tabla
GO BOTTOM
m.cValor = PADL( ALLTRIM( STR( VAL( Tabla.CampoID ) + 1 ) ), nTm, '0' )
APPEND BLANK
REPLACE Tabla.CampoID WITH m.cValor
Donde:
Tabla. CampoID es el campo (incluyendo el nombre de la tabla) que funciona como número de factura.
NTm es el tamaño del campo Tabla. CampoID
Esto es suponiendo que el campo Tabla. CampoID sea carácter. Si el campo es numérico, el código quedaría como:
Go bottom
m.nValor = Tabla.CampoID + 1
APPEND BLANK
REPLACE Tabla.CampoID WITH m.nValor
Select Tabla
GO BOTTOM
m.cValor = PADL( ALLTRIM( STR( VAL( Tabla.CampoID ) + 1 ) ), nTm, '0' )
APPEND BLANK
REPLACE Tabla.CampoID WITH m.cValor
Donde:
Tabla. CampoID es el campo (incluyendo el nombre de la tabla) que funciona como número de factura.
NTm es el tamaño del campo Tabla. CampoID
Esto es suponiendo que el campo Tabla. CampoID sea carácter. Si el campo es numérico, el código quedaría como:
Go bottom
m.nValor = Tabla.CampoID + 1
APPEND BLANK
REPLACE Tabla.CampoID WITH m.nValor
¿Este código funciona con varias pc en red sin problemas?
Si, no importa el número
