private void AddChooseFromList() { SAPbouiCOM.ChooseFromListCollection oCFls = null; SAPbouiCOM.Conditions oCons = null; SAPbouiCOM.Condition oCon = null; oCFls = oForm.ChooseFromLists; SAPbouiCOM.ChooseFromList oCFl = null; SAPbouiCOM.ChooseFromListCreationParams oCFLCreationParams = null; oCFLCreationParams = ((SAPbouiCOM.ChooseFromListCreationParams)(oApplication.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_ChooseFromListCreationParams))); oCFLCreationParams.MultiSelection = false; oCFLCreationParams.ObjectType = "2"; oCFLCreationParams.UniqueID = "CFL1"; oCFl = oCFls.Add(oCFLCreationParams); oCons = oCFl.GetConditions(); oCon = oCons.Add(); oCon.Alias = "CardType"; oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; oCon.CondVal = "C"; oCFl.SetConditions(oCons); oCFLCreationParams.MultiSelection = false; oCFLCreationParams.ObjectType = "2"; oCFLCreationParams.UniqueID = "CFL2"; oCFl = oCFls.Add(oCFLCreationParams); }
private void InitForm() { _oForm.Freeze(true); try { _oForm.DataSources.UserDataSources.Item("txtPSTDT").ValueEx = DateTime.Now.ToString("yyyyMMdd"); //_oForm.DataSources.UserDataSources.Item("txtDUEDT").ValueEx = DateTime.Now.ToString("yyyyMMdd"); _oForm.DataSources.UserDataSources.Item("txtDOCDT").ValueEx = DateTime.Now.ToString("yyyyMMdd"); _grid_Vendor.DataTable = _dt_VendorGrid; SAPbouiCOM.ChooseFromList oCFL = _oForm.ChooseFromLists.Item("cflVendor"); SAPbouiCOM.Conditions oCons = oCFL.GetConditions(); SAPbouiCOM.Condition oCon = oCons.Add(); oCon.Alias = "CardType"; oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; oCon.CondVal = "S"; oCFL.SetConditions(oCons); } catch (Exception Ex) { eCommon.SBO_Application.MessageBox(Ex.Message); } finally { _oForm.Freeze(false); } }
private void AddChooseFromListStockTransfer() { oForm.DataSources.UserDataSources.Add("CFL_1", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 254); SAPbouiCOM.ChooseFromListCollection oCFLs = oForm.ChooseFromLists; SAPbouiCOM.ChooseFromListCreationParams lObjCFLCreationParams = null; lObjCFLCreationParams = (SAPbouiCOM.ChooseFromListCreationParams)SAPbouiCOM.Framework.Application.SBO_Application.CreateObject (SAPbouiCOM.BoCreatableObjectType.cot_ChooseFromListCreationParams); // Adding 2 CFL, one for the button and one for the edit text. //string strCFLID = oCFLCreationParams.UniqueID lObjCFLCreationParams.MultiSelection = false; lObjCFLCreationParams.ObjectType = "1250000001"; lObjCFLCreationParams.UniqueID = "CFLDOC"; mObjChooseFromList = oCFLs.Add(lObjCFLCreationParams); oCons = mObjChooseFromList.GetConditions(); oCon = oCons.Add(); oCon.Alias = "DocStatus"; oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; oCon.CondVal = "O"; mObjChooseFromList.SetConditions(oCons); EditText1.DataBind.SetBound(true, "", "CFL_1"); EditText1.ChooseFromListUID = mObjChooseFromList.UniqueID; EditText1.ChooseFromListAlias = "DocNum"; }
private void AddChooseFromList() { this.UIAPIRawForm.DataSources.UserDataSources.Add("UDCFL", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 254); try { SAPbouiCOM.EditText lObjEditTxt = null; SAPbouiCOM.ChooseFromList lObjCFL = null; SAPbouiCOM.ChooseFromListCollection lLstCFLs = null; lLstCFLs = this.UIAPIRawForm.ChooseFromLists; SAPbouiCOM.ChooseFromListCreationParams lObjCFLCreationParams = null; lObjCFLCreationParams = (SAPbouiCOM.ChooseFromListCreationParams)SAPbouiCOM.Framework.Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_ChooseFromListCreationParams); lObjCFLCreationParams.MultiSelection = false; lObjCFLCreationParams.ObjectType = "2"; lObjCFLCreationParams.UniqueID = "CFLBP"; lObjCFL = lLstCFLs.Add(lObjCFLCreationParams); //lObjEditTxt = lObjTxtClient; lObjTxtClient.DataBind.SetBound(true, "", "UDCFL"); lObjTxtClient.ChooseFromListUID = lObjCFL.UniqueID; lObjTxtClient.ChooseFromListAlias = "CardCode"; } catch (Exception ex) { SAPbouiCOM.Framework.Application.SBO_Application.MessageBox(string.Format("InitCustomerChooseFromListException: {0}", ex.Message)); } }
private void AddChooseFromListNomina() { oForm.DataSources.UserDataSources.Add("CFL_0", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 254); SAPbouiCOM.ChooseFromListCollection oCFLs = oForm.ChooseFromLists; SAPbouiCOM.ChooseFromListCreationParams lObjCFLCreationParams = null; lObjCFLCreationParams = (SAPbouiCOM.ChooseFromListCreationParams)SAPbouiCOM.Framework.Application.SBO_Application.CreateObject (SAPbouiCOM.BoCreatableObjectType.cot_ChooseFromListCreationParams); // Adding 2 CFL, one for the button and one for the edit text. //string strCFLID = oCFLCreationParams.UniqueID lObjCFLCreationParams.MultiSelection = false; lObjCFLCreationParams.ObjectType = "1"; lObjCFLCreationParams.UniqueID = "OACT1"; mObjChooseFromList = oCFLs.Add(lObjCFLCreationParams); oCons = mObjChooseFromList.GetConditions(); /*oCon = oCons.Add(); * oCon.Alias = "AcctCode"; * oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; * oCon.CondVal = "C"; * * mObjChooseFromList.SetConditions(oCons);*/ txtCuentaCNom.DataBind.SetBound(true, "", "CFL_0"); txtCuentaCNom.ChooseFromListUID = mObjChooseFromList.UniqueID; txtCuentaCNom.ChooseFromListAlias = "AcctCode"; }
private void SBO_Application_ItemEvent(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST) { SAPbouiCOM.IChooseFromListEvent oCFLEvento = null; oCFLEvento = ((SAPbouiCOM.IChooseFromListEvent)(pVal)); string sCFL_ID = null; sCFL_ID = oCFLEvento.ChooseFromListUID; SAPbouiCOM.Form oForm = null; oForm = SBO_Application.Forms.Item(FormUID); SAPbouiCOM.ChooseFromList oCFL = null; oCFL = oForm.ChooseFromLists.Item(sCFL_ID); if (oCFLEvento.BeforeAction == false) { SAPbouiCOM.DataTable oDataTable = null; oDataTable = oCFLEvento.SelectedObjects; string val = null; try { val = System.Convert.ToString(oDataTable.GetValue(0, 0)); } catch (Exception ex) { } if ((pVal.ItemUID == "EditTxt") | (pVal.ItemUID == "Button")) { oForm.DataSources.UserDataSources.Item("EditDS").ValueEx = val; } } } if ((FormUID == "CFL1") & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_UNLOAD)) { System.Windows.Forms.Application.Exit(); } }
private static void GestionarSeleccionCFL(SAPbouiCOM.Form oForm, SAPbouiCOM.ItemEvent pVal) { SAPbouiCOM.IChooseFromListEvent oCFLEvento = null; String CflID = string.Empty; SAPbouiCOM.ChooseFromList oCFL = null; SAPbouiCOM.DataTable oDataTable = null; try { oCFLEvento = ((SAPbouiCOM.IChooseFromListEvent)(pVal)); CflID = oCFLEvento.ChooseFromListUID; oCFL = oForm.ChooseFromLists.Item(CflID); oDataTable = oCFLEvento.SelectedObjects; if (oDataTable != null) { switch (CflID) { case "CflCC": oForm.DataSources.UserDataSources.Item("ds_Acc").Value = oDataTable.GetValue("AcctCode", 0).ToString(); break; case "CflDim1": oForm.DataSources.UserDataSources.Item("ds_Dim1").Value = oDataTable.GetValue("OcrCode", 0).ToString(); break; case "CflDim2": oForm.DataSources.UserDataSources.Item("ds_Dim2").Value = oDataTable.GetValue("OcrCode", 0).ToString(); break; case "CflDim3": oForm.DataSources.UserDataSources.Item("ds_Dim3").Value = oDataTable.GetValue("OcrCode", 0).ToString(); break; case "CflDim4": oForm.DataSources.UserDataSources.Item("ds_Dim4").Value = oDataTable.GetValue("OcrCode", 0).ToString(); break; case "CflDim5": oForm.DataSources.UserDataSources.Item("ds_Dim5").Value = oDataTable.GetValue("OcrCode", 0).ToString(); break; default: break; } } } catch (Exception ex) { Conexion_SBO.m_SBO_Appl.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { FuncionesComunes.LiberarObjetoGenerico(oCFLEvento); FuncionesComunes.LiberarObjetoGenerico(oCFL); FuncionesComunes.LiberarObjetoGenerico(oDataTable); } }
public static SAPbouiCOM.DataTable GetDataTableFromCLF(SAPbouiCOM.ItemEvent oEvent, SAPbouiCOM.Form oForm) { SAPbouiCOM.ChooseFromListEvent event2 = (SAPbouiCOM.ChooseFromListEvent)oEvent; string chooseFromListUID = event2.ChooseFromListUID; SAPbouiCOM.ChooseFromList list = oForm.ChooseFromLists.Item(chooseFromListUID); return(event2.SelectedObjects); }
private void InitiallizeForm() { isForLoading = true; oForm.Freeze(true); tab1 = (SAPbouiCOM.Folder)oForm.Items.Item("21").Specific; tab3 = (SAPbouiCOM.Folder)oForm.Items.Item("19").Specific; tab4 = (SAPbouiCOM.Folder)oForm.Items.Item("35").Specific; dtHead = oForm.DataSources.DataTables.Item("dtHead"); Animals = oForm.DataSources.DataTables.Item("Animals"); DTRpt = oForm.DataSources.DataTables.Item("DTRpt"); dtPro = oForm.DataSources.DataTables.Item("dtPro"); dtReqT = oForm.DataSources.DataTables.Item("dtReqT"); dtTypeS = oForm.DataSources.DataTables.Item("dtTypeS"); ocflCard = (SAPbouiCOM.ChooseFromList)oForm.ChooseFromLists.Item("cflCard"); cflcardcode(ocflCard, "cflCard"); mtAnimals = (SAPbouiCOM.Matrix)oForm.Items.Item("mtAnimals").Specific; mtReqT = (SAPbouiCOM.Matrix)oForm.Items.Item("mtReqT").Specific; mtRpt = (SAPbouiCOM.Matrix)oForm.Items.Item("mtRpt").Specific; mtProd = (SAPbouiCOM.Matrix)oForm.Items.Item("mtProd").Specific; mtTypePRO = (SAPbouiCOM.Matrix)oForm.Items.Item("mtTypePRO").Specific; cbAT = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbAT").Specific; cbAC = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbAC").Specific; txQtyT = (SAPbouiCOM.EditText)oForm.Items.Item("29").Specific; txSupplier = (SAPbouiCOM.EditText)oForm.Items.Item("47").Specific; chSO = (SAPbouiCOM.CheckBox)oForm.Items.Item("chSO").Specific; chPRO = (SAPbouiCOM.CheckBox)oForm.Items.Item("crRPRO").Specific; dtHead.Rows.Add(1); dtHead.SetValue("DocDate", 0, DateTime.Now); dtHead.SetValue("PoDate", 0, DateTime.Now); dtHead.SetValue("stDate", 0, DateTime.Now.AddDays(1)); dtHead.SetValue("eDate", 0, DateTime.Now.AddDays(4)); oForm.Freeze(false); fillCB(); txQtyT.Item.Enabled = false; oForm.PaneLevel = 4; tab4.Select(); isForLoading = false; fillPO(); mtProd.Item.Visible = false; fillAThash(); RefreshForm(); }
private void InitiallizeForm() { oForm.Freeze(true); initiallizing = true; dtNote = oForm.DataSources.DataTables.Item("dtNote"); dtDetail = oForm.DataSources.DataTables.Item("dtDetail"); dtHead = oForm.DataSources.DataTables.Item("dtHead"); dtHead.Rows.Add(1); mtNote = (SAPbouiCOM.Matrix)oForm.Items.Item("mtNote").Specific; mtDetail = (SAPbouiCOM.Matrix)oForm.Items.Item("mtDetail").Specific; cbNote = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbNote").Specific; cbValOf = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbValOf").Specific; cbCS = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbCS").Specific; cbPRJ = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbPRJ").Specific; txCell = (SAPbouiCOM.EditText)oForm.Items.Item("txCell").Specific; txTxt = (SAPbouiCOM.EditText)oForm.Items.Item("txTxt").Specific; txHCD = (SAPbouiCOM.EditText)oForm.Items.Item("26").Specific; btAddAcct = (SAPbouiCOM.Button)oForm.Items.Item("btAddAcct").Specific; btAddFV = (SAPbouiCOM.Button)oForm.Items.Item("btAddFV").Specific; btAddTXT = (SAPbouiCOM.Button)oForm.Items.Item("btAddTXT").Specific; btRemove = (SAPbouiCOM.Button)oForm.Items.Item("btRemove").Specific; txFV = (SAPbouiCOM.EditText)oForm.Items.Item("txFV").Specific; fillCb(); cbValOf.ValidValues.Add("01", "Closing"); cbValOf.ValidValues.Add("02", "Change"); cbValOf.ValidValues.Add("03", "Opening"); cbNote.Select(0, SAPbouiCOM.BoSearchKey.psk_Index); cflAcct = (SAPbouiCOM.ChooseFromList)oForm.ChooseFromLists.Item("cflAcct"); SAPbouiCOM.Conditions oCons = cflAcct.GetConditions(); SAPbouiCOM.Condition oCon = oCons.Add(); oCon.Alias = "Postable"; oCon.Operation = SAPbouiCOM.BoConditionOperation.co_START; oCon.CondVal = "Y"; cflAcct.SetConditions(oCons); oForm.Freeze(false); initiallizing = false; }
private void AfterCFL(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; __Form = __app.Forms.GetForm(pVal.FormTypeEx, pVal.FormTypeCount); try { if (pVal.ItemUID == "Item_0") { SAPbouiCOM.EditText BPCode = (SAPbouiCOM.EditText)__Form.Items.Item("Item_0").Specific; SAPbouiCOM.IChooseFromListEvent chl = (SAPbouiCOM.IChooseFromListEvent)pVal; SAPbouiCOM.ChooseFromList oCFL = null; string cflID = chl.ChooseFromListUID; oCFL = __Form.ChooseFromLists.Item(cflID); SAPbouiCOM.DataTable dTable = chl.SelectedObjects; if (dTable != null) { try { BPCode.String = dTable.GetValue("CardCode", 0); __Form.Items.Item("Item_1").Click(SAPbouiCOM.BoCellClickType.ct_Regular); } catch (Exception ex) { __Form.Items.Item("Item_1").Click(SAPbouiCOM.BoCellClickType.ct_Regular); } } } } catch (SqlException e) { __app.MessageBox(e.Message, 1, "Ok", "", ""); BubbleEvent = false; } catch (COMException e) { __app.MessageBox(e.Message, 1, "Ok", "", ""); BubbleEvent = false; } catch (Exception e) { __app.MessageBox(e.Message, 1, "Ok", "", ""); BubbleEvent = false; } }
public void GetCFL_M1_EDIT(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent, string UDSID, string CFLID) { BubbleEvent = true; if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST) { SAPbouiCOM.IChooseFromListEvent oCFLEvento = null; oCFLEvento = ((SAPbouiCOM.IChooseFromListEvent)(pVal)); string sCFL_ID = null; sCFL_ID = oCFLEvento.ChooseFromListUID; SAPbouiCOM.Form oForm = null; oForm = SubMain.SBO_Application.Forms.Item(FormUID); SAPbouiCOM.ChooseFromList oCFL = null; oCFL = oForm.ChooseFromLists.Item(sCFL_ID); if (oCFLEvento.BeforeAction == false) { SAPbouiCOM.DataTable oDataTable = null; oDataTable = oCFLEvento.SelectedObjects; string val = null; try { val = System.Convert.ToString(oDataTable.GetValue(0, 0)); } catch (Exception ex) { } try { if (pVal.ItemUID == UDSID) { if (CFLID == "4") { ((SAPbouiCOM.EditText)m1.Columns.Item(pVal.ColUID).Cells.Item(pVal.Row).Specific).String = val; } } } catch (Exception ex) { //SubMain.MessageBox(ex.Message); } } } if ((FormUID == CFLID) & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_UNLOAD)) { System.Windows.Forms.Application.Exit(); } }
public static string GetCFL_value(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent, string ItemUID, string CFLID) { string ret = ""; BubbleEvent = true; if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST) { SAPbouiCOM.IChooseFromListEvent oCFLEvento = null; oCFLEvento = ((SAPbouiCOM.IChooseFromListEvent)(pVal)); string sCFL_ID = null; sCFL_ID = oCFLEvento.ChooseFromListUID; SAPbouiCOM.Form oForm = null; oForm = SBO_Application.Forms.Item(FormUID); SAPbouiCOM.ChooseFromList oCFL = null; oCFL = oForm.ChooseFromLists.Item(sCFL_ID); if (oCFLEvento.BeforeAction == false) { SAPbouiCOM.DataTable oDataTable = null; oDataTable = oCFLEvento.SelectedObjects; string val = null; try { val = System.Convert.ToString(oDataTable.GetValue(0, 0)); } catch (Exception ex) { } try { if (pVal.ItemUID == ItemUID) { ret = val; } } catch (Exception ex) { SubMain.MessageBox(ex.Message); } } } if ((FormUID == CFLID) & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_UNLOAD)) { System.Windows.Forms.Application.Exit(); } return(ret); }
private void mtxItems_ChooseFromListBefore(object sboObject, SAPbouiCOM.SBOItemEventArg pVal, out bool BubbleEvent) { try { if (pVal.ColUID.Equals("FromWhs")) { SAPbouiCOM.ChooseFromList cfl = this.UIAPIRawForm.ChooseFromLists.Item("cflWH") as SAPbouiCOM.ChooseFromList; var itemCode = mtxItems.GetCellValue("to_Item", pVal.Row).ToString(); var itmWareHouses = B1Helper.GetWhsInfoPerItem(itemCode); var oConditions = Application.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_Conditions) as SAPbouiCOM.Conditions; for (int i = 0; i < itmWareHouses.Count; i++) { var oCondition = oConditions.Add(); oCondition.Alias = "WhsCode"; oCondition.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; oCondition.CondVal = itmWareHouses[i].WhsCode; if (i + 1 != itmWareHouses.Count) { oCondition.Relationship = SAPbouiCOM.BoConditionRelationship.cr_OR; } } if (itmWareHouses.Count == 0) { var oCondition = oConditions.Add(); oCondition.Alias = "WhsCode"; oCondition.CondVal = string.Empty; } cfl.SetConditions(oConditions); } BubbleEvent = true; mtxItems.FlushToDataSource(); } catch (Exception ex) { Utilities.LogException(ex); BubbleEvent = false; } }
private void InitiallizeForm() { oForm.Freeze(true); initiallizing = true; BOQD = oForm.DataSources.DataTables.Item("BOQD"); BOQH = oForm.DataSources.DataTables.Item("BOQH"); BOQID = oForm.DataSources.DataTables.Item("BOQID"); BOQH.Rows.Add(1); mtIC = (SAPbouiCOM.Matrix)oForm.Items.Item("mtIC").Specific; mtDC = (SAPbouiCOM.Matrix)oForm.Items.Item("mtDC").Specific; SAPbouiCOM.Column col = mtDC.Columns.Item("cType"); col.ValidValues.Add("S", "Service"); col.ValidValues.Add("I", "Item"); col.DisplayDesc = true; txCode = (SAPbouiCOM.EditText)oForm.Items.Item("txCode").Specific; txName = (SAPbouiCOM.EditText)oForm.Items.Item("txName").Specific; txDCB = (SAPbouiCOM.EditText)oForm.Items.Item("txDCB").Specific; txICB = (SAPbouiCOM.EditText)oForm.Items.Item("txICB").Specific; txTCB = (SAPbouiCOM.EditText)oForm.Items.Item("txTCB").Specific; txDCA = (SAPbouiCOM.EditText)oForm.Items.Item("txDCA").Specific; cbRule = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbRule").Specific; txACode = (SAPbouiCOM.EditText)oForm.Items.Item("txACode").Specific; txAName = (SAPbouiCOM.EditText)oForm.Items.Item("txAName").Specific; txRemarks = (SAPbouiCOM.EditText)oForm.Items.Item("txRemarks").Specific; cflOitm = (SAPbouiCOM.ChooseFromList)oForm.ChooseFromLists.Item("cflOitm"); cmdDR = (SAPbouiCOM.Button)oForm.Items.Item("cmdDR").Specific; SAPbouiCOM.Conditions oCons = cflOitm.GetConditions(); SAPbouiCOM.Condition oCon = oCons.Add(); oCon.Alias = "ItemType"; oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; oCon.CondVal = "F"; cflOitm.SetConditions(oCons); fillCB(); oForm.Freeze(false); initiallizing = false; }
private void cflcardcode(SAPbouiCOM.ChooseFromList oCFL, string uID) { try { SAPbouiCOM.Conditions oCons; SAPbouiCOM.Condition oCon; oCons = oCFL.GetConditions(); oCon = oCons.Add(); oCon.Alias = "CardType"; oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; oCon.CondVal = "S"; oCFL.SetConditions(oCons); } catch (Exception ex) { // MsgBox(Err.Description) } }
public void crearChooseFromList() { SAPbouiCOM.ChooseFromList oCfl = null; SAPbouiCOM.Conditions oCons = null; SAPbouiCOM.Condition oCon = null; try { // se carga el objeto con la data del cfl que se utilizara // este se encuentra en la forma que se cargo del xml // codigo del suplidor oCfl = (SAPbouiCOM.ChooseFromList)forma.ChooseFromLists.Item("cflCodProv"); oCons = oCfl.GetConditions(); oCon = oCons.Add(); // se toma este alias como el campo que se utilizara para // filtrar la info oCon.Alias = "CardType"; // en este caso la info del campo cardtype debe ser igual para // que se muestre la data oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; // el valor de la condicion debe se S que significa del tipo suplidor oCon.CondVal = "S"; // se asignan las condiciones al cfl oCfl.SetConditions(oCons); //nombre del suplidor oCfl = (SAPbouiCOM.ChooseFromList)forma.ChooseFromLists.Item("cflNmbProv"); oCons = oCfl.GetConditions(); oCon = oCons.Add(); oCon.Alias = "CardType"; oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; oCon.CondVal = "S"; oCfl.SetConditions(oCons); } catch (Exception e) { app.StatusBar.SetText("solicitud_method_crearChooseFromList " + e.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); } }
private void AddConditionClientCFL(SAPbouiCOM.ChooseFromList pCFL) { SAPbouiCOM.Condition lObjCon = null; SAPbouiCOM.Conditions lObjCons = new SAPbouiCOM.Conditions(); lObjCon = lObjCons.Add(); lObjCon.Alias = "CardType"; lObjCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; lObjCon.CondVal = "C"; lObjCon.Relationship = SAPbouiCOM.BoConditionRelationship.cr_AND; lObjCon = lObjCons.Add(); lObjCon.Alias = "validFor"; lObjCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; lObjCon.CondVal = "Y"; pCFL.SetConditions(lObjCons); }
private void AddConditionSupervisorCFL(SAPbouiCOM.ChooseFromList pCFL) { SAPbouiCOM.Condition lObjCon = null; SAPbouiCOM.Conditions lObjCons = new SAPbouiCOM.Conditions(); lObjCon = lObjCons.Add(); lObjCon.Alias = "position"; lObjCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; lObjCon.CondVal = "4"; lObjCon.Relationship = SAPbouiCOM.BoConditionRelationship.cr_AND; lObjCon = lObjCons.Add(); lObjCon.Alias = "dept"; lObjCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; lObjCon.CondVal = "12"; pCFL.SetConditions(lObjCons); }
private void AddConditionAccountCFL(SAPbouiCOM.ChooseFromList pCFL) { // SAPbouiCOM.Condition lObjCon = null; // SAPbouiCOM.Conditions lObjCons = new SAPbouiCOM.Conditions(); //lObjCon = lObjCons.Add(); //lObjCon.Alias = "position"; //lObjCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; //lObjCon.CondVal = "4"; //lObjCon.Relationship = SAPbouiCOM.BoConditionRelationship.cr_AND; //lObjCon = lObjCons.Add(); //lObjCon.Alias = "dept"; //lObjCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; //lObjCon.CondVal = "12"; //pCFL.SetConditions(lObjCons); }
private void ChosFrmList_Before(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; __Form = __app.Forms.GetForm(pVal.FormTypeEx, pVal.FormTypeCount); try { if (pVal.ItemUID == "Item_0") { SAPbouiCOM.IChooseFromListEvent chl = (SAPbouiCOM.IChooseFromListEvent)pVal; SAPbouiCOM.ChooseFromList oCFL = null; string cflID = chl.ChooseFromListUID; oCFL = __Form.ChooseFromLists.Item(cflID); oCFL.SetConditions(null); SAPbouiCOM.Conditions oCons = oCFL.GetConditions(); SAPbouiCOM.Condition c = null; c = oCons.Add(); c.BracketOpenNum = 1; c.Alias = "CardType"; c.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; c.CondVal = "C"; c.BracketCloseNum = 1; oCFL.SetConditions(oCons); } } catch (SqlException e) { __app.SetStatusBarMessage(e + "...", SAPbouiCOM.BoMessageTime.bmt_Medium, true); BubbleEvent = false; } catch (COMException e) { __app.SetStatusBarMessage(e + "...", SAPbouiCOM.BoMessageTime.bmt_Medium, true); BubbleEvent = false; } catch (Exception e) { __app.SetStatusBarMessage(e + "...", SAPbouiCOM.BoMessageTime.bmt_Medium, true); BubbleEvent = false; } }
private void InitiallizeForm() { Program.objHrmsUI.loadSettings(); oForm.Freeze(true); dtHead = oForm.DataSources.DataTables.Item("dtHead"); dtSetting = oForm.DataSources.DataTables.Item("dtSetting"); dtSetting.Rows.Add(1); mtAddon = (SAPbouiCOM.Matrix)oForm.Items.Item("mtAddon").Specific; txDfltExp = (SAPbouiCOM.EditText)oForm.Items.Item("txDfltExp").Specific; cflDE = oForm.ChooseFromLists.Item("cflDE"); fillAddons(); fillSettings(); filtertocfl(); oForm.Freeze(false); }
public SAPbouiCOM.ChooseFromList InitChooseFromLists(bool pbol, string pStrType, string pStrID, SAPbouiCOM.ChooseFromListCollection pObjCFLs) // { SAPbouiCOM.ChooseFromList lObjoCFL = null; try { SAPbouiCOM.ChooseFromListCreationParams oCFLCreationParams = null; oCFLCreationParams = (SAPbouiCOM.ChooseFromListCreationParams)UIApplication.GetApplication().CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_ChooseFromListCreationParams); oCFLCreationParams.MultiSelection = pbol; oCFLCreationParams.ObjectType = pStrType; oCFLCreationParams.UniqueID = pStrID; lObjoCFL = pObjCFLs.Add(oCFLCreationParams); this.UIAPIRawForm.DataSources.UserDataSources.Add(pStrID, SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 254); } catch (Exception ex) { UIApplication.ShowMessageBox(string.Format("InitCustomerChooseFromListException: {0}", ex.Message)); } return(lObjoCFL); }
public static void AddChooseFromList(SAPbouiCOM.Form frm, string ObjectType, string ParamsID, string ConAlias, string CondVal) { try { SAPbouiCOM.ChooseFromListCollection oCFLs = null; SAPbouiCOM.Conditions oCons = null; SAPbouiCOM.Condition oCon = null; oCFLs = frm.ChooseFromLists; SAPbouiCOM.ChooseFromList oCFL = null; SAPbouiCOM.ChooseFromListCreationParams oCFLCreationParams = null; oCFLCreationParams = ((SAPbouiCOM.ChooseFromListCreationParams)(SubMain.SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_ChooseFromListCreationParams))); // Adding 2 CFL, one for the button and one for the edit text. oCFLCreationParams.MultiSelection = false; oCFLCreationParams.ObjectType = ObjectType; oCFLCreationParams.UniqueID = ParamsID; oCFL = oCFLs.Add(oCFLCreationParams); // Adding Conditions to CFL1 if (ConAlias != "") { oCons = oCFL.GetConditions(); oCon = oCons.Add(); oCon.Alias = ConAlias; oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; oCon.CondVal = CondVal; oCFL.SetConditions(oCons); } //oCFLCreationParams.UniqueID = "CFL2"; //oCust = oCFLs.Add(oCFLCreationParams); } catch (Exception ex) { } }
private void OApplication_ItemEvent(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST /*& pVal.FormType.Equals("CFL1")*/) { SAPbouiCOM.IChooseFromListEvent oCFLEvento = null; oCFLEvento = ((SAPbouiCOM.IChooseFromListEvent)(pVal)); string sCFL_ID = null; sCFL_ID = oCFLEvento.ChooseFromListUID; SAPbouiCOM.ChooseFromList oCFl = null; oCFl = oForm.ChooseFromLists.Item(sCFL_ID); if (oCFLEvento.BeforeAction == false) { SAPbouiCOM.DataTable oDataTable = null; oDataTable = oCFLEvento.SelectedObjects; string val = null; string valN = null; try { val = System.Convert.ToString(oDataTable.GetValue(0, 0)); valN = System.Convert.ToString(oDataTable.GetValue(1, 0)); } catch { } if (pVal.ItemUID.Equals("EditCLF")) { oForm.DataSources.UserDataSources.Item("CLFDS").ValueEx = val; } } } if ((FormUID == "PickerForm") & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_UNLOAD)) { System.Windows.Forms.Application.Exit(); } }
private void AddChooseFromList() { try { SAPbouiCOM.ChooseFromListCollection oCFLs = null; SAPbouiCOM.Conditions oCons = null; SAPbouiCOM.Condition oCon = null; oCFLs = oForm.ChooseFromLists; SAPbouiCOM.ChooseFromList oCFL = null; SAPbouiCOM.ChooseFromListCreationParams oCFLCreationParams = null; oCFLCreationParams = ((SAPbouiCOM.ChooseFromListCreationParams)(SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_ChooseFromListCreationParams))); // Adding 2 CFL, one for the button and one for the edit text. oCFLCreationParams.MultiSelection = false; oCFLCreationParams.ObjectType = "2"; oCFLCreationParams.UniqueID = "CFL1"; oCFL = oCFLs.Add(oCFLCreationParams); // Adding Conditions to CFL1 oCons = oCFL.GetConditions(); oCon = oCons.Add(); oCon.Alias = "CardType"; oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL; oCon.CondVal = "C"; oCFL.SetConditions(oCons); oCFLCreationParams.UniqueID = "CFL2"; oCFL = oCFLs.Add(oCFLCreationParams); } catch { Interaction.MsgBox(Information.Err().Description, (Microsoft.VisualBasic.MsgBoxStyle)(0), null); } }
private void chooseFromListAfterEvent(string FormUID, ref SAPbouiCOM.ItemEvent pValEvent, out bool BubbleEvent) { BubbleEvent = true; if (pValEvent.FormType == 0 && pValEvent.Action_Success == true && pValEvent.Before_Action == false && pValEvent.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST) { SAPbouiCOM.IChooseFromListEvent oCFLEvento = null; oCFLEvento = (SAPbouiCOM.IChooseFromListEvent)pValEvent; string sCFL_ID = null; sCFL_ID = oCFLEvento.ChooseFromListUID; SAPbouiCOM.ChooseFromList oCFL = null; oCFL = this.UIAPIRawForm.ChooseFromLists.Item(sCFL_ID); SAPbouiCOM.DataTable oDataTable = null; oDataTable = oCFLEvento.SelectedObjects; string val = null; try { val = System.Convert.ToString(oDataTable.GetValue(0, 0)); lObjTxtClient.Value = val; } catch (Exception ex) { if (!ex.Message.Contains("Form - Bad Value") && !ex.Message.Contains("Can't set value on item because the item can't get focus.")) { Application.SBO_Application.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); } } finally { } } }
private void SBO_Application_ItemEvent(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent) { BubbleEvent = true; if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST && pVal.FormTypeEx == "U_ApproveJV.BILL_VP") { SAPbouiCOM.IChooseFromListEvent oCFLEvento = null; oCFLEvento = ((SAPbouiCOM.IChooseFromListEvent)(pVal)); string sCFL_ID = null; sCFL_ID = oCFLEvento.ChooseFromListUID; SAPbouiCOM.Form oForm = null; oForm = Application.SBO_Application.Forms.Item(FormUID); SAPbouiCOM.ChooseFromList oCFL = null; oCFL = oForm.ChooseFromLists.Item(sCFL_ID); if (oCFLEvento.BeforeAction == false) { SAPbouiCOM.DataTable oDataTable = null; oDataTable = oCFLEvento.SelectedObjects; BpCode = ""; try { BpCode = System.Convert.ToString(oDataTable.GetValue("CardCode", 0)); } catch (Exception ex) { } if (pVal.ItemUID == "txt_bpcode") { oForm.DataSources.UserDataSources.Item("UD_0").ValueEx = BpCode; } } } if ((FormUID == "CFL1") & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_UNLOAD)) { System.Windows.Forms.Application.Exit(); } }
/// <summary> /// funcion gentiion el uso del ChooseFromList /// </summary> /// <param name="oForm">objeto del formulario</param> /// <param name="pVal">Item Even</param> private static void GestionarSeleccionCFL(SAPbouiCOM.Form oForm, SAPbouiCOM.ItemEvent pVal) { SAPbouiCOM.IChooseFromListEvent oCFLEvento = null; String CflID = string.Empty; SAPbouiCOM.ChooseFromList oCFL = null; SAPbouiCOM.DataTable oDataTable = null; try { oCFLEvento = ((SAPbouiCOM.IChooseFromListEvent)(pVal)); CflID = oCFLEvento.ChooseFromListUID; oCFL = oForm.ChooseFromLists.Item(CflID); oDataTable = oCFLEvento.SelectedObjects; if (oDataTable != null) { SAPbouiCOM.Matrix oMatrix = oForm.Items.Item("MatrixIM").Specific; try { switch (CflID) { case "CFL_ACT": oMatrix.Columns.Item(pVal.ColUID).Cells.Item(pVal.Row).Specific.String = oDataTable.GetValue("AcctCode", 0).ToString(); break; case "CFL_dim1": oMatrix.Columns.Item(pVal.ColUID).Cells.Item(pVal.Row).Specific.String = oDataTable.GetValue("OcrCode", 0).ToString(); break; case "CFL_dim2": oMatrix.Columns.Item(pVal.ColUID).Cells.Item(pVal.Row).Specific.String = oDataTable.GetValue("OcrCode", 0).ToString(); break; case "CFL_dim3": oMatrix.Columns.Item(pVal.ColUID).Cells.Item(pVal.Row).Specific.String = oDataTable.GetValue("OcrCode", 0).ToString(); break; case "CFL_dim4": oMatrix.Columns.Item(pVal.ColUID).Cells.Item(pVal.Row).Specific.String = oDataTable.GetValue("OcrCode", 0).ToString(); break; case "CFL_dim5": oMatrix.Columns.Item(pVal.ColUID).Cells.Item(pVal.Row).Specific.String = oDataTable.GetValue("OcrCode", 0).ToString(); break; default: break; } } catch (Exception ex) { } } } catch (Exception ex) { Conexion_SBO.m_SBO_Appl.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { FuncionesComunes.LiberarObjetoGenerico(oCFLEvento); FuncionesComunes.LiberarObjetoGenerico(oCFL); FuncionesComunes.LiberarObjetoGenerico(oDataTable); } }
/// <summary> /// Fill choose from list. /// </summary> private void LoadChoosesFromList() { SAPbouiCOM.ChooseFromList lObjCFLSup = InitChooseFromLists(false, "1", "CFL_Acct", this.UIAPIRawForm.ChooseFromLists); AddConditionAccountCFL(lObjCFLSup); }