/// <summary>
/// Initialize components. Called by framework after form created.
/// </summary>
///
public override void OnInitializeComponent()
{
this.Grid0 = ((SAPbouiCOM.Grid)(this.GetItem("Item_0").Specific));
this.Grid0.DoubleClickAfter += new SAPbouiCOM._IGridEvents_DoubleClickAfterEventHandler(this.Grid0_DoubleClickAfter);
this.Grid0.PressedAfter += new SAPbouiCOM._IGridEvents_PressedAfterEventHandler(this.OnClickListener);
this.Edit1 = ((SAPbouiCOM.EditText)(this.GetItem("Item_1").Specific));
this.Edit1.DoubleClickBefore += new SAPbouiCOM._IEditTextEvents_DoubleClickBeforeEventHandler(this.Edit1_DoubleClickBefore);
this.StaticText0 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_2").Specific));
this.Edit2 = ((SAPbouiCOM.EditText)(this.GetItem("Item_3").Specific));
this.Edit2.DoubleClickBefore += new SAPbouiCOM._IEditTextEvents_DoubleClickBeforeEventHandler(this.Edit2_DoubleClickBefore);
this.StaticText1 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_4").Specific));
this.StaticText2 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_5").Specific));
this.Edit3 = ((SAPbouiCOM.EditText)(this.GetItem("Item_6").Specific));
this.Edit3.DoubleClickBefore += new SAPbouiCOM._IEditTextEvents_DoubleClickBeforeEventHandler(this.Edit3_DoubleClickBefore);
this.StaticText3 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_7").Specific));
this.Edit4 = ((SAPbouiCOM.EditText)(this.GetItem("Item_8").Specific));
this.Edit4.DoubleClickBefore += new SAPbouiCOM._IEditTextEvents_DoubleClickBeforeEventHandler(this.Edit4_DoubleClickBefore);
this.StaticText4 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_9").Specific));
this.Edit5 = ((SAPbouiCOM.EditText)(this.GetItem("Item_10").Specific));
this.Edit5.DoubleClickBefore += new SAPbouiCOM._IEditTextEvents_DoubleClickBeforeEventHandler(this.Edit5_DoubleClickBefore);
this.StaticText5 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_11").Specific));
this.Edit6 = ((SAPbouiCOM.EditText)(this.GetItem("Item_12").Specific));
this.Edit6.DoubleClickBefore += new SAPbouiCOM._IEditTextEvents_DoubleClickBeforeEventHandler(this.Edit6_DoubleClickBefore);
this.StaticText6 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_13").Specific));
this.Edit7 = ((SAPbouiCOM.EditText)(this.GetItem("Item_14").Specific));
this.Edit7.DoubleClickBefore += new SAPbouiCOM._IEditTextEvents_DoubleClickBeforeEventHandler(this.Edit7_DoubleClickBefore);
this.StaticText7 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_15").Specific));
this.Edit8 = ((SAPbouiCOM.EditText)(this.GetItem("Item_16").Specific));
this.Edit8.DoubleClickBefore += new SAPbouiCOM._IEditTextEvents_DoubleClickBeforeEventHandler(this.Edit8_DoubleClickBefore);
this.FillTableButton = ((SAPbouiCOM.Button)(this.GetItem("Item_17").Specific));
this.FillTableButton.ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.FillTableButton_ClickBefore);
this.RefreshButton = ((SAPbouiCOM.Button)(this.GetItem("Item_18").Specific));
this.RefreshButton.ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.ResetButton);
this.ComboBox0 = ((SAPbouiCOM.ComboBox)(this.GetItem("Item_19").Specific));
this.ComboBox0.ComboSelectAfter += new SAPbouiCOM._IComboBoxEvents_ComboSelectAfterEventHandler(this.ComboBox0_ComboSelectAfter);
this.StaticText8 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_20").Specific));
this.StaticText9 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_21").Specific));
this.Grid1 = ((SAPbouiCOM.Grid)(this.GetItem("Item_22").Specific));
this.StaticText10 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_23").Specific));
this.Edit0 = ((SAPbouiCOM.EditText)(this.GetItem("Item_24").Specific));
this.Edit0.DoubleClickBefore += new SAPbouiCOM._IEditTextEvents_DoubleClickBeforeEventHandler(this.EditText8_DoubleClickBefore);
this.LinkedButton0 = ((SAPbouiCOM.LinkedButton)(this.GetItem("Item_25").Specific));
this.StaticText11 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_26").Specific));
this.Button2 = ((SAPbouiCOM.Button)(this.GetItem("Item_27").Specific));
this.Button2.ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.Button2_ClickBefore);
//
this.listOfEditText = this.CM_Obj.addItemsToList(this.Edit0, this.Edit1, this.Edit2, this.Edit3, this.Edit4, this.Edit5, this.Edit6, this.Edit7, this.Edit8);
//
this.CountButton = ((SAPbouiCOM.Button)(this.GetItem("Item_31").Specific));
this.CountButton.ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.CountTotal);
this.GetItem("Item_31").Visible = false;
this.GetItem("Item_19").Enabled = false;
this.Grid2 = ((SAPbouiCOM.Grid)(this.GetItem("Item_32").Specific));
this.AuthenticationButton = ((SAPbouiCOM.Button)(this.GetItem("Item_29").Specific));
this.AuthenticationButton.ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.Button0_ClickBefore);
this.OnCustomInitialize();
}
private void FillRiseMatrix()
{
mtxRise.Columns.Item("#").DataBind.Bind("DTRise", "#");
mtxRise.Columns.Item("ColRiseF").DataBind.Bind("DTRise", "DocNmRise");
mtxRise.Columns.Item("ColHrsFt").DataBind.Bind("DTRise", "HrsFt");
SAPbouiCOM.LinkedButton oLink = (SAPbouiCOM.LinkedButton)mtxRise.Columns.Item("ColRiseF").ExtendedObject;
//oLink.LinkedObject = SAPbouiCOM.BoLinkedObject.lf_Order;
mtxRise.AutoResizeColumns();
}
private void FillContractsMatrix()
{
mtxContracts.Columns.Item("#").DataBind.Bind("DTCont", "#");
mtxContracts.Columns.Item("ColCont").DataBind.Bind("DTCont", "DocNCont");
mtxContracts.Columns.Item("ColClient").DataBind.Bind("DTCont", "Client");
mtxContracts.Columns.Item("ColHrsFt").DataBind.Bind("DTCont", "HrsFt");
mtxContracts.Columns.Item("ColFact").DataBind.Bind("DTCont", "InvExt");
mtxContracts.Columns.Item("ColImp").DataBind.Bind("DTCont", "Import");
mtxContracts.Columns.Item("ColRHrs").DataBind.Bind("DTCont", "RealHrs");
mtxContracts.Columns.Item("ColDif").DataBind.Bind("DTCont", "Dif");
mtxContracts.Columns.Item("ColStatus").DataBind.Bind("DTCont", "Status");
mtxContracts.Columns.Item("ColMunp").DataBind.Bind("DTCont", "Muncp");
SAPbouiCOM.LinkedButton oLink = (SAPbouiCOM.LinkedButton)mtxContracts.Columns.Item("ColCont").ExtendedObject;
//oLink.LinkedObject = SAPbouiCOM.BoLinkedObject.lf_Order;
mtxContracts.AutoResizeColumns();
}
private void CreateePaymentFormForm()
{
try
{
ManualScan = "0";
SAPbouiCOM.Item oItem = null;
SAPbouiCOM.Button oButton = null;
//SAPbouiCOM.StaticText oStaticText = null;
// SAPbouiCOM.EditText oEditText = null;
//SAPbouiCOM.ComboBox oComboBox = null;
// add a new form
SAPbouiCOM.FormCreationParams oCreationParams = null;
oCreationParams = ((SAPbouiCOM.FormCreationParams)(SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_FormCreationParams)));
oCreationParams.BorderStyle = SAPbouiCOM.BoFormBorderStyle.fbs_Fixed;
oCreationParams.FormType = formePaymentForm;
oCreationParams.UniqueID = formePaymentForm;
try
{
oePaymentFormForm = SBO_Application.Forms.AddEx(oCreationParams);
}
catch (Exception)
{
oePaymentFormForm = SBO_Application.Forms.Item(formePaymentForm);
}
// set the form properties
oePaymentFormForm.Title = "eBizCharge ePayment Form";
oePaymentFormForm.Left = 400;
oePaymentFormForm.Top = 100;
oePaymentFormForm.ClientHeight = 460;
oePaymentFormForm.ClientWidth = 900;
//************************
// Adding a Rectangle
//***********************
int margin = 5;
oItem = oePaymentFormForm.Items.Add("Rect1", SAPbouiCOM.BoFormItemTypes.it_RECTANGLE);
oItem.Left = margin;
oItem.Width = oePaymentFormForm.ClientWidth - 2 * margin;
oItem.Top = margin;
oItem.Height = oePaymentFormForm.ClientHeight - 40;
int nTopGap = 25;
int left = 6;
int wBtn = 70;
int hBtn = 19;
int span = 80;
oItem = oePaymentFormForm.Items.Add(btnRefresh, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = left;
oItem.Width = wBtn;
oItem.Top = oePaymentFormForm.ClientHeight - nTopGap;
oItem.Height = hBtn;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Refresh";
left += span;
oItem = oePaymentFormForm.Items.Add(btnAdd, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = left;
oItem.Width = wBtn;
oItem.Top = oePaymentFormForm.ClientHeight - nTopGap;
oItem.Height = hBtn;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Send All";
left += span;
/*
* oItem = oePaymentFormForm.Items.Add(btnRun, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
* oItem.Left = left;
* oItem.Width = wBtn;
* oItem.Top = oePaymentFormForm.ClientHeight - nTopGap;
* oItem.Height = hBtn;
*
* oButton = ((SAPbouiCOM.Button)(oItem.Specific));
*
* oButton.Caption = "Run";
*
* left += span;
*/
oItem = oePaymentFormForm.Items.Add(btnClose, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = left;
oItem.Width = wBtn;
oItem.Top = oePaymentFormForm.ClientHeight - nTopGap;
oItem.Height = hBtn;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Cancel";
margin = 8;
int top = 15;
int edL = 100; //oItm.Left + oItm.Width;
int edW = 100;
int edH = 15;
int nGap = 26;
oItem = addPaneItem(oePaymentFormForm, editCustomerID, edL, top, edW, edH, "Customer ID:", SAPbouiCOM.BoFormItemTypes.it_EDIT, 0, 1000, 80);
oItem = addPaneItem(oePaymentFormForm, cbCustomerID, edL + 110, top, edW, edH, "", SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX, 0, 1000);
oItem = oePaymentFormForm.Items.Add(btnFind, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = edL + 220;
oItem.Width = wBtn;
oItem.Top = top - 2;
oItem.Height = hBtn;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Find";
oItem = addPaneItem(oePaymentFormForm, cbGroup, edL + 400, top, edW, edH, "Customer Group", SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX, 0, 1030);
SAPbouiCOM.ComboBox oCB = (SAPbouiCOM.ComboBox)oItem.Specific;
ComboAddItem(oCB, "");
ComboAddItem(oCB, "All");
List <string> list = GetGroupNames();
foreach (string c in list)
{
ComboAddItem(oCB, c);
}
oItem = addPaneItem(oePaymentFormForm, cbEMTemplate, edL + 640, top, edW, edH, "Email Template", SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX, 0, 1060);
oCB = (SAPbouiCOM.ComboBox)oItem.Specific;
foreach (string s in ListEmailTemplate)
{
ComboAddItem(oCB, s);
}
string t = getDefaultEmailTemplate();
if (t != "")
{
try
{
oCB.Select(t);
}catch (Exception)
{
try
{
oCB.Select(0);
}
catch (Exception) { };
}
}
else
{
try
{
oCB.Select(0);
}
catch (Exception) { };
}
top = oItem.Top + nGap;
oItem = oePaymentFormForm.Items.Add(matrixePaymentForm, SAPbouiCOM.BoFormItemTypes.it_MATRIX);
oItem.FromPane = 0;
oItem.ToPane = 0;
oItem.Left = 5 + margin;
oItem.Width = oePaymentFormForm.ClientWidth - 2 * margin - 10;
oItem.Top = top;
oItem.Height = oePaymentFormForm.ClientHeight - 100;
top = oItem.Height + oItem.Top + 2;
SAPbouiCOM.Matrix oMatrix = (SAPbouiCOM.Matrix)oePaymentFormForm.Items.Item(matrixePaymentForm).Specific;
oMatrix.SelectionMode = SAPbouiCOM.BoMatrixSelect.ms_Auto;
SAPbouiCOM.Column oColumn = oMatrix.Columns.Add("DocNum", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Invoice No.";
oColumn.Width = 80;
oColumn = oMatrix.Columns.Add("Status", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Status";
oColumn.Width = 80;
oColumn = oMatrix.Columns.Add("CustID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Customer";
oColumn.Width = 80;
SAPbouiCOM.LinkedButton btn = (SAPbouiCOM.LinkedButton)oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_BusinessPartner).ToString();
oColumn = oMatrix.Columns.Add("CName", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Customer Name";
oColumn.Width = 80;
oColumn = oMatrix.Columns.Add("E_Mail", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "EMail";
oColumn.Width = 80;
oColumn = oMatrix.Columns.Add("InvID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Origin No.";
btn = (SAPbouiCOM.LinkedButton)oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_Invoice).ToString();
oColumn.Width = 80;
oColumn = oMatrix.Columns.Add("UploadDT", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Sent Date";
oColumn.Width = 80;
oColumn = oMatrix.Columns.Add("PaidDT", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Payment Date";
oColumn.Width = 80;
oColumn = oMatrix.Columns.Add("Balance", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Balance";
oColumn.Width = 80;
oColumn = oMatrix.Columns.Add("UpBal", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Balance Sented";
oColumn.Width = 80;
oColumn = oMatrix.Columns.Add("AmtPaid", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Last ePayment";
oColumn.Width = 80;
// populateePaymentFormMatrix();
oMatrix.SelectionMode = SAPbouiCOM.BoMatrixSelect.ms_Single;
}
catch (Exception ex)
{
errorLog(ex);
}
oePaymentFormForm.Visible = true;
}
private void CreatePayOnTermForm()
{
try
{
ManualScan = "0";
SAPbouiCOM.Item oItem = null;
SAPbouiCOM.Button oButton = null;
//SAPbouiCOM.StaticText oStaticText = null;
// SAPbouiCOM.EditText oEditText = null;
//SAPbouiCOM.ComboBox oComboBox = null;
// add a new form
SAPbouiCOM.FormCreationParams oCreationParams = null;
oCreationParams = ((SAPbouiCOM.FormCreationParams)(SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_FormCreationParams)));
oCreationParams.BorderStyle = SAPbouiCOM.BoFormBorderStyle.fbs_Fixed;
oCreationParams.FormType = formPayOnTerm;
oCreationParams.UniqueID = formPayOnTerm;
try
{
oPayOnTermForm = SBO_Application.Forms.AddEx(oCreationParams);
}
catch (Exception)
{
oPayOnTermForm = SBO_Application.Forms.Item(formPayOnTerm);
}
// set the form properties
oPayOnTermForm.Title = "eBizCharge Batch Invoicing for Preauth";
oPayOnTermForm.Left = 400;
oPayOnTermForm.Top = 100;
oPayOnTermForm.ClientHeight = 460;
oPayOnTermForm.ClientWidth = 750;
//************************
// Adding a Rectangle
//***********************
int margin = 5;
oItem = oPayOnTermForm.Items.Add("Rect1", SAPbouiCOM.BoFormItemTypes.it_RECTANGLE);
oItem.Left = margin;
oItem.Width = oPayOnTermForm.ClientWidth - 2 * margin;
oItem.Top = margin;
oItem.Height = oPayOnTermForm.ClientHeight - 40;
int nTopGap = 25;
int left = 6;
int wBtn = 70;
int hBtn = 19;
int span = 80;
if (cfgBatchAutoMode == "Y")
{
oItem = oPayOnTermForm.Items.Add(btnRefresh, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = left;
oItem.Width = wBtn;
oItem.Top = oPayOnTermForm.ClientHeight - nTopGap;
oItem.Height = hBtn;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Orders";
left += span;
}
oItem = oPayOnTermForm.Items.Add(btnInvoice, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = left;
oItem.Width = wBtn;
oItem.Top = oPayOnTermForm.ClientHeight - nTopGap;
oItem.Height = hBtn;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Process";
left += span;
oItem = oPayOnTermForm.Items.Add(btnClose, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = left;
oItem.Width = wBtn;
oItem.Top = oPayOnTermForm.ClientHeight - nTopGap;
oItem.Height = hBtn;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Cancel";
margin = 8;
int top = 15;
int edL = 150; //oItm.Left + oItm.Width;
int edW = 100;
int edH = 15;
int nGap = 26;
if (cfgBatchAutoMode == "Y")
{
oItem = addPaneItem(oPayOnTermForm, editStartDate, edL, top, edW, edH, "Start Date:", SAPbouiCOM.BoFormItemTypes.it_EDIT, 0, 1);
}
else
{
oItem = addPaneItem(oPayOnTermForm, editStartDate, edL, top, edW, edH, "Delivery Note:", SAPbouiCOM.BoFormItemTypes.it_EDIT, 0, 1);
}
/*
* oItem = oPayOnTermForm.Items.Add(btnFind, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
* oItem.Left = edL + 120;
* oItem.Width = wBtn;
* oItem.Top = top - 2;
* oItem.Height = hBtn;
*
* oButton = ((SAPbouiCOM.Button)(oItem.Specific));
*
* if (cfgBatchAutoMode == "Y")
* oButton.Caption = "Report";
* else
* oButton.Caption = "Scan";
*/
// oItem = addPaneItem(oPayOnTermForm, editEndDate, edL + 400, top, edW, edH, "Invoice Date:", SAPbouiCOM.BoFormItemTypes.it_EDIT, 0, 99);
top = oItem.Top + nGap;
oItem = oPayOnTermForm.Items.Add(matrixPayOnTerm, SAPbouiCOM.BoFormItemTypes.it_MATRIX);
oItem.FromPane = 0;
oItem.ToPane = 0;
oItem.Left = 5 + margin;
oItem.Width = oPayOnTermForm.ClientWidth - 2 * margin - 10;
oItem.Top = top;
oItem.Height = oPayOnTermForm.ClientHeight - 100;
top = oItem.Height + oItem.Top + 2;
SAPbouiCOM.Matrix oMatrix = (SAPbouiCOM.Matrix)oPayOnTermForm.Items.Item(matrixPayOnTerm).Specific;
SAPbouiCOM.Column oColumn = oMatrix.Columns.Add("RefNum", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Auth Code";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("InvoiceID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Invoice";
SAPbouiCOM.LinkedButton btn = (SAPbouiCOM.LinkedButton)oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_Invoice).ToString();
oColumn.Width = 40;
oColumn = oMatrix.Columns.Add("DeliveryID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Delivery";
btn = (SAPbouiCOM.LinkedButton)oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_DeliveryNotes).ToString();
oColumn.Width = 40;
oColumn = oMatrix.Columns.Add("DeliveryNo", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Delivery No.";
oColumn.Width = 80;
oColumn = oMatrix.Columns.Add("OrderID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Order";
oColumn.Width = 40;
btn = (SAPbouiCOM.LinkedButton)oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_Order).ToString();
oColumn = oMatrix.Columns.Add("customerID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Customer";
oColumn.Width = 40;
btn = (SAPbouiCOM.LinkedButton)oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_BusinessPartner).ToString();
oColumn = oMatrix.Columns.Add("CardHolder", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Name";
oColumn.Width = 100;
oColumn = oMatrix.Columns.Add("Amount", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Amount";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("avsResult", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "AVS";
oColumn.Width = 200;
oColumn = oMatrix.Columns.Add("Result", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Result";
oColumn.Width = 200;
/*
* oMatrix.SelectionMode = SAPbouiCOM.BoMatrixSelect.ms_Single;
* DateTime dt = getLastBatchDate();
*
* if (dt < DateTime.Parse("01/01/2000"))
* dt = DateTime.Today.AddDays(-3);
*/
// if(cfgBatchAutoMode=="Y")
setFormEditVal(oPayOnTermForm, editStartDate, DateTime.Today.AddDays(-15).ToString("MM/dd/yyyy"));
populatePayOnTermMatrix(false);
}
catch (Exception ex)
{
errorLog(ex);
}
oPayOnTermForm.Visible = true;
}
private void desenharCampos()
{
oItem = oForm.Items.Item("Grade");
oNewItem = oForm.Items.Add("Apr_Text0", SAPbouiCOM.BoFormItemTypes.it_STATIC);
oNewItem.Top = oItem.Top + 65;
oNewItem.Height = 19;
oNewItem.Width = 350;
oNewItem.Left = 25;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oNewItem.Visible = true;
oTextItem = ((SAPbouiCOM.StaticText)(oNewItem.Specific));
oTextItem.Caption = "Ambiente / Análise Crítica";
oNewItem = oForm.Items.Add("Apr_Text1", SAPbouiCOM.BoFormItemTypes.it_STATIC);
oNewItem.Top = oItem.Top + 200;
oNewItem.Height = 19;
oNewItem.Width = 350;
oNewItem.Left = 25;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oNewItem.Visible = true;
oTextItem = ((SAPbouiCOM.StaticText)(oNewItem.Specific));
oTextItem.Caption = "Ambiente / Aprovação";
oNewItem = oForm.Items.Add("Apr_Text2a", SAPbouiCOM.BoFormItemTypes.it_STATIC);
oItem = oForm.Items.Item("Grade");
oNewItem.Top = oItem.Top + 17;
oNewItem.Height = 19;
oNewItem.Width = 400;
oNewItem.Left = 25;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oNewItem.Visible = true;
oTextItem = ((SAPbouiCOM.StaticText)(oNewItem.Specific));
oTextItem.Caption = "Data";
oNewItem = oForm.Items.Add("Apr_Text2b", SAPbouiCOM.BoFormItemTypes.it_STATIC);
oNewItem.Top = oItem.Top + 17;
oNewItem.Height = 19;
oNewItem.Width = 400;
oNewItem.Left = 120;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oNewItem.Visible = true;
oTextItem = ((SAPbouiCOM.StaticText)(oNewItem.Specific));
oTextItem.Caption = "Hora";
oNewItem = oForm.Items.Add("Apr_Text2c", SAPbouiCOM.BoFormItemTypes.it_STATIC);
oItem = oForm.Items.Item("Grade");
oNewItem.Top = oItem.Top + 17;
oNewItem.Height = 19;
oNewItem.Width = 400;
oNewItem.Left = 175;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oNewItem.Visible = true;
oTextItem = ((SAPbouiCOM.StaticText)(oNewItem.Specific));
oTextItem.Caption = "Projetista";
oNewItem = oForm.Items.Add("Apr_Data", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oNewItem.Top = oItem.Top + 35;
oNewItem.Height = 17;
oNewItem.Width = 80;
oNewItem.Left = 25;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oEditItem = ((SAPbouiCOM.EditText)(oNewItem.Specific));
oEditItem.DataBind.SetBound(true, "OOPR", "U_FLX_FB_APS_DATE");
oNewItem = oForm.Items.Add("Apr_Hora", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oNewItem.Top = oItem.Top + 35;
oNewItem.Height = 17;
oNewItem.Width = 40;
oNewItem.Left = 120;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
//oEditItem.DataBind.SetBound(true, "", "EditSource");
oEditItem = ((SAPbouiCOM.EditText)(oNewItem.Specific));
oEditItem.DataBind.SetBound(true, "OOPR", "U_FLX_FB_APS_HORA");
oNewItem = oForm.Items.Add("Apr_Proj", SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX);
oNewItem.Top = oItem.Top + 35;
oNewItem.Height = 17;
oNewItem.Width = 140;
oNewItem.Left = 175;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oNewItem.DisplayDesc = true;
//oComboItem.DataBind.SetBound(true, "", "CombSource");
oComboItem = ((SAPbouiCOM.ComboBox)(oNewItem.Specific));
//oComboItem.DataBind.SetBound(true, "OOPR", "U_FLX_FB_APS_PROJT");
//LoadResponsavelComboVals(oComboItem);
oNewItem = oForm.Items.Add("Apr_Ped", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oNewItem.Top = oItem.Top + 235;
oNewItem.Width = 100;
oNewItem.Left = 725;
oNewItem.Height = 25;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oNewItem.Visible = true;
oButton = ((SAPbouiCOM.Button)(oNewItem.Specific));
oButton.Caption = "Pedido (fechamento)";
oNewItem = oForm.Items.Add("Apr_Text3", SAPbouiCOM.BoFormItemTypes.it_STATIC);
oNewItem.Top = oItem.Top + 220;
oNewItem.Height = 19;
oNewItem.Width = 50;
oNewItem.Left = 840;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oNewItem.Visible = true;
oTextItem = ((SAPbouiCOM.StaticText)(oNewItem.Specific));
oTextItem.Caption = "Pedido";
oNewItem = oForm.Items.Add("Apr_Pedido", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oNewItem.Top = oItem.Top + 240;
oNewItem.Height = 17;
oNewItem.Width = 40;
oNewItem.Left = 840;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oNewItem.Enabled = false;
oEditItem = ((SAPbouiCOM.EditText)(oNewItem.Specific));
oNewItem = oForm.Items.Add("Apr_LinkPd", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oNewItem.Top = oItem.Top + 240;
oNewItem.Height = 17;
oNewItem.Width = 40;
oNewItem.Left = 810;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oNewItem.Visible = true;
oNewItem.Enabled = true;
oLink = ((SAPbouiCOM.LinkedButton)(oNewItem.Specific));
//oLink.LinkedObject = "Apr_Pedido";
oNewItem = oForm.Items.Add("Apr_Ctr", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oNewItem.Top = oItem.Top + 300;
oNewItem.Width = 100;
oNewItem.Left = 725;
oNewItem.Height = 25;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oNewItem.Visible = true;
oButton = ((SAPbouiCOM.Button)(oNewItem.Specific));
oButton.Caption = "Gerar Contrato(s)";
oNewItem = oForm.Items.Add("Apr_Text4", SAPbouiCOM.BoFormItemTypes.it_STATIC);
oNewItem.Top = oItem.Top + 285;
oNewItem.Height = 19;
oNewItem.Width = 55;
oNewItem.Left = 840;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oNewItem.Visible = true;
oTextItem = ((SAPbouiCOM.StaticText)(oNewItem.Specific));
oTextItem.Caption = "Contrato(s)";
oNewItem = oForm.Items.Add("Apr_Contr", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oNewItem.Top = oItem.Top + 305;
oNewItem.Height = 17;
oNewItem.Width = 40;
oNewItem.Left = 840;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oEditItem = ((SAPbouiCOM.EditText)(oNewItem.Specific));
oNewItem = oForm.Items.Add("Apr_Amb", SAPbouiCOM.BoFormItemTypes.it_MATRIX);
oNewItem.Left = 25;
oNewItem.Width = 420;
oNewItem.Top = oItem.Top + 85;
oNewItem.Height = 110;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
oMatrix.SelectionMode = SAPbouiCOM.BoMatrixSelect.ms_Auto;
oColumns = oMatrix.Columns;
oColumn = oColumns.Add("#", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "#";
oColumn.Width = 30;
oColumn.Editable = false;
oColumn = oColumns.Add("Apr_Amb_C0", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Ambiente";
oColumn.Width = 80;
oColumn.Editable = false;
oColumn = oColumns.Add("Apr_Amb_C1", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Detalhamento";
oColumn.Width = 100;
oColumn.Editable = true;
oColumn = oColumns.Add("Apr_Amb_C2", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Id";
oColumn.Editable = true;
oColumn.Visible = false;
oForm.DataSources.DataTables.Item("oMatrixDT").ExecuteQuery("SELECT T1.[Num], T1.[Descript], T0.* FROM OPR4 T0 INNER JOIN OOIN T1 ON T1.Num = T0.IntId WHERE T0.[OprId] = '1'");
oColumn = oColumns.Item("Apr_Amb_C0");
oColumn.DataBind.Bind("oMatrixDT", "Descript");
oColumn = oColumns.Item("Apr_Amb_C1");
oColumn.DataBind.Bind("oMatrixDT", "U_FLX_FB_ANC_DETALHA");
oColumn = oColumns.Item("Apr_Amb_C2");
oColumn.DataBind.Bind("oMatrixDT", "Line");
oNewItem = oForm.Items.Add("NvAnalise", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oNewItem.Top = oItem.Top + 35;
oNewItem.Width = 140;
oNewItem.Left = oForm.Width - 270;
oNewItem.Height = 21;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oNewItem.Visible = true;
oButton = ((SAPbouiCOM.Button)(oNewItem.Specific));
oButton.Caption = "Nova análise crítica";
oNewItem = oForm.Items.Add("Ans_Amb", SAPbouiCOM.BoFormItemTypes.it_MATRIX);
SAPbouiCOM.Item teste = oForm.Items.Item("Apr_Amb");
oNewItem.Left = oForm.Width - 270;
oNewItem.Width = 200;
oNewItem.Top = oItem.Top + 85;
oNewItem.Height = 110;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
oMatrix.SelectionMode = SAPbouiCOM.BoMatrixSelect.ms_Auto;
oColumns = oMatrix.Columns;
oColumn = oColumns.Add("#", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "#";
oColumn.Width = 30;
oColumn.Editable = false;
oColumn = oColumns.Add("Ans_Amb_C0", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Analise Crítica";
oColumn.Width = 120;
oColumn.Editable = true;
oColumn = oColumns.Add("Ans_Amb_C1", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Id";
oColumn.Editable = true;
oColumn.Visible = false;
DBDSflx = oForm.DataSources.DBDataSources.Add("@FLX_FB_CONFMED");
oForm.DataSources.DataTables.Add("oDataTableAnalise");
oForm.DataSources.DataTables.Item("oDataTableAnalise").ExecuteQuery("SELECT * FROM [@FLX_FB_ANLCRI] where U_FLX_FB_ANLCRI_ID = '1' and U_FLX_FB_ANLCRI_AMBI = '1'");
oColumn = oColumns.Item("Ans_Amb_C0");
oColumn.DataBind.Bind("oDataTableAnalise", "U_FLX_FB_ANLCRI_ANEX");
oColumn = oColumns.Item("Ans_Amb_C1");
oColumn.DataBind.Bind("oDataTableAnalise", "Code");
oNewItem = oForm.Items.Add("Apv_Amb", SAPbouiCOM.BoFormItemTypes.it_MATRIX);
oNewItem.Left = 25;
oNewItem.Width = 700;
oNewItem.Top = oItem.Top + 220;
oNewItem.Height = 110;
oNewItem.FromPane = 12;
oNewItem.ToPane = 12;
oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
oColumns = oMatrix.Columns;
oColumn = oColumns.Add("#", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "#";
oColumn.Width = 30;
oColumn.Editable = false;
oColumn = oColumns.Add("Apv_Amb_C0", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Ambiente";
oColumn.Width = 80;
oColumn.Editable = false;
oColumn = oColumns.Add("Apv_Amb_C1", SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX);
oColumn.TitleObject.Caption = "Aprovado por";
oColumn.Width = 100;
oColumn.Editable = true;
oColumn = oColumns.Add("Apv_Amb_C2", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Data Aprovação";
oColumn.Width = 80;
oColumn.Editable = true;
oColumn = oColumns.Add("Apv_Amb_C3", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "PDFs visto com o cliente";
oColumn.Width = 120;
oColumn.Editable = true;
oColumn = oColumns.Add("Apv_Amb_C4", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Prancha de Imagem";
oColumn.Width = 120;
oColumn.Editable = true;
oColumn = oColumns.Add("Apv_Amb_C5", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Memorial Descritivo";
oColumn.Width = 130;
oColumn.Editable = true;
oForm.DataSources.DataTables.Item("oMatrixDT").ExecuteQuery("SELECT T1.[Num], T1.[Descript], T0.* FROM OPR4 T0 INNER JOIN OOIN T1 ON T1.Num = T0.IntId WHERE T0.[OprId] = '1'");
oColumn = oColumns.Item("Apv_Amb_C0");
oColumn.DataBind.Bind("oMatrixDT", "Descript");
oColumn = oColumns.Item("Apv_Amb_C1");
oColumn.DataBind.Bind("oMatrixDT", "U_FLX_FB_APR_APROVAD");
oColumn = oColumns.Item("Apv_Amb_C2");
oColumn.DataBind.Bind("oMatrixDT", "U_FLX_FB_APR_DATAAPR");
oColumn = oColumns.Item("Apv_Amb_C3");
oColumn.DataBind.Bind("oMatrixDT", "U_FLX_FB_APR_PDFCLIE");
oColumn = oColumns.Item("Apv_Amb_C4");
oColumn.DataBind.Bind("oMatrixDT", "U_FLX_FB_APR_PRANIMG");
oColumn = oColumns.Item("Apv_Amb_C5");
oColumn.DataBind.Bind("oMatrixDT", "U_FLX_FB_APR_MEMDESC");
}
private void AddCCLogMatrix(SAPbouiCOM.Form form, int pane, int top = 0)
{
try
{
SAPbouiCOM.Item oItem = form.Items.Add(H_CUSTOMERID, SAPbouiCOM.BoFormItemTypes.it_EDIT);
oItem.FromPane = 1000;
oItem.ToPane = 1000;
oItem.AffectsFormMode = false;
oItem = form.Items.Add(H_RECORDID, SAPbouiCOM.BoFormItemTypes.it_EDIT);
oItem.FromPane = 1000;
oItem.ToPane = 1000;
oItem.AffectsFormMode = false;
oItem = form.Items.Item("4");
if (form.TypeEx == FORMBPARTNER)
{
oItem = form.Items.Item("7");
}
SAPbouiCOM.Item oItemRef = form.Items.Item(tbCreditCard);
int edW = oItem.Width;
int edT = oItemRef.Top + top + oItemRef.Height + 10;
int edL = 20 + oItem.Width;
oItem = addPaneItem(form, editEmail, edL, edT, edW, oItem.Height, "Receipt email:", SAPbouiCOM.BoFormItemTypes.it_EDIT, pane, 19877);
edT = edT + oItem.Height + 2;
oItem = form.Items.Add(mxtCCLog, SAPbouiCOM.BoFormItemTypes.it_MATRIX);
oItem.FromPane = pane;
oItem.ToPane = pane;
oItem.AffectsFormMode = false;
oItem.Top = edT;
oItem.Left = 20;
oItem.Height = form.ClientHeight / 3;
oItem.Width = form.ClientWidth - 60;
SAPbouiCOM.Matrix oMatrix = (SAPbouiCOM.Matrix)form.Items.Item(mxtCCLog).Specific;
SAPbouiCOM.Column oColumn = oMatrix.Columns.Add("RefNum", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Ref. No.";
oColumn.Width = 50;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("PaymentID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "";
SAPbouiCOM.LinkedButton btn = (SAPbouiCOM.LinkedButton)oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_JournalPosting).ToString();
oColumn.Width = 0;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("OrderID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Order";
btn = (SAPbouiCOM.LinkedButton)oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_Order).ToString();
oColumn.Width = 50;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("OrderNum", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Order No.";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("InvoiceID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Invoice";
btn = (SAPbouiCOM.LinkedButton)oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_Invoice).ToString();
oColumn.Width = 50;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("InvoiceNum", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Invoice No.";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("CMID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Credit Memo";
btn = (SAPbouiCOM.LinkedButton)oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_InvoiceCreditMemo).ToString();
oColumn.Width = 50;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("command", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Command";
oColumn.Width = 50;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("Amount", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Amount";
oColumn.Width = 50;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("Desc", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Description";
oColumn.Width = 50;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("CardHolder", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Card Holder";
oColumn.Width = 50;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("crCardNum", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Card No.";
oColumn.Width = 50;
oColumn.AffectsFormMode = false;
/*
* oColumn = oMatrix.Columns.Add("result", SAPbouiCOM.BoFormItemTypes.it_EDIT);
* oColumn.TitleObject.Caption = "Result";
* oColumn.Width = 50;
*/
oColumn = oMatrix.Columns.Add("error", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Result";
oColumn.Width = 50;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("avs", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "AVS";
oColumn.Width = 150;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("CardCode", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Card Code";
oColumn.Width = 150;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("CardLevel", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Card Level";
oColumn.Width = 150;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("custNum", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Customer Number";
oColumn.Width = 50;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("CCAID", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Credit Card";
oColumn.Width = 0;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("recdate", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Process Date";
oColumn.Width = 100;
oColumn.AffectsFormMode = false;
oColumn = oMatrix.Columns.Add("ccTRANSID", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "ID";
oColumn.Width = 10;
oColumn.AffectsFormMode = false;
oMatrix.SelectionMode = SAPbouiCOM.BoMatrixSelect.ms_Single;
//populateLog(form);
}
catch (Exception ex)
{
errorLog(ex);
}
}
private void CreateRBillingForm()
{
try
{
ManualScan = "0";
SAPbouiCOM.Item oItem = null;
SAPbouiCOM.Button oButton = null;
//SAPbouiCOM.StaticText oStaticText = null;
// SAPbouiCOM.EditText oEditText = null;
//SAPbouiCOM.ComboBox oComboBox = null;
// add a new form
SAPbouiCOM.FormCreationParams oCreationParams = null;
oCreationParams = ((SAPbouiCOM.FormCreationParams)(SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_FormCreationParams)));
oCreationParams.BorderStyle = SAPbouiCOM.BoFormBorderStyle.fbs_Fixed;
oCreationParams.FormType = formRBilling;
oCreationParams.UniqueID = formRBilling;
try
{
oRBillingForm = SBO_Application.Forms.AddEx(oCreationParams);
}
catch (Exception)
{
oRBillingForm = SBO_Application.Forms.Item(formRBilling);
}
// set the form properties
oRBillingForm.Title = "eBizCharge Recurring Billing";
oRBillingForm.Left = 400;
oRBillingForm.Top = 100;
oRBillingForm.ClientHeight = 460;
oRBillingForm.ClientWidth = 975;
//************************
// Adding a Rectangle
//***********************
int margin = 5;
oItem = oRBillingForm.Items.Add("Rect1", SAPbouiCOM.BoFormItemTypes.it_RECTANGLE);
oItem.Left = margin;
oItem.Width = oRBillingForm.ClientWidth - 2 * margin;
oItem.Top = margin;
oItem.Height = oRBillingForm.ClientHeight - 40;
int nTopGap = 25;
int left = 6;
int wBtn = 70;
int hBtn = 19;
int span = 80;
oItem = oRBillingForm.Items.Add(btnRefresh, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = left;
oItem.Width = wBtn;
oItem.Top = oRBillingForm.ClientHeight - nTopGap;
oItem.Height = hBtn;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Refresh";
left += span;
oItem = oRBillingForm.Items.Add(btnAdd, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = left;
oItem.Width = wBtn;
oItem.Top = oRBillingForm.ClientHeight - nTopGap;
oItem.Height = hBtn;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Add";
left += span;
oItem = oRBillingForm.Items.Add(btnRun, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = left;
oItem.Width = wBtn;
oItem.Top = oRBillingForm.ClientHeight - nTopGap;
oItem.Height = hBtn;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Run";
left += span;
oItem = oRBillingForm.Items.Add(btnClose, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = left;
oItem.Width = wBtn;
oItem.Top = oRBillingForm.ClientHeight - nTopGap;
oItem.Height = hBtn;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Cancel";
margin = 8;
int top = 15;
int edL = 150; //oItm.Left + oItm.Width;
int edW = 100;
int edH = 15;
int nGap = 26;
oItem = addPaneItem(oRBillingForm, editCustomerID, edL, top, edW, edH, "Customer ID:", SAPbouiCOM.BoFormItemTypes.it_EDIT, 0, 1000);
oItem = addPaneItem(oRBillingForm, cbCustomerID, edL + 110, top, edW, edH, "", SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX, 0, 1000);
oItem = oRBillingForm.Items.Add(btnFind, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = edL + 220;
oItem.Width = wBtn;
oItem.Top = top - 2;
oItem.Height = hBtn;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Find";
top = oItem.Top + nGap;
oItem = oRBillingForm.Items.Add(matrixRBilling, SAPbouiCOM.BoFormItemTypes.it_MATRIX);
oItem.FromPane = 0;
oItem.ToPane = 0;
oItem.Left = 5 + margin;
oItem.Width = oRBillingForm.ClientWidth - 2 * margin - 10;
oItem.Top = top;
oItem.Height = oRBillingForm.ClientHeight - 100;
top = oItem.Height + oItem.Top + 2;
SAPbouiCOM.Matrix oMatrix = (SAPbouiCOM.Matrix)oRBillingForm.Items.Item(matrixRBilling).Specific;
SAPbouiCOM.Column oColumn = oMatrix.Columns.Add("jobID", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "ID";
oColumn.Width = 20;
oColumn = oMatrix.Columns.Add("CustName", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Name";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("CustomerID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Customer";
oColumn.Width = 80;
SAPbouiCOM.LinkedButton btn = (SAPbouiCOM.LinkedButton)oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_BusinessPartner).ToString();
oColumn = oMatrix.Columns.Add("InvID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Invoice";
btn = (SAPbouiCOM.LinkedButton)oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_Invoice).ToString();
oColumn.Width = 40;
oColumn = oMatrix.Columns.Add("OrderID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Order";
btn = (SAPbouiCOM.LinkedButton)oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_Order).ToString();
oColumn.Width = 40;
oColumn = oMatrix.Columns.Add("Frequency", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Frequency";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("StartDate", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Start Date";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("EndDate", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "End Date";
oColumn.Width = 50;
/*
* oColumn = oMatrix.Columns.Add("CancelDate", SAPbouiCOM.BoFormItemTypes.it_EDIT);
* oColumn.TitleObject.Caption = "Cancel Date";
* oColumn.Width =50;
*/
oColumn = oMatrix.Columns.Add("NextRun", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Next Run";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("Amount", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Amount";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("Desc", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Description";
oColumn.Width = 200;
oColumn = oMatrix.Columns.Add("LastRun", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Last Run";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("Result", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Result";
oColumn.Width = 200;
populateRBillingMatrix();
oMatrix.SelectionMode = SAPbouiCOM.BoMatrixSelect.ms_Single;
}
catch (Exception ex)
{
errorLog(ex);
}
oRBillingForm.Visible = true;
}
private void AddCCLogMatrix(SAPbouiCOM.Form form, int pane, string refID = "39", int height = 0, int top = 0)
{
try{
SAPbouiCOM.Item oItem = form.Items.Add(mxtCCLog, SAPbouiCOM.BoFormItemTypes.it_MATRIX);
oItem.FromPane = pane;
oItem.ToPane = pane;
SAPbouiCOM.Item oItemRef = form.Items.Item(refID);
oItem.Top = oItemRef.Top + top;
oItem.Left = oItemRef.Left;
oItem.Width = oItemRef.Width;
oItem.Height = oItemRef.Height + height;
SAPbouiCOM.Matrix oMatrix = form.Items.Item(mxtCCLog).Specific;
SAPbouiCOM.Column oColumn = oMatrix.Columns.Add("RefNum", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Ref. No.";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("PaymentID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Journal Entry";
SAPbouiCOM.LinkedButton btn = oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_JournalPosting).ToString();
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("OrderID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Order";
btn = oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_Order).ToString();
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("InvoiceID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Invoice";
btn = oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_Invoice).ToString();
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("CMID", SAPbouiCOM.BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Credit Memo";
btn = oColumn.ExtendedObject;
btn.LinkedObjectType = ((int)SAPbouiCOM.BoLinkedObject.lf_InvoiceCreditMemo).ToString();
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("command", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Command";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("Amount", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Amount";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("Desc", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Description";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("CardHolder", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Card Holder";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("crCardNum", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Card No.";
oColumn.Width = 50;
/*
* oColumn = oMatrix.Columns.Add("result", SAPbouiCOM.BoFormItemTypes.it_EDIT);
* oColumn.TitleObject.Caption = "Result";
* oColumn.Width = 50;
*/
oColumn = oMatrix.Columns.Add("error", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Error";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("avs", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "AVS";
oColumn.Width = 150;
oColumn = oMatrix.Columns.Add("CardCode", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Card Code";
oColumn.Width = 150;
oColumn = oMatrix.Columns.Add("CardLevel", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Card Level";
oColumn.Width = 150;
oColumn = oMatrix.Columns.Add("custNum", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Customer Number";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("CCAID", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Credit Card";
oColumn.Width = 50;
oColumn = oMatrix.Columns.Add("recdate", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Process Date";
oColumn.Width = 100;
oMatrix.SelectionMode = SAPbouiCOM.BoMatrixSelect.ms_Single;
//populateLog(form);
}
catch (Exception ex)
{
errorLog(ex);
}
}
