Fonction calcul - Mi temps thérapeutique

Bonjour, 

Je dois faire un maintien pour le mi temps thérapeutique, une fonction calcul correspond au maintien à appliquer, il s’agit celle de l’AT/MP, j’ai ajouté le code DADS 10,64 mais rien ne remonte sur le bulletin, est ce que quelqu’un pourrait me valider ma fonction calcul : 

Maintien = False
Carence = 0
Nbjours1 = 0
Emp.Anciennete = CalculeAncienneteA ( Abs.DtDeb )

Select Case Sal.S41.G01.00.015.002
Case "01":
    // Cadres
    Select Case AffectationDADS
    Case "04","08,10,64":
        // Accident de Travail Maladie Professionnelle
        TypesMaintiensRegroupes = "04,08,10,64"
        Maintien = True
        Carence = 0
        Nbjours1 = 90
        Pcent1 = 100
        Nbjours2 = 1500
        Pcent2 = 80
Merci pour votre aide.

Bonne journée.