Merge pull request #31 from africanmathsinitiative/master

Updating master

instat/dlgCalculateTreatmentDifferences.vb

@@ -49,6 +49,7 @@ Public Class dlgCalculateTreatmentDifferences
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID = 581
         ucrChkCalculateDiffCategories.SetText("Calculate Difference Categories")
         ucrChkCalculateDiffCategories.AddToLinkedControls(ucrInputBreakPoints, {True}, bNewLinkedHideIfParameterMissing:=True)
         ucrChkCalculateDiffCategories.AddToLinkedControls(ucrInputLabels, {True}, bNewLinkedHideIfParameterMissing:=True)

instat/dlgClimaticCheckDataRain.vb

@@ -77,6 +77,7 @@ Public Class dlgClimaticCheckDataRain
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID = 511
         Dim lstControls As New List(Of Control)
         lstControls.AddRange({lblMissingThreshold, cmdOmitMonths, lblThresholdmm})
 

instat/dlgClimaticCheckDataTemperature.vb

@@ -57,6 +57,7 @@ Public Class dlgClimaticCheckDataTemperature
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID = 559
         'TODO: Not yet implemented.
         rdoMultiple.Enabled = False
         rdoSatelite.Enabled = False

instat/dlgClimaticLengthOfSeason.vb

@@ -38,7 +38,7 @@ Public Class dlgClimaticLengthOfSeason
     End Sub
 
     Private Sub InitialiseDialog()
-
+        ucrBase.iHelpTopicID = 564
         ucrReceiverStartofRains.SetParameter(New RParameter("start_doy", 1, bNewIncludeArgumentName:=False))
         ucrReceiverStartofRains.SetParameterIsString()
         ucrReceiverStartofRains.bWithQuotes = False

instat/dlgClimaticStationMaps.vb

@@ -53,6 +53,7 @@ Public Class dlgClimaticStationMaps
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID = 558
         ucrBase.clsRsyntax.iCallType = 3
         ucrBase.clsRsyntax.bExcludeAssignedFunctionOutput = False
 

instat/dlgCompare.vb

@@ -48,6 +48,7 @@ Public Class dlgCompare
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID = 562
         ucrPnlCompare.AddRadioButton(rdoDifferences)
         ucrPnlCompare.AddRadioButton(rdoAnomalies)
         ucrPnlCompare.AddParameterPresentCondition(rdoDifferences, "manipulations", False)

instat/dlgCompareTreatmentLines.vb

@@ -51,8 +51,9 @@ Public Class dlgCompareTreatmentLines
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID = 585
         ucrBase.clsRsyntax.bExcludeAssignedFunctionOutput = False
-        'ucrBase.iHelpTopicID = 
+
         ucrBase.clsRsyntax.iCallType = 3
 
         ucrSelectorPlot.SetParameter(New RParameter("data", 0))

instat/dlgConversions.vb

@@ -36,6 +36,7 @@ Public Class dlgConversions
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID = 563
         Dim dctPrecipitationUnits As New Dictionary(Of String, String)
         Dim dctTemperatureUnits As New Dictionary(Of String, String)
         Dim dctWindSpeedUnits As New Dictionary(Of String, String)

instat/dlgDefineOptionsByContext.vb

@@ -38,6 +38,7 @@ Public Class dlgDefineOptionsByContext
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID = 572
         'TODO not yet implemented
         lblKeyColumns.Hide()
         ucrInputKeyCheck.Hide()

instat/dlgDisplayDailyData.vb

@@ -41,6 +41,8 @@ Public Class dlgDisplayDailyData
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID = 361
+
         Dim dctBarColour As New Dictionary(Of String, String)
         Dim dctRugColour As New Dictionary(Of String, String)
         Dim dctSummary As New Dictionary(Of String, String)

instat/dlgEvapotranspiration.vb

@@ -46,8 +46,9 @@ Public Class dlgEvapotranspiration
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID = 565
         ucrBase.clsRsyntax.iCallType = 2
-        'ucrBase.iHelpTopicID = 510
+
         Dim dctInputCrops As New Dictionary(Of String, String)
         Dim dctInputTimeStep As New Dictionary(Of String, String)
         Dim dctInputSolar As New Dictionary(Of String, String)

instat/dlgExportToCMSAF.vb

@@ -37,6 +37,7 @@ Public Class dlgExportToCMSAF
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID = 569
         ucrReceiverStation.Selector = ucrSelectorImportToCMSAF
         ucrReceiverDate.Selector = ucrSelectorImportToCMSAF
         ucrReceiverLongitude.Selector = ucrSelectorImportToCMSAF

instat/dlgPICSARainfall.vb

@@ -80,11 +80,10 @@ Public Class dlgPICSARainfall
         TestOkEnabled()
     End Sub
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID = 118
         ucrBase.clsRsyntax.bExcludeAssignedFunctionOutput = False
-        ucrBase.clsRsyntax.iCallType = 3
-
-        'ucrBase.iHelpTopicID= 
-
+        ucrBase.clsRsyntax.iCallType = 3
+
         ucrPICSARainfallSelector.SetParameter(New RParameter("data", 0))
         ucrPICSARainfallSelector.SetParameterIsrfunction()
 

instat/dlgPlotRegion.vb

@@ -38,6 +38,7 @@ Public Class dlgPlotRegion
     End Sub
 
     Private Sub InitialiseDialog()
+        ucrBase.iHelpTopicID = 568
         ucrBase.clsRsyntax.iCallType = 3
 
         ucrReceiverLongitude.SetParameter(New RParameter("lon", 1))

instat/dlgSPI.vb

@@ -36,7 +36,7 @@ Public Class dlgSPI
 
     Private Sub InitialiseDialog()
         ucrBase.clsRsyntax.iCallType = 2
-        ucrBase.iHelpTopicID = 510
+        ucrBase.iHelpTopicID = 566
 
         ucrSelectorVariable.SetParameterIsString()
 

instat/dlgTidyDailyData.vb

@@ -44,6 +44,8 @@ Public Class dlgTidyDailyData
     End Sub
 
     Private Sub InitialiseDialog()
+
+        ucrBase.iHelpTopicID = 561
         ucrBase.clsRsyntax.iCallType = 2
 
         ucrPnlReshapeClimaticData.AddRadioButton(rdoYear)