From f2862013a05926199568984d79ca68b6d27b7c2f Mon Sep 17 00:00:00 2001 From: n-thony Date: Thu, 8 Feb 2024 14:48:49 +0300 Subject: [PATCH] minor code change --- instat/sdgSummaries.vb | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/instat/sdgSummaries.vb b/instat/sdgSummaries.vb index a969cd1a956..ee20059ba3f 100644 --- a/instat/sdgSummaries.vb +++ b/instat/sdgSummaries.vb @@ -329,7 +329,7 @@ Public Class sdgSummaries ucrChkSetseed.AddParameterPresentCondition(False, "seed", False) ucrChkProportionsPercentages.SetParameter(New RParameter("percentage_type")) - ucrChkProportionsPercentages.SetValuesCheckedAndUnchecked("factors", "none") + ucrChkProportionsPercentages.SetValuesCheckedAndUnchecked(Chr(34) & "factors" & Chr(34), Chr(34) & "none" & Chr(34)) ucrChkProportionsPercentages.SetText("Add Percentages") ucrNudSeed.SetParameter(New RParameter("seed", 11)) @@ -499,11 +499,11 @@ Public Class sdgSummaries ucrChkSumOfSquaredResiduals.SetRCode(clsListFunction, bReset, bCloneIfNeeded:=True) ucrChkVolumetricEfficiency.SetRCode(clsListFunction, bReset, bCloneIfNeeded:=True) ucrChkSample.SetRCode(clsListFunction, bReset, bCloneIfNeeded:=True) - + ucrChkProportionsPercentages.SetRCode(clsDefaultFunction, bReset, bCloneIfNeeded:=True) If bReset Then ucrSelectorSecondVariable.Reset() ucrSelectorOrderBy.Reset() - ucrChkProportionsPercentages.SetRCode(clsDummyFunction, bReset) + If strDefaultTab <> "" Then For i As Integer = 0 To tbSummaries.TabPages.Count - 1