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