- aggiunto mode e submode alle risposte

- sviluppo calc production per travi - corretto funzionamento Estimate in WindowREST
2026-05-15 16:48:56 +02:00
parent 491da764ff
commit 9558234969
7 changed files with 2249 additions and 386 deletions
@@ -534,8 +534,14 @@ while bRun do
               local Result = {}
               if nMode == QUESTION_MODES.PREVIEW then
                  nResult, AnswerArgs = Calc_Preview( QuestionArgs)
+                  if AnswerArgs then
+                     AnswerArgs.Mode = nMode
+                  end
               elseif nMode == QUESTION_MODES.BOM then
                  nResult, AnswerArgs = Calc_BOM( QuestionArgs)
+                  if AnswerArgs then
+                     AnswerArgs.Mode = nMode
+                  end
               elseif nMode == QUESTION_MODES.HARDWARE then
                  if QuestionArgs.SubMode then
                     local nSubMode = tonumber( QuestionArgs["SubMode"])
@@ -554,6 +560,10 @@ while bRun do
                        AnswerArgs = { Error = sErrorMsg}
                        EgtOutLog( sErrorMsg)
                     end
+                     if AnswerArgs then
+                        AnswerArgs.Mode = nMode
+                        AnswerArgs.SubMode = nSubMode
+                     end
                  else
                     nResult = 0
                     local sErrorMsg = 'Errore! Domanda senza SubMode che é obbligatorio!'
@@ -573,6 +583,10 @@ while bRun do
                        AnswerArgs = { Error = sErrorMsg}
                        EgtOutLog( sErrorMsg)
                     end
+                     if AnswerArgs then
+                        AnswerArgs.Mode = nMode
+                        AnswerArgs.SubMode = nSubMode
+                     end
                  else
                     nResult = 0
                     local sErrorMsg = 'Errore! Domanda senza SubMode che é obbligatorio!'