Aster/Cata/cataSTA76/Macro/macro_proj_base_ops.py

   1 #@ MODIF macro_proj_base_ops Macro  DATE 05/07/2005   AUTEUR DURAND C.DURAND
   2 # -*- coding: iso-8859-1 -*-
   3 #            CONFIGURATION MANAGEMENT OF EDF VERSION
   4 # ======================================================================
   5 # COPYRIGHT (C) 1991 - 2002  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
  22
  23 def macro_proj_base_ops(self,BASE,NB_VECT,MATR_ASSE_GENE,VECT_ASSE_GENE,PROFIL,**args):
  24   """
  25      Ecriture de la macro MACRO_PROJ_BASE
  26   """
  27   ier=0
  28   # On importe les definitions des commandes a utiliser dans la macro
  29   NUME_DDL_GENE  =self.get_cmd('NUME_DDL_GENE')
  30   PROJ_MATR_BASE =self.get_cmd('PROJ_MATR_BASE')
  31   PROJ_VECT_BASE =self.get_cmd('PROJ_VECT_BASE')
  32   # La macro compte pour 1 dans la numerotation des commandes
  33   self.set_icmd(1)
  34
  35   _num=NUME_DDL_GENE(BASE=BASE,NB_VECT=NB_VECT,STOCKAGE=PROFIL)
  36   if MATR_ASSE_GENE:
  37     for m in MATR_ASSE_GENE:
  38       motscles={}
  39       if   m['MATR_ASSE']     :  motscles['MATR_ASSE']     =m['MATR_ASSE']
  40       elif m['MATR_ASSE_GENE']:  motscles['MATR_ASSE_GENE']=m['MATR_ASSE_GENE']
  41       else:
  42           ier=ier+1
  43           self.cr.fatal("<F> <MACRO_PROJ_BASE> MATR_ASSE et MATR_ASSE_GENE absents")
  44           return ier
  45       self.DeclareOut('mm',m['MATRICE'])
  46       mm=PROJ_MATR_BASE(BASE=BASE,NUME_DDL_GENE=_num,**motscles)
  47
  48   if VECT_ASSE_GENE:
  49     _num=NUME_DDL_GENE(BASE=BASE,NB_VECT=NB_VECT,STOCKAGE=PROFIL)
  50     for v in VECT_ASSE_GENE:
  51       motscles={}
  52       if   v['VECT_ASSE']     :  motscles['VECT_ASSE']     =v['VECT_ASSE']
  53       elif v['VECT_ASSE_GENE']:  motscles['VECT_ASSE_GENE']=v['VECT_ASSE_GENE']
  54       else:
  55           ier=ier+1
  56           self.cr.fatal("<F> <MACRO_PROJ_BASE>MATR_ASSE et MATR_ASSE_GENE absents")
  57           return ier
  58       motscles['TYPE_VECT']=v['TYPE_VECT']
  59       self.DeclareOut('vv',v['VECTEUR'])
  60       vv=PROJ_VECT_BASE(BASE=BASE,NUME_DDL_GENE=_num,**motscles)
  61
  62   return ier