]> SALOME platform Git repositories - tools/eficas.git/blob - Aster/Cata/cataSTA8/Macro/calc_table_ops.py
Salome HOME
CCAR: merge de la version 1.14 dans la branche principale
[tools/eficas.git] / Aster / Cata / cataSTA8 / Macro / calc_table_ops.py
1 #@ MODIF calc_table_ops Macro  DATE 04/03/2008   AUTEUR MACOCCO K.MACOCCO 
2 # -*- coding: iso-8859-1 -*-
3 #            CONFIGURATION MANAGEMENT OF EDF VERSION
4 # ======================================================================
5 # COPYRIGHT (C) 1991 - 2005  EDF R&D                  WWW.CODE-ASTER.ORG
6 # THIS PROGRAM IS FREE SOFTWARE; YOU CAN REDISTRIBUTE IT AND/OR MODIFY  
7 # IT UNDER THE TERMS OF THE GNU GENERAL PUBLIC LICENSE AS PUBLISHED BY  
8 # THE FREE SOFTWARE FOUNDATION; EITHER VERSION 2 OF THE LICENSE, OR     
9 # (AT YOUR OPTION) ANY LATER VERSION.                                                  
10 #                                                                       
11 # THIS PROGRAM IS DISTRIBUTED IN THE HOPE THAT IT WILL BE USEFUL, BUT   
12 # WITHOUT ANY WARRANTY; WITHOUT EVEN THE IMPLIED WARRANTY OF            
13 # MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. SEE THE GNU      
14 # GENERAL PUBLIC LICENSE FOR MORE DETAILS.                              
15 #                                                                       
16 # YOU SHOULD HAVE RECEIVED A COPY OF THE GNU GENERAL PUBLIC LICENSE     
17 # ALONG WITH THIS PROGRAM; IF NOT, WRITE TO EDF R&D CODE_ASTER,         
18 #    1 AVENUE DU GENERAL DE GAULLE, 92141 CLAMART CEDEX, FRANCE.        
19 # ======================================================================
20
21 # RESPONSABLE MCOURTOI M.COURTOIS
22 from types import *
23 EnumTypes = (ListType, TupleType)
24
25 def calc_table_ops(self, TABLE, ACTION, INFO, **args):
26    """
27    Macro CALC_TABLE permettant de faire des opérations sur une table
28    """
29    import aster
30
31    macro = 'CALC_TABLE'
32    from Accas                 import _F
33    from Cata.cata             import table_sdaster, table_fonction, table_jeveux
34    from Utilitai.Utmess       import UTMESS
35    from Utilitai              import transpose
36    from Utilitai.Table        import Table, merge
37    from Utilitai.Sensibilite  import NomCompose
38
39    ier = 0
40    # La macro compte pour 1 dans la numerotation des commandes
41    self.set_icmd(1)
42
43    # Le concept sortant (de type table_sdaster ou dérivé) est tabout
44    self.DeclareOut('tabout', self.sd)
45    if self.sd.__class__ == table_fonction:
46       typ_tabout = 'TABLE_FONCTION'
47    else:
48       typ_tabout = 'TABLE'
49
50    # On importe les definitions des commandes a utiliser dans la macro
51    # Le nom de la variable doit etre obligatoirement le nom de la commande
52    CREA_TABLE    = self.get_cmd('CREA_TABLE')
53    DETRUIRE      = self.get_cmd('DETRUIRE')
54
55    # 0. faut-il utiliser une table dérivée
56    form_sens='\n... SENSIBILITE AU PARAMETRE %s (SD COMP %s)'
57    if args['SENSIBILITE']:
58       ncomp = NomCompose(TABLE, args['SENSIBILITE'], msg='F')
59       sdtab = table_jeveux(ncomp)
60       tab = sdtab.EXTR_TABLE()
61    else:
62       tab = TABLE.EXTR_TABLE()
63
64    #----------------------------------------------
65    # Boucle sur les actions à effectuer
66    for fOP in ACTION:
67       occ = fOP.cree_dict_valeurs(fOP.mc_liste)
68       for mc, val in occ.items():
69          if val == None:
70             del occ[mc]
71    
72       #----------------------------------------------
73       # 1. Traitement du FILTRE
74       # format pour l'impression des filtres
75       form_filtre = '\nFILTRE -> NOM_PARA: %-16s CRIT_COMP: %-4s VALE: %s'
76       if occ['OPERATION'] == 'FILTRE':
77          # peu importe le type, c'est la meme méthode d'appel
78          opts = [occ[k] for k in ('VALE','VALE_I','VALE_C','VALE_K') if occ.has_key(k)]
79          kargs = {}
80          for k in ('CRITERE','PRECISION'):
81             if occ.has_key(k):
82                kargs[k] = occ[k]
83          col = getattr(tab, occ['NOM_PARA'])
84          tab = getattr(col, occ['CRIT_COMP'])(*opts,**kargs) 
85          # trace l'operation dans le titre
86          #if FORMAT in ('TABLEAU','ASTER'):
87          tab.titr += form_filtre % (occ['NOM_PARA'], occ['CRIT_COMP'], \
88             ' '.join([str(v) for v in opts]))
89
90       #----------------------------------------------
91       # 2. Traitement de EXTR
92       if occ['OPERATION'] == 'EXTR':
93          lpar = occ['NOM_PARA']
94          if not type(lpar) in EnumTypes:
95             lpar = [lpar]
96          for p in lpar:
97             if not p in tab.para:
98                UTMESS('F', macro, 'Paramètre %s inexistant dans la table %s' % (p, TABLE.nom))
99          tab = tab[occ['NOM_PARA']]
100
101       #----------------------------------------------
102       # 3. Traitement de RENOMME
103       if occ['OPERATION'] == 'RENOMME':
104          try:
105             tab.Renomme(*occ['NOM_PARA'])
106          except KeyError, msg:
107             UTMESS('F', macro, msg)
108
109       #----------------------------------------------
110       # 4. Traitement du TRI
111       if occ['OPERATION'] == 'TRI':
112          tab.sort(CLES=occ['NOM_PARA'], ORDRE=occ['ORDRE'])
113    
114       #----------------------------------------------
115       # 5. Traitement de COMB
116       if occ['OPERATION'] == 'COMB':
117          tab2 = occ['TABLE'].EXTR_TABLE()
118          opts = [tab, tab2]
119          if occ.get('NOM_PARA') != None:
120             lpar = occ['NOM_PARA']
121             if not type(lpar) in EnumTypes:
122                lpar = [lpar]
123             for p in lpar:
124                if not p in tab.para:
125                   UTMESS('F', macro, 'Paramètre %s inexistant dans la table %s' % (p, TABLE.nom))
126                if not p in tab2.para:
127                   UTMESS('F', macro, 'Paramètre %s inexistant dans la table %s' % (p, occ['TABLE'].nom))
128             opts.append(lpar)
129          tab = merge(*opts)
130    
131       #----------------------------------------------
132       # 6. Traitement de OPER
133       if occ['OPERATION'] == 'OPER':
134          # ajout de la colonne dans la table
135          tab.fromfunction(occ['NOM_PARA'], occ['FORMULE'])
136          if INFO == 2:
137             vectval = getattr(tab, occ['NOM_PARA']).values()
138             aster.affiche('MESSAGE', 'Ajout de la colonne %s : %s' % (occ['NOM_PARA']+repr(vectval))+'\n')
139
140    #----------------------------------------------
141    # 99. Création de la table_sdaster résultat
142    # cas réentrant : il faut détruire l'ancienne table_sdaster
143    if self.sd.nom == TABLE.nom:
144       DETRUIRE(CONCEPT=_F(NOM=TABLE.nom,), INFO=1)
145
146    dprod = tab.dict_CREA_TABLE()
147    if INFO == 2:
148       echo_mess = []
149       echo_mess.append( '@-'*30+'\n' )
150       echo_mess.append( tab )
151       from pprint import pformat
152       echo_mess.append( pformat(dprod) )
153       echo_mess.append( '@-'*30+'\n' )
154       texte_final = ' '.join(echo_mess)
155       aster.affiche('MESSAGE', texte_final)
156
157    # surcharge par le titre fourni
158    tit = args['TITRE']
159    if tit != None:
160       if not type(tit) in EnumTypes:
161          tit = [tit]
162       dprod['TITRE'] = tuple(['%-80s' % lig for lig in tit])
163    # type de la table de sortie à passer à CREA_TABLE
164    tabout = CREA_TABLE(TYPE_TABLE=typ_tabout,
165                        **dprod)
166    
167    return ier