// TODO: rollback changes when exception!
private void ParseSource()
{
int srcYear;
if (!int.TryParse(edSourceYear.Text, out srcYear))
{
ShowError(fLangMan.LS(FLS.LSID_SourceYearInvalid));
return;
}
string srcName = cbSource.Text;
string srcPage = edPage.Text;
string place = edPlace.Text;
GDMSourceRecord srcRec = null;
if (!string.IsNullOrEmpty(srcName))
{
srcRec = fBase.Context.FindSource(srcName);
if (srcRec == null)
{
srcRec = fBase.Context.Tree.CreateSource();
srcRec.ShortTitle = srcName;
}
}
GDMIndividualRecord iMain = null;
int num = dataGridView1.Rows.Count;
for (int r = 0; r < num; r++)
{
DataGridViewRow row = dataGridView1.Rows[r];
string lnk = CheckStr((string)row.Cells[0].Value);
string nm = CheckStr((string)row.Cells[1].Value);
string pt = CheckStr((string)row.Cells[2].Value);
string fm = CheckStr((string)row.Cells[3].Value);
string age = CheckStr((string)row.Cells[4].Value);
string comment = CheckStr((string)row.Cells[5].Value);
if (!string.IsNullOrEmpty(lnk))
{
PersonLink link = GetLinkByName(lnk);
if (link == PersonLink.plNone)
{
continue;
}
GDMSex sx = fBase.Context.DefineSex(nm, pt);
GDMIndividualRecord iRec = fBase.Context.CreatePersonEx(nm, pt, fm, sx, false);
if (!string.IsNullOrEmpty(age) && ConvertHelper.IsDigits(age))
{
int birthYear = srcYear - int.Parse(age);
fBase.Context.CreateEventEx(iRec, GEDCOMTagName.BIRT, "ABT " + birthYear.ToString(), "");
}
if (!string.IsNullOrEmpty(place))
{
GDMCustomEvent evt = fBase.Context.CreateEventEx(iRec, GEDCOMTagName.RESI, "", "");
evt.Place.StringValue = place;
}
if (!string.IsNullOrEmpty(comment))
{
GDMNoteRecord noteRec = fBase.Context.Tree.CreateNote();
noteRec.SetNoteText(comment);
iRec.AddNote(noteRec);
}
if (srcRec != null)
{
iRec.AddSource(srcRec, srcPage, 0);
}
fBase.NotifyRecord(iRec, RecordAction.raAdd);
GDMFamilyRecord family = null;
if (link == PersonLink.plPerson)
{
iMain = iRec;
string evName = "";
if (rbSK_Met.Checked)
{
switch (cbEventType.SelectedIndex)
{
case 0:
evName = GEDCOMTagName.BIRT;
break;
case 1:
evName = GEDCOMTagName.DEAT;
break;
case 2:
evName = GEDCOMTagName.MARR;
break;
}
}
if (evName == GEDCOMTagName.BIRT || evName == GEDCOMTagName.DEAT)
{
GDMCustomEvent evt = fBase.Context.CreateEventEx(iRec, evName, GDMDate.CreateByFormattedStr(edEventDate.Text, false), "");
evt.Place.StringValue = place;
}
else if (evName == GEDCOMTagName.MARR)
{
family = iRec.GetMarriageFamily(true);
GDMCustomEvent evt = fBase.Context.CreateEventEx(family, evName, GDMDate.CreateByFormattedStr(edEventDate.Text, false), "");
evt.Place.StringValue = place;
}
}
else
{
if (iMain == null)
{
throw new PersonScanException(fLangMan.LS(FLS.LSID_BasePersonInvalid));
}
else
{
switch (link)
{
case PersonLink.plFather:
case PersonLink.plMother:
family = iMain.GetParentsFamily(true);
family.AddSpouse(iRec);
break;
case PersonLink.plGodparent:
iMain.AddAssociation(fLangMan.LS(FLS.LSID_PLGodparent), iRec);
break;
case PersonLink.plSpouse:
family = iMain.GetMarriageFamily(true);
family.AddSpouse(iRec);
break;
case PersonLink.plChild:
family = iMain.GetMarriageFamily(true);
family.AddChild(iRec);
break;
}
}
}
}
}
InitSourceControls();
}