From 456974ad43b16fc9e3245fe678315c220e668414 Mon Sep 17 00:00:00 2001
From: JUMA <JUMA@BEEB-CORP>
Date: Wed, 14 Feb 2024 13:40:31 +0300
Subject: [PATCH] help.3

---
 instat/dlgClimaticNCMPCountRecords.vb  | 1 +
 instat/dlgClimaticNCMPIndices.vb       | 1 +
 instat/dlgClimaticNCMPRegionAverage.vb | 1 +
 instat/dlgClimaticNCMPSummaryFile.vb   | 1 +
 instat/dlgClimaticNCMPTrendGraphs.vb   | 1 +
 instat/dlgClimaticNCMPVariogram.vb     | 1 +
 6 files changed, 6 insertions(+)

diff --git a/instat/dlgClimaticNCMPCountRecords.vb b/instat/dlgClimaticNCMPCountRecords.vb
index c895af73bf3..70eb836e87c 100644
--- a/instat/dlgClimaticNCMPCountRecords.vb
+++ b/instat/dlgClimaticNCMPCountRecords.vb
@@ -41,6 +41,7 @@ Public Class dlgClimaticNCMPCountRecords
     Private Sub InitialiseDialog()
         Dim dctResolution As New Dictionary(Of String, String)
 
+        ucrBase.iHelpTopicID=631
         ucrSelectorForA2.SetParameter(New RParameter("a2", 0))
         ucrSelectorForA2.SetParameterIsrfunction()
         ucrSelectorForA2.ucrAvailableDataFrames.lblDataFrame.Text = "Indices Data Frame:"
diff --git a/instat/dlgClimaticNCMPIndices.vb b/instat/dlgClimaticNCMPIndices.vb
index bbf3d064731..58b7769ad50 100644
--- a/instat/dlgClimaticNCMPIndices.vb
+++ b/instat/dlgClimaticNCMPIndices.vb
@@ -39,6 +39,7 @@ Public Class dlgClimaticNCMPIndices
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID=627
         ucrSelectorIndices.SetParameter(New RParameter("df", 0))
         ucrSelectorIndices.SetParameterIsrfunction()
 
diff --git a/instat/dlgClimaticNCMPRegionAverage.vb b/instat/dlgClimaticNCMPRegionAverage.vb
index 941ff1b02ea..7ba410056e9 100644
--- a/instat/dlgClimaticNCMPRegionAverage.vb
+++ b/instat/dlgClimaticNCMPRegionAverage.vb
@@ -41,6 +41,7 @@ Public Class dlgClimaticNCMPRegionAverage
     Private Sub InitialiseDialog()
         Dim dctResolution As New Dictionary(Of String, String)
 
+        ucrBase.iHelpTopicID=629
         ucrSelectorForA2.SetParameter(New RParameter("a2", 0))
         ucrSelectorForA2.SetParameterIsrfunction()
         ucrSelectorForA2.ucrAvailableDataFrames.lblDataFrame.Text = "Indices Data Frame:"
diff --git a/instat/dlgClimaticNCMPSummaryFile.vb b/instat/dlgClimaticNCMPSummaryFile.vb
index 2cca33d94e8..1b6f59b16c0 100644
--- a/instat/dlgClimaticNCMPSummaryFile.vb
+++ b/instat/dlgClimaticNCMPSummaryFile.vb
@@ -39,6 +39,7 @@ Public Class dlgClimaticNCMPSummaryFile
     Private Sub InitialiseDialog()
         Dim dctResolution As New Dictionary(Of String, String)
 
+        ucrBase.iHelpTopicID=632
         ucrSelectorA2.SetParameter(New RParameter("a2", 0))
         ucrSelectorA2.SetParameterIsRFunction()
         ucrSelectorA2.lblDataFrame.Text = "Indices Data Frame:"
diff --git a/instat/dlgClimaticNCMPTrendGraphs.vb b/instat/dlgClimaticNCMPTrendGraphs.vb
index 28f6234e488..e8194c3c444 100644
--- a/instat/dlgClimaticNCMPTrendGraphs.vb
+++ b/instat/dlgClimaticNCMPTrendGraphs.vb
@@ -41,6 +41,7 @@ Public Class dlgClimaticNCMPTrendGraphs
     Private Sub InitialiseDialog()
         Dim dctResolution As New Dictionary(Of String, String)
 
+        ucrBase.iHelpTopicID=630
         ucrSelectorForA2.SetParameter(New RParameter("a2", 0))
         ucrSelectorForA2.SetParameterIsrfunction()
         ucrSelectorForA2.ucrAvailableDataFrames.lblDataFrame.Text = "Indices Data Frame:"
diff --git a/instat/dlgClimaticNCMPVariogram.vb b/instat/dlgClimaticNCMPVariogram.vb
index c3ffc8f2e19..af9a46f3c16 100644
--- a/instat/dlgClimaticNCMPVariogram.vb
+++ b/instat/dlgClimaticNCMPVariogram.vb
@@ -39,6 +39,7 @@ Public Class dlgClimaticNCMPVariogram
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID=628
         ucrSelectorVariogram.SetParameter(New RParameter("a2", 0))
         ucrSelectorVariogram.SetParameterIsrfunction()
         ucrSelectorVariogram.ucrAvailableDataFrames.lblDataFrame.Text = "Indices Data Frame:"