TManufacturingSubOperation.RemoveManufacturingConsumptionItem
| TManufacturingSubOperation = class (TObject) | Interface de TManufacturingSubOperation | Exemples de TManufacturingSubOperation |
Suppression d'une élément de consommation.
Syntaxe
procedure RemoveManufacturingConsumptionItem(manufacturingConsumptionItem: TManufacturingConsumptionItem)
manufacturingConsumptionItem: élément de consommation à supprimer.
Remarques
Exemples
var gammeCroissant: TManufacturing;
var gammeSubOperation: TManufacturingSubOperation;
var gammeConsumption: TManufacturingConsumptionItem;
var i: integer;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
for i:=gammeSubOperation.CountManufacturingConsumptionItem-1 downto 0 do begin
gammeConsumption:=gammeSubOperation.GetManufacturingConsumptionItem(i);
gammeSubOperation.RemoveManufacturingConsumptionItem(gammeConsumption);
end;
gammeCroissant.post;
finally
gammeCroissant.free;
end;
var gammeSubOperation: TManufacturingSubOperation;
var gammeConsumption: TManufacturingConsumptionItem;
var i: integer;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
for i:=gammeSubOperation.CountManufacturingConsumptionItem-1 downto 0 do begin
gammeConsumption:=gammeSubOperation.GetManufacturingConsumptionItem(i);
gammeSubOperation.RemoveManufacturingConsumptionItem(gammeConsumption);
end;
gammeCroissant.post;
finally
gammeCroissant.free;
end;