From d10b4edc8d82e44c542921858ed12513785e4f19 Mon Sep 17 00:00:00 2001
From: OldFcuk <84081713+OldFcuk@users.noreply.github.com>
Date: Tue, 18 Jul 2023 17:11:41 +0300
Subject: [PATCH] Update Macro.vba

---
 solidworks-api/document/assembly/compose-flat-bom/Macro.vba | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/solidworks-api/document/assembly/compose-flat-bom/Macro.vba b/solidworks-api/document/assembly/compose-flat-bom/Macro.vba
index fe436552..1af7ed79 100644
--- a/solidworks-api/document/assembly/compose-flat-bom/Macro.vba
+++ b/solidworks-api/document/assembly/compose-flat-bom/Macro.vba
@@ -131,12 +131,12 @@ Function GetPropertyValue(model As SldWorks.ModelDoc2, conf As String, prpName A
     Dim prpVal As String
     Dim prpResVal As String
     
-    confSpecPrpMgr.Get3 prpName, False, "", prpVal
+    confSpecPrpMgr.Get3 prpName, False, prpVal, prpResVal
     
-    If prpVal = "" Then
+    If prpResVal = "" Then
         genPrpMgr.Get3 prpName, False, prpVal, prpResVal
     End If
     
     GetPropertyValue = prpResVal
     
-End Function
\ No newline at end of file
+End Function