TStockCreations - Exemples
| TStockCreations = class (TObject) | Interface de TStockCreations | Exemples de TStockCreations |
uses QubesStock;
// Récupération de la somme des quantités produites pour le Lot12345
var qte : Float = 0;
var prods := TStockCreations.CreateLotGPAOID('Lot12345');
for var i:=0 to prods.Count-1 do
qte+=prods.Quantity[i];
PrintLn(qte);
// Récupération de la somme des quantités produites pour le Lot12345
var qte : Float = 0;
var prods := TStockCreations.CreateLotGPAOID('Lot12345');
for var i:=0 to prods.Count-1 do
qte+=prods.Quantity[i];
PrintLn(qte);