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

' Augmentation de la cadence selon la quantité à produire
Select Case Tache.Quantite_Operatoire_GVC
Case is > 2000
    Cadence = Cadence  * 1.1
End Select

' Si difficulté de découpe complexe : cadence diminuée de 20%
if Tache.Information_Process(5).Zone_Configurable_10 = "2" then
    Cadence = Cadence * 0.8
end if

' Si opérateur en formation, on diminue la cadence de 20%
Dim OperateurEnFormation as Boolean = Tache.Zone_Configurable_10
if OperateurEnFormation then
    Cadence = Cadence * 0.8
end if