TManufacturingSubOperation.RemoveManufacturingControlCardItem
| TManufacturingSubOperation = class (TObject) | Interface de TManufacturingSubOperation | Exemples de TManufacturingSubOperation |
Suppression d'un élément de carte de contrôle.
Syntaxe
procedure RemoveManufacturingControlCardItem(manufacturingControlCardItem: TManufacturingControlCardItem)
manufacturingControlCardItem: élément de carte de contrôle à supprimer.
Remarques
Exemples
var gammeCroissant: TManufacturing;
var gammeSubOperation: TManufacturingSubOperation;
var gammeControlCard: TManufacturingControlCardItem;
var i: integer;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
for i:=0 to gammeSubOperation.CountManufacturingControlCardItem-1 do begin
gammeControlCard:=gammeSubOperation.GetManufacturingControlCardItem(i);
gammeSubOperation.RemoveManufacturingConsumptionItem(gammeControlCard);
end;
gammeCroissant.post;
finally
gammeCroissant.free;
end;
var gammeSubOperation: TManufacturingSubOperation;
var gammeControlCard: TManufacturingControlCardItem;
var i: integer;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
for i:=0 to gammeSubOperation.CountManufacturingControlCardItem-1 do begin
gammeControlCard:=gammeSubOperation.GetManufacturingControlCardItem(i);
gammeSubOperation.RemoveManufacturingConsumptionItem(gammeControlCard);
end;
gammeCroissant.post;
finally
gammeCroissant.free;
end;