diff --git a/CatiaNetTest/AndOrDataExtraction.vb b/CatiaNetTest/AndOrDataExtraction.vb
index 7c35f0b444b5af2a7d56025638e2d0a91471b151..76940e867ec4e519969d3b6051d09082604252c7 100644
--- a/CatiaNetTest/AndOrDataExtraction.vb
+++ b/CatiaNetTest/AndOrDataExtraction.vb
@@ -15,7 +15,7 @@ Public Class AndOrDataExtraction
     Public bGenerateANDOR As Boolean
     Public bAutomaticStep As Boolean
     Public iBoundingBoxCode As Integer
-    Public intStep As Integer
+    Public intStep As Double
     Public dCollSens As Double
     Public t_liaison As Double
     Public t_mw As Double
@@ -42,14 +42,14 @@ Public Class AndOrDataExtraction
     Sub CatMain()
 
         'Test parameters
-        iBoundingBoxCode = 1
+        iBoundingBoxCode = 2
         bBoundingBoxProjectionCheck = True
         bGenerateANDOR = False
-        bAutomaticStep = True
-        intStep = 13
-        dCollSens = 2
+        bAutomaticStep = False
+        intStep = 2
+        dCollSens = 1
         xlsPath = "D:\03_Dissertation\20_Tools\CATIA_NET\ProgData\"
-        xlsFileName = "ex_rq1_10_orenda_jet_enginge"
+        xlsFileName = "ex_rq1_5_shear_mold"
 
         CATIA = GetObject(, "CATIA.Application")
         If CATIA Is Nothing Then CATIA = CreateObject("CATIA.Application")
diff --git a/CatiaNetTest/AssemblyTiers2.vb b/CatiaNetTest/AssemblyTiers2.vb
index a330bee33c6aefe8136d06c5f4f86389bf749122..e606c9a60a7085f7f18c39dcaf020a635c31790d 100644
--- a/CatiaNetTest/AssemblyTiers2.vb
+++ b/CatiaNetTest/AssemblyTiers2.vb
@@ -28,7 +28,7 @@ Public Class AssemblyTiers2
     Public bChooseExtractionDirection As Boolean
     Public intJ As Integer
     Public iBoundingBoxCode As Integer
-    Public intStep As Integer
+    Public intStep As Double
     Public dCollSens As Double
     Public xlsPath As String
     Public xlsFileName As String
@@ -1660,7 +1660,7 @@ exitCD:
     End Function
 
     Sub moveProduct(objProd As Product, intDir As Integer, bPositive As Boolean)
-        Dim intS As Integer
+        Dim intS As Double
         If bPositive = True Then
             intS = intStep
         Else
diff --git a/CatiaNetTest/bin/Debug/CatiaNetTest.exe b/CatiaNetTest/bin/Debug/CatiaNetTest.exe
index 3666fe07c5ec2675005d11f4260191a4325b5c5c..b0ce59f9272bcb7d355d965c0f624781d0a8c323 100644
Binary files a/CatiaNetTest/bin/Debug/CatiaNetTest.exe and b/CatiaNetTest/bin/Debug/CatiaNetTest.exe differ
diff --git a/CatiaNetTest/bin/Debug/CatiaNetTest.pdb b/CatiaNetTest/bin/Debug/CatiaNetTest.pdb
index a57af57efc13433e3f9d90e1bceb79898c04e084..99b0012a69849abf46e55d4ffa1906ff1207c44b 100644
Binary files a/CatiaNetTest/bin/Debug/CatiaNetTest.pdb and b/CatiaNetTest/bin/Debug/CatiaNetTest.pdb differ
diff --git a/CatiaNetTest/obj/Debug/CatiaNetTest.exe b/CatiaNetTest/obj/Debug/CatiaNetTest.exe
index 3666fe07c5ec2675005d11f4260191a4325b5c5c..b0ce59f9272bcb7d355d965c0f624781d0a8c323 100644
Binary files a/CatiaNetTest/obj/Debug/CatiaNetTest.exe and b/CatiaNetTest/obj/Debug/CatiaNetTest.exe differ
diff --git a/CatiaNetTest/obj/Debug/CatiaNetTest.pdb b/CatiaNetTest/obj/Debug/CatiaNetTest.pdb
index a57af57efc13433e3f9d90e1bceb79898c04e084..99b0012a69849abf46e55d4ffa1906ff1207c44b 100644
Binary files a/CatiaNetTest/obj/Debug/CatiaNetTest.pdb and b/CatiaNetTest/obj/Debug/CatiaNetTest.pdb differ