Jointures dynamiques vX.11
- Bertrand Littel
Jointures dynamiques X.11
Utilisation de .ActivateCase
Une nouvelle instruction de RecordSql permet de traiter des jointures variables. Le principe est de remplacer l'écriture de plusieurs jointures par une seule, en permettant de mettre dans un ‘case’ à l’intérieur de la jointure les éléments différentiateurs qui ont donné plusieurs jointures à l’origine.
Exemple d'écriture en jointure classique
<LeftJoin NoActivate>
ENT AS ENT_DV
USING EntetePiece_PicodFullPiNo(1, MOUV.PrefDvNo, MOUV.DvNo)
<LeftJoin NoActivate>
ENT AS ENT_Cd
USING EntetePiece_PicodFullPiNo(2, MOUV.PrefCdNo, MOUV.CdNo)
<LeftJoin NoActivate>
ENT AS ENT_Bl
USING EntetePiece_PicodFullPiNo(3, MOUV.PrefBlNo, MOUV.BlNo)
<LeftJoin NoActivate>
ENT AS ENT_Fa
USING EntetePiece_PicodFullPiNo(4, MOUV.PrefFaNo, MOUV.FaNo)On voit ici 4 jointures qui ont pour différence les paramètres passés au dictionnaire de jointure.
Le code diva manipule dans ce cas une activation de jointure à la demande
Switch Choix_Type_Statistique
Case C_PICOD_DEV
InterroStat.Join.Activate('ENT_DV')
Case C_PICOD_CDE
InterroStat.Join.Activate('ENT_Cd')
Case C_PICOD_BL
InterroStat.Join.Activate('ENT_BL')
Case C_PICOD_FAC
InterroStat.Join.Activate('ENT_FA')
EndSwitch
La nouvelle fonctionnalité de jointure dynamique permet de passer à une nouvelle écriture
Exemple d'écriture pour utilisation du .ActivateCase dans le .DHSQ
<Join NoActivate>
GTFDD.dhsd ENT As ENT
Case DEVIS
USING EntetePiece_PicodFullPiNo(1, MOUV.PrefDvNo, MOUV.DvNo)
Case COMMANDE
USING EntetePiece_PicodFullPiNo(2, MOUV.PrefCdNo, MOUV.CdNo)
Case BL
USING EntetePiece_PicodFullPiNo(3, MOUV.PrefBlNo, MOUV.BlNo)
Case FACTURE
USING EntetePiece_PicodFullPiNo(4, MOUV.PrefFaNo, MOUV.FaNo)
Cela implique des adaptations dans le code diva appelant pour lequel, il faut remplacer l’instruction instance.join.activate('Ent') par instanceMouvement.join.activateCase('ENT','UseCase')