Pour qu'un carnet d'entretien puisse être généré, certaines informations doivent être disponibles dans le système.

En l'absence d'une d'entre elle, le message en pièce jointe est généré par l'application.

Il faut déterminer qu'elle est l'entité juridique responsable de l'immeuble, grâce à celle-ci, nous allons pouvoir trouver les autres éléments :

- Garantie Financière

- Assurance Professionnelle

- Carte Professionnelle

Ces informations sont contenues dans Maya dans les tables :

- SOCJURP0 pour la Garantie Financière et Assurance Professionnelle

- ACTAGEP0 pour le n° de Carte Professionnel

Actuellement ces informations sont mises à jour depuis le menu MCDI01 option 31. Soc Juridiques et Cartes Prof.

La version actuelle de l'application ne permet pas de répondre aux besoins.

Nous avons besoin d'avoir dans ACTAGEP0  un enregistrement par Pôle et par société possédant des immeubles attachés à ce pôle. 

Une nouvelle version sera mise en place

Le lien pour obtenir un carnet d'entretien est sur l'écran PIAS61001 en bas de l'écran en passant par ATTN 55. Desc.&histo immeuble

Lien pour obtenir un carnet d'entretien de l'immeuble 07.0002  https://carnet-entretien.sergic.com/070002

Voici les requêtes permettant la détermination des informations

-- Entité juridique en fonction du pôle

SELECT DISTINCT   CASE
                    WHEN fa.IMCAF ='SD' THEN 'Syndic-one'
                    WHEN fa.IMCAF IN ('E5', 'E7') THEN 'Serse'
                    WHEN fa.IMCAF IN ('D4', 'D5') THEN 'Sergic Entreprises'
                    ELSE 'Sergic'                                          
                  END                                                  
                   FROM FAIMME fa 

                   WHERE (fa.IMSOC* 10000 + fa.IMCIMM) = :refImmeuble

--Garantie Financiere

SELECT 

        'Garantie financière', 

        TRIM(tie.TIAVO1) AS organisme, s.SOMGAF AS montant FROM SOCJURP0 s 

        JOIN TIEMAYP0 t ON (t.TINIDN = s.SOGFIN) 

        JOIN TIEADUP0 ti ON (ti.tintie=t.TINTIE and ti.TIVUAD = 'CDE') 

        JOIN TIEADRP0 tie ON tie.tinadr=ti.TINADR 

        WHERE s.SOLSOJ= :nom --nom = (Syndic one, Serse, Sergic Entreprises, Sergic)

-- Assurance Professionnelle

SELECT 

        'Assurance professionnelle', 

        TRIM(tie.TIAVO1) AS organisme FROM SOCJURP0 s 

        JOIN TIEMAYP0 t ON (t.TINIDN=s.SOAPRO) 

        JOIN TIEADUP0 ti ON (ti.tintie=t.TINTIE and ti.TIVUAD = 'CDE') 

        JOIN TIEADRP0 tie ON tie.tinadr=ti.TINADR 

        WHERE s.SOLSOJ= :nom

-- Carte Professionnelle

SELECT 

        'N° carte professionnelle',

        TRIM(a.ACNCTP) 

        FROM FAIMME f JOIN ACTAGEP0 a ON (a.ACCAGE = f.IMCAF AND a.ACVCAC = 'COP' AND a.ACCSOC = f.IMSOC) 

        WHERE (f.IMSOC * 10000 + f.IMCIMM) = :refImmeuble