select 0
use params shared
locate for type='DER_DEPOT'
la_piece=num_piece(val(valeur),thisForm.date)
if rlock()
replace valeur with alltrim(str(la_piece))
else
&& impossible de mettre à jour
endif
use
Hebt u een routine die het nummer van de kasstorting vastzet, toekent en optelt?
Ik heb dat nodig om het record in hiscaiss te creëren.
Anders een stukje van de code….