X-Git-Url: http://git.salome-platform.org/gitweb/?a=blobdiff_plain;f=Validation%2FV_MACRO_ETAPE.py;h=5c2186150f28cc841439f8c55ec405391929770b;hb=a7d5f18fe322c770026b50343adc09ed0472c192;hp=f5811f60be9420f1ffdcea269a1fd5924296ebf4;hpb=f1ca95b49f76bed371d3bc90fc94bd12a6f17523;p=tools%2Feficas.git

diff --git a/Validation/V_MACRO_ETAPE.py b/Validation/V_MACRO_ETAPE.py
index f5811f60..5c218615 100644
--- a/Validation/V_MACRO_ETAPE.py
+++ b/Validation/V_MACRO_ETAPE.py
@@ -1,4 +1,4 @@
-#@ MODIF V_MACRO_ETAPE Validation  DATE 14/09/2004   AUTEUR MCOURTOI M.COURTOIS 
+#@ MODIF V_MACRO_ETAPE Validation  DATE 22/02/2005   AUTEUR DURAND C.DURAND 
 # -*- coding: iso-8859-1 -*-
 #            CONFIGURATION MANAGEMENT OF EDF VERSION
 # ======================================================================
@@ -64,7 +64,21 @@ class MACRO_ETAPE(V_ETAPE.ETAPE):
       if self.state == 'unchanged' :
         return self.valid
       else:
-        valid=self.valid_child()
+        valid=1
+        # On marque les concepts CO pour verification ulterieure de leur bonne utilisation
+        l=self.mark_CO()
+        # On verifie que les concepts CO sont bien passes par type_sdprod
+        for c in l:
+          if c.etape is self.parent:
+             # le concept est propriete de l'etape parent
+             # Il n'a pas ete transforme par type_sdprod
+             # Cette situation est interdite
+             # Pb: La macro-commande a passe le concept a une commande (macro ?) mal definie
+             if cr =='oui': 
+               self.cr.fatal("Macro-commande mal definie : manque probablement appel a type_sdprod pour %s" % c.nom)
+             valid=0
+
+        valid=valid * self.valid_child()
         valid=valid * self.valid_regles(cr)
 
         if self.reste_val != {}: