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.
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.
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 # ======================================================================
21 # RESPONSABLE MCOURTOI M.COURTOIS
23 EnumTypes = (ListType, TupleType)
25 def calc_table_ops(self, TABLE, ACTION, INFO, **args):
27 Macro CALC_TABLE permettant de faire des opérations sur une table
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
40 # La macro compte pour 1 dans la numerotation des commandes
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'
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')
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()
62 tab = TABLE.EXTR_TABLE()
64 #----------------------------------------------
65 # Boucle sur les actions à effectuer
67 occ = fOP.cree_dict_valeurs(fOP.mc_liste)
68 for mc, val in occ.items():
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)]
80 for k in ('CRITERE','PRECISION'):
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]))
90 #----------------------------------------------
91 # 2. Traitement de EXTR
92 if occ['OPERATION'] == 'EXTR':
93 lpar = occ['NOM_PARA']
94 if not type(lpar) in EnumTypes:
98 UTMESS('F', macro, 'Paramètre %s inexistant dans la table %s' % (p, TABLE.nom))
99 tab = tab[occ['NOM_PARA']]
101 #----------------------------------------------
102 # 3. Traitement de RENOMME
103 if occ['OPERATION'] == 'RENOMME':
105 tab.Renomme(*occ['NOM_PARA'])
106 except KeyError, msg:
107 UTMESS('F', macro, msg)
109 #----------------------------------------------
110 # 4. Traitement du TRI
111 if occ['OPERATION'] == 'TRI':
112 tab.sort(CLES=occ['NOM_PARA'], ORDRE=occ['ORDRE'])
114 #----------------------------------------------
115 # 5. Traitement de COMB
116 if occ['OPERATION'] == 'COMB':
117 tab2 = occ['TABLE'].EXTR_TABLE()
119 if occ.get('NOM_PARA') != None:
120 lpar = occ['NOM_PARA']
121 if not type(lpar) in EnumTypes:
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))
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'])
137 vectval = getattr(tab, occ['NOM_PARA']).values()
138 aster.affiche('MESSAGE', 'Ajout de la colonne %s : %s' % (occ['NOM_PARA']+repr(vectval))+'\n')
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)
146 dprod = tab.dict_CREA_TABLE()
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)
157 # surcharge par le titre fourni
160 if not type(tit) in EnumTypes:
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,