TLot.AdjustPeremption
| TLot = class (TObject) | Interface de TLot | Exemples de TLot |
Modification de la date de péremption du lot
Syntaxe
procedure AdjustPeremption(newPeremption: Float)
newPeremption:FLOAT (référençant une date) qui sera converti en DATE
Remarques
Le FLOAT renseigné représente une date, retourne une erreur si ce FLOAT est invalide
Exemples
uses QubesStock;
var lot1 := TLot.Connect('lot1');
lot1.AdjustPeremption(42500); // Ajuste la date de péremption du lot 'lot1' au 10/05/2016
var lot1 := TLot.Connect('lot1');
lot1.AdjustPeremption(42500); // Ajuste la date de péremption du lot 'lot1' au 10/05/2016