ManufacturingGPAOIDsByArticleTimeRangeOrderByPriority
Retourne les GPAOIDs des gammes en fonction de l'article, du nom d'une sous-opération et si la gamme est active entre les dates renseignées.
Syntaxe
function ManufacturingGPAOIDsByArticleTimeRangeOrderByPriority(articleGPAOID: String; subOperation: String; dateBegin: Float; dateEnd: Float = 0): String
articleGPAOID: article GPAOID de la gamme.
subOperation: nom d'une sous-opération de la gamme.
dateBegin: date de début de l'activation de la gamme.
dateEnd: date de fin de l'activation de la gamme.
Remarques
- La fonction recherche toutes les gammes valides associées à l'article articleGPAOID, actives sur la plage de dates indiquée, et contenant au moins une sous-opération nommée subOperation.
- Si on souhaite lister les gammes quelles que soient leurs sous-opérations nommées, il faut laisser une chaîne vide dans le paramètre subOperation.
- Si on recherche la gamme prioritaire à partir d'une date de début donnée sans date de fin d'activation définie, on peut ne pas définir le paramètre dateEnd (facultatif) ou mettre 0.
- La fonction renvoie la liste des identifiants des gammes au format CommaText.
- Pour chaque gamme dans la liste, la fonction renvoie son GPAOID et sa version (NB : plusieurs versions d'une même gamme peuvent être actives simultanément).
- La liste est ordonnée de l'activation la plus prioritaire à la moins prioritaire.
- Si 2 gammes ont la même priorité sur la période (cas anormal), l'ordre dans lequel Qubes renverra ces 2 gammes est indéfini.
- Exemple de chaîne de retour : '"GammeCroissantLigne1 v1.01","GammeCroissantLigne1 v1.00","GammeCroissantLigne2 v1.00","GammeCroissantLigne3 v0.01"'.
Exemples
// Récupération d'informations sur la gamme la plus prioritaire sur la période du 01/01 au 07/01/2010
var listeGammes : TStrings;
var gamme : TManufacturing;
listeGammes:=TStrings.Create;
listeGammes.CommaText:=ManufacturingGPAOIDsByArticleTimeRangeOrderByPriority('Croissant', 'mélangeCroissant', StrToDate('01/01/2010'), StrToDate('07/01/2010'));
if (listeGammes.Count>0) then begin
gamme:=TManufacturing.ConnectByGPAOID(listeGammes[0]);
try
// ...
finally
gamme.free;
end;
end;
var listeGammes : TStrings;
var gamme : TManufacturing;
listeGammes:=TStrings.Create;
listeGammes.CommaText:=ManufacturingGPAOIDsByArticleTimeRangeOrderByPriority('Croissant', 'mélangeCroissant', StrToDate('01/01/2010'), StrToDate('07/01/2010'));
if (listeGammes.Count>0) then begin
gamme:=TManufacturing.ConnectByGPAOID(listeGammes[0]);
try
// ...
finally
gamme.free;
end;
end;