private static void SBO_Application_ItemEvent(string FormUID, ref ItemEvent pVal, out bool BubbleEvent)
{
BubbleEvent = true;
if (pVal.FormType == 866 && pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_LOAD)
{
oForm = SAPbouiCOM.Framework.Application.SBO_Application.Forms.GetFormByTypeAndCount(pVal.FormType, pVal.FormTypeCount);
oOldItem = oForm.Items.Item("4");
Matrix matrix = (SAPbouiCOM.Matrix)oOldItem.Specific;
ExchangeForm.ExchangeForm.GetCurs(matrix, Month, Year);
}
if (pVal.FormType == 866 && pVal.FormMode == 1 && pVal.EventType == SAPbouiCOM.BoEventTypes.et_COMBO_SELECT)
{
oForm = SAPbouiCOM.Framework.Application.SBO_Application.Forms.GetFormByTypeAndCount(pVal.FormType, pVal.FormTypeCount);
if (pVal.ItemUID.ToString() == "12")
{
oOldItem = oForm.Items.Item("4");
Matrix matrix = (SAPbouiCOM.Matrix)oOldItem.Specific;
oOldItem = oForm.Items.Item("12");
SAPbouiCOM.ComboBox cb = (SAPbouiCOM.ComboBox)oOldItem.Specific;
Year = cb.Value;
ExchangeForm.ExchangeForm.GetCurs(matrix, Month, Year);
}
if (pVal.ItemUID.ToString() == "13")
{
oOldItem = oForm.Items.Item("4");
Matrix matrix = (SAPbouiCOM.Matrix)oOldItem.Specific;
oOldItem = oForm.Items.Item("13");
SAPbouiCOM.ComboBox cb = (SAPbouiCOM.ComboBox)oOldItem.Specific;
Month = cb.Selected.Value;
ExchangeForm.ExchangeForm.GetCurs(matrix, Month, Year);
}
}
}
/// <summary>
/// Oculta los controles de la ventana activa
/// </summary>
/// <param name="_oForm">Forma activa</param>
private void OcultarControlesVentana(Form _oForm)
{
try
{
SAPbouiCOM.Item oItem = null;
//LABELS
oItem = _oForm.Items.Item(LBL_NUMERO_FOLIO);
oItem.Visible = false;
oItem = _oForm.Items.Item(LBL_GUION);
oItem.Visible = false;
//TEXBOX
oItem = _oForm.Items.Item(TXT_FOLIO_PREFIJO);
oItem.Visible = false;
oItem = _oForm.Items.Item(TXT_FOLIO_NUM);
oItem.Visible = false;
_oContadorFormas += 1;
}
catch (Exception ex)
{
throw new Exception("Error al ocultar controles *OcultarControlesVentana* : " + ex.Message);
}
}
public static SAPbouiCOM.ComboBox AddComboBoxAoFormulario(
SAPbouiCOM.Form pForm
, string pUID
, int pLeft
, int pWidth
, int pTop
, int pHeight
)
{
//SAPbouiCOM.Button oButton = null;
SAPbouiCOM.Item oItem = null;
SAPbouiCOM.ComboBox oComboBox = null;
oItem = pForm.Items.Add(pUID, BoFormItemTypes.it_COMBO_BOX);
oItem.Left = pLeft;
oItem.Width = pWidth;
oItem.Top = pTop;
oItem.Height = pHeight;
oItem.AffectsFormMode = false;
oItem.DisplayDesc = true;
oComboBox = ((SAPbouiCOM.ComboBox)(oItem.Specific));
return(oComboBox);
}
private void InitiallizeForm()
{
oForm.Freeze(true);
oItemRef = oForm.Items.Item("2");
try
{
SAPbouiCOM.Item oItemRef1 = oForm.Items.Item("2");
oItem = oForm.Items.Add("B1_IMP", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Top = oItemRef.Top;
oItem.Height = oItemRef.Height;
oItem.Left = oItemRef.Left + oItemRef.Width + 5;
oItem.Width = oItemRef.Width + 80;
oItem.Visible = true;
B1_IMP = (SAPbouiCOM.Button)oItem.Specific;
B1_IMP.Caption = "Import BOM from FPRO";
}
catch (Exception ex)
{
string message = ex.Message;
}
oForm.Freeze(false);
dsWEB = new DataServices(Program.strExtCon);
}
private void AddItems(SAPbouiCOM.Form oFormPurchaseRequest)
{
SAPbouiCOM.Item oCamposPurchaseRequest = null;
SAPbouiCOM.Form _oFormPurchaseRequest;
SAPbouiCOM.StaticText oStaticText = null;
SAPbouiCOM.Item oItem;
SAPbouiCOM.ComboBox oComboBox = null;
_oFormPurchaseRequest = oFormPurchaseRequest;
//*******************************************
// Se adiciona Label "Integrar Documento"
//*******************************************
oItem = _oFormPurchaseRequest.Items.Item("62");
oCamposPurchaseRequest = _oFormPurchaseRequest.Items.Add("blbID", SAPbouiCOM.BoFormItemTypes.it_STATIC);
oCamposPurchaseRequest.Left = oItem.Left + 10;
oCamposPurchaseRequest.Width = oItem.Width;
oCamposPurchaseRequest.Top = oItem.Top;
oCamposPurchaseRequest.Height = oItem.Height;
oCamposPurchaseRequest.LinkTo = "ComboBox1";
oStaticText = ((SAPbouiCOM.StaticText)(oCamposPurchaseRequest.Specific));
oStaticText.Caption = "Integrar Documento ?";
oCamposPurchaseRequest.FromPane = 5;
oCamposPurchaseRequest.ToPane = 5;
//*******************************************
// Se adiciona Combo box "Integrar Documento"
//*******************************************
oCamposPurchaseRequest = _oFormPurchaseRequest.Items.Add("ComboBox1", SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX);
oCamposPurchaseRequest.Left = oItem.Left + 120;
oCamposPurchaseRequest.Width = oItem.Width;
oCamposPurchaseRequest.Top = oItem.Top;
oCamposPurchaseRequest.Height = oItem.Height;
oCamposPurchaseRequest.DisplayDesc = true;
_oFormPurchaseRequest.DataSources.UserDataSources.Add("CombSource", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 20);
oComboBox = ((SAPbouiCOM.ComboBox)(oCamposPurchaseRequest.Specific));
oComboBox.DataBind.SetBound(true, "", "CombSource");
oComboBox.ValidValues.Add("Y", "Si");
oComboBox.ValidValues.Add("N", "No");
oComboBox.Select("Y", BoSearchKey.psk_ByValue);
oCamposPurchaseRequest.FromPane = 5;
oCamposPurchaseRequest.ToPane = 5;
}
private void InitiallizeForm()
{
oForm.Freeze(true);
dbOITM = oForm.DataSources.DBDataSources.Item("OITM");
oItemRef = oForm.Items.Item("39");
SAPbouiCOM.StaticText lblCode, lblName, lblInt;
SAPbouiCOM.CheckBox chkAll, chkMon, chkTue, chkWed, chkThs, chkFri, chkSat, chkSun;
SAPbouiCOM.ComboBox cbInt;
SAPbouiCOM.EditText txtCode, txtName;
try
{
SAPbouiCOM.Item oItemRef1 = oForm.Items.Item("106");
oItem = oForm.Items.Add("B1_lbSub", SAPbouiCOM.BoFormItemTypes.it_STATIC);
oItem.Top = oItemRef.Top;
oItem.Height = oItemRef.Height;
oItem.Left = oItemRef1.Left;
oItem.Width = oItemRef.Width + 40;
oItem.Visible = true;
B1_lbSub = (SAPbouiCOM.StaticText)oItem.Specific;
B1_lbSub.Caption = "Sub Group";
oItemRef1 = oForm.Items.Item("107");
oItem = oForm.Items.Add("cbSubGroup", SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX);
oItem.Top = oItemRef.Top;
oItem.Height = oItemRef.Height;
oItem.Left = oItemRef1.Left;
oItem.Width = oItemRef.Width + 90;
oItem.Visible = true;
oItem.DisplayDesc = true;
oItem.LinkTo = "B1_lbSub";
cbSubGroup = (SAPbouiCOM.ComboBox)oItem.Specific;
cbSubGroup.DataBind.SetBound(true, "OITM", "U_SubGrp");
// <databind>
// <DataTable UniqueId="dtHead" ColumnUID="RNN"/>
// </databind>
//</specific>
}
catch (Exception ex)
{
string message = ex.Message;
}
oForm.Freeze(false);
dsSAP = new DataServices(Program.strConSAP);
}
private void CriarFormularioComMatrix()
{
SAPbouiCOM.Button oButton = null;
SAPbouiCOM.StaticText oStaticText = null;
SAPbouiCOM.EditText oEditText = null;
SAPbouiCOM.FormCreationParams oCreationParams = null;
oCreationParams = ((SAPbouiCOM.FormCreationParams)(oApplication.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_FormCreationParams)));
//oCreationParams.BorderStyle = SAPbouiCOM.BoFormBorderStyle.fbs_Fixed;
oCreationParams.UniqueID = "frmMtx";
oCreationParams.FormType = "frmMtx";
oForm = oApplication.Forms.AddEx(oCreationParams);
oForm.Title = "Matrix, DataSources and Linked Buttons";
oForm.Left = 336;
oForm.ClientWidth = 520;
oForm.Top = 44;
oForm.ClientHeight = 200;
oItem = oForm.Items.Add("1 ", BoFormItemTypes.it_BUTTON);
oItem.Left = 5;
oItem.Width = 65;
oItem.Top = 170;
oItem.Height = 19;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "OK";
oItem = oForm.Items.Add("2 ", BoFormItemTypes.it_BUTTON);
oItem.Left = 75;
oItem.Width = 65;
oItem.Top = 170;
oItem.Height = 19;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Cancel";
oItem = oForm.Items.Add("txtPhone", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oItem.Left = 265;
oItem.Width = 163;
oItem.Top = 172;
oItem.Height = 14;
oItem = oForm.Items.Add("btnPhone ", BoFormItemTypes.it_BUTTON);
oItem.Left = 160;
oItem.Width = 100;
oItem.Top = 170;
oItem.Height = 19;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Add Phone Prefix";
this.oForm.Visible = true;
AddMatrixNoForm();
}
public static SAPbouiCOM.OptionBtn AddOptionButtonAoFormulario(
SAPbouiCOM.Form pForm
, string pUID
, int pLeft
, int pWidth
, int pTop
, int pHeight
, string pCaption
, string pGroupWith
, bool AffectsFormMode = false
, int pFromPane = 0
, int pToPane = 0
)
{
SAPbouiCOM.OptionBtn oOptionBtn = null;
SAPbouiCOM.Item oItem = null;
oItem = pForm.Items.Add(pUID, SAPbouiCOM.BoFormItemTypes.it_OPTION_BUTTON);
if (pLeft > 0)
{
oItem.Left = pLeft;
}
if (pWidth > 0)
{
oItem.Width = pWidth;
}
if (pTop > 0)
{
oItem.Top = pTop;
}
if (pHeight > 0)
{
oItem.Height = pHeight;
}
oItem.AffectsFormMode = AffectsFormMode;
if (pFromPane > 0)
{
oItem.FromPane = pFromPane;
}
if (pToPane > 0)
{
oItem.ToPane = pToPane;
}
oOptionBtn = ((SAPbouiCOM.OptionBtn)(oItem.Specific));
oOptionBtn.Caption = pCaption;
if (!string.IsNullOrEmpty(pGroupWith))
{
oOptionBtn.GroupWith(pGroupWith);
}
return(oOptionBtn);
}
/// <summary>
/// Oculta los controles de la ventana activa
/// </summary>
/// <param name="_oForm">Forma activa</param>
private void OcultarControlesVentana(Form _oForm)
{
try
{
SAPbouiCOM.Item oItem = null;
SAPbouiCOM.Item oItemOficina = null;
//LABELS
oItem = _oForm.Items.Item(LBL_SOCIO_NEGOCIO);
oItem.Visible = false;
oItem = _oForm.Items.Item(LBL_NOMBRE_SOCIO_NEGOCIO);
oItem.Visible = false;
oItem = _oForm.Items.Item(LBL_PERSONA_CONTACTO);
oItem.Visible = false;
oItem = _oForm.Items.Item(LBL_DESTINATARIO);
oItem.Visible = false;
oItem = _oForm.Items.Item(LBL_LISTA_DE_PRECIOS);
oItem.Visible = false;
//TEXBOX
oItem = _oForm.Items.Item(TXT_SOCIO_NEGOCIO);
oItem.Visible = false;
oItem = _oForm.Items.Item(TXT_NOMBRE_SOCIO_NEGOCIO);
oItem.Visible = false;
oItem = _oForm.Items.Item(TXT_PERSONA_CONTACTO);
oItem.Visible = false;
oItem = _oForm.Items.Item(TXT_DESTINATARIO);
oItem.Visible = false;
//COMBOS
oItem = _oForm.Items.Item(CMB_LISTA_PRECIOS);
oItem.Visible = false;
oItem = _oForm.Items.Item(CMB_SHIP_TO_CODE);
oItem.Visible = false;
//CAMPOS PROMOTOR
oItem = _oForm.Items.Item(LBL_PROMOTOR);
oItem.Top = 10;
oItem.Left = 5;
oItem.Width = 70;
oItem.TextStyle = 0;
oItemOficina = _oForm.Items.Item(TXT_PROMOTOR);
oItemOficina.Top = oItem.Top;
oItemOficina.Left = oItem.Left + 80;
}
catch (Exception ex)
{
throw new Exception("Error al ocultar controles *OcultarControlesVentana* : " + ex.Message);
}
}
public static SAPbouiCOM.Button AddBotaoImagemAoFormulario(
SAPbouiCOM.Form pForm
, string pUID
, int pLeft
, int pWidth
, int pTop
, int pHeight
, string pImagem
, bool AffectsFormMode = false
, int pFromPane = 0
, int pToPane = 0
)
{
SAPbouiCOM.Button oButton = null;
SAPbouiCOM.Item oItem = null;
oItem = pForm.Items.Add(pUID, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
if (pLeft > 0)
{
oItem.Left = pLeft;
}
if (pWidth > 0)
{
oItem.Width = pWidth;
}
if (pTop > 0)
{
oItem.Top = pTop;
}
if (pHeight > 0)
{
oItem.Height = pHeight;
}
oItem.AffectsFormMode = AffectsFormMode;
if (pFromPane > 0)
{
oItem.FromPane = pFromPane;
}
if (pToPane > 0)
{
oItem.ToPane = pToPane;
}
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Type = BoButtonTypes.bt_Image;
oButton.Image = pImagem;
//oButton.Caption = pCaption;
return(oButton);
}
public static SAPbouiCOM.CheckBox AddCheckBoxAoFormulario(
SAPbouiCOM.Form pForm
, string pUID
, int pLeft
, int pWidth
, int pTop
, int pHeight
, string pCaption
, bool AffectsFormMode = false
, int pFromPane = 0
, int pToPane = 0
)
{
SAPbouiCOM.CheckBox oCheckBox = null;
SAPbouiCOM.Item oItem = null;
oItem = pForm.Items.Add(pUID, SAPbouiCOM.BoFormItemTypes.it_CHECK_BOX);
if (pLeft > 0)
{
oItem.Left = pLeft;
}
if (pWidth > 0)
{
oItem.Width = pWidth;
}
if (pTop > 0)
{
oItem.Top = pTop;
}
if (pHeight > 0)
{
oItem.Height = pHeight;
}
oItem.AffectsFormMode = AffectsFormMode;
if (pFromPane > 0)
{
oItem.FromPane = pFromPane;
}
if (pToPane > 0)
{
oItem.ToPane = pToPane;
}
oCheckBox = ((SAPbouiCOM.CheckBox)(oItem.Specific));
oCheckBox.Caption = pCaption;
return(oCheckBox);
}
/// <summary>
/// Crea el campo de RFC en la ventana de Datos maestros empleado
/// </summary>
/// <param name="_oForm"></param>
private void CrearCampoRFC(Form _oForm)
{
SAPbouiCOM.Item newItem = null;
try
{
try
{
string s = _oForm.Items.Item(TXT_RFC).UniqueID;
}
catch (Exception)
{
_oForm.Freeze(true);
//LABEL RFC
SAPbouiCOM.Item _oLblTelOficina = null;
_oLblTelOficina = _oForm.Items.Item(LBL_TELEFONO_OFICINA);
newItem = _oForm.Items.Add(LBL_RFC, BoFormItemTypes.it_STATIC);
newItem.Left = _oLblTelOficina.Left;
newItem.Top = _oLblTelOficina.Top - 16;
newItem.Width = 50;
newItem.ToPane = 0;
newItem.FromPane = 0;
_oLblRfc = newItem.Specific;
_oLblRfc.Caption = "RFC";
//EDITTEXT RFC
SAPbouiCOM.Item _oLabelRFC = null;
_oLabelRFC = _oForm.Items.Item(LBL_RFC);
newItem = _oForm.Items.Add(TXT_RFC, BoFormItemTypes.it_EDIT);
newItem.Left = _oLabelRFC.Left + 102;
newItem.Top = _oLabelRFC.Top;
newItem.Width = 90;
newItem.ToPane = 0;
newItem.FromPane = 0;
_oTxtRfc = (SAPbouiCOM.EditText)newItem.Specific;
_oTxtRfc.DataBind.SetBound(true, "OHEM", "U_RFC");
_oLabelRFC.LinkTo = newItem.UniqueID;
}
}
catch (Exception ex)
{
throw new Exception("Error al crear campos de usuario *CrearCampoRFC* : " + ex.Message);
}
finally
{
_oForm.Freeze(false);
}
}
/// <summary>
/// Get value of control componete
/// </summary>
/// <param name="control">Object control</param>
/// <param name="require">Require field (it is not null or empty)</param>
/// <param name="nullif"></param>
/// <returns></returns>
public static Dynamic GetValue(SAPbouiCOM.Item oItem, bool require, string nullif = null)
{
var value = String.Empty;
try
{
switch (oItem.Type)
{
case SAPbouiCOM.BoFormItemTypes.it_EDIT:
case SAPbouiCOM.BoFormItemTypes.it_EXTEDIT:
value = ((SAPbouiCOM.EditText)oItem.Specific).Value; break;
case SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX:
value = ((SAPbouiCOM.ComboBox)oItem.Specific).Selected.Value; break;
case SAPbouiCOM.BoFormItemTypes.it_CHECK_BOX:
value = ((SAPbouiCOM.CheckBox)oItem.Specific).Checked.ToString(); break;
case SAPbouiCOM.BoFormItemTypes.it_OPTION_BUTTON:
var opt = (SAPbouiCOM.OptionBtn)oItem.Specific;
if (opt.Selected)
{
value = opt.ValOn;
}
break;
default:
throw new NotImplementedException($"UniqueID:{oItem.UniqueID}, Type:{oItem.Type}");
}
if (require)
{
if ((string.IsNullOrEmpty(value) ||
(nullif != null &&
nullif.Equals(value, StringComparison.InvariantCultureIgnoreCase))))
{
throw new KUIException(LOG, oItem);
}
}
return(new Dynamic(value));
}
finally
{
// oItem.Enabled = enabled;
}
}
protected virtual void e_FormLoad(ref SAPbouiCOM.ItemEvent pVal, ref bool BubbleEvent)
{
try
{
if (pVal.BeforeAction == false && bLoadInputEvents)
{
foreach (System.Data.DataColumn cl in dtTable.Columns)
{
dtOut.Columns.Add(cl.ColumnName);
}
SAPbouiCOM.Button btOption;
oform = oApplication.Forms.Item(pVal.FormUID);
oform.ClientWidth = 500;
oform.ClientHeight = 400;
IbtChoos = oform.Items.Item("1");
int offsetY = 40;
int buttonId = 0;
foreach (System.Data.DataRow dr in dtTable.Rows)
{
SAPbouiCOM.Item btnItem = oform.Items.Add(dr[0].ToString(), BoFormItemTypes.it_BUTTON);
btnItem.Top = offsetY;
btnItem.Left = 75;
btnItem.Width = 350;
btnItem.Height = 40;
btOption = (SAPbouiCOM.Button)btnItem.Specific;
btOption.Caption = dr[1].ToString();
buttonId++;
offsetY += 50;
}
oform.Items.Item("1").Visible = false;
//SAPbouiCOM.StaticText lblCri = oItem.Specific;
oform = null;
}
}
catch (Exception ex)
{
bLoadInputEvents = false;
}
}
public static SAPbouiCOM.ComboBox AddComboBoxAoFormulario(
SAPbouiCOM.Form pForm
, string pUID
, int pLeft
, int pWidth
, int pTop
, int pHeight
, bool AffectsFormMode = false
, int pFromPane = 0
, int pToPane = 0
)
{
//SAPbouiCOM.Button oButton = null;
SAPbouiCOM.Item oItem = null;
SAPbouiCOM.ComboBox oComboBox = null;
oItem = pForm.Items.Add(pUID, BoFormItemTypes.it_COMBO_BOX);
if (pLeft > 0)
{
oItem.Left = pLeft;
}
if (pWidth > 0)
{
oItem.Width = pWidth;
}
if (pTop > 0)
{
oItem.Top = pTop;
}
if (pHeight > 0)
{
oItem.Height = pHeight;
}
oItem.AffectsFormMode = AffectsFormMode;
if (pFromPane > 0)
{
oItem.FromPane = pFromPane;
}
if (pToPane > 0)
{
oItem.ToPane = pToPane;
}
oItem.DisplayDesc = true;
oComboBox = ((SAPbouiCOM.ComboBox)(oItem.Specific));
return(oComboBox);
}
private void AddMatrixNoForm()
{
LinkedButton oLink = null;
oItem = oForm.Items.Add("Matrix1", BoFormItemTypes.it_MATRIX);
oItem.Left = 5;
oItem.Width = 500;
oItem.Top = 5;
oItem.Height = 150;
oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
oColumns = oMatrix.Columns;
oColumn = oColumns.Add("#", BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "#";
oColumn.Width = 30;
oColumn.Editable = false;
oColumn = oColumns.Add("DSCardCode", BoFormItemTypes.it_LINKED_BUTTON);
oColumn.TitleObject.Caption = "Card Code";
oColumn.Width = 40;
oColumn.Editable = true;
oLink = (oColumn).ExtendedObject;
oLink.LinkedObject = BoLinkedObject.lf_BusinessPartner;
oColumn = oColumns.Add("DSCardName", BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Name";
oColumn.Width = 40;
oColumn.Editable = true;
oColumn = oColumns.Add("DSPhone", BoFormItemTypes.it_EDIT);
oColumn.TitleObject.Caption = "Phone";
oColumn.Width = 40;
oColumn.Editable = true;
//oColumn = oColumns.Add("DSPhone", BoFormItemTypes.it_EDIT);
//oColumn.TitleObject.Caption = "Int.Phone";
//oColumn.Width = 40;
//oColumn.Editable = true;
}
private void AddButton()
{
if (!mObjUtility.ItemExist("btnFrgh", mObjSOForm))
{
SAPbouiCOM.Button lObjBtnFreight;
SAPbouiCOM.Item lObjItm;
SAPbouiCOM.Item txtUUID = mObjSOForm.Items.Item("70");
lObjItm = mObjSOForm.Items.Add("btnFrgh", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
lObjItm.FromPane = 1;
lObjItm.ToPane = 1;
lObjItm.Top = txtUUID.Top + 25;
lObjItm.Left = txtUUID.Left;
lObjBtnFreight = ((SAPbouiCOM.Button)mObjSOForm.Items.Item("btnFrgh").Specific);
lObjBtnFreight.Caption = "Fletes";
lObjBtnFreight.Item.Enabled = false;
//lObjBtnFreight.ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.lObjBtnFreight_ClickBefore);
}
}
private void AddPrefix()
{
//int i = 0;
EditText oEditText = null;
string newPhone = String.Empty;
oItem = oForm.Items.Item("txtPhone");
oEditText = (EditText)oItem.Specific;
oMatrix.FlushToDataSource();
oDBDataSource = oForm.DataSources.DBDataSources.Item("OCRD");
for (int i = 0; i <= oDBDataSource.Size - 1; i++)
{
newPhone = oDBDataSource.GetValue("Phone1", i);
newPhone = newPhone.Trim(Char.Parse(" "));
oDBDataSource.SetValue("Phone1", 1, oEditText.String + newPhone);
}
oMatrix.LoadFromDataSource();
}
private void OApplication_ItemEvent(string FormUID, ref ItemEvent pVal, out bool BubbleEvent)
{
BubbleEvent = true;
if (
(pVal.FormType == 139)
& pVal.EventType != BoEventTypes.et_FORM_UNLOAD
& pVal.BeforeAction
)
{
this.oFormPV = oApplication.Forms.GetFormByTypeAndCount(pVal.FormType, pVal.FormTypeCount);
if (pVal.EventType == BoEventTypes.et_FORM_LOAD & pVal.BeforeAction)
{
oNewItem = this.oFormPV.Items.Add("UserFolder", BoFormItemTypes.it_FOLDER);
oItem = this.oFormPV.Items.Item("138");
oNewItem.Top = oItem.Top;
oNewItem.Height = oItem.Height;
oNewItem.Width = oItem.Width;
oNewItem.Left = oItem.Left;
oFolderItem = (SAPbouiCOM.Folder)oNewItem.Specific;
oFolderItem.Caption = "User Folder";
oFolderItem.GroupWith("138");
AddItemsToPVForm();
this.oFormPV.PaneLevel = 1;
}
if (
pVal.ItemUID.Equals("UserFolder")
& pVal.EventType == BoEventTypes.et_ITEM_PRESSED
& pVal.BeforeAction
)
{
this.oFormPV.PaneLevel = 5;
}
}
}
/// <summary>
/// Oculta los controles de la ventana activa
/// </summary>
/// <param name="_oForm">Forma activa</param>
private void OcultarControlesVentana(Form _oForm)
{
try
{
SAPbouiCOM.Item oItem = null;
//LABELS
oItem = _oForm.Items.Item(LBL_PERSONA_CONTACTO);
oItem.Visible = false;
oItem = _oForm.Items.Item(LBL_NUMERO_REFERENCIA);
oItem.Visible = false;
oItem = _oForm.Items.Item(LBL_FECHA_DOCUMENTO);
oItem.Visible = false;
//TEXBOX
oItem = _oForm.Items.Item(TXT_NUMERO_REFERENCIA);
oItem.Visible = false;
oItem = _oForm.Items.Item(TXT_FECHA_DOCUMENTO);
oItem.Visible = false;
//COMBOS
oItem = _oForm.Items.Item(CMB_PERSONA_CONTACTO);
oItem.Visible = false;
//ICONOS CHOOSE
oItem = _oForm.Items.Item(ICO_PERSONA_CONTACTO);
oItem.Visible = false;
//FOLDER
oItem = _oForm.Items.Item(FLD_ANEXOS);
oItem.Visible = false;
oItem = _oForm.Items.Item(FLD_LOGISTICA);
oItem.Visible = false;
}
catch (Exception ex)
{
throw new Exception("Error al ocultar controles *OcultarControlesVentana* : " + ex.Message);
}
}
// After events
//Items
public virtual void etAfterClick(ref ItemEvent pVal, ref bool BubbleEvent)
{
try
{
SAPbouiCOM.Item clickIt = oForm.Items.Item(pVal.ItemUID);
string itType = clickIt.Type.ToString();
if (itType == "it_FOLDER")
{
if (pVal.ItemUID.Contains("_"))
{
string strTabPan = pVal.ItemUID.Split('_')[1].ToString();
oForm.PaneLevel = Convert.ToInt16(strTabPan);
BubbleEvent = false;
}
}
}
catch (Exception ex)
{
oApplication.SetStatusBarMessage(ex.Message);
}
}
public static SAPbouiCOM.Grid AddGridAoFormulario(
SAPbouiCOM.Form pForm
, string pUID
, int pLeft
, int pWidth
, int pTop
, int pHeight
, SAPbouiCOM.BoMatrixSelect pBoMatrixSelect
, SAPbouiCOM.DataTable pDataTable)
{
SAPbouiCOM.Grid oGrid;
SAPbouiCOM.Item oItem = pForm.Items.Add(pUID, SAPbouiCOM.BoFormItemTypes.it_GRID);
oGrid = ((SAPbouiCOM.Grid)(oItem.Specific));
oGrid.Item.Left = pLeft;
oGrid.Item.Top = pTop;
oGrid.Item.Height = pHeight;
oGrid.Item.Width = pWidth;
oGrid.SelectionMode = pBoMatrixSelect;
oGrid.DataTable = pDataTable;
return(oGrid);
}
private void InitiallizeForm()
{
oForm.Freeze(true);
dbOITB = oForm.DataSources.DBDataSources.Item("OITB");
oItemRef = oForm.Items.Item("2");
SAPbouiCOM.StaticText lblCode, lblName, lblInt;
SAPbouiCOM.CheckBox chkAll, chkMon, chkTue, chkWed, chkThs, chkFri, chkSat, chkSun;
SAPbouiCOM.ComboBox cbInt;
SAPbouiCOM.EditText txtCode, txtName;
try
{
SAPbouiCOM.Item oItemRef1 = oForm.Items.Item("9");
oItem = oForm.Items.Add("B1_ITB", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Top = oItemRef.Top;
oItem.Height = oItemRef.Height;
oItem.Left = oItemRef.Left + oItemRef.Width + 5;
oItem.Width = oItemRef.Width + 40;
oItem.Visible = true;
B1_ITB = (SAPbouiCOM.Button)oItem.Specific;
B1_ITB.Caption = "Item Sub Groups";
}
catch (Exception ex)
{
string message = ex.Message;
}
oForm.Freeze(false);
dsSAP = new DataServices(Program.strConSAP);
}
private void ReorganizarItensNaTela()
{
//SAPbouiCOM.Button oButton = null;
//SAPbouiCOM.Folder oFolder = null;
//SAPbouiCOM.OptionBtn oOptionBtn = null;
//SAPbouiCOM.CheckBox oCheckBox = null;
oItem = oForm.Items.Item("1");
oItem.Top = oForm.Height - 70;
oItem = oForm.Items.Item("2");
oItem.Top = oForm.Height - 70;
oItem = oForm.Items.Item("Rect1");
oItem.Width = oForm.Width - 20;
oItem.Height = oForm.Height - 100;
for (int i = 1; i <= 3; i++)
{
oItem = oForm.Items.Item("OptBtn" + i.ToString());
oItem.Left = 20;
oItem.Width = 100;
oItem.Top = 30 + (i - 1) * 19;
oItem.Height = 19;
}
for (int i = 1; i <= 3; i++)
{
oItem = oForm.Items.Item("CheckBox" + i.ToString());
oItem.Left = 20;
oItem.Width = 100;
oItem.Top = 30 + (i - 1) * 19;
oItem.Height = 19;
oItem.FromPane = 2;
oItem.ToPane = 2;
}
}
public static SAPbouiCOM.Button AddBotaoAoFormulario(
SAPbouiCOM.Form pForm
, string pUID
, int pLeft
, int pWidth
, int pTop
, int pHeight
, string pCaption
)
{
SAPbouiCOM.Button oButton = null;
SAPbouiCOM.Item oItem = null;
oItem = pForm.Items.Add(pUID, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = pLeft;
oItem.Width = pWidth;
oItem.Top = pTop;
oItem.Height = pHeight;
oItem.AffectsFormMode = false;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = pCaption;
return(oButton);
}
private void CreateForm()
{
SAPbouiCOM.FormCreationParams oCP = null;
SAPbouiCOM.Item oItem = null;
SAPbouiCOM.StaticText oStatic = null;
SAPbouiCOM.Button oButton = null;
SAPbouiCOM.EditText oEdit = null;
// Setting the form creation params
oCP = ((SAPbouiCOM.FormCreationParams)(SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_FormCreationParams)));
oCP.UniqueID = "CFL3";
oCP.FormType = "CFL3";
oCP.BorderStyle = SAPbouiCOM.BoFormBorderStyle.fbs_Sizable;
// Adding the form
oForm = SBO_Application.Forms.AddEx(oCP);
oForm.Title = "Configuración";
oItem = oForm.Items.Add("StaticTxt", SAPbouiCOM.BoFormItemTypes.it_STATIC);
oItem.Left = 10;
oItem.Top = 20;
oItem.LinkTo = "EditTxt";
oItem.Width = 200;
oStatic = ((SAPbouiCOM.StaticText)(oItem.Specific));
oStatic.Caption = "Carpeta de archivos";
oItem = oForm.Items.Add("StaticTxt2", SAPbouiCOM.BoFormItemTypes.it_STATIC);
oItem.Left = 10;
oItem.Top = 50;
oItem.LinkTo = "EditTxt";
oItem.Width = 200;
oStatic = ((SAPbouiCOM.StaticText)(oItem.Specific));
oStatic.Caption = "Kilometros recorridos";
oItem = oForm.Items.Add("txtKM", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oItem.Left = 120;
oItem.Top = 50;
oItem.LinkTo = "StaticTxt2";
oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
oItem = oForm.Items.Add("StaticTxt3", SAPbouiCOM.BoFormItemTypes.it_STATIC);
oItem.Left = 10;
oItem.Top = 80;
oItem.LinkTo = "EditTxt";
oStatic = ((SAPbouiCOM.StaticText)(oItem.Specific));
oStatic.Caption = "Horas de motor";
oItem = oForm.Items.Add("txtHoras", SAPbouiCOM.BoFormItemTypes.it_EDIT);
oItem.Left = 120;
oItem.Top = 80;
oItem.LinkTo = "StaticTxt3";
oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
// Adding a CFL button
oItem = oForm.Items.Add("btnGuardar", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
oItem.Left = 120;
oItem.Top = 110;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Type = SAPbouiCOM.BoButtonTypes.bt_Caption;
oButton.Caption = "Guardar";
oItem.Width = 100;
oItem.Height = 20;
oForm.Width = 300;
oForm.Height = 300;
oForm.Visible = true;
}
private void InitiallizeForm()
{
// dtHead = oForm.DataSources.DataTables.Item("dtHead");
// dtHead.Rows.Add(1);
dtPendingJEs.Columns.Add("DocDate");
dtPendingJEs.Columns.Add("DocNum");
dtPendingJEs.Columns.Add("DocTotal");
dtPendingJEs.Columns.Add("Originator");
oForm.Freeze(true);
mtJE = oForm.Items.Item("mtJE").Specific;
mtDet = oForm.Items.Item("mtDet").Specific;
dtDet = oForm.DataSources.DataTables.Item("dtDet");
dtHead = oForm.DataSources.DataTables.Item("dtHead");
cbOr = oForm.Items.Item("cbOr").Specific;
IcbOr = oForm.Items.Item("cbOr");
cbOr.ValidValues.Add("All", "All");
fillUserCb();
oForm.DataSources.UserDataSources.Add("txDN", SAPbouiCOM.BoDataType.dt_LONG_NUMBER, 15); // Days of Month
txDN = oForm.Items.Item("txDN").Specific;
ItxDN = oForm.Items.Item("txDN");
txDN.DataBind.SetBound(true, "", "txDN");
oForm.DataSources.UserDataSources.Add("txDD", SAPbouiCOM.BoDataType.dt_DATE); // Days of Month
txDD = oForm.Items.Item("txDD").Specific;
ItxDD = oForm.Items.Item("txDD");
txDD.DataBind.SetBound(true, "", "txDD");
oForm.DataSources.UserDataSources.Add("txRem", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 100); // Days of Month
txRem = oForm.Items.Item("txRem").Specific;
ItxRem = oForm.Items.Item("txRem");
txRem.DataBind.SetBound(true, "", "txRem");
oForm.DataSources.UserDataSources.Add("txRef1", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 100); // Days of Month
txRef1 = oForm.Items.Item("txRef1").Specific;
ItxRef1 = oForm.Items.Item("txRef1");
txRef1.DataBind.SetBound(true, "", "txRef1");
oForm.DataSources.UserDataSources.Add("txRef2", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 100); // Days of Month
txRef2 = oForm.Items.Item("txRef2").Specific;
ItxRef2 = oForm.Items.Item("txRef2");
txRef2.DataBind.SetBound(true, "", "txRef2");
oForm.DataSources.UserDataSources.Add("txDS", SAPbouiCOM.BoDataType.dt_SUM); // Days of Month
txDS = oForm.Items.Item("txDS").Specific;
ItxDS = oForm.Items.Item("txDS");
txDS.DataBind.SetBound(true, "", "txDS");
oForm.DataSources.UserDataSources.Add("txCS", SAPbouiCOM.BoDataType.dt_SUM); // Days of Month
txCS = oForm.Items.Item("txCS").Specific;
ItxCS = oForm.Items.Item("txCS");
txCS.DataBind.SetBound(true, "", "txCS");
oForm.DataSources.UserDataSources.Add("chkPost", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 1); // Days of Month
chkPost = oForm.Items.Item("chkPost").Specific;
IchkPost = oForm.Items.Item("chkPost");
chkPost.DataBind.SetBound(true, "", "chkPost");
lnkBG = oForm.Items.Item("lnkBG").Specific;
IchkPost = oForm.Items.Item("lnkBG");
}
private void InitiallizeForm()
{
// dtHead = oForm.DataSources.DataTables.Item("dtHead");
// dtHead.Rows.Add(1);
dtPendingJEs.Columns.Add("V#");
dtPendingJEs.Columns.Add("Date");
dtPendingJEs.Columns.Add("Remarks");
dtPendingJEs.Columns.Add("Month");
dtPendingJEs.Columns.Add("Year");
dtPendingJEs.Columns.Add("Posted");
dtPendingJEs.Columns.Add("PostedJE");
dtPendingJEs.Columns.Add("Canceled");
dtPendingJEs.Columns.Add("CanceledJE");
oForm.Freeze(true);
mtJE = oForm.Items.Item("mtJE").Specific;
mtDet = oForm.Items.Item("mtDet").Specific;
dtDet = oForm.DataSources.DataTables.Item("dtDet");
dtHead = oForm.DataSources.DataTables.Item("dtHead");
cbOr = oForm.Items.Item("cbOr").Specific;
IcbOr = oForm.Items.Item("cbOr");
cbOr.ValidValues.Add("All", "All");
fillUserCb();
oForm.DataSources.UserDataSources.Add("txDN", SAPbouiCOM.BoDataType.dt_LONG_NUMBER, 15); // Days of Month
txDN = oForm.Items.Item("txDN").Specific;
ItxDN = oForm.Items.Item("txDN");
txDN.DataBind.SetBound(true, "", "txDN");
oForm.DataSources.UserDataSources.Add("txCJ", SAPbouiCOM.BoDataType.dt_LONG_NUMBER, 15); // Days of Month
txCJ = oForm.Items.Item("txCJ").Specific;
itxCJ = oForm.Items.Item("txCJ");
txCJ.DataBind.SetBound(true, "", "txCJ");
oForm.DataSources.UserDataSources.Add("txPJ", SAPbouiCOM.BoDataType.dt_LONG_NUMBER, 15); // Days of Month
txPJ = oForm.Items.Item("txPJ").Specific;
itxPJ = oForm.Items.Item("txPJ");
txPJ.DataBind.SetBound(true, "", "txPJ");
oForm.DataSources.UserDataSources.Add("txDD", SAPbouiCOM.BoDataType.dt_DATE); // Days of Month
txDD = oForm.Items.Item("txDD").Specific;
ItxDD = oForm.Items.Item("txDD");
txDD.DataBind.SetBound(true, "", "txDD");
oForm.DataSources.UserDataSources.Add("txRem", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 50); // Days of Month
txRem = oForm.Items.Item("txRem").Specific;
ItxRem = oForm.Items.Item("txRem");
txRem.DataBind.SetBound(true, "", "txRem");
oForm.DataSources.UserDataSources.Add("txRef1", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 30); // Days of Month
txRef1 = oForm.Items.Item("txRef1").Specific;
ItxRef1 = oForm.Items.Item("txRef1");
txRef1.DataBind.SetBound(true, "", "txRef1");
oForm.DataSources.UserDataSources.Add("txRef2", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 30); // Days of Month
txRef2 = oForm.Items.Item("txRef2").Specific;
ItxRef2 = oForm.Items.Item("txRef2");
txRef2.DataBind.SetBound(true, "", "txRef2");
oForm.DataSources.UserDataSources.Add("txDS", SAPbouiCOM.BoDataType.dt_SUM); // Days of Month
txDS = oForm.Items.Item("txDS").Specific;
ItxDS = oForm.Items.Item("txDS");
txDS.DataBind.SetBound(true, "", "txDS");
oForm.DataSources.UserDataSources.Add("txCS", SAPbouiCOM.BoDataType.dt_SUM); // Days of Month
txCS = oForm.Items.Item("txCS").Specific;
ItxCS = oForm.Items.Item("txCS");
txCS.DataBind.SetBound(true, "", "txCS");
oForm.DataSources.UserDataSources.Add("chkPost", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 1); // Days of Month
chkPost = oForm.Items.Item("chkPost").Specific;
IchkPost = oForm.Items.Item("chkPost");
chkPost.DataBind.SetBound(true, "", "chkPost");
oForm.DataSources.UserDataSources.Add("optPP", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 1); // Days of Month
optPP = oForm.Items.Item("optPP").Specific;
ioptPP = oForm.Items.Item("optPP");
optPP.DataBind.SetBound(true, "", "optPP");
oForm.DataSources.UserDataSources.Add("optC", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 1); // Days of Month
optC = oForm.Items.Item("optC").Specific;
ioptC = oForm.Items.Item("optC");
optC.DataBind.SetBound(true, "", "optC");
oForm.DataSources.UserDataSources.Add("optPC", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 1); // Days of Month
optPC = oForm.Items.Item("optPC").Specific;
ioptPC = oForm.Items.Item("optPC");
optPC.DataBind.SetBound(true, "", "optPC");
optC.GroupWith("optPP");
optPC.GroupWith("optPP");
optPP.Selected = true;
btPost = oForm.Items.Item("btPost").Specific;
lnkBG = oForm.Items.Item("lnkBG").Specific;
IchkPost = oForm.Items.Item("lnkBG");
}
private void CriarFormularioComplexo()
{
SAPbouiCOM.Button oButton = null;
SAPbouiCOM.Folder oFolder = null;
SAPbouiCOM.OptionBtn oOptionBtn = null;
SAPbouiCOM.CheckBox oCheckBox = null;
SAPbouiCOM.ComboBox oComboBox = null;
SAPbouiCOM.FormCreationParams oCreationParams = null;
oCreationParams = ((SAPbouiCOM.FormCreationParams)(oApplication.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_FormCreationParams)));
oCreationParams.UniqueID = "frmComplex";
oCreationParams.FormType = "frmComplex";
oCreationParams.BorderStyle = BoFormBorderStyle.fbs_Sizable;
oForm = oApplication.Forms.AddEx(oCreationParams);
AddDataSourceNoForm();
oForm.Title = "Formulário Complexo";
oForm.Left = 300;
oForm.ClientWidth = 200;
oForm.Top = 100;
oForm.ClientHeight = 140;
oItem = oForm.Items.Add("1", BoFormItemTypes.it_BUTTON);
oItem.Left = 5;
oItem.Width = 65;
oItem.Top = 110;
oItem.Height = 19;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "OK";
oItem = oForm.Items.Add("2", BoFormItemTypes.it_BUTTON);
oItem.Left = 75;
oItem.Width = 65;
oItem.Top = 110;
oItem.Height = 19;
oButton = ((SAPbouiCOM.Button)(oItem.Specific));
oButton.Caption = "Cancel";
oItem = oForm.Items.Add("Rect1", BoFormItemTypes.it_RECTANGLE);
oItem.Left = 0;
oItem.Width = 194;
oItem.Top = 25;
oItem.Height = 80;
for (int i = 1; i <= 3; i++)
{
oItem = oForm.Items.Add("Folder" + i.ToString(), BoFormItemTypes.it_FOLDER);
oItem.Left = (i - 1) * 100;
oItem.Width = 100;
oItem.Top = 6;
oItem.Height = 19;
oFolder = ((SAPbouiCOM.Folder)(oItem.Specific));
oFolder.Caption = "Folder" + i.ToString();
oFolder.DataBind.SetBound(true, "", "FolderDS");
if (i == 1)
{
oFolder.Select();
}
else
{
oFolder.GroupWith("Folder" + Convert.ToString(i - 1));
}
}
for (int i = 1; i <= 3; i++)
{
oItem = oForm.Items.Add("OptBtn" + i.ToString(), BoFormItemTypes.it_OPTION_BUTTON);
oItem.Left = 20;
oItem.Width = 120;
oItem.Top = 30 + (i - 1) * 19;
oItem.Height = 19;
oItem.FromPane = 1;
oItem.ToPane = 1;
oOptionBtn = ((SAPbouiCOM.OptionBtn)(oItem.Specific));
oOptionBtn.Caption = string.Format("Botão de Opção {0}", i);
if (i > 1)
{
oOptionBtn.GroupWith("OptBtn" + Convert.ToString(i - 1));
}
oOptionBtn.DataBind.SetBound(true, "", "OptBtnDS");
}
for (int i = 1; i <= 3; i++)
{
oItem = oForm.Items.Add("CheckBox" + i.ToString(), BoFormItemTypes.it_CHECK_BOX);
oItem.Left = 20;
oItem.Width = 100;
oItem.Top = 30 + (i - 1) * 19;
oItem.Height = 19;
oItem.FromPane = 2;
oItem.ToPane = 2;
oCheckBox = ((SAPbouiCOM.CheckBox)(oItem.Specific));
oCheckBox.Caption = string.Format("Check Box {0}", i);
oCheckBox.DataBind.SetBound(true, "", string.Format("CheckDS{0}", i));
}
for (int i = 1; i <= 3; i++)
{
oItem = oForm.Items.Add("ComboBox" + i.ToString(), BoFormItemTypes.it_COMBO_BOX);
oItem.Left = 20;
oItem.Width = 100;
oItem.Top = 33 + (i - 1) * 19;
oItem.Height = 19;
oItem.FromPane = 3;
oItem.ToPane = 3;
oComboBox = ((SAPbouiCOM.ComboBox)(oItem.Specific));
oComboBox.ValidValues.Add("0", "Selecione");
for (int x = 1; x < 10; x++)
{
oComboBox.ValidValues.Add(x.ToString(), string.Format("Item {0}", x));
}
oComboBox.Select("0", BoSearchKey.psk_ByValue);
oItem.DisplayDesc = true;
}
oForm.PaneLevel = 1;
}
private void CriarFormulario()
{
SAPbouiCOM.Item oItem = null;
//SAPbouiCOM.Button oButton = null;
SAPbouiCOM.StaticText oStaticText = null;
SAPbouiCOM.ComboBox oComboBox = null;
SAPbouiCOM.EditText oEditText = null;
try
{
this.oForm = this.oApplication.Forms.Add("frmStatusBar", BoFormTypes.ft_Fixed, -1);
}
catch (COMException ex)
{
//if (ex.ErrorCode == -7010)
//{
// this.oForm = this.oApplication.Forms.Add("frmStatusBar");
//}
//else
//{
System.Windows.Forms.MessageBox.Show(
ex.Message
, "Erro"
, System.Windows.Forms.MessageBoxButtons.OK
, System.Windows.Forms.MessageBoxIcon.Error
);
System.Environment.Exit(0);
//}
}
ConfiguraForm(
"Exemplo Status Bar"
, 400
, 350
, 100
, 80
);
//add botao ok
this.oButtonOK = UIHelper.AddBotaoAoFormulario(this.oForm, "1", 6, 65, 53, 19, "OK");
this.oButtonMenssagem = UIHelper.AddBotaoAoFormulario(this.oForm, "BTN_STATUS", 90, 150, 53, 19, "Mostrar Mensagem");
this.oItemRect = UIHelper.AddRectAoFormulario(this.oForm, "Rect1", 0, 344, 1, 45);
this.oComboBoxTypeMessage = UIHelper.AddComboBoxAoFormulario(this.oForm, "ComboBox1", 157, 163, 24, 14);
this.oEditTextMessage = UIHelper.AddEditTextAoFormulario(this.oForm, "edtMessage", 157, 163, 8, 14);
this.oStaticTextMensagem = UIHelper.AddStaticTextAoFormulario(this.oForm, "st01", 7, 148, 8, 14, "Mensagem de texto:", "edtMessage");
this.oStaticTextTipoMensagem = UIHelper.AddStaticTextAoFormulario(this.oForm, "st02", 7, 148, 8, 14, "Mensagem de texto:", "ComboBox1");
this.AddDataSources();
this.oComboBoxTypeMessage.ValidValues.Add(Convert.ToString(BoStatusBarMessageType.smt_Warning), "Warning");
this.oComboBoxTypeMessage.ValidValues.Add(Convert.ToString(BoStatusBarMessageType.smt_Error), "Error");
this.oComboBoxTypeMessage.ValidValues.Add(Convert.ToString(BoStatusBarMessageType.smt_None), "None");
this.oComboBoxTypeMessage.ValidValues.Add(Convert.ToString(BoStatusBarMessageType.smt_Success), "Sucess");
this.oComboBoxTypeMessage.Select(0, BoSearchKey.psk_Index);
}
