- avoid copy and paste of current common sequence

git-svn-id: https://svn.erp5.org/repos/public/erp5/trunk@45157 20353a03-c40f-0410-a6d1-a30d3c3de9de

product/ERP5/tests/testBusinessTemplate.py

@@ -7397,22 +7397,25 @@ class TestBusinessTemplate(ERP5TypeTestCase, LogInterceptor):
     self.assertEqual(os.path.basename(sequence['document_path']),
         os.path.basename(sequence['ps_path']))
 
+  save_current_business_template_sequence_string = '\
+                       BuildBusinessTemplate \
+                       CheckBuiltBuildingState \
+                       CheckNotInstalledInstallationState \
+                       CheckObjectPropertiesInBusinessTemplate \
+                       SaveBusinessTemplate \
+                       CheckBuiltBuildingState \
+                       CheckNotInstalledInstallationState \
+  '
   def test_BusinessTemplateWithDocument(self):
     sequence_list = SequenceList()
     sequence_string = '\
                        CreateDocument \
                        CreateNewBusinessTemplate \
                        UseExportBusinessTemplate \
+                       ' + self.save_current_business_template_sequence_string + '\
                        AddDocumentToBusinessTemplate \
                        CheckModifiedBuildingState \
                        CheckNotInstalledInstallationState \
-                       BuildBusinessTemplate \
-                       CheckBuiltBuildingState \
-                       CheckNotInstalledInstallationState \
-                       CheckObjectPropertiesInBusinessTemplate \
-                       SaveBusinessTemplate \
-                       CheckBuiltBuildingState \
-                       CheckNotInstalledInstallationState \
                        RemoveDocument \
                        RemoveBusinessTemplate \
                        RemoveAllTrashBins \
@@ -7455,13 +7458,7 @@ class TestBusinessTemplate(ERP5TypeTestCase, LogInterceptor):
                        AddPropertySheetToBusinessTemplate \
                        CheckModifiedBuildingState \
                        CheckNotInstalledInstallationState \
-                       BuildBusinessTemplate \
-                       CheckBuiltBuildingState \
-                       CheckNotInstalledInstallationState \
-                       CheckObjectPropertiesInBusinessTemplate \
-                       SaveBusinessTemplate \
-                       CheckBuiltBuildingState \
-                       CheckNotInstalledInstallationState \
+                       ' + self.save_current_business_template_sequence_string + '\
                        RemoveDocument \
                        RemovePropertySheet \
                        RemoveBusinessTemplate \
@@ -7484,13 +7481,7 @@ class TestBusinessTemplate(ERP5TypeTestCase, LogInterceptor):
                        RemovePropertySheetFromBusinessTemplate \
                        CheckModifiedBuildingState \
                        CheckNotInstalledInstallationState \
-                       BuildBusinessTemplate \
-                       CheckBuiltBuildingState \
-                       CheckNotInstalledInstallationState \
-                       CheckObjectPropertiesInBusinessTemplate \
-                       SaveBusinessTemplate \
-                       CheckBuiltBuildingState \
-                       CheckNotInstalledInstallationState \
+                       ' + self.save_current_business_template_sequence_string + '\
                        ImportBusinessTemplate \
                        UseImportBusinessTemplate \
                        CheckBuiltBuildingState \
@@ -7518,13 +7509,7 @@ class TestBusinessTemplate(ERP5TypeTestCase, LogInterceptor):
                        AddDocumentToBusinessTemplate \
                        CheckModifiedBuildingState \
                        CheckNotInstalledInstallationState \
-                       BuildBusinessTemplate \
-                       CheckBuiltBuildingState \
-                       CheckNotInstalledInstallationState \
-                       CheckObjectPropertiesInBusinessTemplate \
-                       SaveBusinessTemplate \
-                       CheckBuiltBuildingState \
-                       CheckNotInstalledInstallationState \
+                       ' + self.save_current_business_template_sequence_string + '\
                        RemovePropertySheet \
                        RemoveDocument \
                        RemoveBusinessTemplate \
@@ -7591,13 +7576,7 @@ class TestBusinessTemplate(ERP5TypeTestCase, LogInterceptor):
                        AddPropertySheetToBusinessTemplate \
                        CheckModifiedBuildingState \
                        CheckNotInstalledInstallationState \
-                       BuildBusinessTemplate \
-                       CheckBuiltBuildingState \
-                       CheckNotInstalledInstallationState \
-                       CheckObjectPropertiesInBusinessTemplate \
-                       SaveBusinessTemplate \
-                       CheckBuiltBuildingState \
-                       CheckNotInstalledInstallationState \
+                       ' + self.save_current_business_template_sequence_string + '\
                        RemoveDocument \
                        RemovePropertySheet \
                        RemoveBusinessTemplate \
@@ -7624,13 +7603,7 @@ class TestBusinessTemplate(ERP5TypeTestCase, LogInterceptor):
                        \
                        CheckDraftBuildingState \
                        CheckNotInstalledInstallationState \
-                       BuildBusinessTemplate \
-                       CheckBuiltBuildingState \
-                       CheckNotInstalledInstallationState \
-                       CheckObjectPropertiesInBusinessTemplate \
-                       SaveBusinessTemplate \
-                       CheckBuiltBuildingState \
-                       CheckNotInstalledInstallationState \
+                       ' + self.save_current_business_template_sequence_string + '\
                        RemoveBusinessTemplate \
                        Tic \
                        CreatePropertySheet \