TManufacturingConsumptionItem.SetListSubstituteArticles
| TManufacturingConsumptionItem = class (TObject) | Interface de TManufacturingConsumptionItem | Exemples de TManufacturingConsumptionItem |
Renseigne la liste des articles de substitution.
Syntaxe
procedure SetListSubstituteArticles(listSubArticles: TStrings)
listSubArticles: liste des articles de substitution.
Remarques
Exemples
var gammeSubOperation: TManufacturingSubOperation;
var gammeConsumption: TManufacturingConsumptionItem;
var ListSubArticlesGPAOID: TStrings;
ListSubArticlesGPAOID:=TStrings.Create;
Try
ListSubArticlesGPAOID.Add('Farine_20%');
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
gammeConsumption:=gammeSubOperation.GetManufacturingConsumptionItem(0);
gammeConsumption.SetListSubArticlesGPAOID(ListSubArticlesGPAOID);
gammeCroissant.Post;
Finally
ListSubArticlesGPAOID.free;
End;
var gammeConsumption: TManufacturingConsumptionItem;
var ListSubArticlesGPAOID: TStrings;
ListSubArticlesGPAOID:=TStrings.Create;
Try
ListSubArticlesGPAOID.Add('Farine_20%');
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
gammeConsumption:=gammeSubOperation.GetManufacturingConsumptionItem(0);
gammeConsumption.SetListSubArticlesGPAOID(ListSubArticlesGPAOID);
gammeCroissant.Post;
Finally
ListSubArticlesGPAOID.free;
End;