private void TPartnerNewDialogWinForm_Load(System.Object sender, System.EventArgs e)
{
FLogic = new TPartnerNewDialogScreenLogic();
cmbPartnerClass.InitialiseUserControl();
cmbAcquisitionCode.InitialiseUserControl();
// Hide invalid Acquisition Codes
this.cmbAcquisitionCode.Filter = PAcquisitionTable.GetValidAcquisitionDBName() + " <> 0";
// Setup Data
// As part of bug 5556 testing, checked if this returned a DataTable with any rows with RowState Modified.
// The test didn't return much so this isn't conclusive, but it doesn't point to an error:
// DataTable summary: 1 rows; 0 Added, 0 deleted, 0 detached, ***0 modified***, 1 unchanged. Table name InstalledSitesList
FInstalledSitesDT = TDataCache.TMPartner.GetCacheablePartnerTable(TCacheablePartnerTablesEnum.InstalledSitesList);
if (FInstalledSitesDT.Rows.Count != 0)
{
FLogic.CreateColumns(grdInstalledSites, FInstalledSitesDT);
// DataBindingrelated stuff
SetupDataGridDataBinding();
// Setup screen with default values
InitialiseUI();
if ((FPartnerClass == SharedTypes.PartnerClassEnumToString(TPartnerClass.PERSON)) ||
(FDefaultPartnerClass == SharedTypes.PartnerClassEnumToString(TPartnerClass.PERSON)))
{
ShowFamilyPartnerSelection(true);
}
// Make the Grid respond on updown keys
cmbPartnerClass.Focus();
grdInstalledSites.Focus();
// make sure that the grid row gets selected; Mono would not do it automatically
DataGrid_FocusRowEntered(null, null);
FFormSetupFinished = true;
}
else
{
MessageBox.Show(StrCantCreateNewPartner, MCommonResourcestrings.StrErrorNoInstalledSites);
DialogResult = System.Windows.Forms.DialogResult.Cancel;
Close();
return;
}
}
private void TPartnerNewDialogWinForm_Load(System.Object sender, System.EventArgs e)
{
FLogic = new TPartnerNewDialogScreenLogic();
cmbPartnerClass.InitialiseUserControl();
cmbAcquisitionCode.InitialiseUserControl();
// Hide invalid Acquisition Codes
this.cmbAcquisitionCode.Filter = PAcquisitionTable.GetValidAcquisitionDBName() + " <> 0";
// Setup Data
FInstalledSitesDT = TDataCache.TMPartner.GetCacheablePartnerTable(TCacheablePartnerTablesEnum.InstalledSitesList);
if (FInstalledSitesDT.Rows.Count != 0)
{
FLogic.CreateColumns(grdInstalledSites, FInstalledSitesDT);
// DataBindingrelated stuff
SetupDataGridDataBinding();
// Setup screen with default values
InitialiseUI();
if ((FPartnerClass == SharedTypes.PartnerClassEnumToString(TPartnerClass.PERSON)) ||
(FDefaultPartnerClass == SharedTypes.PartnerClassEnumToString(TPartnerClass.PERSON)))
{
ShowFamilyPartnerSelection(true);
}
// Make the Grid respond on updown keys
cmbPartnerClass.Focus();
grdInstalledSites.Focus();
// make sure that the grid row gets selected; Mono would not do it automatically
DataGrid_FocusRowEntered(null, null);
FFormSetupFinished = true;
}
else
{
MessageBox.Show(StrCantCreateNewPartner, MCommonResourcestrings.StrErrorNoInstalledSites);
DialogResult = System.Windows.Forms.DialogResult.Cancel;
Close();
return;
}
}
