Retour sommaire : Direct Planning - Formules - Voir aussi : Syntaxe Visual Basic

Postulat : le nombre de couleur max est saisie sur une zone configurable de la fiche machine

EstCompatible = True

'-------------------------------------------------------------------------------------------
' Controle selon le nombre de couleurs max défini sur la machine
'-------------------------------------------------------------------------------------------
Dim NbCouleursMaxMachine as integer = Tache.Machine.Zone_Configurable_1

if Tache.Information_Process(2).Zone_Configurable_2 > NbCouleursMaxMachine Then
    MessageErreur = "Cette machine n'accèpte pas plus de " & NbCouleursMaxMachine & " couleurs"
    EstCompatible = false
end If