Discussion :

[amelbtb]

Salut à tous
voici ma requête (la partie qui pose le problème est en rouge):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
declare variable $Qc as xs:integer := 0;
declare variable $Pc as xs:integer := 0; 
  
 for $c in doc('project.xml')/project/classe[@nom="classe1"]
 let $n := count(doc('project.xml')/project/classe[@nom="classe1"]/methodes/methode)
 return 
 
 <LCOM>{for $i in (1 to $n)
        for $j in (1 to $n)
        let $r:= $n
  let $mi := $c/methodes/methode[$i]
  let $mii := $c/methodes/methode[$j]
  
  where ($i != $j) 
  return
  
  if ($mi/attributs_utilises/attribut/@nom = $mii/attributs_utilises/attribut/@nom)
               then  let $Qc := $Qc + 1
                     return <Qc> {$Qc} </Qc>
               else  let $Pc := $Pc + 1 
                     return <Pc> {$Pc} </Pc> }
              </LCOM>

voici les résultats obtenues:

MXQuery 0.6.0
<?xml version='1.0' encoding='UTF-8' ?>
<LCOM><Pc>1</Pc><Pc>1</Pc><Pc>1</Pc><Pc>1</Pc><Qc>1</Qc><Qc>1</Qc><Pc>1</Pc><Qc>1</Qc><Qc>1</Qc><Pc>1</Pc><Qc>1</Qc><Qc>1</Qc></LCOM>

mais j'ai besoin de la somme totale des valeurs de Pc et Qc
Merci de m'aider.

[tsuji]

Les variables dans xquery sont en quelque sorte invariables, oui..., donc toute aproache resemble à compteur d'une itération dans un programme procédural serait inviable.

Je peux vous mettre à l'attention d'existence de mot clé de xquery "at" qui peut vous aider largement pour faire à ce but - google le. Pourtant, dans ce cas ci, c'est un peu plus compliqué - c'est vrai - et c'est insufficent. Le problème provient de vouloir résulter quelque chose en comptant les termes d'un produit cartésien en respectant de certain schéma de compter lié à l'ordre documentaire. Cela devient pas tout à fait evident.

Voici une façon cardinale de le faire.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
for $c in doc('project.xml')/project/classe[@nom="classe1"]
let $seqQc:=(
    for $g1 at $num1 in $c/methodes/methode
    for $g2 at $num2 in $c/methodes/methode
    where ($g2 != $g1) and
        ($g1/attributs_utilises/attribut/@nom != $g2/attributs_utilises/attribut/@nom)
    return
    concat($num1,'-',$num2)
)
let $seqPc:=(
    for $g1 at $num1 in $c/methodes/methode
    for $g2 at $num2 in $c/methodes/methode
    where ($g2 != $g1) and
        ($g1/attributs_utilises/attribut/@nom = $g2/attributs_utilises/attribut/@nom)
    return
    concat($num1,'-',$num2)
)
 
return 
<LCOM>
{
for $g1 at $num1 in $c/methodes/methode
for $g2 at $num2 in $c/methodes/methode
where $g2 != $g1
return
if ($g1/attributs_utilises/attribut/@nom != $g2/attributs_utilises/attribut/@nom)
then 
    <Qc>{index-of($seqQc, concat($num1,'-',$num2))}</Qc>
else
    <Pc>{index-of($seqPc, concat($num1,'-',$num2))}</Pc>
}
</LCOM>

[amelbtb]

Merci, je suis debutante avec xquery et la requête est un petit peu compliquée pour moi. Serait il possible d'ajouter des commentaires ?

[tsuji]

C'est un peu compliqué de l'expliquer et parfois un court commentaire ne suffit pas, hélas! Si le code ne parle pas de lui-même, ça signifie parfois ceux qui lirent ne sont pas prêts à résoudre certain problème. Mais je vais essayer quand même.

Si on fait un produit cartésien, le façon de le faire implique un certain ordre qu'on a pour compter.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
    for $g1 at $num1 in $c/methodes/methode
    for $g2 at $num2 in $c/methodes/methode

C'est une matrice nxn et on compte linéairement comme (0,0), (0,1), ..., (0, n-1), (1,0), (1,1), ...(n-1, n-1). C'est déjà une façon parmi les autres et c'est pas une façon dictée par la nature. Cette séquence donne une indice cardinale naturelle (1,2,..., n**2).

Malheureusement, on a besoin en fait deux séquences et deux façons de compter qui donnent chacune d'elles les deux types selon des critères exclusives l'un de l'autre, par exemple (0,0), (0,3),... pour une, et (0,1), (0,2),... pour l'autre. Ces séquences sont établies comme $seqPc et $seqQc, une fois pour tous pour être plus efficace, avec une notation equivalente 0-0, 0-3,... et 0-1, 0-2,... Pourtant chaque terme garde un caractère unique, distinct parmi les autres et vous pouvez garder la liberté de l'écrire d'une autre façon tant qu'elle est unique pour chaque terme individuellement.

Avec ces deux séquences établies, il suffit de trouver un terme qui satisfait un critère pour ranger parmi les Pc's ou les Qc's et on cherche l'indice dans la séquence $seqPc ou $seqQc... etc.

Je crains que ce ne soit pas tout à fait claire en fin de compte... et tant pis.