private void dlgSelectBase_Load(object sender, EventArgs e)
{
lsMineVal = new List <string>(); lsMineID = new List <int>();
lsTravVal = new List <string>(); lsTravID = new List <int>();
lsLPVal = new List <string>(); lsLPID = new List <int>();
bs = new DataClass.Base2();
sf = new DataClass.Base2();
p1 = new DataClass.PegYXZ();
p2 = new DataClass.PegYXZ();
p3 = new DataClass.PegYXZ();
Clear_Base_BS(bs);
Clear_Base_SF(sf);
Clear_Peg1(p1);
Clear_Peg2(p2);
Clear_Peg3(p3);
dmMain.LoadPegTypes(lsLPID, lsLPVal);
cboLP.DataSource = lsLPVal;
cboLP.SelectedIndex = 0;
dmMain.load_LookUpVal("Mine", "MineID", "Descr", lsMineID, lsMineVal, false);
cboMine.DataSource = lsMineVal;
if (cboMine.Items.Count > 0)
{
loadTrav(lsMineID[0]);
}
else
{
MessageBox.Show("No Mines Found", "Load Mines", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}
private void frmAddNewBase_Load(object sender, EventArgs e)
{
pnlBaseExist.Visible = false;
bf = new DataClass.Base3();
ExistingBase = new DataClass.Base3();
st = new DataClass.PegYXZ();
fs = new DataClass.PegYXZ();
}
private void ClearPeg1(DataClass.PegYXZ p)
{
lblPeg1.ForeColor = Color.Black;
lblMine1.Text = "n/a";
lblTrav1.Text = "n/a";
lblPeg1X.Text = "";
lblPeg1Y.Text = "";
lblPeg1Z.Text = "";
lblLP1.Text = "n/a";
p.Clear();
}
private void ClearPeg2(DataClass.PegYXZ p)
{
lblPeg2.ForeColor = Color.Black;
lblMine2.Text = "n/a";
lblTrav2.Text = "n/a";
lblPeg2X.Text = "";
lblPeg2Y.Text = "";
lblPeg2Z.Text = "";
lblLP2.Text = "n/a";
p.Clear();
}
public static bool CalcJoinBase_NotDone(DataClass.PegYXZ bs, DataClass.PegYXZ st, DataClass.PegYXZ fs, DataClass.Base3 b)
{
// b.BCID = 0;
b.CCID = 0; // join
b.BSID = bs.pcid;
b.STID = st.pcid;
b.FSID = fs.pcid;
b.BS = bs.Peg;
b.ST = st.Peg;
b.FS = fs.Peg;
if (b.BSID > -1) // 3 Point Base
{
}
else // 2 Point Base
{
b.HAFL = 0;
}
b.sfs.Bear = 0;
b.sfs.HD = 0;
b.sfs.ED = 0;
b.CID = 0;
b.EID = 0;
b.AUID = GlobalLogon.AUID;
b.BLogID = 0;
b.LP = fs.LP;
b.CCnt = 1;
b.Grade = 0;
b.GradeTypeID = 0;
b.sbs.EDErr = 0;
b.sbs.HDErr = 0;
b.HAFLErr = 0;
b.HAFRErr = 0;
b.sfs.HDErr = 0;
b.sfs.EDErr = 0;
b.BSCnt = 0;
b.ArcCnt = 0;
b.FSCnt = 0;
b.BaseID = 0;
b.MTID = fs.MTID;
return(false);
}
private void Clear_Peg3(DataClass.PegYXZ p)
{
lblPeg3.ForeColor = Color.Green;
lblPeg3F.Text = "New Peg Not Found";
lblPeg3F.ForeColor = Color.Green;
lblMine3.Text = "n/a";
lblTrav3.Text = "n/a";
lblPeg3X.Text = "";
lblPeg3Y.Text = "";
lblPeg3Z.Text = "";
lblLP3.Text = "n/a";
lblPeg3G.Text = "";
lblPeg3E.Text = "";
lblPeg3C.Text = "";
p.Clear();
}
private void cmdAdd_Click(object sender, EventArgs e)
{
DataClass.Base2 base2 = new DataClass.Base2();
DataClass.PegYXZ pegxyz = new DataClass.PegYXZ();
string BS = cboBS.Text;
string ST = cboST.Text;
string FS = txtFS.Text;
string C = cboClass.Text;
int CID = lsClassID[lsClassVal.IndexOf(C)];
int CCID = 5; //traverse peg
int LP = cboLP.SelectedIndex;
base2.BaseID = -1;
base2.BCID = -1;
base2.BFWID = -1;
base2.ST = BS;
base2.FS = ST;
base2.CCID = CCID;
base2.CID = CID;
base2.LP = LP;
int MaxBinID = tBase.Rows.Count + 1;
if (txtFS.Text.Trim() == "")
{
MessageBox.Show("No Foresight Peg Name ", "New Peg", MessageBoxButtons.OK, MessageBoxIcon.Error);
return;
}
if (CheckIfPegExit())
{
MessageBox.Show("Peg Name Exist in current calculation", "New Peg", MessageBoxButtons.OK, MessageBoxIcon.Error);
return;
}
if (!dmMain.Find_Bin_BSSTN_Base(BS, ST, MaxBinID, tBase, base2))
{
MessageBox.Show("Could not Find Base(" + BS + " --> " + ST + ")", "New Peg", MessageBoxButtons.OK, MessageBoxIcon.Error);
return;
}
//Check if Peg exist in main database
pegxyz.pcid = -1;
pegxyz.PegID = -1;
pegxyz.Peg = FS;
pegxyz.CCID = CCID;
pegxyz.CID = CID;
pegxyz.AUID = GlobalLogon.AUID;
pegxyz.LP = LP;
pegxyz.Mine = base2.Mine;
pegxyz.MineID = base2.MineID;
pegxyz.Trav = base2.Trav;
pegxyz.TravID = base2.TravID;
pegxyz.MTID = base2.MTID;
ParentForm.add_bcid(base2.binID, base2, pegxyz);
MessageBox.Show("Add New Base(" + BS + " -> " + ST + " -> " + FS + ")");
this.DialogResult = DialogResult.OK;
this.Close();
}
