Skip to main content
Question

Import absences ne pas tenir compte de la valeur


AURELIE HAVARD
Expert
Forum|alt.badge.img+3

Bonjour,

Mon client importe des absences de sa GTA. La notion de planning et d’heures étant trop précises sur son GTA, ils font le choix de laisser gérer Silae pour la valorisation de l’absence.

Seulement dans le fichier exporté par la GTA, la valeur est tout de même présente : 

2 jrs d’absence

Dans l’exemple les CP sont gérés en heures sur le dossier, seulement le matricule 7166 est un salarié payé à l’heure, le matricule 7112 est lui en forfait jours.

Sur le BS on devrait donc avoir 2 jours déduits pour le matricule 7112 mais 14h déduites pour le matricule 7166.

Voici la FC en place : 

If parametrage then
        par.nblignestitre = 0
        par.sepdec = "."
    Else
        EV = True
        H = False 
        Abs = False 

        Chaine = valeurstring(1)
        NbCut = Strsplit(Chaine,":","Cut")

        If NbCut >= 4 then 
            EV = False
            Abs = True 
        Endif 

        Matricule = Strsplitelem("Cut", 1)

        If StrLen(Matricule) > 0 then
            If IdentifieSalarieEmploi(Matricule) = true then
                If BulletinExiste() = false then
                    cAbs = ""
                    VAr = ""

                    // ABSENCES
                        
                        If Abs = true then 

                            Code = Strsplitelem("Cut", 2) 

                            Select Case Code                           
                            Case "300" :                                      
                                cABS = "300"
                                Valeur = 0.00
                            Case "263" :                                      
                                cABS = "263"                                         
                            Case "260" :                                      
                                cABS = "260"
                            
                            Default: print "Code Abs introuvable : " + Code
                            Endselect  

                            // On s'assure d'avoir un code d'absence silae                        
                            if cAbs <> "" then
                                Valeur = 0.00
                                //If NbCut = 6 then Valeur = Todouble(Strsplitelem("Cut", 6))    
                                Datedeb = str2date(Strsplitelem("Cut",4),"ddMMyy")
                                Datefin = str2date(Strsplitelem("Cut",5),"ddMMyy")
                                Call genereAbsence (cABS,Datedeb,Datefin,-Valeur)
                            endif
                        Endif 
                Else
                    Print "Salarié <" + Matricule + ">, bulletin existant."
                Endif
            Else
                Print "Salarié et/ou emploi pour le matricule <"+Matricule +"> non identifié."
            Endif
        Endif
    Endif

 

Je ne réussis pas à faire en sorte de ne pas tenir compte de la valeur. J’ai tenté en forçant Valeur = 0 mais pour autant cela ne change rien.

Auriez-vous une piste à me donner ? 

 

Merci.