public void AccessTableAdd()
{
String Criteria;
Criteria = "PartnerID =" + textBox1.Text;
Rs.MoveFirst();
//go to the beginning to start serach
Rs.Find(Criteria);
//Either We find the record(s), which is the first record if there are more than one
//If record is found the file pointer stays at it
//if not found, the file pointer has passed eof meaning eof = true
if (Rs.EOF == true)
{
//not found
Rs.AddNew();
SaveinTable();
Rs.Update();
MessageBox.Show("Record Added succesfully");
ClearBoxes();
return;
}
else
{
//found
MessageBox.Show("Duplicate Record, try another PartnerID");
return;
}
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
if (id)
{
adoPrimaryRS = modRecordSet.getRS(ref "select * from PrintGroup WHERE PrintGroupID = " + id);
}
else
{
adoPrimaryRS = modRecordSet.getRS(ref "select * from PrintGroup");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in this.txtFields)
{
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
foreach (TextBox oText_loopVariable in this.txtInteger)
{
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.Leave += txtInteger_Leave;
}
buildDataControls();
mbDataChanged = false;
loadLanguage();
ShowDialog();
}
/****** View with Source Object ******/
private ADODB.Recordset ConvertToRecordset(DataTable inTable)
{
ADODB.Recordset result = new ADODB.Recordset();
result.CursorLocation = ADODB.CursorLocationEnum.adUseClient;
ADODB.Fields resultFields = result.Fields;
System.Data.DataColumnCollection inColumns = inTable.Columns;
foreach (DataColumn inColumn in inColumns)
{
resultFields.Append(inColumn.ColumnName
, TranslateType(inColumn.DataType)
, inColumn.MaxLength
, inColumn.AllowDBNull ? ADODB.FieldAttributeEnum.adFldIsNullable : ADODB.FieldAttributeEnum.adFldUnspecified
, null);
}
result.Open(System.Reflection.Missing.Value
, System.Reflection.Missing.Value
, ADODB.CursorTypeEnum.adOpenStatic
, ADODB.LockTypeEnum.adLockOptimistic, 0);
foreach (DataRow dr in inTable.Rows)
{
result.AddNew(System.Reflection.Missing.Value, System.Reflection.Missing.Value);
for (int columnIndex = 0; columnIndex < inColumns.Count; columnIndex++)
{
resultFields[columnIndex].Value = dr[columnIndex];
}
}
return(result);
}
private ADODB.Recordset CreateInMemoryADORS(IGTKeyObjects DDCKeyObjects)
{
ADODB.Recordset shapeADORecordset = new ADODB.Recordset();
try
{
shapeADORecordset.Fields.Append("G3E_FNO", ADODB.DataTypeEnum.adInteger, 0, ADODB.FieldAttributeEnum.adFldFixed, null);
shapeADORecordset.Fields.Append("G3E_FID", ADODB.DataTypeEnum.adInteger, 0, ADODB.FieldAttributeEnum.adFldFixed, null);
shapeADORecordset.Open(System.Type.Missing, System.Type.Missing, ADODB.CursorTypeEnum.adOpenUnspecified, ADODB.LockTypeEnum.adLockUnspecified, 0);
foreach (IGTKeyObject keyObject in DDCKeyObjects)
{
shapeADORecordset.AddNew(System.Type.Missing, System.Type.Missing);
shapeADORecordset.Fields["G3E_FNO"].Value = keyObject.FNO;
shapeADORecordset.Fields["G3E_FID"].Value = keyObject.FID;
shapeADORecordset.Update(System.Type.Missing, System.Type.Missing);
}
}
catch (Exception ex)
{
string exMsg = string.Format("Error occurred in {0} of {1}.{2}{3}", System.Reflection.MethodBase.GetCurrentMethod().Name, this.ToString(), Environment.NewLine, ex.Message);
throw new Exception(exMsg);
}
return(shapeADORecordset);
}
public static void AddData <T>(this IDatabaseObject <T> source) where T : class
{
string name = typeof(T).Name;
string sql = "[" + name + "]";
ADODB.Recordset rs = DataSeverConnection.Instance.Recordset(sql, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic);
rs.AddNew();
PropertyInfo[] properties = typeof(T).GetProperties();
for (int i = 0; i < rs.Fields.Count; i++)
{
PropertyInfo property = null;
properties.Each(f =>
{
if (f.Name == rs.Fields[i].Name)
{
property = f;
return;
}
});
rs.Fields[i].Value = property.GetValue(source);
}
rs.Update();
rs.Close();
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
if (id) {
adoPrimaryRS = modRecordSet.getRS(ref "select * from StockGroup WHERE StockGRoupID = " + id);
} else {
adoPrimaryRS = modRecordSet.getRS(ref "select * from StockGroup");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
BindingSource bind = new BindingSource();
foreach (TextBox oText_loopVariable in this.txtFields) {
oText = oText_loopVariable;
bind.DataSource = adoPrimaryRS;
oText.DataBindings.Add(bind.DataSource);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
foreach (CheckBox oCheck_loopVariable in this.chkFields) {
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(bind.DataSource);
}
buildDataControls();
mbDataChanged = false;
loadLanguage();
ShowDialog();
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
if (id) {
gID = id;
adoPrimaryRS = modRecordSet.getRS(ref "select * from Deposit WHERE DepositID = " + id);
} else {
gID = 0;
adoPrimaryRS = modRecordSet.getRS(ref "select * from Deposit");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
foreach (TextBox oText_loopVariable in txtHide) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
}
foreach (TextBox oText_loopVariable in txtInteger) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.Leave += txtInteger_Leave;
//txtInteger_Leave(txtInteger.Item((oText.Index)), New System.EventArgs())
}
foreach (TextBox oText_loopVariable in txtFloat) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
if (string.IsNullOrEmpty(oText.Text))
oText.Text = "0";
oText.Text = Convert.ToString(Convert.ToDouble(oText.Text) * 100);
oText.Leave += txtFloat_Leave;
//txtFloat_Leave(txtFloat.Item((oText.Index)), New System.EventArgs())
}
// For Each oText In Me.txtFloatNegative
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloatNegative_LostFocus oText.Index
// Next
//Bind the check boxes to the data provider
foreach (CheckBox oCheck_loopVariable in chkFields) {
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(adoPrimaryRS);
}
buildDataControls();
mbDataChanged = false;
loadLanguage();
ShowDialog();
}
private void rent_Click(object sender, EventArgs e)
{
Rscar.MoveFirst();
Rsuser.MoveFirst();
while (!Rscar.EOF)
{
if (carID.Text.Equals(Rscar.Fields["CarID"].Value))
{
Rscar.Fields["Availability"].Value = "No";
Rsuser.AddNew();
Rsuser.Fields["CarID"].Value = Convert.ToInt32(carID.Text);
Rsuser.Fields["FirstName"].Value = firstName.Text;
Rsuser.Fields["LastName"].Value = lastName.Text;
Rsuser.Fields["PhoneNumber"].Value = phoneNumber.Text;
Rsuser.Fields["RentDate"].Value = Convert.ToDateTime(rentDate.Text);
Rsuser.Fields["ReturnDate"].Value = Convert.ToDateTime(returnDate.Text);
Rsuser.Fields["Rent"].Value = "Yes";
Rscar.Update();
Rsuser.Update();
MessageBox.Show("You rent car successfully");
return;
}
Rscar.MoveNext();
}
MessageBox.Show("Something wrong....");
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
if (id) {
adoPrimaryRS = modRecordSet.getRS(ref "select * from PrintGroup WHERE PrintGroupID = " + id);
} else {
adoPrimaryRS = modRecordSet.getRS(ref "select * from PrintGroup");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in this.txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
foreach (TextBox oText_loopVariable in this.txtInteger) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.Leave += txtInteger_Leave;
}
buildDataControls();
mbDataChanged = false;
loadLanguage();
ShowDialog();
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
if (id)
{
adoPrimaryRS = modRecordSet.getRS(ref "select * from PayoutGroup WHERE PayoutGroupID = " + id);
}
else
{
adoPrimaryRS = modRecordSet.getRS(ref "select * from PayoutGroup");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in this.txtFields)
{
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
foreach (CheckBox oCheck_loopVariable in this.chkFields)
{
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(adoPrimaryRS);
}
buildDataControls();
mbDataChanged = false;
ShowDialog();
}
public void CallingCLRMethodsThatHaveValueTypeParametersWorksWithReferenceTypes()
{
var recordset = new ADODB.Recordset();
recordset.Fields.Append("name", ADODB.DataTypeEnum.adVarChar, 20, ADODB.FieldAttributeEnum.adFldUpdatable);
recordset.Open(CursorType: ADODB.CursorTypeEnum.adOpenUnspecified, LockType: ADODB.LockTypeEnum.adLockUnspecified, Options: 0);
recordset.AddNew();
recordset.Fields["name"].Value = "TestName";
recordset.Update();
var _ = DefaultRuntimeSupportClassFactory.DefaultVBScriptValueRetriever;
object objField = _.CALL(
context: null,
target: recordset,
members: new string[0],
argumentProviderBuilder: _.ARGS.Val("name")
);
Assert.Equal(
"TestName",
_.CALL(
context: null,
target: this,
member1: "MockMethodReturningInputString",
argumentProviderBuilder: _.ARGS.Ref(objField, v => { objField = v; })
)
);
}
private void createButton_Click(object sender, EventArgs e)
{
if (clientIN.Text.Equals("") || accountIN.Text.Equals("") || typeIN.Text.Equals("") || balanceIN.Text.Equals("") || limitIN.Text.Equals("") || branchIN.Text.Equals(""))
{
MessageBox.Show("Please enter full of your infomation.");
}
else
{
RsAccount.AddNew();
RsUser.AddNew();
RsUser.Fields["ClientID"].Value = clientIN.Text;
RsUser.Fields["Password"].Value = passIN.Text;
RsAccount.Fields["ClientID"].Value = Convert.ToInt32(clientIN.Text);
RsAccount.Fields["AccountNumber"].Value = Convert.ToInt32(accountIN.Text);
RsAccount.Fields["AccountType"].Value = typeIN.Text;
RsAccount.Fields["Balance"].Value = Convert.ToInt32(balanceIN.Text);
RsAccount.Fields["CreditLimit"].Value = Convert.ToInt32(limitIN.Text);
RsAccount.Fields["BranchNumber"].Value = Convert.ToInt32(branchIN.Text);
RsUser.Update();
RsAccount.Update();
Show();
createAccount.Parent = null;
login.Parent = tabControl1;
}
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
if (id)
{
adoPrimaryRS = modRecordSet.getRS(ref "select * from PricelistFilter WHERE PricelistID = " + id);
}
else
{
adoPrimaryRS = modRecordSet.getRS(ref "select * from PricelistFilter");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in txtFields)
{
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
// For Each oText In Me.txtInteger
// Set oText.DataBindings.Add(adoPrimaryRS)
// txtInteger_LostFocus oText.Index
// Next
// For Each oText In Me.txtFloat
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloat_LostFocus oText.Index
// Next
// For Each oText In Me.txtFloatNegative
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloatNegative_LostFocus oText.Index
// Next
//Bind the check boxes to the data provider
foreach (CheckBox oCheck_loopVariable in this.chkFields)
{
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(adoPrimaryRS);
}
//buildDataControls
mbDataChanged = false;
//If Me.cmbDelivery.ListIndex = -1 Then
// chkChannel.value = 0
// cmbDelivery.Enabled = False
//Else
// chkChannel.value = 1
// cmbDelivery.Enabled = True
//End If
loadLanguage();
ShowDialog();
}
private void submit_Click(object sender, EventArgs e)
{
Boolean flag = false;
RsAccount.MoveFirst();
if (amountbox.Text.Equals("") || numbox.Text.Equals("") || typebox.Text.Equals("") || branchnumbox.Text.Equals(""))
{
MessageBox.Show("Please enter full of your infomation.");
Clear();
}
else
{
while (!RsAccount.EOF)
{
if (Convert.ToInt32(numbox.Text) == RsAccount.Fields["AccountNumber"].Value && Convert.ToInt32(branchnumbox.Text) == RsAccount.Fields["BranchNumber"].Value)
{
flag = true;
break;
}
RsAccount.MoveNext();
}
if (flag == true)
{
RsTranscript.AddNew();
RsTranscript.Fields["Date"].Value = datebox.Text;
RsTranscript.Fields["Time"].Value = timebox.Text;
RsTranscript.Fields["Amount"].Value = Convert.ToInt32(amountbox.Text);
RsTranscript.Fields["AccountNumber"].Value = Convert.ToInt32(numbox.Text);
RsTranscript.Fields["TransactionType"].Value = typebox.Text;
RsTranscript.Fields["BranchNumber"].Value = Convert.ToInt32(branchnumbox.Text);
if (typebox.Text.Equals("Deposit"))
{
int total = Convert.ToInt32(amountbox.Text) + RsAccount.Fields["Balance"].Value;
RsAccount.Fields["Balance"].Value = total;
}
else if (typebox.Text.Equals("Withdraw"))
{
int total = RsAccount.Fields["Balance"].Value - Convert.ToInt32(amountbox.Text);
RsAccount.Fields["Balance"].Value = total;
}
RsAccount.Update();
RsTranscript.Update();
MessageBox.Show("Your transaction completed successfully!!!!");
Show();
info.Parent = tabControl1;
transcript.Parent = null;
createAccount.Parent = null;
}
else
{
MessageBox.Show("Your transaction faild....");
Clear();
}
}
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
if (id) {
pRid = id;
adoPrimaryRS = modRecordSet.getRS(ref "select PricingGroupID,PricingGroup_Name,PricingGroup_RemoveCents,PricingGroup_RoundAfter,PricingGroup_RoundDown,PricingGroup_Unit1,PricingGroup_Case1,PricingGroup_Unit2,PricingGroup_Case2,PricingGroup_Unit3,PricingGroup_Case3,PricingGroup_Unit4,PricingGroup_Case4,PricingGroup_Unit5,PricingGroup_Case5,PricingGroup_Unit6,PricingGroup_Case6,PricingGroup_Unit7,PricingGroup_Case7,PricingGroup_Unit8,PricingGroup_Case8,PricingGroup_Disabled from PricingGroup WHERE PricingGroupID = " + id);
} else {
adoPrimaryRS = modRecordSet.getRS(ref "select * from PricingGroup");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in this.txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
foreach (TextBox oText_loopVariable in this.txtInteger) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.Leave += txtInteger_Leave;
}
foreach (TextBox oText_loopVariable in this.txtFloat) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
if (string.IsNullOrEmpty(oText.Text))
oText.Text = "0";
oText.Text = Convert.ToString(Convert.ToDouble(oText.Text) * 100);
oText.Leave += txtFloat_Leave;
}
foreach (TextBox oText_loopVariable in this.txtFloatNegative) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
if (string.IsNullOrEmpty(oText.Text))
oText.Text = "0";
oText.Text = Convert.ToString(Convert.ToDouble(oText.Text) * 100);
oText.Leave += txtFloatNegative_Leave;
}
if (Convert.ToInt16(adoPrimaryRS.Fields("PricingGroup_Disabled").Value)) {
this.chkPricing.CheckState = System.Windows.Forms.CheckState.Checked;
this.chkPricing.Tag = 1;
} else {
this.chkPricing.Tag = 0;
}
buildDataControls();
mbDataChanged = false;
loadLanguage();
ShowDialog();
}
private void addcust_Click(object sender, EventArgs e)
{
if (addcust.Text == "&Add new Customer")
{
LockUnLockMe(false);
textBox1.ReadOnly = false;
int newid;
if (cstmr_tb.RecordCount > 0)
{
if (cpos != cstmr_tb.RecordCount)
{
cstmr_tb.MoveLast();
cpos = cstmr_tb.RecordCount;
}
newid = cstmr_tb.Fields["cID"].Value + 1;
}
else
{
newid = 1;
// textid.Text = (newid).ToString();
prev.Enabled = true;
}
emptyTxt();
textid.Text = newid.ToString();
addcust.Text = "&SAVE DETAILS";
fnd.Text = "&Cancel";
prev.Enabled = false;
nxt.Enabled = false;
edt.Enabled = false;
return;
}
if (addcust.Text == "&SAVE DETAILS")
{
if (textname.Text == "")
{
XtraMessageBox.Show("Invaild Name");
return;
}
cstmr_tb.AddNew();
GetData();
cstmr_tb.Update();
SetButton();
customers_list.Items.Add(textname.Text);
customers_list.Update();
cpos = cstmr_tb.RecordCount;
LockUnLockMe(true);
textBox1.ReadOnly = true;
}
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
if (id)
{
adoPrimaryRS = modRecordSet.getRS(ref "select * from PackSize WHERE PackSizeID = " + id);
}
else
{
adoPrimaryRS = modRecordSet.getRS(ref "select * from PackSize");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in txtFields)
{
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
// For Each oText In Me.txtInteger
// Set oText.DataBindings.Add(adoPrimaryRS)
// txtInteger_LostFocus oText.Index
// Next
foreach (TextBox oText_loopVariable in txtFloat)
{
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
if (string.IsNullOrEmpty(oText.Text))
{
oText.Text = "0";
}
oText.Text = Convert.ToString(Convert.ToDouble(oText.Text) * 100);
oText.Leave += txtFloat_Leave;
//'txtFloat_Leave(txtFloat.Item((oText.Index)), New System.EventArgs())
}
// For Each oText In Me.txtFloatNegative
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloatNegative_LostFocus oText.Index
// Next
//Bind the check boxes to the data provider
// For Each oCheck In Me.chkFields
// Set oCheck.DataBindings.Add(adoPrimaryRS)
// Next
buildDataControls();
mbDataChanged = false;
loadLanguage();
ShowDialog();
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
if (id) {
adoPrimaryRS = modRecordSet.getRS(ref "select * from Pricelist WHERE PricelistID = " + id);
} else {
adoPrimaryRS = modRecordSet.getRS(ref "select * from Pricelist");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
// For Each oText In Me.txtInteger
// Set oText.DataBindings.Add(adoPrimaryRS)
// txtInteger_LostFocus oText.Index
// Next
// For Each oText In Me.txtFloat
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloat_LostFocus oText.Index
// Next
// For Each oText In Me.txtFloatNegative
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloatNegative_LostFocus oText.Index
// Next
//Bind the check boxes to the data provider
foreach (CheckBox oCheck_loopVariable in chkFields) {
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(adoPrimaryRS);
}
buildDataControls();
mbDataChanged = false;
if (this.cmbDelivery.SelectedIndex == -1) {
chkChannel.CheckState = System.Windows.Forms.CheckState.Unchecked;
cmbDelivery.Enabled = false;
} else {
chkChannel.CheckState = System.Windows.Forms.CheckState.Checked;
cmbDelivery.Enabled = true;
}
loadLanguage();
ShowDialog();
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
DateTimePicker oDate = null;
System.Windows.Forms.CheckBox oCheck = null;
mbAddNewFlagID = false;
// ERROR: Not supported in C#: OnErrorStatement
if (id)
{
p_Prom = id;
adoPrimaryRS = modRecordSet.getRS(ref "select GRVPromotion.* from GRVPromotion WHERE PromotionID = " + id);
}
else
{
adoPrimaryRS = modRecordSet.getRS(ref "select * from GRVPromotion");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
mbAddNewFlagID = true;
}
setup();
foreach (TextBox oText_loopVariable in txtFields)
{
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
foreach (DateTimePicker oDate_loopVariable in DTFields)
{
oDate = oDate_loopVariable;
oDate.DataBindings.Add(adoPrimaryRS);
}
//adoPrimaryRS("Promotion_SpeTime")
//Bind the check boxes to the data provider
foreach (CheckBox oCheck_loopVariable in chkFields)
{
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(adoPrimaryRS);
}
buildDataControls();
mbDataChanged = false;
loadItems();
loadLanguage();
ShowDialog();
}
private void addcust_Click(object sender, EventArgs e)
{
if (addcust.Text == "&Add new Farmer")
{
LockUnLockMe(false);
int newid;
if (frmr_tb.RecordCount > 0)
{
if (cpos != frmr_tb.RecordCount)
{
frmr_tb.MoveLast();
cpos = frmr_tb.RecordCount;
}
newid = frmr_tb.Fields["fID"].Value + 1;
}
else
{
newid = 1;
// textid.Text = (newid).ToString();
prev.Enabled = true;
}
emptyTxt();
textid.Text = newid.ToString();
addcust.Text = "&Save Details";
fnd.Text = "&Cancel";
prev.Enabled = false;
nxt.Enabled = false;
edt.Enabled = false;
return;
}
if (addcust.Text == "&Save Details")
{
if (textname.Text == "")
{
XtraMessageBox.Show("Invaild Name");
return;
}
frmr_tb.AddNew();
GetData();
frmr_tb.Update();
SetButton();
farmers_list.Items.Add(textname.Text);
farmers_list.Update();
cpos = frmr_tb.RecordCount;
}
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
if (id)
{
k_posNew = false;
k_posID = id;
//Get Warehouse ID...
adoPrimaryRS = modRecordSet.getRS(ref "select * from Warehouse WHERE WarehouseID = " + id);
}
else
{
k_posNew = true;
adoPrimaryRS = modRecordSet.getRS(ref "select * from Warehouse");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
_txtInteger_0.Enabled = true;
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in this.txtFields)
{
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
foreach (TextBox oText_loopVariable in this.txtInteger)
{
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.Leave += txtInteger_Leave;
//txtInteger_Leave(txtInteger.Item((oText.Index)), New System.EventArgs())
}
bolLoad = true;
if (id)
{
}
bolLoad = false;
mbDataChanged = false;
loadLanguage();
ShowDialog();
}
//Adding new record into DB
private void button1_Click(object sender, EventArgs e)
{
if (textBox1.Text == "" ||
textBox2.Text == "" ||
textBox3.Text == "" ||
textBox4.Text == "" ||
textBox5.Text == "" ||
textBox6.Text == "" ||
textBox7.Text == "" ||
textBox8.Text == "" ||
textBox9.Text == "" ||
textBox10.Text == "" ||
textBox11.Text == "" ||
textBox12.Text == "" ||
textBox13.Text == "" ||
textBox14.Text == "" ||
textBox15.Text == "" ||
textBox16.Text == "" ||
textBox17.Text == "" ||
textBox18.Text == "")
{
MessageBox.Show("Please Fill up all boxes");
return;
}
String Criteria;
Criteria = "ContactID =" + textBox1.Text;
Rs.MoveFirst();
//go to the beginning to start serach
Rs.Find(Criteria);
//Either We find the record(s), which is the first record if there are more than one
//If record is found the file pointer stays at it
//if not found, the file pointer has passed eof meaning eof = true
if (Rs.EOF == true)
{
//not found
Rs.AddNew();
SaveinTable();
Rs.Update();
MessageBox.Show("Record Added succesfully");
ClearBoxes();
return;
}
else
{
//found
MessageBox.Show("Duplicate Record, try another ISBN");
return;
}
}
private void addButton_Click(object sender, EventArgs e)
{
Rscar.MoveLast();
Rscar.AddNew();
Rscar.Fields["CarID"].Value = Convert.ToInt32(carID.Text);
Rscar.Fields["Name"].Value = modifyName.Text;
Rscar.Fields["Model"].Value = modifyModel.Text;
Rscar.Fields["Make"].Value = modifyMake.Text;
Rscar.Fields["Type"].Value = modifyType.Text;
Rscar.Fields["Color"].Value = modifyColor.Text;
Rscar.Fields["VIN"].Value = Convert.ToInt32(modifyVIN.Text);
Rscar.Fields["Price"].Value = Convert.ToInt32(modifyPrice.Text);
Rscar.Fields["Availability"].Value = true;
Rscar.Update();
modify.Parent = null;
menu.Parent = tab;
}
private static bool InsertIntoAsketPorTimeEntries()
{
string Select = "select з.IdPorAsket, тз.IssueId, ТЗ.Spent_On,тз.Hours, Ф.UserName , тз.Comments + ' Импортировано из Redmine. ' as Comments, тз.id" +
" from " + DB.TABLE_REDMINE_TIME_ENTRIES + " as ТЗ " +
" left join " + DB.TABLE_REDMINE_USERS + " as П on тз.UserId = п.id " +
" left join " + DB.TABLE_ASKET_USERS + " as Ф On п.IdUserFromFam = Ф.код " +
" left join " + DB.TABLE_REDMINE_ISSUES + " as З on ТЗ.IssueId = З.id " +
" where Deleted = 0 and InsertIntoAsketPor = 0 and з.idPorAsket is not null ";
ADODB.Recordset rsSelect = DB.Select(Select);
if (rsSelect == null)
{
return(false);
}
ADODB.Recordset RsAddPor = DB.Update("select top 1 Код, КодПоручения, Дата, Часов, Кто, Примечания from " + DB.TABLE_REPORT_DEVELOPER);
if (RsAddPor == null)
{
return(false);
}
ADODB.Recordset RsUpdateTimeEntries = DB.Update("Select Id, InsertIntoAsketPor,IdRazrabAsket from " + DB.TABLE_REDMINE_TIME_ENTRIES + " where Deleted = 0 and InsertIntoAsketPor = 0 and IdRazrabAsket =0");
if (RsUpdateTimeEntries == null)
{
return(false);
}
while (!(rsSelect.EOF))
{
RsAddPor.AddNew();
RsAddPor.Fields["КодПоручения"].Value = rsSelect.Fields["IdPorAsket"].Value;
RsAddPor.Fields["Дата"].Value = rsSelect.Fields["Spent_On"].Value;
RsAddPor.Fields["Часов"].Value = rsSelect.Fields["Hours"].Value;
RsAddPor.Fields["Кто"].Value = rsSelect.Fields["UserName"].Value;
RsAddPor.Fields["Примечания"].Value = rsSelect.Fields["Comments"].Value;
RsAddPor.Update();
RsUpdateTimeEntries.Filter = "id = " + rsSelect.Fields["id"].Value;
if (RsUpdateTimeEntries.RecordCount == 1)
{
RsUpdateTimeEntries.Fields["InsertIntoAsketPor"].Value = true;
RsUpdateTimeEntries.Fields["IdRazrabAsket"].Value = RsAddPor.Fields["Код"].Value;
RsUpdateTimeEntries.Update();
}
rsSelect.MoveNext();
}
rsSelect.Close();
RsAddPor.Close();
return(true);
}
public bool salvar()
{
String SQL;
if (alterado)
{
ADODB.Recordset RSDados = new ADODB.Recordset();
RSDados.CursorLocation = ADODB.CursorLocationEnum.adUseClient;
RSDados.LockType = ADODB.LockTypeEnum.adLockOptimistic;
RSDados.CursorType = ADODB.CursorTypeEnum.adOpenKeyset;
if (cod != 0)
{
SQL = "SELECT Duplicatas.* FROM Duplicatas WHERE (((Duplicatas.Código)=" + cod + "));";
}
else
{
SQL = "SELECT Duplicatas.* FROM Duplicatas;";
}
RSDados.Open(SQL, new Conexao().getContas());
if (cod == 0)
{
RSDados.AddNew();
}
RSDados.Fields["data"].Value = Vencimento.ToShortDateString();
RSDados.Fields["Origem"].Value = Origem;
RSDados.Fields["informação"].Value = Informacao;
RSDados.Fields["complemento"].Value = Complemento;
RSDados.Fields["Valor"].Value = Valor;
RSDados.Fields["Pago"].Value = Pago;
RSDados.Fields["Classificação"].Value = Classificacao;
RSDados.Fields["DataNota"].Value = DataNota.ToShortDateString();
RSDados.Fields["Empresa"].Value = Empresa;
RSDados.Update();
if (cod == 0)
{
cod = Convert.ToInt32(RSDados.Fields["cod"].Value);
}
RSDados.Close();
return(true);
}
return(false);
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
DateTimePicker oDate = null;
System.Windows.Forms.CheckBox oCheck = null;
mbAddNewFlagID = false;
// ERROR: Not supported in C#: OnErrorStatement
if (id) {
p_Prom = id;
adoPrimaryRS = modRecordSet.getRS(ref "select GRVPromotion.* from GRVPromotion WHERE PromotionID = " + id);
} else {
adoPrimaryRS = modRecordSet.getRS(ref "select * from GRVPromotion");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
mbAddNewFlagID = true;
}
setup();
foreach (TextBox oText_loopVariable in txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
foreach (DateTimePicker oDate_loopVariable in DTFields) {
oDate = oDate_loopVariable;
oDate.DataBindings.Add(adoPrimaryRS);
}
//adoPrimaryRS("Promotion_SpeTime")
//Bind the check boxes to the data provider
foreach (CheckBox oCheck_loopVariable in chkFields) {
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(adoPrimaryRS);
}
buildDataControls();
mbDataChanged = false;
loadItems();
loadLanguage();
ShowDialog();
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
if (id) {
adoPrimaryRS = modRecordSet.getRS(ref "select * from VAT WHERE VATID = " + id);
} else {
adoPrimaryRS = modRecordSet.getRS(ref "select * from VAT");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
oText = _txtFields_0;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
//Next oText
// For Each oText In Me.txtInteger
// Set oText.DataBindings.Add(adoPrimaryRS)
// txtInteger_LostFocus oText.Index
// Next
oText = _txtFloat_0;
oText.DataBindings.Add(adoPrimaryRS);
if (string.IsNullOrEmpty(oText.Text))
oText.Text = "0";
oText.Text = Convert.ToString(Convert.ToDouble(oText.Text) * 100);
oText.Leave += txtFloat_Leave;
//txtFloat_Leave(_txtFloat_0.Item(0, New System.EventArgs()))
//Next oText
// For Each oText In Me.txtFloatNegative
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloatNegative_LostFocus oText.Index
// Next
//Bind the check boxes to the data provider
// For Each oCheck In Me.chkFields
// Set oCheck.DataBindings.Add(adoPrimaryRS)
// Next
buildDataControls();
mbDataChanged = false;
loadLanguage();
ShowDialog();
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
if (id) {
k_posNew = false;
k_posID = id;
//Get Warehouse ID...
adoPrimaryRS = modRecordSet.getRS(ref "select * from Warehouse WHERE WarehouseID = " + id);
} else {
k_posNew = true;
adoPrimaryRS = modRecordSet.getRS(ref "select * from Warehouse");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
_txtInteger_0.Enabled = true;
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in this.txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
foreach (TextBox oText_loopVariable in this.txtInteger) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.Leave += txtInteger_Leave;
//txtInteger_Leave(txtInteger.Item((oText.Index)), New System.EventArgs())
}
bolLoad = true;
if (id) {
}
bolLoad = false;
mbDataChanged = false;
loadLanguage();
ShowDialog();
}
public void BugFix_AmbiguousIndexer_ADODB()
{
engine.Dispose();
engine = new VBScriptEngine(WindowsScriptEngineFlags.EnableDebugging);
var recordSet = new ADODB.Recordset();
recordSet.Fields.Append("foo", ADODB.DataTypeEnum.adVarChar, 20);
recordSet.Open(Missing.Value, Missing.Value, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic, 0);
recordSet.AddNew(Missing.Value, Missing.Value);
recordSet.Fields["foo"].Value = "bar";
engine.AddHostObject("recordSet", recordSet);
Assert.AreEqual("bar", engine.Evaluate("recordSet.Fields.Item(\"foo\").Value"));
engine.Execute("recordSet.Fields.Item(\"foo\").Value = \"qux\"");
Assert.AreEqual("qux", engine.Evaluate("recordSet.Fields.Item(\"foo\").Value"));
TestUtil.AssertException <ScriptEngineException>(() => engine.Evaluate("recordSet.Fields.Item(\"baz\")"));
}
public void ADORecordsetSupportsDefaultFieldAccess()
{
var recordset = new ADODB.Recordset();
recordset.Fields.Append("name", ADODB.DataTypeEnum.adVarChar, 20, ADODB.FieldAttributeEnum.adFldUpdatable);
recordset.Open(CursorType: ADODB.CursorTypeEnum.adOpenUnspecified, LockType: ADODB.LockTypeEnum.adLockUnspecified, Options: 0);
recordset.AddNew();
recordset.Fields["name"].Value = "TestName";
recordset.Update();
var _ = DefaultRuntimeSupportClassFactory.DefaultVBScriptValueRetriever;
Assert.Equal(
recordset.Fields["name"],
_.CALL(
context: null,
target: recordset,
members: new string[0],
argumentProviderBuilder: _.ARGS.Val("name")
),
new ADOFieldObjectComparer()
);
}
public virtual void Add(bool addAll = false, ProgressReporter pg = null)
{
//lock (DataSeverConnection.Instance.Connection)
//{
try
{
string sql = "SELECT * FROM [" + typeof(T).Name.SanitizeTypeName() + "]";
ADODB.Recordset rs = DataSeverConnection.Instance.Recordset(sql, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic);
string[] keys = GetPrimaryKeyColumns();
try
{
rs.AddNew();
FillRecordset(addAll, rs, keys);
rs.Update();
}
catch (Exception) { return; }
if (addAll == false)
{
keys.Each(k =>
{
int pos = rs.GetFieldPosition(k);
PropertyInfo temp = typeof(T).GetProperty(k);
object val = rs.Fields[pos].Value;
temp.SetValue(this, Convert.ChangeType(val, temp.PropertyType));
});
}
rs.Close();
NeedsToSave = false;
if (pg != null)
{
pg.ReportProgress(pg.ReportAction);
}
}
catch (Exception err) { MessageBox.Show("Error adding to Database: " + err.Message); }
//}
}
public static void Update_ADODB_from_ADO(DataTable inTable, ref ADODB.Recordset adoRs)
{
// ADODB.Recordset result = adoRs.Clone(ADODB.LockTypeEnum.adLockOptimistic);
ADODB.Fields adoFields = adoRs.Fields;
System.Data.DataColumnCollection inColumns = inTable.Columns;
//Delete
adoRs.MoveFirst();
while (!adoRs.EOF)
{
adoRs.Delete();
adoRs.MoveNext();
}
//Add
foreach (DataRow dr in inTable.Rows)
{
adoRs.AddNew(System.Reflection.Missing.Value,
System.Reflection.Missing.Value);
for (int columnIndex = 0; columnIndex < inColumns.Count; columnIndex++)
{
adoFields[columnIndex].Value = dr[columnIndex];
}
}
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
gID = id;
bool cBitA = false;
bool cBitF = false;
if (id) {
adoPrimaryRS = modRecordSet.getRS(ref "select * from Supplier WHERE SupplierID = " + id);
if (32 & My.MyProject.Forms.frmMenu.gBit)
cBitA = true;
if (64 & My.MyProject.Forms.frmMenu.gBit)
cBitF = true;
if (cBitA == true & cBitF == true) {
_txtFloat_13.Enabled = true;
_txtFloat_14.Enabled = true;
_txtFloat_15.Enabled = true;
_txtFloat_16.Enabled = true;
_txtFloat_17.Enabled = true;
}
} else {
adoPrimaryRS = modRecordSet.getRS(ref "select * from Supplier");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
// If adoPrimaryRS.BOF Or adoPrimaryRS.EOF Then
// Else
// ERROR: Not supported in C#: OnErrorStatement
foreach (TextBox oText_loopVariable in txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
// For Each oText In Me.txtInteger
// Set oText.DataBindings.Add(adoPrimaryRS)
// txtInteger_LostFocus oText.Index
// Next
foreach (TextBox oText_loopVariable in txtFloat) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
if (string.IsNullOrEmpty(oText.Text))
oText.Text = "0";
oText.Text = Convert.ToString(Convert.ToDouble(oText.Text) * 100);
oText.Leave += txtFloat_Leave;
}
foreach (TextBox oText_loopVariable in txtFloatNegative) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
if (string.IsNullOrEmpty(oText.Text))
oText.Text = "0";
oText.Text = Convert.ToString(Convert.ToDouble(oText.Text) * 100);
oText.Leave += txtFloatNegative_Leave;
}
//Bind the check boxes to the data provider
foreach (CheckBox oCheck_loopVariable in this.chkFields) {
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(adoPrimaryRS);
}
buildDataControls();
mbDataChanged = false;
loadLanguage();
ShowDialog();
// End If
}
public void BugFix_AmbiguousIndexer_ADODB()
{
engine.Dispose();
engine = new VBScriptEngine(WindowsScriptEngineFlags.EnableDebugging);
var recordSet = new ADODB.Recordset();
recordSet.Fields.Append("foo", ADODB.DataTypeEnum.adVarChar, 20);
recordSet.Open(Missing.Value, Missing.Value, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic, 0);
recordSet.AddNew(Missing.Value, Missing.Value);
recordSet.Fields["foo"].Value = "bar";
engine.AddHostObject("recordSet", recordSet);
Assert.AreEqual("bar", engine.Evaluate("recordSet.Fields.Item(\"foo\").Value"));
engine.Execute("recordSet.Fields.Item(\"foo\").Value = \"qux\"");
Assert.AreEqual("qux", engine.Evaluate("recordSet.Fields.Item(\"foo\").Value"));
TestUtil.AssertException<ScriptEngineException>(() => engine.Evaluate("recordSet.Fields.Item(\"baz\")"));
}
public void CopyTable(ADOX.Table tblAccess)
{
ADODB.Recordset recMaster = new ADODB.Recordset();
ADODB.Recordset recLoop = new ADODB.Recordset();
int intLoop = 0;
string strInfile = "";
string strSQL = "SELECT ";
string strRecord;
string strLoadFilePath = strSourceDbPath.Replace("\\", "\\\\");
string strFileName = strTempPath + tblAccess.Name + ".txt";
StreamWriter sw = new StreamWriter(strFileName, false);
//create the infile
strInfile += "LOAD DATA LOCAL INFILE '" + strFileName + "' INTO TABLE " + strMySQLDBName + "." + tblAccess.Name + " ";
strInfile += "FIELDS TERMINATED BY ',' ";
strInfile += "ESCAPED BY '\\\\' ";
strInfile += "LINES TERMINATED BY 0x0d0a ";
strInfile += "(";
//loop through fields to enumerate them for the infile and build a select statement
for (intLoop = 0; intLoop < tblAccess.Columns.Count; intLoop++)
{
strInfile += MySQLName((tblAccess.Columns[intLoop].Name));
switch (tblAccess.Columns[intLoop].Type)
{
case ADOX.DataTypeEnum.adDate: //convert to MySQL datetime format
strSQL += "FORMAT([" + tblAccess.Columns[intLoop].Name + "], 'YYYY-MM-DD HH:MM:SS') as " + tblAccess.Columns[intLoop].Name;
break;
default:
strSQL += "[" + tblAccess.Columns[intLoop].Name + "]";
break;
}
if (intLoop < tblAccess.Columns.Count - 1)
{
strSQL += ",";
strInfile += ", ";
}
}
strInfile += ");";
strSQL += " FROM [" + tblAccess.Name + "]";
//open the "Master" recordset
recMaster.CursorLocation = ADODB.CursorLocationEnum.adUseClient;
recMaster.Open(strSQL, conJCMS_db, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic, 0);
//create the "Loop" recordset, this is a clone of the master, with the exception
//that the definedsize for text fields is lengthened. This is because the added
//escape characters could potentially exceed the field length in the master recordset
recLoop.CursorLocation = ADODB.CursorLocationEnum.adUseClient;
ADODB.Fields fdsLoop = recLoop.Fields;
ADODB.Fields fdsMaster = recMaster.Fields;
foreach (ADODB.Field fldIn in fdsMaster)
{
if (fldIn.Type.ToString().IndexOf("Char") > 0)
{
fdsLoop.Append(fldIn.Name,
fldIn.Type,
fldIn.DefinedSize + 30,
ADODB.FieldAttributeEnum.adFldIsNullable,
null);
}
else
{
fdsLoop.Append(fldIn.Name,
fldIn.Type,
fldIn.DefinedSize,
ADODB.FieldAttributeEnum.adFldIsNullable,
null);
}
}
recLoop.Open(System.Reflection.Missing.Value, System.Reflection.Missing.Value, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic, 0);
recLoop.AddNew(System.Reflection.Missing.Value, System.Reflection.Missing.Value);
while (!recMaster.EOF)
{
for (int columnIndex = 0; columnIndex < recMaster.Fields.Count; columnIndex++)
{
recLoop.Fields[columnIndex].Value = recMaster.Fields[columnIndex].Value;
if (recLoop.Fields[columnIndex].Value.ToString().Length > 0)
{
if ((recLoop.Fields[columnIndex].Value.ToString().IndexOf("\\", 0) + 1) > 0)
{
recLoop.Fields[columnIndex].Value = recLoop.Fields[columnIndex].Value.ToString().Replace("\\", "\\\\");
}
if ((recLoop.Fields[columnIndex].Value.ToString().IndexOf(",", 0) + 1) > 0)
{
recLoop.Fields[columnIndex].Value = recLoop.Fields[columnIndex].Value.ToString().Replace(",", "\\,");
}
if ((recLoop.Fields[columnIndex].Value.ToString().IndexOf(System.Environment.NewLine, 0) + 1) > 0)
{
recLoop.Fields[columnIndex].Value = recLoop.Fields[columnIndex].Value.ToString().Replace(System.Environment.NewLine, " ");
}
}
}
strRecord = recLoop.GetString(ADODB.StringFormatEnum.adClipString, 1, ",", System.Environment.NewLine, "\\N");
recLoop.MovePrevious();
sw.Write(strRecord);
recMaster.MoveNext();
}
recMaster.Close();
recMaster.ActiveConnection = null;
try
{
recLoop.Close();
}
catch
{
}
sw.Close();
ExecuteSQL(strInfile);
File.Delete(strFileName);
recLoop = null;
}
public void loadItem(ref int id)
{
int x = 0;
string lCode = null;
string leCode = null;
string lPassword = null;
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
if (id) {
k_posNew = false;
k_posID = id;
//Get POS ID...
adoPrimaryRS = modRecordSet.getRS(ref "select * from POS WHERE POSID = " + id);
//new serialization check
lPassword = Strings.LTrim(Strings.Replace(My.MyProject.Forms.frmMenu.lblCompany.Text, "'", ""));
lPassword = Strings.RTrim(Strings.Replace(lPassword, " ", ""));
lPassword = Strings.Trim(Strings.Replace(lPassword, ".", ""));
lPassword = Strings.LCase(lPassword);
leCode = "";
lCode = "";
for (x = 0; x <= Strings.Len(lPassword); x++) {
lCode = Strings.Mid(lPassword, x, 1);
lCode = Convert.ToString(Strings.Asc(lCode));
if (Convert.ToDouble(lCode) > 96 & Convert.ToDouble(lCode) < 123) {
leCode = leCode + Strings.Mid(lPassword, x, 1);
}
}
lPassword = leCode;
lCode = Convert.ToString(adoPrimaryRS.Fields("POS_CID").Value * 135792468);
leCode = Encrypt(lCode, lPassword);
for (x = 1; x <= Strings.Len(leCode); x++) {
if (Strings.Asc(Strings.Mid(leCode, x, 1)) < 33) {
leCode = Strings.Left(leCode, x - 1) + Strings.Chr(33) + Strings.Mid(leCode, x + 1);
}
}
if (Strings.Split(adoPrimaryRS.Fields("POS_Code").Value, Strings.Chr(255))[0] != leCode) {
lblLic[1].Visible = true;
lblLic[0].Visible = true;
}
//new serialization check
} else {
k_posNew = true;
adoPrimaryRS = modRecordSet.getRS(ref "select * from POS");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
if (k_posNew == true)
_txtFields_10.Text = basCryptoProcs.strCDKey;
foreach (TextBox oText_loopVariable in txtInteger) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.Leave += txtInteger_Leave;
//txtInteger_Leave(txtInteger.Item((oText.Index)), New System.EventArgs())
}
foreach (TextBox oText_loopVariable in txtFloat) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
if (string.IsNullOrEmpty(oText.Text))
oText.Text = "0";
oText.Text = Convert.ToString(Convert.ToDouble(oText.Text) * 100);
oText.Leave += txtFloat_Leave;
//txtFloat_Leave(txtFloat.Item((oText.Index)), New System.EventArgs())
}
bolLoad = true;
if (id) {
if (adoPrimaryRS.Fields("POS_KitchenMonitor").Value == true) {
this.chkKitchenMonitors.CheckState = System.Windows.Forms.CheckState.Checked;
this.chkKitchenMonitors.Tag = 1;
} else {
this.chkKitchenMonitors.CheckState = System.Windows.Forms.CheckState.Unchecked;
this.chkKitchenMonitors.Tag = 0;
}
}
bolLoad = false;
//Bind the check boxes to the data provider
foreach (CheckBox oCheck_loopVariable in chkFields) {
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(adoPrimaryRS);
}
buildDataControls();
// ERROR: Not supported in C#: OnErrorStatement
if (id) {
} else {
cmbKeyboard.BoundText = Convert.ToString(2);
cmbWH.BoundText = Convert.ToString(2);
}
mbDataChanged = false;
loadLanguage();
ShowDialog();
}
public void loadItem(ref int id)
{
ADODB.Recordset rsP = default(ADODB.Recordset);
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
InOper = id;
inController = false;
if (id) {
adoPrimaryRS = modRecordSet.getRS(ref "select PersonID,Person_Title,Person_FirstName,Person_LastName,Person_Position,Person_Cell,Person_Telephone,Person_UserID,Person_Password,Person_QuickAccess,Person_IDNo,Person_Disabled,Person_Drawer from Person WHERE PersonID = " + id);
rsP = modRecordSet.getRS(ref "SELECT * FROM Person WHERE PersonID = " + id);
txtComm.Text = Strings.FormatNumber(rsP.Fields("Person_Comm").Value, 2);
//for duplication access id
_txtFields_12.Text = rsP.Fields("Person_QuickAccess").Value;
rsP = modRecordSet.getRS(ref "SELECT Controller_Permission FROM ControllerPermission WHERE Controller_PersonID = " + id);
if (rsP.RecordCount == 0) {
inController = true;
modRecordSet.cnnDB.Execute("INSERT INTO ControllerPermission (Controller_PersonID,Controller_Permission) VALUES (" + id + ",0)");
this.chkController.CheckState = System.Windows.Forms.CheckState.Unchecked;
this.chkController.Tag = 0;
} else {
if (rsP.Fields("Controller_Permission").Value == true) {
this.chkController.CheckState = System.Windows.Forms.CheckState.Checked;
this.chkController.Tag = 1;
} else {
this.chkController.CheckState = System.Windows.Forms.CheckState.Unchecked;
this.chkController.Tag = 0;
}
}
_lbl_1.Text = "Employee No. " + id;
} else {
adoPrimaryRS = modRecordSet.getRS(ref "select * from Person");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
_lbl_1.Text = "Employee No. " + " [New record]";
}
setup();
foreach (TextBox oText_loopVariable in this.txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
perIden = id;
// ERROR: Not supported in C#: OnErrorStatement
if (id) {
cmbDraw.SelectedIndex = adoPrimaryRS.Fields("Person_Drawer").Value;
} else {
cmbDraw.SelectedIndex = 0;
}
foreach (CheckBox oCheck_loopVariable in this.chkFields) {
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(adoPrimaryRS);
}
buildDataControls();
mbDataChanged = false;
loadLanguage();
ShowDialog();
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
DateTimePicker oDate = new DateTimePicker();
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
ADODB.Recordset rs = default(ADODB.Recordset);
rs = modRecordSet.getRS(ref "SELECT * FROM Channel");
while (!(rs.EOF))
{
chkFields[rs.Fields("ChannelID").Value].Text = rs.Fields("ChannelID").Value + ". " + rs.Fields("Channel_Code").Value;
rs.moveNext();
}
rs.Close();
if (id)
{
adoPrimaryRS = modRecordSet.getRS(ref "select Increment.* from Increment WHERE IncrementID = " + id);
}
else
{
adoPrimaryRS = modRecordSet.getRS(ref "select * from Increment");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in this.txtFields)
{
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
foreach (TextBox oText_loopVariable in this.txtInteger)
{
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.Leave += txtInteger_Leave;
//txtInteger_Leave(txtInteger.Item((oText.TabIndex)), New System.EventArgs())
}
// For Each oText In Me.txtInteger
// Set oText.DataBindings.Add(adoPrimaryRS)
// txtInteger_LostFocus oText.Index
// Next
// For Each oText In Me.txtFloat
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloat_LostFocus oText.Index
// Next
// For Each oText In Me.txtFloatNegative
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloatNegative_LostFocus oText.Index
// Next
//Bind the check boxes to the data provider
foreach (CheckBox oCheck_loopVariable in chkFields)
{
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(adoPrimaryRS);
}
buildDataControls();
mbDataChanged = false;
gID = id;
if (gID)
{
loadItems();
}
loadLanguage();
ShowDialog();
}
public void loadItem(ref int id, ref short section)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
this.lblSettl.Visible = true;
this.txtSettlement.Visible = true;
if (id) {
adoPrimaryRS = modRecordSet.getRS(ref "select SupplierID,Supplier_Name,Supplier_PostalAddress,Supplier_PhysicalAddress,Supplier_Telephone,Supplier_Facimile,Supplier_RepresentativeName,Supplier_RepresentativeNumber,Supplier_ShippingCode,Supplier_OrderAttentionLine,Supplier_Ullage,Supplier_discountCOD,Supplier_discount15days,Supplier_discount30days,Supplier_discount60days,Supplier_discount90days,Supplier_discount120days,Supplier_discountSmartCard,Supplier_discountDefault,Supplier_Current,Supplier_30Days,Supplier_60Days,Supplier_90Days,Supplier_120Days from Supplier WHERE SupplierID = " + id);
} else {
adoPrimaryRS = modRecordSet.getRS(ref "select * from Supplier");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
gSection = section;
switch (gSection) {
case sec_Payment:
this.Text = "Account Payment";
break;
case sec_Debit:
this.lblSettl.Visible = false;
this.txtSettlement.Visible = false;
this._lblLabels_11.Text = "Debit Journal";
this.Text = "Debit Journal-Increase amount owing";
break;
case sec_Credit:
this.lblSettl.Visible = false;
this.txtSettlement.Visible = false;
this._lblLabels_11.Text = "Credit Journal";
this.Text = "Credit Journal-Decrease amount owing";
break;
default:
this.Close();
return;
break;
}
_lbl_2.Text = "&2. Transaction (" + this.Text + ")";
this.cmbPeriod.SelectedIndex = 0;
// If adoPrimaryRS.BOF Or adoPrimaryRS.EOF Then
// Else
foreach (TextBox oText_loopVariable in this.txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
// For Each oText In Me.txtInteger
// Set oText.DataBindings.Add(adoPrimaryRS)
// txtInteger_LostFocus oText.Index
// Next
foreach (TextBox oText_loopVariable in this.txtFloat) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
if (string.IsNullOrEmpty(oText.Text))
oText.Text = "0";
oText.Text = Convert.ToString(Convert.ToDouble(oText.Text) * 100);
oText.Leave += txtFloat_Leave;
}
// For Each oText In Me.txtFloatNegative
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloatNegative_LostFocus oText.Index
// Next
//Bind the check boxes to the data provider
// For Each oCheck In Me.chkFields
// Set oCheck.DataBindings.Add(adoPrimaryRS)
// Next
buildDataControls();
mbDataChanged = false;
loadLanguage();
ShowDialog();
// End If
}
private void button1_Click(object sender, EventArgs e)
{
if (comboBox2.Text == "")
{
MessageBox.Show("PAY Type can't be empty");
comboBox2.Select();
comboBox2.Focus();
return;
}
if (comboBox2.Text == "CHEQUE")
{
if (textBox5.Text == "")
{
MessageBox.Show("Enter Cheque Details");
textBox5.Select();
textBox5.Focus();
return;
}
}
for (int i = 0; i < dataGridView1.RowCount - 1; i++)
{
for (int j = 0; j <= 2; j++)
{
if (dataGridView1.Rows[i].Cells[j] == null || dataGridView1.Rows[i].Cells[j].Value == "")
{
MessageBox.Show("Field can't be empty");
dataGridView1.CurrentCell = dataGridView1.Rows[i].Cells[j];
return;
}
}
}
Temp1.Open(@"select * from farmerpayment", Program.DB, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic);
for (int i = 0; i < dataGridView1.RowCount - 1; i++)
{
Temp1.AddNew();
Temp1.Fields["fpayId"].Value = Int64.Parse(textBox1.Text);
if (comboBox2.Text == "CASH")
{
Temp1.Fields["fpaytype"].Value = "CASH";
}
else if (comboBox2.Text == "CHEQUE")
{
Temp1.Fields["fpaytype"].Value = "CHEQUE : " + textBox5.Text;
}
Temp2.Open(@"select * from farmerdetails WHERE fNames='" + dataGridView1.Rows[i].Cells[0].EditedFormattedValue + "'", Program.DB, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic);
Temp1.Fields["fID"].Value = Temp2.Fields["fID"].Value;
Temp2.Close();
Temp1.Fields["pattiId"].Value = Int64.Parse(dataGridView1.Rows[i].Cells[1].EditedFormattedValue.ToString());
Temp1.Fields["Amount"].Value = decimal.Parse(dataGridView1.Rows[i].Cells[2].EditedFormattedValue.ToString());
Temp2.Open(@"select * from pattirefer WHERE pattiID = " + Int64.Parse(dataGridView1.Rows[i].Cells[1].EditedFormattedValue.ToString()) + "", Program.DB, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic);
Temp2.Fields["payable"].Value = Temp2.Fields["payable"].Value - decimal.Parse(dataGridView1.Rows[i].Cells[2].EditedFormattedValue.ToString());
Temp2.Update();
Temp2.Close();
Temp1.Fields["PayDay"].Value = dateTimePicker1.Value.ToShortDateString();
Temp1.Fields["TotalAmount"].Value = decimal.Parse(textBox2.Text);
Temp1.Update();
}
Temp1.Close();
MessageBox.Show("SAVED");
textBox1.Text = (Int64.Parse(textBox1.Text) + 1).ToString();
comboBox2.SelectedIndex = -1;
label7.Visible = false;
textBox5.Visible = false;
textBox2.Text = "";
dataGridView1.Rows.Clear();
}
public void loadItem(ref int id)
{
ADODB.Recordset rs = default(ADODB.Recordset);
int lID = 0;
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
if (id) {
adoPrimaryRS = modRecordSet.getRS(ref "SELECT PriceSet.PriceSetID, PriceSet.PriceSet_Name, PriceSet.PriceSet_StockItemID, PriceSet.PriceSet_Disabled From PriceSet WHERE (((PriceSet.PriceSetID)=" + id + "));");
} else {
adoPrimaryRS = modRecordSet.getRS(ref "select * from [PriceSet]");
adoPrimaryRS.AddNew();
this.Text = this.Text + "[New Record]";
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
//Bind the check boxes to the data provider
foreach (CheckBox oCheck_loopVariable in chkFields) {
oCheck = oCheck_loopVariable;
lID = adoPrimaryRS.Fields("PriceSet_StockItemID").Value;
if (lID != 0) {
rs = modRecordSet.getRS(ref "SELECT StockItem.StockItem_Name FROM StockItem WHERE (StockItemID = " + lID + ")");
if (rs.BOF | rs.EOF) {
this.lblStockItem.Text = "No Stock Item Selected ...";
this.lblStockItem.Tag = 0;
} else {
this.lblStockItem.Text = rs("StockItem_Name");
this.lblStockItem.Tag = lID;
}
}
oCheck.DataBindings.Add(adoPrimaryRS);
}
if (_chkFields_0.CheckState == 2)
_chkFields_0.CheckState = System.Windows.Forms.CheckState.Unchecked;
buildDataControls();
mbDataChanged = false;
setup();
loadLanguage();
ShowDialog();
}
private void printTransactionA4(ref transaction lTransaction)
{
string typeQuote = null;
string typeAccountPayment = null;
string typeConsignment = null;
string typeConsignmentReturn = null;
string typeAccountSaleCOD = null;
string typeAccountSale = null;
int lRetVal = 0;
int hkey = 0;
string vValue = null;
decimal lnVat = default(decimal);
string gPath = null;
ADODB.Recordset rs = default(ADODB.Recordset);
customer customer_Renamed = null;
string sql = null;
ADODB.Recordset rsNew = new ADODB.Recordset();
//Dim rsNew2 As New Recordset
lineItem lineitem_Renamed = null;
string lString = null;
CrystalDecisions.CrystalReports.Engine.ReportDocument Report = new CrystalDecisions.CrystalReports.Engine.ReportDocument();
short lPaymentType = 0;
string[] lArray = null;
decimal TCurrency = default(decimal);
decimal QuoteTotal = default(decimal);
// ERROR: Not supported in C#: OnErrorStatement
//Set which invoice is required
string sPrintGST = null;
sPrintGST = "";
QuoteTotal = 0;
//lRetVal = RegOpenKeyEx(HKEY_LOCAL_MACHINE, "Software\4POS\pos", 0, KEY_QUERY_VALUE, hkey)
//lRetVal = QueryValueEx(hkey, "printGST", sPrintGST)
//RegCloseKey (hkey)
//If sPrintGST = "" Then sPrintGST = "0"
// If gParameters.A4Exclusive = True Then
// Set Report = New cryReceipt1
// ElseIf sPrintGST = "1" Then
// Set Report = New cryReceipt1
// Else
Report.Load("cryReceipt.rpt");
// End If
//lPaymentType = getPaymentType(lTransaction)
//If lPaymentType And typeAccountPayment Then
// printTransactionPaymentA4 lTransaction
// Exit Sub
//End If
//Dim lnVat As Currency
gPath = "C:\\4POS\\pos\\";
int lVatAmount = 0;
int lAmount = 0;
rsNew.Open(gPath + "data\\item.rs", , ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic);
//, adOpenStatic, adLockOptimistic
lnVat = 0;
//a = rsNew.RecordCount
//rsNew.Close
//rsNew2.source = rsNew.source
//rsNew("transactionItem_quantity").Type = rsNew("transactionItem_price").Type
//rsNew("transactionItem_quantity").DefinedSize = rsNew("transactionItem_price").DefinedSize
//rsNew2("transactionItem_quantity").Attributes = rsNew("transactionItem_price").Attributes
//rsNew2("transactionItem_quantity").NumericScale = rsNew("transactionItem_price").NumericScale
//rsNew2("transactionItem_quantity").Precision = rsNew("transactionItem_price").Precision
foreach (lineItem lineitem_Renamed_loopVariable in lTransaction.lineItems) {
lineitem_Renamed = lineitem_Renamed_loopVariable;
rsNew.AddNew();
if (lineitem_Renamed.revoke) {
} else {
rsNew.Fields("transactionItem_build").Value = lineitem_Renamed.build;
rsNew.Fields("transactionItem_code").Value = lineitem_Renamed.code;
rsNew.Fields("transactionItem_depositType").Value = lineitem_Renamed.depositType;
rsNew.Fields("transactionItem_id").Value = lineitem_Renamed.id;
rsNew.Fields("transactionItem_lineNo").Value = lineitem_Renamed.lineNo;
rsNew.Fields("transactionItem_name").Value = lineitem_Renamed.name;
rsNew.Fields("transactionItem_originalPrice").Value = lineitem_Renamed.originalPrice;
rsNew.Fields("transactionItem_price").Value = lineitem_Renamed.price;
rsNew.Fields("transactionItem_quantity").Value = lineitem_Renamed.quantity;
rsNew.Fields("transactionItem_receiptName").Value = Strings.LTrim(Strings.Mid(lineitem_Renamed.receiptName, Strings.InStr(1, lineitem_Renamed.receiptName, "x") + 1, Strings.Len(lineitem_Renamed.receiptName)));
//lineitem.receiptName
rsNew.Fields("transactionItem_reversal").Value = lineitem_Renamed.reversal;
rsNew.Fields("transactionItem_revoke").Value = lineitem_Renamed.revoke;
rsNew.Fields("transactionItem_set").Value = lineitem_Renamed.setBuild;
rsNew.Fields("transactionItem_shrink").Value = lineitem_Renamed.shrink;
rsNew.Fields("transactionItem_type").Value = lineitem_Renamed.transactionType;
rsNew.Fields("transactionItem_vat").Value = lineitem_Renamed.vat;
if (lineitem_Renamed.vat > 0)
lnVat = lnVat + ((lineitem_Renamed.quantity * lineitem_Renamed.price) - ((lineitem_Renamed.quantity * lineitem_Renamed.price) / (1 + (lineitem_Renamed.vat / 100))));
QuoteTotal = QuoteTotal + (lineitem_Renamed.quantity * lineitem_Renamed.price);
//If gParameters.A4Exclusive = True Then TCurrency = TCurrency + ((lineitem.quantity * lineitem.price) / (1 + (lineitem.vat) / 100))
//TCurrency = 0 'TCurrency + ((lineitem.quantity * lineitem.price) / (1 + (lineitem.vat) / 100))
rsNew.update();
}
}
//rsNew.MoveFirst
//vValue = rsNew("transactionItem_quantity")
vValue = "";
lRetVal = modUtilities.RegOpenKeyEx(modUtilities.HKEY_LOCAL_MACHINE, "Software\\4POS\\pos", 0, modUtilities.KEY_QUERY_VALUE, ref hkey);
lRetVal = modUtilities.QueryValueEx(hkey, "A4Items", ref vValue);
modUtilities.RegCloseKey(hkey);
if (string.IsNullOrEmpty(vValue))
vValue = "0";
if (vValue == "1") {
rsNew.Sort = "transactionItem_receiptName";
} else if (vValue == "0") {
}
Report.Database.Tables(1).SetDataSource(rsNew);
//Report.Database.Tables(2).SetDataSource rsNew, 3
Report.SetParameterValue("txtCompanyName", lTransaction.companyName);
Report.SetParameterValue("txtCompanyDetails1", lTransaction.heading1);
if (!string.IsNullOrEmpty(lTransaction.heading2)) {
Report.SetParameterValue("txtCompanyDetails2", lTransaction.heading2);
if (!string.IsNullOrEmpty(lTransaction.heading3)) {
Report.SetParameterValue("txtCompanyDetails3", lTransaction.heading3);
//If gParameters.tr_PrintInvoice = False Then
if (!string.IsNullOrEmpty(lTransaction.taxNumber)) {
Report.SetParameterValue("txtCompanyDetails4", "TAX NO :" + lTransaction.taxNumber);
}
//End If
} else {
//If gParameters.tr_PrintInvoice = False Then
if (!string.IsNullOrEmpty(lTransaction.taxNumber)) {
Report.SetParameterValue("txtCompanyDetails3", "TAX NO :" + lTransaction.taxNumber);
}
//End If
}
} else {
if (!string.IsNullOrEmpty(lTransaction.heading3)) {
Report.SetParameterValue("txtCompanyDetails2", lTransaction.heading3);
//If gParameters.tr_PrintInvoice = False Then
if (!string.IsNullOrEmpty(lTransaction.taxNumber)) {
Report.SetParameterValue("txtCompanyDetails3", "TAX NO :" + lTransaction.taxNumber);
}
//End If
} else {
//If gParameters.tr_PrintInvoice = False Then
if (!string.IsNullOrEmpty(lTransaction.taxNumber)) {
Report.SetParameterValue("txtCompanyDetails2", "TAX NO :" + lTransaction.taxNumber);
}
//End If
}
}
lString = lString + lTransaction.heading1 + Strings.Chr(13);
lString = lString + lTransaction.heading2 + Strings.Chr(13);
lString = lString + lTransaction.heading3 + Strings.Chr(13);
if (!string.IsNullOrEmpty(lTransaction.taxNumber))
lString = lString + "TAX NO :" + lTransaction.taxNumber;
lString = Strings.Replace(lString, Strings.Chr(13) + Strings.Chr(13), Strings.Chr(13));
lString = Strings.Replace(lString, Strings.Chr(13) + Strings.Chr(13), Strings.Chr(13));
Report.SetParameterValue("txtInvoiceNumber", lTransaction.transactionID);
Report.SetParameterValue("txtInvoiceDate", Strings.Format(lTransaction.transactionDate, "dd mmm yyyy hh:mm"));
Report.SetParameterValue("txtPOS", lTransaction.posName);
Report.SetParameterValue("txtCashier", lTransaction.cashierName);
if (Strings.LCase(lTransaction.transactionType) == "deposit credit") {
Report.SetParameterValue("txtType", "DEPOSIT CREDIT");
Report.SetParameterValue("txtTypeSpecial", "");
Report.SetParameterValue("txtInvoiceNumber", "[" + lTransaction.transactionID + "]");
} else {
if (lTransaction.transactionSpecial_Renamed == null) {
if (lTransaction.customer_Renamed == null) {
Report.SetParameterValue("txtCustomer", "Cash Sale");
switch (lTransaction.paymentType) {
case Convert.ToString(1):
Report.SetParameterValue("txtCustomer", "Cash Sale");
break;
case Convert.ToString(2):
Report.SetParameterValue("txtCustomer", "Credit Card Sale");
break;
case Convert.ToString(3):
Report.SetParameterValue("txtCustomer", "Debit Card Sale");
break;
case Convert.ToString(4):
Report.SetParameterValue("txtCustomer", "Cheque Sale");
break;
case Convert.ToString(7):
Report.SetParameterValue("txtCustomer", "Split Tender");
break;
default:
Report.SetParameterValue("txtCustomer", "Cash Sale");
break;
}
Report.SetParameterValue("txtType", "TAX INVOICE");
Report.SetParameterValue("txtTypeSpecial", "");
} else {
Report.SetParameterValue("txtSigned", lTransaction.customer_Renamed.signed_Renamed);
Report.SetParameterValue("txtCustomer", lTransaction.customer_Renamed.name);
if (!string.IsNullOrEmpty(lTransaction.customer_Renamed.physical)) {
lArray = Strings.Split(lTransaction.customer_Renamed.physical, Constants.vbCrLf);
Report.SetParameterValue("txtCustAddress1", lArray[0]);
if (Information.UBound(lArray) >= 1)
Report.SetParameterValue("txtCustAddress2", lArray[1]);
if (Information.UBound(lArray) >= 2)
Report.SetParameterValue("txtCustAddress3", lArray[2]);
if (Information.UBound(lArray) >= 3)
Report.SetParameterValue("txtCustAddress4", lArray[3]);
}
if (!string.IsNullOrEmpty(lTransaction.customer_Renamed.tax))
Report.SetParameterValue("txtCustAddress5", "TAX NO: " + lTransaction.customer_Renamed.tax);
//Report.txtCustomerAddress.SetText lTransaction.customer.name & Chr(13) & Chr(13) & Replace(lTransaction.customer.physical, Chr(10), "") & Chr(13) & Chr(13) & "TAX NO: " & lTransaction.customer.tax
Report.SetParameterValue("txtType", "TAX INVOICE");
if (lTransaction.customer_Renamed.terms) {
Report.SetParameterValue("txtTypeSpecial", "Account Sale");
} else {
Report.SetParameterValue("txtTypeSpecial", "Cash Sale");
}
}
} else {
Report.SetParameterValue("txtType", "");
Report.SetParameterValue("txtTypeSpecial", "");
if (lPaymentType & typeQuote) {
Report.SetParameterValue("txtType", "QUOTE");
if (lPaymentType & typeConsignment) {
if (lPaymentType & typeAccountSale | lPaymentType & typeAccountSaleCOD) {
Report.SetParameterValue("txtTypeSpecial", "Account Consignment");
} else {
Report.SetParameterValue("txtTypeSpecial", "Consignment");
}
} else if (lPaymentType & typeConsignmentReturn) {
if (lPaymentType & typeAccountSale | lPaymentType & typeAccountSaleCOD) {
Report.SetParameterValue("txtTypeSpecial", "Account Consignment Return Quote");
} else {
Report.SetParameterValue("txtTypeSpecial", "Consignment Return");
}
} else {
if (lPaymentType & typeAccountSale | lPaymentType & typeAccountSaleCOD) {
Report.SetParameterValue("txtTypeSpecial", "Account");
} else {
Report.SetParameterValue("txtTypeSpecial", "");
}
}
} else if (lPaymentType & typeConsignment) {
if (lPaymentType & typeAccountSale | lPaymentType & typeAccountSaleCOD) {
Report.SetParameterValue("txtType", "Account Consignment Sale");
} else {
Report.SetParameterValue("txtType", "Consignment Sale");
}
} else if (lPaymentType & typeConsignmentReturn) {
if (lPaymentType & typeAccountSale | lPaymentType & typeAccountSaleCOD) {
Report.SetParameterValue("txtType", "Account Consignment Return");
} else {
Report.SetParameterValue("txtType", "Consignment Return");
}
} else if (lPaymentType & typeAccountSale) {
Report.SetParameterValue("txtType", "Account Sale");
} else if (lPaymentType & typeAccountPayment) {
Report.SetParameterValue("txtType", "Account Payment");
}
if (lTransaction.customer_Renamed == null) {
if (!string.IsNullOrEmpty(lTransaction.transactionSpecial_Renamed.address)) {
lArray = Strings.Split(lTransaction.transactionSpecial_Renamed.address, Constants.vbCrLf);
Report.SetParameterValue("txtCustAddress1", lArray[0]);
if (Information.UBound(lArray) >= 1)
Report.SetParameterValue("txtCustAddress2", lArray[1]);
if (Information.UBound(lArray) >= 2)
Report.SetParameterValue("txtCustAddress3", lArray[2]);
if (Information.UBound(lArray) >= 3)
Report.SetParameterValue("txtCustAddress4", lArray[3]);
}
Report.SetParameterValue("txtSigned", lTransaction.transactionSpecial_Renamed.name);
Report.SetParameterValue("txtCustomer", lTransaction.transactionSpecial_Renamed.name);
} else {
if (!string.IsNullOrEmpty(lTransaction.customer_Renamed.tax))
lTransaction.customer_Renamed.physical = lTransaction.customer_Renamed.physical;
if (!string.IsNullOrEmpty(lTransaction.customer_Renamed.physical)) {
lArray = Strings.Split(lTransaction.customer_Renamed.physical, Constants.vbCrLf);
Report.SetParameterValue("txtCustAddress1", lArray[0]);
if (Information.UBound(lArray) >= 1)
Report.SetParameterValue("txtCustAddress2", lArray[1]);
if (Information.UBound(lArray) >= 2)
Report.SetParameterValue("txtCustAddress3", lArray[2]);
if (Information.UBound(lArray) >= 3)
Report.SetParameterValue("txtCustAddress4", lArray[3]);
}
Report.SetParameterValue("txtSigned.", lTransaction.customer_Renamed.signed_Renamed);
Report.SetParameterValue("txtCustomer", lTransaction.customer_Renamed.name);
}
}
}
//do report reference.....
if (!string.IsNullOrEmpty(lTransaction.CardRefer)) {
Report.SetParameterValue("txtCard", "Card Reference : " + lTransaction.CardRefer);
//ElseIf gParameters.CardRefer = True Then
// Report.txtCard.SetText "Card Reference : " & stCard
}
if (!string.IsNullOrEmpty(lTransaction.OrderRefer)) {
Report.SetParameterValue("txtOrder", "Order Reference : " + lTransaction.OrderRefer);
//ElseIf gParameters.OrderRefer = True Then
// Report.txtOrder.SetText "Order Reference : " & stOrder
}
if (!string.IsNullOrEmpty(lTransaction.SerialRefer)) {
Report.SetParameterValue("txtSerial", "Serial Reference : " + lTransaction.SerialRefer);
//ElseIf gParameters.SerialRefer = True Then
// Report.txtSerial.SetText "Serial Reference : " & stSerial
}
Report.SetParameterValue("txtDiscount", Strings.FormatNumber(lTransaction.paymentDiscount, 2));
//If gParameters.A4Exclusive = True Then
// Report.txtAText.SetText FormatNumber(TCurrency - lTransaction.paymentDiscount, 2)
//End If
//If frmMain.lblChange.Caption = "" Then frmMain.lblChange.Caption = "0.00"
if (lPaymentType & typeQuote) {
Report.SetParameterValue("txtTender", Strings.FormatNumber("0.00", 2));
} else {
Report.SetParameterValue("txtTender", Strings.FormatNumber(lTransaction.paymentTender, 2));
// lTransaction.paymentTender, 2)
}
Report.SetParameterValue("txtVAT", Strings.FormatNumber(lnVat, 2));
Report.SetParameterValue("txtChange", Strings.FormatNumber("0.00", 2));
//Report.txtTotal.SetText FormatNumber(lTransaction.paymentTotal, 2)
if (lPaymentType & typeQuote) {
//FIXED: it was calculating twice Report.txtTotal.SetText FormatNumber((QuoteTotal - lTransaction.paymentDiscount), 2)
Report.SetParameterValue("txtTotal", Strings.FormatNumber(QuoteTotal, 2));
//a = QuoteTotal
} else {
Report.SetParameterValue("txtTotal", Strings.FormatNumber(lTransaction.paymentTotal, 2));
}
if (lPaymentType & typeQuote | lPaymentType & typeConsignment | lPaymentType & typeConsignmentReturn | lPaymentType & typeAccountSale) {
Report.ReportDefinition.Sections("Section7").SectionFormat.EnableSuppress = true;
}
//New banking details
ADODB.Recordset rsCompBank = default(ADODB.Recordset);
rsCompBank = modRecordSet.getRS(ref "select * from Company;");
if (rsCompBank.RecordCount) {
if (Information.IsDBNull(rsCompBank.Fields("Company_BankName").Value)) {
} else {
Report.SetParameterValue("txtBankName", rsCompBank.Fields("Company_BankName"));
}
if (Information.IsDBNull(rsCompBank.Fields("Company_BranchName").Value)) {
} else {
Report.SetParameterValue("txtBranchName", rsCompBank.Fields("Company_BranchName"));
}
if (Information.IsDBNull(rsCompBank.Fields("Company_BranchCode").Value)) {
} else {
Report.SetParameterValue("txtBranchCode", rsCompBank.Fields("Company_BranchCode"));
}
if (Information.IsDBNull(rsCompBank.Fields("Company_AccountNumber").Value)) {
} else {
Report.SetParameterValue("txtAccountNumber", rsCompBank.Fields("Company_AccountNumber"));
}
}
//...................
//Report.selectPrinter "", Printer.DeviceName, ""
//'Report.VerifyOnEveryPrint = True
//Report.PrintOut False
System.Windows.Forms.Cursor.Current = System.Windows.Forms.Cursors.Default;
My.MyProject.Forms.frmReportShow.CRViewer1.ReportSource = Report;
My.MyProject.Forms.frmReportShow.mReport = Report;
My.MyProject.Forms.frmReportShow.sMode = "0";
My.MyProject.Forms.frmReportShow.CRViewer1.Refresh();
My.MyProject.Forms.frmReportShow.ShowDialog();
return;
ptA4:
Interaction.MsgBox(Err().Number + Err().Description);
// ERROR: Not supported in C#: ResumeStatement
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
gID = 0;
bool cBitA = false;
bool cBitF = false;
if (id) {
//checkcustid = id
adoPrimaryRS = modRecordSet.getRS(ref "select * from Customer WHERE CustomerID = " + id);
cmbTerms.SelectedIndex = adoPrimaryRS.Fields("Customer_Terms").Value;
mbAddNewFlag = false;
gID = id;
if (8 & My.MyProject.Forms.frmMenu.gBit)
cBitA = true;
if (16 & My.MyProject.Forms.frmMenu.gBit)
cBitF = true;
if (cBitA == true & cBitF == true) {
_txtFloat_13.Enabled = true;
_txtFloat_14.Enabled = true;
_txtFloat_15.Enabled = true;
_txtFloat_16.Enabled = true;
_txtFloat_17.Enabled = true;
_txtFloat_18.Enabled = true;
}
} else {
adoPrimaryRS = modRecordSet.getRS(ref "select * from Customer");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
cmbTerms.SelectedIndex = 0;
this.cmbChannel.BoundText = Convert.ToString(0);
}
// If adoPrimaryRS.BOF Or adoPrimaryRS.EOF Then
// Else
foreach (TextBox oText_loopVariable in txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
// For Each oText In Me.txtInteger
// Set oText.DataBindings.Add(adoPrimaryRS)
// txtInteger_LostFocus oText.Index
// Next
foreach (TextBox oText_loopVariable in txtFloat) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
if (string.IsNullOrEmpty(oText.Text))
oText.Text = "0";
oText.Text = Convert.ToString(Convert.ToDouble(oText.Text) * 100);
oText.Leave += txtFloat_Leave;
//txtFloat_Leave(txtFloat.Item((oText.Index)), New System.EventArgs())
}
//Bind the check boxes to the data provider
foreach (CheckBox oCheck_loopVariable in chkFields) {
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(adoPrimaryRS);
}
cmbTerms.DataSource = adoPrimaryRS;
buildDataControls();
mbDataChanged = false;
if (mbAddNewFlag == true) {
foreach (CheckBox oCheck_loopVariable in this.chkFields) {
oCheck = oCheck_loopVariable;
oCheck.CheckState = System.Windows.Forms.CheckState.Unchecked;
}
cmbChannel.BoundText = "1";
}
loadLanguage();
ShowDialog();
// End If
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
if (id) {
adoPrimaryRS = modRecordSet.getRS(ref "select * from Channel WHERE ChannelID = " + id);
// If IsNull(adoPrimaryRS("Channel_PriceToChannel1")) Then
// cmbChannelPrice.ListIndex = 0
// Else
switch (adoPrimaryRS.Fields("Channel_PriceToChannel1").Value) {
case -1:
cmbChannelPrice.SelectedIndex = 1;
break;
case 1:
cmbChannelPrice.SelectedIndex = 2;
break;
default:
cmbChannelPrice.SelectedIndex = 0;
break;
}
// End If
} else {
adoPrimaryRS = modRecordSet.getRS(ref "select * from POS");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
this.optType[Convert.ToInt16(_txtFields_0.Text)].Checked = true;
if (id == 1) {
_optType_0.Enabled = false;
_optType_1.Enabled = false;
}
// For Each oText In Me.txtInteger
// Set oText.DataBindings.Add(adoPrimaryRS)
// txtInteger_LostFocus oText.Index
// Next
// For Each oText In Me.txtFloat
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloat_LostFocus oText.Index
// Next
// For Each oText In Me.txtFloatNegative
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloatNegative_LostFocus oText.Index
// Next
//Bind the check boxes to the data provider
foreach (CheckBox oCheck_loopVariable in chkFields) {
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(adoPrimaryRS);
}
buildDataControls();
mbDataChanged = false;
loadLanguage();
ShowDialog();
}
private void btnsave_Click(object sender, EventArgs e)
{
ADODB.Recordset tmp = new ADODB.Recordset();
try
{
if (ADOconn.State == 0)
{
ADOconn.Open("Provider=SQLOLEDB;Initial Catalog= " + decoder.InitialCatalog + ";Data Source=" + decoder.DataSource + ";", decoder.UserID, decoder.Password, 0);
}
ADODB.Recordset rec = new ADODB.Recordset();
Conn.Close();
// Conn.Open();
bool isempty;
isempty = false;
if (isedit)
{
if (txtpriv.Text.Substring(1, 1) == "0")
{
MessageBox.Show("Insufficient Priveleges ", "Insufficient Priveleges ");
return;
}
}
else
{
if (txtpriv.Text.Substring(0, 1) == "0")
{
MessageBox.Show("Insufficient Priveleges ", "Insufficient Priveleges ");
return;
}
}
if (isempty)
{
MessageBox.Show("Entry Not Completed, Please fill all Yellow Marked fileds!!", "Invalid Entry");
return;
}
try
{
// ADOconn.BeginTrans();
//if (cmbmonth.SelectedIndex<0)
//{
// MessageBox.Show("Invalid Salary Month, Please Select a Valid Month", "Invalid Entry");
// return;
//}
ADOconn.BeginTrans();
int i = 0;
string entry_no = dtentry.Value.Date.ToString("yyyyMMdd");
if (isedit)
{
sql = "delete from reconcil_det where Reconcil_No = '" + entry_no + "'";
object a;
ADOconn.Execute(sql, out a);
}
sql = "select * from reconcil_det where Reconcil_No = '" + entry_no + "'";
rec = new ADODB.Recordset();
rec.Open(sql, ADOconn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic, -1);
if (rec.RecordCount == 0)
{
// rec.AddNew();
}
else
{
MessageBox.Show("Entry Already Exist , Cannot enter as a New entry", "Invalid Entry");
return;
}
for (i = 0; i < dgv1.Rows.Count; i++)
{
if (dgv1[0, i].Value != null)
{
rec.AddNew();
if (dgv1[3, i].Value == null)
{
dgv1[3, i].Value = 0;
}
if (dgv1[4, i].Value == null)
{
dgv1[4, i].Value = 0;
}
double amt = Convert.ToDouble(dgv1[3, i].Value) + Convert.ToDouble(dgv1[4, i].Value);
rec.Fields["Reconcil_No"].Value = entry_no;
rec.Fields["Reconcil_Date"].Value = dtentry.Value.Date;
rec.Fields["Reconcil_user"].Value = Gvar.username;
rec.Fields["Amount"].Value = Math.Abs(amt);
rec.Fields["Bank_No"].Value = cmbbank.SelectedValue;
rec.Fields["DR_CR"].Value = dgv1[2, i].Value;
rec.Fields["plus_minus"].Value = "";
rec.Fields["pay_date"].Value = dgv1[0, i].Value;
rec.Fields["SNO"].Value = i + 1;
rec.Fields["trn_type"].Value = "A";
rec.Fields["NARRATION"].Value = dgv1[5, i].Value;
rec.Update();
}
}
for (i = 0; i < dgvbank.Rows.Count; i++)
{
if (dgvbank[2, i].Value != null)
{
rec.AddNew();
if (dgvbank[0, i].Value == null)
{
dgvbank[0, i].Value = "";
}
if (dgvbank[1, i].Value == null)
{
dgvbank[1, i].Value = 0;
}
double amt = Convert.ToDouble(dgvbank[2, i].Value);
rec.Fields["Reconcil_No"].Value = entry_no;
rec.Fields["Reconcil_Date"].Value = dtentry.Value.Date;
rec.Fields["Reconcil_user"].Value = Gvar.username;
rec.Fields["Amount"].Value = Math.Abs(amt);
rec.Fields["Bank_No"].Value = cmbbank.SelectedValue;
if (dgvbank[1, i].Value == "+")
{
rec.Fields["DR_CR"].Value = "D";
}
else
{
rec.Fields["DR_CR"].Value = "C";
}
rec.Fields["plus_minus"].Value = dgvbank[1, i].Value;
rec.Fields["pay_date"].Value = "";
rec.Fields["SNO"].Value = i + 1;
rec.Fields["trn_type"].Value = "B";
rec.Fields["NARRATION"].Value = dgvbank[0, i].Value;
rec.Update();
}
}
for (i = 0; i < dgvbook.Rows.Count; i++)
{
if (dgvbook[2, i].Value != null)
{
rec.AddNew();
if (dgvbook[0, i].Value == null)
{
dgvbook[0, i].Value = "";
}
if (dgvbook[1, i].Value == null)
{
dgvbook[1, i].Value = 0;
}
double amt = Convert.ToDouble(dgvbook[2, i].Value);
rec.Fields["Reconcil_No"].Value = entry_no;
rec.Fields["Reconcil_Date"].Value = dtentry.Value.Date;
rec.Fields["Reconcil_user"].Value = Gvar.username;
rec.Fields["Amount"].Value = Math.Abs(amt);
rec.Fields["Bank_No"].Value = cmbbank.SelectedValue;
if (dgvbook[1, i].Value == "+")
{
rec.Fields["DR_CR"].Value = "D";
}
else
{
rec.Fields["DR_CR"].Value = "C";
}
rec.Fields["plus_minus"].Value = dgvbook[1, i].Value;
rec.Fields["pay_date"].Value = "";
rec.Fields["SNO"].Value = i + 1;
rec.Fields["trn_type"].Value = "C";
rec.Fields["NARRATION"].Value = dgvbook[0, i].Value;
rec.Update();
}
}
ADOconn.CommitTrans();
isedit = true;
MessageBox.Show("Successfully Saved");
}
catch (Exception ex)
{
ADOconn.RollbackTrans();
MessageBox.Show(ex.Message);
}
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}
private void addcust_Click_1(object sender, EventArgs e)
{
if (addcust.Text == "&Add new Commodity")
{
LockUnLockMe(false);
int newid;
/* if (comm_tb.RecordCount > 0)
* {
*
* if (cpos != comm_tb.RecordCount)
* {
* comm_tb.MoveLast();
* cpos = comm_tb.RecordCount;
* }
* newid = comm_tb.Fields["ID"].Value + 1;
*
*
* }
* else
* {
* newid = 1;
* // textid.Text = (newid).ToString();
* prev.Enabled = true;
* }*/
emptyTxt();
// textid.Text = newid.ToString();
addcust.Text = "&Save Details";
fnd.Text = "&Cancel";
prev.Enabled = false;
nxt.Enabled = false;
edt.Enabled = false;
return;
}
if (addcust.Text == "&Save Details")
{
if (textname.Text == "")
{
XtraMessageBox.Show("Invaild Name");
return;
}
/* if (textaddress.Text == "")
* {
* XtraMessageBox.Show("Invaild price");
* return;
* }*/
if (textmobile.Text == "")
{
XtraMessageBox.Show("Invaild Weight");
return;
}
if (textid.Text == "")
{
XtraMessageBox.Show("Invaild ID");
return;
}
else
{
temp_tb.Open(@"select * from commidities where coID=" + Int32.Parse(textid.Text) + "", Program.DB, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic);
if (temp_tb.RecordCount != 0)
{
XtraMessageBox.Show("Same ID already exists");
temp_tb.Close();
return;
}
temp_tb.Close();
}
comm_tb.AddNew();
GetData();
comm_tb.Update();
SetButton();
commidities_list.Items.Add(textname.Text);
commidities_list.Update();
cpos = comm_tb.RecordCount;
LockUnLockMe(true);
}
}
public void loadItem(ref int id)
{
System.Windows.Forms.TextBox oText = null;
DateTimePicker oDate = new DateTimePicker();
System.Windows.Forms.CheckBox oCheck = null;
// ERROR: Not supported in C#: OnErrorStatement
ADODB.Recordset rs = default(ADODB.Recordset);
rs = modRecordSet.getRS(ref "SELECT * FROM Channel");
while (!(rs.EOF)) {
chkFields[rs.Fields("ChannelID").Value].Text = rs.Fields("ChannelID").Value + ". " + rs.Fields("Channel_Code").Value;
rs.moveNext();
}
rs.Close();
if (id) {
adoPrimaryRS = modRecordSet.getRS(ref "select Increment.* from Increment WHERE IncrementID = " + id);
} else {
adoPrimaryRS = modRecordSet.getRS(ref "select * from Increment");
adoPrimaryRS.AddNew();
this.Text = this.Text + " [New record]";
mbAddNewFlag = true;
}
setup();
foreach (TextBox oText_loopVariable in this.txtFields) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.MaxLength = adoPrimaryRS.Fields(oText.DataBindings).DefinedSize;
}
foreach (TextBox oText_loopVariable in this.txtInteger) {
oText = oText_loopVariable;
oText.DataBindings.Add(adoPrimaryRS);
oText.Leave += txtInteger_Leave;
//txtInteger_Leave(txtInteger.Item((oText.TabIndex)), New System.EventArgs())
}
// For Each oText In Me.txtInteger
// Set oText.DataBindings.Add(adoPrimaryRS)
// txtInteger_LostFocus oText.Index
// Next
// For Each oText In Me.txtFloat
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloat_LostFocus oText.Index
// Next
// For Each oText In Me.txtFloatNegative
// Set oText.DataBindings.Add(adoPrimaryRS)
// If oText.Text = "" Then oText.Text = "0"
// oText.Text = oText.Text * 100
// txtFloatNegative_LostFocus oText.Index
// Next
//Bind the check boxes to the data provider
foreach (CheckBox oCheck_loopVariable in chkFields) {
oCheck = oCheck_loopVariable;
oCheck.DataBindings.Add(adoPrimaryRS);
}
buildDataControls();
mbDataChanged = false;
gID = id;
if (gID) {
loadItems();
}
loadLanguage();
ShowDialog();
}
/// <param name="file"></param>
public static void WriteData(string file)
{
//Objekt aus XML-File erstellenaa
XmlSerializer serializer = new XmlSerializer(typeof(results));
results resultingMessage = (results)serializer.Deserialize(new XmlTextReader(file));
//Recordset
ADODB.Connection cn = new ADODB.Connection();
ADODB.Recordset rs = new ADODB.Recordset();
ADODB.Recordset rsDelete = new ADODB.Recordset();
string cnStr;
//Connection string.
cnStr = @"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=PPS-Datenbank.mdb";
//Provider=Microsoft.Jet.OLEDB.4.0;Data Source=
try
{
cn.Open(cnStr);
}
catch (Exception test)
{
string dbFehler = Thread.CurrentThread.CurrentUICulture.Name == "de" ? "Datenbank konnte nicht geöffnet werden!" : "Database could not be loaded";
MessageBox.Show(dbFehler + " " + test);
}
//Überprüfung ob Periode drin
try
{
rs.Open("Select * From warehousestock_article WHERE period = '" + resultingMessage.period + "'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
if (!rs.EOF)
{
string periodeFehler = Thread.CurrentThread.CurrentUICulture.Name == "de" ? "Diese Periode wurde bereits importiert!" : "You can not import a period twice.";
MessageBox.Show(periodeFehler);
return;
}
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle warehousestock_article
try
{
rs.Open("Select * From warehousestock_article", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
foreach (resultsWarehousestockArticle myElement in resultingMessage.warehousestock.article)
{
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["id"].Value = myElement.id;
rs.Fields["amount"].Value = myElement.amount;
rs.Fields["startamount"].Value = myElement.startamount;
rs.Fields["pct"].Value = myElement.pct;
rs.Fields["price"].Value = myElement.price;
rs.Fields["stockvalue"].Value = myElement.stockvalue;
}
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle warehousestock_totalvalue
try
{
rs.Open("Select * From warehousestock_totalvalue", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["stockvalue"].Value = resultingMessage.warehousestock.totalstockvalue;
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle inwardstockmovement
try
{
rs.Open("Select * From inwardstockmovement", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
foreach (resultsOrder myElement in resultingMessage.inwardstockmovement)
{
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["id"].Value = myElement.id;
rs.Fields["orderperiod"].Value = myElement.orderperiod;
rs.Fields["mode"].Value = myElement.mode;
rs.Fields["article"].Value = myElement.article;
rs.Fields["amount"].Value = myElement.amount;
rs.Fields["time"].Value = myElement.time;
rs.Fields["materialcosts"].Value = myElement.materialcosts;
rs.Fields["ordercosts"].Value = myElement.ordercosts;
rs.Fields["entirecosts"].Value = myElement.entirecosts;
rs.Fields["piececosts"].Value = myElement.piececosts;
}
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle futureinwardstockmovement
try
{
rs.Open("Select * From futureinwardstockmovement", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
foreach (resultsOrder1 myElement in resultingMessage.futureinwardstockmovement)
{
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["id"].Value = myElement.id;
rs.Fields["orderperiod"].Value = myElement.orderperiod;
rs.Fields["mode"].Value = myElement.mode;
rs.Fields["article"].Value = myElement.article;
rs.Fields["amount"].Value = myElement.amount;
}
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle idletimecosts_workplace
try
{
rs.Open("Select * From idletimecosts_workplace", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
foreach (resultsIdletimecostsWorkplace myElement in resultingMessage.idletimecosts.workplace)
{
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["id"].Value = myElement.id;
rs.Fields["setupevents"].Value = myElement.setupevents;
rs.Fields["idletime"].Value = myElement.idletime;
rs.Fields["wageidletimecosts"].Value = myElement.wageidletimecosts;
rs.Fields["wagecosts"].Value = myElement.wagecosts;
rs.Fields["machineidletimecosts"].Value = myElement.machineidletimecosts;
}
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle idletimecosts_sum
try
{
rs.Open("Select * From idletimecosts_sum", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["setupevents"].Value = resultingMessage.idletimecosts.sum.setupevents;
rs.Fields["idletime"].Value = resultingMessage.idletimecosts.sum.idletime;
rs.Fields["wageidletimecosts"].Value = resultingMessage.idletimecosts.sum.wageidletimecosts;
rs.Fields["wagecosts"].Value = resultingMessage.idletimecosts.sum.wagecosts;
rs.Fields["machineidletimecosts"].Value = resultingMessage.idletimecosts.sum.machineidletimecosts;
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle waitinglistworkstations
try
{
rs.Open("Select * From waitinglistworkstations", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
foreach (resultsWorkplace myElement in resultingMessage.waitinglistworkstations)
{
if (myElement.waitinglist == null)
{
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["id"].Value = myElement.id;
rs.Fields["timeneed_sum"].Value = myElement.timeneed;
}
else
{
foreach (resultsWorkplaceWaitinglist myUnterelement in myElement.waitinglist)
{
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["id"].Value = myElement.id;
rs.Fields["timeneed_sum"].Value = myElement.timeneed;
rs.Fields["period_wp"].Value = myUnterelement.period;
rs.Fields["order"].Value = myUnterelement.order;
rs.Fields["firstbatch"].Value = myUnterelement.firstbatch;
rs.Fields["lastbatch"].Value = myUnterelement.lastbatch;
rs.Fields["item"].Value = myUnterelement.item;
rs.Fields["amount"].Value = myUnterelement.amount;
rs.Fields["timeneed"].Value = myUnterelement.timeneed;
}
}
}
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//TODO WaitinglistStock
try
{
rs.Open("Select * From waitingliststock", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
foreach (resultsMissingpart missingpart in resultingMessage.waitingliststock)
{
foreach (resultsMissingpartWaitinglist myWaitingListElement in missingpart.waitinglist)
{
rs.AddNew();
rs.Fields["missingpart"].Value = missingpart.id;
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["item"].Value = myWaitingListElement.item;
rs.Fields["amount"].Value = myWaitingListElement.amount;
rs.Fields["order"].Value = myWaitingListElement.order;
rs.Fields["firstbatch"].Value = myWaitingListElement.firstbatch;
rs.Fields["lastbatch"].Value = myWaitingListElement.lastbatch;
}
}
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//TODO orders inwrok mit liste?
//Tabelle ordersinwork
try
{
rs.Open("Select * From ordersinwork", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
foreach (resultsWorkplace1 myElement in resultingMessage.ordersinwork)
{
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["id"].Value = myElement.id;
rs.Fields["period_oiw"].Value = myElement.period;
rs.Fields["order"].Value = myElement.order;
rs.Fields["batch"].Value = myElement.batch;
rs.Fields["item"].Value = myElement.item;
rs.Fields["amount"].Value = myElement.amount;
rs.Fields["timeneed"].Value = myElement.timeneed;
}
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle completedorders
try
{
rs.Open("Select * From completedorders", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
foreach (resultsOrder2 myElement in resultingMessage.completedorders)
{
foreach (resultsOrderBatch myUnterelement in myElement.batch)
{
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["o_period"].Value = myElement.period;
rs.Fields["o_id"].Value = myElement.id;
rs.Fields["o_item"].Value = myElement.item;
rs.Fields["o_quantity"].Value = myElement.quantity;
rs.Fields["o_cost"].Value = myElement.cost;
rs.Fields["o_averageunitcosts"].Value = myElement.averageunitcosts;
rs.Fields["b_id"].Value = myUnterelement.id;
rs.Fields["b_amount"].Value = myUnterelement.amount;
rs.Fields["b_cycletime"].Value = myUnterelement.cycletime;
rs.Fields["b_cost"].Value = myUnterelement.cost;
}
}
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle cycletimes
try
{
rs.Open("Select * From cycletimes", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["startedorders"].Value = resultingMessage.cycletimes.startedorders;
rs.Fields["waitingorders"].Value = resultingMessage.cycletimes.waitingorders;
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle cycletimes_order
try
{
rs.Open("Select * From cycletimes_order", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
foreach (resultsCycletimesOrder myElement in resultingMessage.cycletimes.order)
{
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["id"].Value = myElement.id;
rs.Fields["period_order"].Value = myElement.period;
rs.Fields["starttime"].Value = myElement.starttime;
rs.Fields["finishtime"].Value = myElement.finishtime;
rs.Fields["cycletimemin"].Value = myElement.cycletimemin;
rs.Fields["cycletimefactor"].Value = myElement.cycletimefactor;
}
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle general
try
{
rs.Open("Select * From tbl_general", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["capacity_current"].Value = resultingMessage.result.general.capacity.current;
rs.Fields["capacity_average"].Value = resultingMessage.result.general.capacity.average;
rs.Fields["capacity_all"].Value = resultingMessage.result.general.capacity.all;
rs.Fields["possiblecapacity_current"].Value = resultingMessage.result.general.possiblecapacity.current;
rs.Fields["possiblecapacity_average"].Value = resultingMessage.result.general.possiblecapacity.average;
rs.Fields["possiblecapacity_all"].Value = resultingMessage.result.general.possiblecapacity.all;
rs.Fields["relpossiblenormalcapacity_current"].Value = resultingMessage.result.general.relpossiblenormalcapacity.current;
rs.Fields["relpossiblenormalcapacity_average"].Value = resultingMessage.result.general.relpossiblenormalcapacity.average;
rs.Fields["relpossiblenormalcapacity_all"].Value = resultingMessage.result.general.relpossiblenormalcapacity.all;
rs.Fields["productivetime_current"].Value = resultingMessage.result.general.productivetime.current;
rs.Fields["productivetime_average"].Value = resultingMessage.result.general.productivetime.average;
rs.Fields["productivetime_all"].Value = resultingMessage.result.general.productivetime.all;
rs.Fields["effiency_current"].Value = resultingMessage.result.general.effiency.current;
rs.Fields["effiency_average"].Value = resultingMessage.result.general.effiency.average;
rs.Fields["effiency_all"].Value = resultingMessage.result.general.effiency.all;
rs.Fields["sellwish_current"].Value = resultingMessage.result.general.sellwish.current;
rs.Fields["sellwish_average"].Value = resultingMessage.result.general.sellwish.average;
rs.Fields["sellwish_all"].Value = resultingMessage.result.general.sellwish.all;
rs.Fields["salesquantity_current"].Value = resultingMessage.result.general.salesquantity.current;
rs.Fields["salesquantity_average"].Value = resultingMessage.result.general.salesquantity.average;
rs.Fields["salesquantity_all"].Value = resultingMessage.result.general.salesquantity.all;
rs.Fields["deliveryreliability_current"].Value = resultingMessage.result.general.deliveryreliability.current;
rs.Fields["deliveryreliability_average"].Value = resultingMessage.result.general.deliveryreliability.average;
rs.Fields["deliveryreliability_all"].Value = resultingMessage.result.general.deliveryreliability.all;
rs.Fields["idletime_current"].Value = resultingMessage.result.general.idletime.current;
rs.Fields["idletime_average"].Value = resultingMessage.result.general.idletime.average;
rs.Fields["idletime_all"].Value = resultingMessage.result.general.idletime.all;
rs.Fields["idletimecosts_current"].Value = resultingMessage.result.general.idletimecosts.current;
rs.Fields["idletimecosts_average"].Value = resultingMessage.result.general.idletimecosts.average;
rs.Fields["idletimecosts_all"].Value = resultingMessage.result.general.idletimecosts.all;
rs.Fields["storevalue_current"].Value = resultingMessage.result.general.storevalue.current;
rs.Fields["storevalue_average"].Value = resultingMessage.result.general.storevalue.average;
rs.Fields["storevalue_all"].Value = resultingMessage.result.general.storevalue.all;
rs.Fields["storagecosts_current"].Value = resultingMessage.result.general.storagecosts.current;
rs.Fields["storagecosts_average"].Value = resultingMessage.result.general.storagecosts.average;
rs.Fields["storagecosts_all"].Value = resultingMessage.result.general.storagecosts.all;
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle normalsale
try
{
rs.Open("Select * From normalsale", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["salesprice_current"].Value = resultingMessage.result.normalsale.salesprice.current;
rs.Fields["salesprice_average"].Value = resultingMessage.result.normalsale.salesprice.average;
rs.Fields["salesprice_all"].Value = resultingMessage.result.normalsale.salesprice.all;
rs.Fields["profit_current"].Value = resultingMessage.result.normalsale.profit.current;
rs.Fields["profit_average"].Value = resultingMessage.result.normalsale.profit.average;
rs.Fields["profit_all"].Value = resultingMessage.result.normalsale.profit.all;
rs.Fields["profitperunit_current"].Value = resultingMessage.result.normalsale.profitperunit.current;
rs.Fields["profitperunit_average"].Value = resultingMessage.result.normalsale.profitperunit.average;
rs.Fields["profitperunit_all"].Value = resultingMessage.result.normalsale.profitperunit.all;
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle directsale
try
{
rs.Open("Select * From directsale", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["profit_current"].Value = resultingMessage.result.directsale.profit.current;
rs.Fields["profit_average"].Value = resultingMessage.result.directsale.profit.average;
rs.Fields["profit_all"].Value = resultingMessage.result.directsale.profit.all;
rs.Fields["contractpenalty_current"].Value = resultingMessage.result.directsale.contractpenalty.current;
rs.Fields["contractpenalty_average"].Value = resultingMessage.result.directsale.contractpenalty.average;
rs.Fields["contractpenalty_all"].Value = resultingMessage.result.directsale.contractpenalty.all;
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle marketplacesale
try
{
rs.Open("Select * From marketplacesale", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["profit_current"].Value = resultingMessage.result.marketplacesale.profit.current;
rs.Fields["profit_average"].Value = resultingMessage.result.marketplacesale.profit.average;
rs.Fields["profit_all"].Value = resultingMessage.result.marketplacesale.profit.all;
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
//Tabelle summary
try
{
rs.Open("Select * From summary", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rs.AddNew();
rs.Fields["period"].Value = resultingMessage.period;
rs.Fields["profit_current"].Value = resultingMessage.result.summary.profit.current;
rs.Fields["profit_average"].Value = resultingMessage.result.summary.profit.average;
rs.Fields["profit_all"].Value = resultingMessage.result.summary.profit.all;
rs.Update();
}
catch (Exception)
{
}
finally
{
rs.Close();
}
/// <summary>
/// Überflüssige Werte aus der DB löschen, wenn Initialer Stand hochgeladen wird
/// </summary>
try
{
rs.Open("Select distinct period from warehousestock_article ORDER BY period Desc", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
int periode = Convert.ToInt32(rs.Fields["period"].Value);
if (periode == 0)
{
rsDelete.Open("Delete From inwardstockmovement", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From futureinwardstockmovement Where period = '0'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
//rsDelete.Open("Delete From idletimecosts", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From idletimecosts_workplace where period ='0'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From idletimecosts_sum where period = '0'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From waitinglistworkstations where period = '0'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From waitingliststock where period = 0", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From ordersinwork where period = '0'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From completedorders where period = '0'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From cycletimes where period = '0'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From cycletimes_order where period = '0'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From tbl_general where period = '0'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From normalsale where period = '0'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From directsale where period = '0'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From marketplacesale where period = '0'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
rsDelete.Open("Delete From summary where period = '0'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1);
}
}
catch (Exception test)
{
MessageBox.Show(test.Message);
}
finally
{
rs.Close();
}
MessageBox.Show("XML-File importiert");
cn.Close();
}
/// <summary>
/// Creates an ADODB.Recordset from an System.Collections.Generic.IEnumerable(T).
/// </summary>
/// <typeparam name="T">The type of the elements of input.</typeparam>
/// <param name="input">The System.Collections.Generic.IEnumerable(T) to create an ADODB.Recordset from.</param>
/// <returns>An ADODB.Recordset that contains elements from the input sequence.</returns>
public static ADODB.Recordset ToRecordset <T>(this IEnumerable <T> input)
{
var adoType = new ADODB.DataTypeEnum();
if (DataTypes.TryGetAdoTypeForClrType(typeof(T), out adoType))
{
throw new ArgumentException("The T of IEnumerable<T> must be a custom POCO, not an ADO compatible type.", "input");
}
var rs = new ADODB.Recordset();
var type = typeof(T);
BindingFlags flags = BindingFlags.Public | BindingFlags.Instance;
PropertyInfo[] properties = type.GetProperties(flags);
// create properties
foreach (var property in properties)
{
if (DataTypes.TryGetAdoTypeForClrType(property.PropertyType, out adoType))
{
int definedSize = 0;
if (property.PropertyType == typeof(string))
{
// TODO: set string size to length of longest string in POCO?
definedSize = 1000;
}
if (property.PropertyType == typeof(Guid))
{
definedSize = 38;
}
rs.Fields.Append(property.Name, adoType, definedSize, ADODB.FieldAttributeEnum.adFldIsNullable);
}
}
// insert data
rs.Open();
if (input.Any())
{
foreach (var item in input)
{
rs.AddNew();
foreach (var property in properties)
{
var value = property.GetValue(item, null);
if (property.PropertyType == typeof(Guid))
{
value = value.ToString();
}
if (value != null)
{
rs.Fields[property.Name].Value = value;
}
}
rs.Update();
}
}
return(rs);
}
