예제 #1
0
파일: B1_Layout.cs 프로젝트: Fun33/code
 public void setLocation(ref SAPbouiCOM.Item oItem, int x, int y)
 {
     oItem.Top    = y * h + (y + 1) * tagH;
     oItem.Left   = x * w + (x + 1) * 5;
     oItem.Height = h;
     oItem.Width  = w;
 }
예제 #2
0
        /// <summary>
        /// Injects the comission button in the form
        /// </summary>
        private void AddComissionButton()
        {
            string lStrMatrixId = "38";
            string lStrTotalId  = "29";

            try
            {
                mObjForm.Freeze(true);
                if (mItmBtnCard == null)
                {
                    mItmBtnCard          = mObjForm.Items.Add("btnBnk", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
                    mItmBtnCard.Top      = mObjForm.Items.Item(lStrMatrixId).Top + 168;
                    mItmBtnCard.Left     = mObjForm.Items.Item(lStrMatrixId).Left;
                    mItmBtnCard.FromPane = 1;
                    mItmBtnCard.ToPane   = 1;
                    mItmBtnCard.Width    = 145;
                    (mItmBtnCard.Specific as SAPbouiCOM.Button).Caption      = "Comisión por pago con tarjeta";
                    (mItmBtnCard.Specific as SAPbouiCOM.Button).ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.mItmBtnCard_ClickBefore);
                }
                mEdtTotal = (mObjForm.Items.Item(lStrTotalId).Specific as SAPbouiCOM.EditText);
                mMtxLines = (mObjForm.Items.Item(lStrMatrixId).Specific as SAPbouiCOM.Matrix);
            }
            finally
            {
                mObjForm.Freeze(false);
            }
        }
예제 #3
0
 private SAPbouiCOM.Item addPaneButton(SAPbouiCOM.Form form, string id, int l, int t, int w, int h, string label, int pane)
 {
     SAPbouiCOM.Item oItem = null;
     try
     {
         oItem = form.Items.Add(id, SAPbouiCOM.BoFormItemTypes.it_BUTTON);
         SAPbouiCOM.Item oItm = form.Items.Item(id);
         oItm.FromPane = pane;
         oItm.ToPane   = pane;
         oItm.Left     = l;
         oItm.Top      = t;
         oItm.Width    = w;
         oItm.Height   = h;
         setButtonCaption(form, id, label);
     }
     catch (Exception)
     {
     }
     finally
     {
         /*
          * try
          * {
          *  if(oItem != null)
          *      System.Runtime.InteropServices.Marshal.ReleaseComObject(oItem);
          *  oItem = null;
          * }
          * catch (Exception) { }
          */
     }
     return(oItem);
 }
예제 #4
0
 public void showFormItem(SAPbouiCOM.Form form, string id, bool bShow)
 {
     SAPbouiCOM.Item item = null;
     try
     {
         item         = form.Items.Item(id);
         item.Visible = bShow;
         if (bShow)
         {
             item.Height = 20;
         }
         else
         {
             item.Height = 0;
         }
     }
     catch (Exception)
     {
     }
     finally
     {
         try
         {
             if (item != null)
             {
                 System.Runtime.InteropServices.Marshal.ReleaseComObject(item);
             }
             item = null;
         }
         catch (Exception) { }
     }
 }
예제 #5
0
파일: B1_UI.cs 프로젝트: Fun33/code
 public void setLocation(ref SAPbouiCOM.Item oItem, int x, int y, int width, int xPlus, int yPlus)
 {
     oItem.Top    = y * 20 + (y + 1) * 5;
     oItem.Left   = x * width + (x + 1) * 5;
     oItem.Height = 20 * yPlus;
     oItem.Width  = width * xPlus;
 }
예제 #6
0
파일: B1_UI.cs 프로젝트: Fun33/code
 public void setLocation(ref SAPbouiCOM.Item oItem, int x, int y)
 {
     oItem.Top    = y * 20 + (y + 1) * 5;
     oItem.Left   = x * 110 + (x + 1) * 5;
     oItem.Height = 20;
     oItem.Width  = 110;
 }
예제 #7
0
파일: B1_UI.cs 프로젝트: Fun33/code
 public void setLocation_Left(SAPbouiCOM.Form oForm, ref SAPbouiCOM.Item oItem, int x)
 {
     oItem.Top    = oForm.Height - 25 - 50;
     oItem.Left   = x * 100 + (x + 1) * 5;
     oItem.Height = 25;
     oItem.Width  = 100;
 }
예제 #8
0
파일: B1_UI.cs 프로젝트: Fun33/code
 public void setLocation(ref SAPbouiCOM.Item oItem, int x, int y, int width)
 {
     oItem.Top    = y * 20 + (y + 1) * 5;
     oItem.Left   = x * width + (x + 1) * 5;
     oItem.Height = 20;
     oItem.Width  = width;
 }
        private void SetTabHorizontal()
        {
            this.oForm.Freeze(true);
            SAPbouiCOM.EditText oEdit = null;
            int t = 0, left = 0, diff = 0, right = 0;

            left  = 1;
            right = 2;
            diff  = 100;
            for (int i = 20; i <= 29; i++)
            {
                oItem = oForm.Items.Item(i.ToString());
                oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
                if (i < 25)
                {
                    oEdit.TabOrder = left + diff;
                    left           = left + 2;
                }
                else
                {
                    oEdit.TabOrder = right + diff;
                    right          = right + 2;
                }
                oEdit.Value = oEdit.TabOrder.ToString();
            }

            SetFocusItem20();
            this.oForm.Freeze(false);
        }
예제 #10
0
파일: B1_UI.cs 프로젝트: Fun33/code
 public void setLocation_Right(SAPbouiCOM.Form oForm, ref SAPbouiCOM.Item oItem, int x)
 {
     oItem.Top    = oForm.Height - 25 - 45;
     oItem.Left   = oForm.Width - 100 - 30;
     oItem.Height = 25;
     oItem.Width  = 100;
 }
        public TabOrder()
        {
            AppHelper.SetApplication(ref this.oApplication);

            string strTmp = "TabOrder.srf";

            UIHelper.LoadFromXML(oApplication, ref strTmp);

            oForm  = oApplication.Forms.Item("frmTab");
            userDS = UserDataSourceHelper.AddUserDataSource(oForm, "OpBtnDS", SAPbouiCOM.BoDataType.dt_SHORT_TEXT, 1);


            oItem         = oForm.Items.Item("optHor");
            oOptionBtnHor = ((SAPbouiCOM.OptionBtn)(oItem.Specific));
            oOptionBtnHor.GroupWith("optVer");
            oOptionBtnHor.DataBind.SetBound(true, "", "OpBtnDS");

            oItem = oForm.Items.Item("optVer");

            oOptionBtnVer = ((SAPbouiCOM.OptionBtn)(oItem.Specific));
            oOptionBtnVer.GroupWith("optHor");
            oOptionBtnVer.DataBind.SetBound(true, "", "OpBtnDS");

            oOptionBtnHor.Selected = true;
            SetTabHorizontal();



            oForm.Visible = true;

            oApplication.ItemEvent += OApplication_ItemEvent;
        }
 private void SetFocusItem20()
 {
     SAPbouiCOM.EditText oEdit = null;
     oItem       = oForm.Items.Item("20");
     oEdit       = ((SAPbouiCOM.EditText)(oItem.Specific));
     oEdit.Value = oEdit.Value;
 }
예제 #13
0
        /// <summary>
        /// Injects the Bonus to the SAP Form.
        /// </summary>
        private void AddBonusButton()
        {
            string lStrCopyId = "10000330";

            mFrmInvoice.Freeze(true);
            try
            {
                if (mItmBtnBonus == null)
                {
                    mItmBtnBonus        = mFrmInvoice.Items.Add("btnBonus", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
                    mItmBtnBonus.Top    = mFrmInvoice.Items.Item(lStrCopyId).Top;
                    mItmBtnBonus.Left   = mFrmInvoice.Items.Item(lStrCopyId).Left - 150;
                    mItmBtnBonus.Width  = 150;
                    mItmBtnBonus.LinkTo = lStrCopyId;
                    (mItmBtnBonus.Specific as SAPbouiCOM.Button).Caption      = "Devolución/Bonificación";
                    (mItmBtnBonus.Specific as SAPbouiCOM.Button).ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.mItmBtnBonus_ClickBefore);
                }
            }
            catch (Exception lObjException)
            {
                LogUtility.WriteError(string.Format("[BonusModal - AddBonusButton] Error al agregar el botón de Bonificacion: {0}", lObjException.Message));
                UIApplication.ShowMessageBox(string.Format("Error al agregar el botón de Bonificación: {0}", lObjException.Message));
            }
            finally
            {
                mFrmInvoice.Freeze(false);
            }
        }
예제 #14
0
        private void desenharCampos()
        {
            oItem = oForm.Items.Item("7");

            oNewItem          = oForm.Items.Add("Ver_Amb", SAPbouiCOM.BoFormItemTypes.it_MATRIX);
            oNewItem.Left     = 25;
            oNewItem.Width    = 880;
            oNewItem.Top      = oItem.Top + 205;
            oNewItem.Height   = 120;
            oNewItem.FromPane = 11;
            oNewItem.ToPane   = 11;

            oMatrix  = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
            oColumns = oMatrix.Columns;

            oColumn = oColumns.Add("Ver_#", SAPbouiCOM.BoFormItemTypes.it_EDIT);
            oColumn.TitleObject.Caption = "#";
            oColumn.Width    = 30;
            oColumn.Editable = false;

            oColumn = oColumns.Add("Ver_Amb_C0", SAPbouiCOM.BoFormItemTypes.it_EDIT);
            oColumn.TitleObject.Caption = "Ambiente";
            oColumn.Width    = 80;
            oColumn.Editable = false;

            oColumn = oColumns.Add("Ver_Amb_C1", SAPbouiCOM.BoFormItemTypes.it_EDIT);
            oColumn.TitleObject.Caption = "Data Verificação";
            oColumn.Width    = 80;
            oColumn.Editable = true;

            /*oColumn = oColumns.Add("Ver_Amb_C2", SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX);
             * oColumn.TitleObject.Caption = "Verificado por";
             * oColumn.Width = 100;
             * oColumn.Editable = true;
             * oColumn.DataBind.SetBound(true, "OPR4", "U_FLX_FB_ENT_PENDENC");*/

            oColumn = oColumns.Add("Ver_Amb_C2", SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX);
            oColumn.TitleObject.Caption = "Verificado por";
            oColumn.Width    = 100;
            oColumn.Editable = true;

            oColumn = oColumns.Add("Ver_Amb_C3", SAPbouiCOM.BoFormItemTypes.it_EDIT);
            oColumn.TitleObject.Caption = "Observações";
            oColumn.Width    = 470;
            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("Ver_Amb_C0");
            oColumn.DataBind.Bind("oMatrixDT", "Descript");

            oColumn = oColumns.Item("Ver_Amb_C1");
            oColumn.DataBind.Bind("oMatrixDT", "U_FLX_FB_VRF_DATEVER");

            oColumn = oColumns.Item("Ver_Amb_C2");
            oColumn.DataBind.Bind("oMatrixDT", "U_FLX_FB_VRF_VERIFPO");

            oColumn = oColumns.Item("Ver_Amb_C3");
            oColumn.DataBind.Bind("oMatrixDT", "U_FLX_FB_VRF_OBS");
        }
예제 #15
0
파일: B1_Layout.cs 프로젝트: Fun33/code
 public void setLocation(ref SAPbouiCOM.Item oItem, int x, int y, int xPlus, int yPlus)
 {
     oItem.Top    = y * h + (y + 1) * tagH;
     oItem.Left   = x * w + (x + 1) * 5;
     oItem.Height = h * yPlus;
     oItem.Width  = w * xPlus;
 }
예제 #16
0
 public static void BtnAddSN(SAPbouiCOM.Form oForm)
 {
     oItem           = oForm.Items.Add("btnAddSN", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
     oItem.Top       = 78;
     oItem.Height    = 20;
     oItem.Width     = 100;
     oItem.Left      = 300;
     oButton         = ((SAPbouiCOM.Button)(oItem.Specific));
     oButton.Caption = "Crear Modo Rapido";
 }
예제 #17
0
 public void AddButtonToForm(SAPbouiCOM.Form form)
 {
     btnOpen       = form.Items.Add("btnOpen", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
     btnOpen.Top   = form.Items.Item("2").Top;
     btnOpen.Left  = (form.Left / 2) + 150;
     btnOpen.Width = 170;
     (btnOpen.Specific as SAPbouiCOM.Button).Caption = "Abrir Tranferencia de Artículos";
     btnOpen.LinkTo = "2";
     (btnOpen.Specific as SAPbouiCOM.Button).ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.BtnOpen_ClickBefore);
 }
예제 #18
0
 public static void BtnCoRuc(SAPbouiCOM.Form oForm)
 {
     oItem           = oForm.Items.Add("btnCRu", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
     oItem.Top       = 55;
     oItem.Height    = 20;
     oItem.Width     = 80;
     oItem.Left      = 300;
     oButton         = ((SAPbouiCOM.Button)(oItem.Specific));
     oButton.Caption = "Consulta RUC";
 }
예제 #19
0
파일: B1_FrmView.cs 프로젝트: Fun33/code
    private void CreateFormBottem()
    {
        SAPbouiCOM.Item   oItem   = default(SAPbouiCOM.Item);
        SAPbouiCOM.Button oButton = default(SAPbouiCOM.Button);


        oItem = oForm.Items.Add("2", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
        oSAP.setLocation_Left(oForm, ref oItem, 0);
        oButton         = (SAPbouiCOM.Button)oItem.Specific;
        oButton.Caption = "關閉";
    }
예제 #20
0
파일: B1_FrmView.cs 프로젝트: Fun33/code
 private void createGrid()
 {
     oDTGrid         = this.oForm.DataSources.DataTables.Add("oDTSub");
     oItem           = oForm.Items.Add("subGrd", SAPbouiCOM.BoFormItemTypes.it_GRID);
     oItem.Height    = 200;
     oItem.Width     = this.oForm.Width - 30;
     oItem.Top       = 5;
     oItem.Left      = 5;
     oGrid           = (SAPbouiCOM.Grid)oItem.Specific;
     oGrid.DataTable = oDTGrid;
 }
예제 #21
0
        private void desenharBotao()
        {
            oNewItem         = oForm.Items.Add("Ata_Ativ", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
            oNewItem.Top     = oForm.Height - 30;
            oNewItem.Width   = 100;
            oNewItem.Left    = oForm.Width - 125;
            oNewItem.Height  = 20;
            oNewItem.Visible = true;
            oButton          = ((SAPbouiCOM.Button)(oNewItem.Specific));
            oButton.Caption  = "Ata de reunião";

            desabilitaBotaoAta();
        }
예제 #22
0
        private void desenharAba()
        {
            oItem = oForm.Items.Item("7");

            oNewItem            = oForm.Items.Add("Projeto2", SAPbouiCOM.BoFormItemTypes.it_FOLDER);
            oNewItem.Top        = oItem.Top;
            oNewItem.Height     = oItem.Height;
            oNewItem.Width      = oItem.Width;
            oNewItem.Left       = oItem.Left + oItem.Width;
            oFolderItem         = ((SAPbouiCOM.Folder)(oNewItem.Specific));
            oFolderItem.Caption = "Móveis (Fases)";
            oFolderItem.GroupWith("7");
        }
 public static bool ItemExists(SAPbouiCOM.Form oForm, string ItemUid)
 {
     try
     {
         SAPbouiCOM.Item oItem = oForm.Items.Item(ItemUid);
     }
     catch
     {
         // item does not exist
         return(false);
     }
     return(true);
 }
예제 #24
0
 public static void stxtDire(SAPbouiCOM.Form oForm)
 {
     oItem               = oForm.Items.Add("stxtDire", SAPbouiCOM.BoFormItemTypes.it_STATIC);
     oItem.Top           = 300;
     oItem.Height        = 20;
     oItem.Width         = 200;
     oItem.Left          = 290;
     oItem.FontSize      = 14;
     oStaticText         = ((SAPbouiCOM.StaticText)(oItem.Specific));
     oStaticText.Caption = "";
     oItem.FromPane      = 7;
     oItem.ToPane        = 7;
 }
예제 #25
0
        /*
         * private void OpenFileDialogFilterAndTitle(string pStrBanking, System.Windows.Forms.OpenFileDialog pBoxDialog)
         * {
         *  switch (pStrBanking)
         *  {
         *      case "BANAMEX":
         *          pBoxDialog.Filter = "Text Files|*.txt";
         *          pBoxDialog.Title = "Selecciona el archivo de Banamex";
         *          break;
         *      case "BANCOMER":
         *          pBoxDialog.Filter = "Text Files|*.xlsx";
         *          pBoxDialog.Title = "Selecciona el archivo de Bancomer";
         *          break;
         *      case "BANORTE":
         *          pBoxDialog.Filter = "Text Files|*.txt";
         *          pBoxDialog.Title = "Selecciona el archivo de Banorte";
         *          break;
         *      case "SANTANDER":
         *          pBoxDialog.Filter = "Text Files|*.csv";
         *          pBoxDialog.Title = "Selecciona el archivo de Santander";
         *          break;
         *      case "SCOTIABANK":
         *          pBoxDialog.Filter = "Text Files|*.txt";
         *          pBoxDialog.Title = "Selecciona el archivo de ScotiaBank";
         *          break;
         *  }
         * }
         */

        private void SBO_Application_ItemEvent(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent)
        {
            BubbleEvent = true;
            try
            {
                if (pVal.FormType == 385 && pVal.EventType != SAPbouiCOM.BoEventTypes.et_FORM_UNLOAD && pVal.Before_Action)
                {
                    SAPbouiCOM.Item lItmLblBanco    = null;
                    SAPbouiCOM.Item lItmBtnImportar = null;
                    SAPbouiCOM.Item lItmCmbBanco    = null;

                    mObjForm = Application.SBO_Application.Forms.GetFormByTypeAndCount(pVal.FormType, pVal.FormTypeCount);

                    if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_LOAD && pVal.Before_Action)
                    {
                        lItmLblBanco    = mObjForm.Items.Add("lblBanco", SAPbouiCOM.BoFormItemTypes.it_STATIC); //Item("lblBanco");
                        lItmBtnImportar = mObjForm.Items.Add("btnImpo", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
                        lItmCmbBanco    = mObjForm.Items.Add("cmbBanco", SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX);

                        //lItmCmbBanco.Top = mObjForm.Items.Item("540002004").Top;
                        //lItmCmbBanco.Left = mObjForm.Items.Item("540002004").Left + 45;

                        lItmLblBanco.Top  = mObjForm.Items.Item("6").Top;
                        lItmLblBanco.Left = mObjForm.Items.Item("6").Left + 40;

                        lItmCmbBanco.Top  = lItmLblBanco.Top + 15;
                        lItmCmbBanco.Left = lItmLblBanco.Left;

                        //lItmLblBanco.Top = lItmCmbBanco.Top -15;
                        //lItmLblBanco.Left = lItmCmbBanco.Left - 25;
                        (lItmLblBanco.Specific as SAPbouiCOM.StaticText).Caption = "Nombre Banco:";

                        lItmBtnImportar.Top  = lItmCmbBanco.Top;
                        lItmBtnImportar.Left = lItmCmbBanco.Left + lItmCmbBanco.Width + 1;
                        (lItmBtnImportar.Specific as SAPbouiCOM.Button).Caption = "Importar";
                        (lItmCmbBanco.Specific as SAPbouiCOM.ComboBox).ValidValues.Add("SELECCIONE", "SELECCIONE");
                        (lItmCmbBanco.Specific as SAPbouiCOM.ComboBox).ValidValues.Add("BANAMEX", "BANAMEX");
                        (lItmCmbBanco.Specific as SAPbouiCOM.ComboBox).ValidValues.Add("BANCOMER", "BANCOMER");
                        (lItmCmbBanco.Specific as SAPbouiCOM.ComboBox).ValidValues.Add("BANORTE", "BANORTE");
                        (lItmCmbBanco.Specific as SAPbouiCOM.ComboBox).ValidValues.Add("SANTANDER", "SANTANDER");
                        (lItmCmbBanco.Specific as SAPbouiCOM.ComboBox).ValidValues.Add("SCOTIABANK", "SCOTIABANK");
                        (lItmCmbBanco.Specific as SAPbouiCOM.ComboBox).Select("SELECCIONE");
                        lItmCmbBanco.DisplayDesc = false;
                    }
                }
            }
            catch (Exception ex)
            {
                Application.SBO_Application.MessageBox(ex.Message);
            }
        }
예제 #26
0
파일: Menu.cs 프로젝트: radtek/UGRS_Full
        public void SBO_Application_MenuEvent(ref SAPbouiCOM.MenuEvent pVal, out bool BubbleEvent)
        {
            BubbleEvent = true;
            try {
                if (pVal.BeforeAction)
                {
                    switch (pVal.MenuUID)
                    {
                    case "UGRS.AddOnFoodPlant.Forms.frmTransfer":
                        frmTransfer ofrmTransfer = new frmTransfer();
                        ShowForm(ofrmTransfer);

                        break;

                    case "UGRS.AddOnFoodPlant.Forms.frmItems":
                        frmItems ofrmItems = new frmItems("0");
                        ShowForm(ofrmItems);
                        break;

                    case "UGRS.AddOnFoodPlant.Forms.frmProcess":
                        frmProcess ofrmProcess = new frmProcess();
                        ShowForm(ofrmProcess);
                        break;
                    }
                }
                if (!pVal.BeforeAction)
                {
                    switch (pVal.MenuUID)
                    {
                    case "3088":

                        SAPbouiCOM.Form form = Application.SBO_Application.Forms.ActiveForm;

                        btnOpen       = form.Items.Add("btnOpen", SAPbouiCOM.BoFormItemTypes.it_BUTTON);
                        btnOpen.Top   = form.Items.Item("2").Top;
                        btnOpen.Left  = (form.Left / 2) + 150;
                        btnOpen.Width = 170;
                        (btnOpen.Specific as SAPbouiCOM.Button).Caption = "Abrir Tranferencia de Artículos";
                        btnOpen.LinkTo = "2";
                        (btnOpen.Specific as SAPbouiCOM.Button).ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.BtnOpen_ClickBefore);
                        //SetFilters();
                        break;
                    }
                }
            }
            catch (Exception ex) {
                Application.SBO_Application.MessageBox(ex.ToString(), 1, "Ok", "", "");
            }
        }
예제 #27
0
 private void addLabel(SAPbouiCOM.Form form, string id, int l, int t, int w, int h, string label)
 {
     try
     {
         form.Items.Add(id, SAPbouiCOM.BoFormItemTypes.it_STATIC);
         SAPbouiCOM.Item oItm = form.Items.Item(id);
         oItm.Left   = l;
         oItm.Top    = t;
         oItm.Width  = w;
         oItm.Height = h;
         setLabelCaption(form, id, label);
     }catch (Exception)
     {
     }
 }
        private void SetTabBertical()
        {
            this.oForm.Freeze(true);
            SAPbouiCOM.EditText oEdit = null;
            int diff = 50;

            for (int i = 20; i <= 29; i++)
            {
                oItem          = oForm.Items.Item(i.ToString());
                oEdit          = ((SAPbouiCOM.EditText)(oItem.Specific));
                oEdit.TabOrder = i + diff;
                oEdit.Value    = oEdit.TabOrder.ToString();
            }
            SetFocusItem20();
            this.oForm.Freeze(false);
        }
예제 #29
0
        private void Button3_ClickBefore(object sboObject, SAPbouiCOM.SBOItemEventArg pVal, out bool BubbleEvent)
        {
            BubbleEvent = true;

            oForm = oApp.Forms.Item("seccform");
            //  Muestra el formulario
            //oForm.Visible = true;
            //busca la grilla con el UID

            oitem = oForm.Items.Item("GR_SECC");
            //Grid0 = ((SAPbouiCOM.Grid)(oitem.Specific));
            // ejecuta la query
            oForm.DataSources.DataTables.Item(0).ExecuteQuery("SELECT T0.U_CodigoSEC AS 'CÓDIGO',T0.U_NombreSEC AS 'NOMBRE',T1.U_NombreSS AS [SUPRA-SECCIÓN] ,T0.U_PrecioSEC AS 'PRECIO' FROM [@SECCIONESCOL] AS T0 LEFT JOIN [@SUPRASECCIONESCOL] AS T1 ON T0.U_SupraSeccionSEC=T1.U_CodigoSS ");
            Grid0.DataTable = oForm.DataSources.DataTables.Item("DT_SECC");
            RowNumberGrid(Grid0);
        }
예제 #30
0
        public void grBusVlr()
        {
            SAPbobsCOM.Recordset oRecordset1 = ((SAPbobsCOM.Recordset)(oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset)));

            oitem = oForm.Items.Item("grdpy");
            oGrid = ((SAPbouiCOM.Grid)(oitem.Specific));
            string vlGrilla = null;

            string Sql10 = "select t0.PayMethCod as 'grcode',t1.Cardcode as 'cod' from OPYM as t0  left join  ocrd as t1 on t0.PayMethCod= t1.pymcode  where t1.cardcode='" + EditText0.Value.ToString() + "'";

            oRecordset1.DoQuery(Sql10);
            string Extraerdequery10 = oRecordset1.Fields.Item("grcode").Value.ToString();

            vlGrilla = Extraerdequery10;
            oForm.DataSources.DataTables.Item("grPagdt");
            oForm.DataSources.DataTables.Item(0).ExecuteQuery("SELECT distinct t0.PayMethCod AS 'Código',t0.Descript as' Descripción',t0.Active as 'Activo'  from OPYM  as t0 left join  ocrd as t1  on t0.PayMethCod= t1.pymcode where t0.type='O' ");
            //oGrid.DataTable = oForm.DataSources.DataTables.Item("grPagdt2");
            oGrid.Columns.Item("Activo").Type = SAPbouiCOM.BoGridColumnType.gct_CheckBox;
            //para agregar el link buton a la grilla
            oGrid.Columns.Item("Código").Type = SAPbouiCOM.BoGridColumnType.gct_EditText;
            SAPbouiCOM.EditTextColumn oEdit = (SAPbouiCOM.EditTextColumn)oGrid.Columns.Item("Código");
            oEdit.LinkedObjectType = "147";

            //oCBC.ValidValues.Add(oRec.Fields.Item(0).Value.ToString(), oRec.Fields.Item(1).Value.ToString());
            //algo parecido a lo que hace el boto de fijar metodo, lo hago aca para que el viejaSel no sea -1 y pueda sacar la linea en negrita
            //string valor = (string)oGrid.DataTable.GetValue("Código", 2); esto es para saber lo que lleva una linea en especifico
            for (int iRows = 0; iRows <= oGrid.Rows.Count - 1; iRows++)
            {
                if ((string)oGrid.DataTable.GetValue("Código", iRows) == vlGrilla)
                {
                    if (viejaSel != -1)
                    {
                        oGrid.CommonSetting.SetRowFontStyle(viejaSel, SAPbouiCOM.BoFontStyle.fs_Plain);
                    }

                    oGrid.CommonSetting.SetRowFontStyle(iRows + 1, SAPbouiCOM.BoFontStyle.fs_Bold);
                    viejaSel = iRows + 1;
                }
            }


            // Extraerdequery1 = Convert.ToString(Grid2.Columns.Item("Descripción"));



            //}
        }
예제 #31
0
        private void SBO_Application_DataEvent(ref SAPbouiCOM.BusinessObjectInfo pVal, out bool BubbleEvent)
        {
            BubbleEvent = true;

            if ((pVal.FormTypeEx == "320" & pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_DATA_LOAD) & (pVal.BeforeAction == false))
            {
                string idOOPR = ((SAPbouiCOM.EditText)oForm.Items.Item("74").Specific).Value;
                ambiente = new Ambiente(idOOPR);
                projetista = new Projetista(idOOPR);
                projetistas = projetista.getProjetistas();

                if (ambiente.possuiAmbientesCadastrados())
                {
                    //Seta todas a Matrizes para carregar os ambientes cadastrados.
                    LoadAmbientesInMatrix();
                    oMatrix.LoadFromDataSource();
                }

                //Grids com Tabela de Usuário - Inclui o select em um datatable e seta este datatable para a matriz específica.
                idAmbiente = 1000;
                iRowAmbiente = 1000;
                iIdAmbienteMedicao = 1000;
                idAmbientePendencia = 1000;
                LoadGridConferenciaMedicao();
                LoadGridAvarias();
                LoadGridPendencias();
                LoadGridItensComplementares();

                //Limpa a variável que pega o id do ambiente selecionado e carrega a grid de analise critica com parâmetro idAmbiente = 0
                LoadGridAnaliseCritica();

                /**** INÍCIO - CARREGAMENTO DE COMBOS *******/

                loadCombo("Ent_Amb", ambiente.getAmbientes());

                oEditItem = ((SAPbouiCOM.EditText)oForm.Items.Item("Ent_Det").Specific);
                string selectedValue = ((SAPbouiCOM.ComboBox)oForm.Items.Item("Ent_Amb").Specific).Value;
                oEditItem.Value = ambiente.getDescricaoEntrevista(selectedValue);

                //Apresentação - Pega o valor cadastrado na drop de projetistas, lista o nome e todos os projetistas.
                loadCombo("Apr_Proj", projetistas);
                //Entrevista - Pega o valor cadastrado na drop de projetistas, lista o nome e todos os projetistas.
                loadCombo("Ent_Proj", projetistas);
                //Medição - Pega o valor cadastrado na drop de projetistas, lista o nome e todos os projetistas.
                loadCombo("Med_Proj", projetistas);

                if (ambiente.possuiAmbientesCadastrados())
                {
                    //Projetistas - Grid Elaboração
                    loadComboEmGrid("Ela_Amb", "Ela_Amb_C2", projetistas);
                    //Projetistas - Grid Detalhamento
                    loadComboEmGrid("Det_Amb", "Det_Amb_C2", projetistas);
                    //Projetistas - Grid Verificação
                    loadComboEmGrid("Ver_Amb", "Ver_Amb_C2", projetistas);
                    //Projetistas - Grid Aprovação
                    loadComboEmGrid("Apv_Amb", "Apv_Amb_C1", projetistas);
                    //Projetistas - Grid Pedido
                    loadComboEmGrid("Ped_Amb", "Ped_Amb_C5", projetistas);
                    //Projetistas - Grid Fabrica
                    loadComboEmGrid("Fab_Amb", "Fab_Amb_C3", projetistas);
                    //Projetistas - Grid Montagem
                    loadComboEmGrid("Mon_Amb", "Mon_Amb_C1", projetistas);
                    //Projetistas - Grid Entrega
                    loadComboEmGrid("Etg_Amb", "Etg_Amb_C2", projetistas);
                }
                /**** FIM - CARREGAMENTO DE COMBOS *******/

                oNewItem = oForm.Items.Item("Apr_Proj");
                oComboItenPrjApr = ((SAPbouiCOM.ComboBox)(oNewItem.Specific));

                //Entrevista - Pega o valor cadastrado na drop de projetistas, lista o nome e todos os projetistas.
                oNewItem = oForm.Items.Item("Ent_Proj");
                oComboItenPrjEntrevista = ((SAPbouiCOM.ComboBox)(oNewItem.Specific));

                //Medição - Pega o valor cadastrado na drop de projetistas, lista o nome e todos os projetistas.
                oNewItem = oForm.Items.Item("Med_Proj");
                oComboItenPrjMed = ((SAPbouiCOM.ComboBox)(oNewItem.Specific));

                //LoadComboProjetistaCadastradoElaboracao(idOOPR);
                LoadComboProjetistaCadastradoOOPR(oComboItenPrjEntrevista, oComboItenPrjMed, oComboItenPrjApr, idOOPR);

                ContarLinhasIniciaisMatrix();
                resumo.disableCampos();
                PreencherCamposResumo(idOOPR);
            }

            if (pVal.FormTypeEx == "651" & pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_DATA_LOAD & !pVal.BeforeAction)
            {
                if (oFormAtual.Items.Item("67").Specific.Value == "M")
                {
                    atividade.habilitaBotaoAta();
                }
                else
                {
                    atividade.desabilitaBotaoAta();
                }
            }
        }
예제 #32
0
        private void SBO_Application_ItemEvent(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent)
        {
            SAPbouiCOM.BoEventTypes EventEnum = 0;
            EventEnum = pVal.EventType;
            BubbleEvent = true;

            if (pVal.FormType == 320)
            {
                if ((pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED) & (!pVal.Before_Action))
                {
                    //Laudo_Ini
                    if (pVal.ItemUID == "Laudo_Ini")
                    {
                        abrirRelatorio("Laudo inicial", oForm.Items.Item("74").Specific.Value);
                    }

                    //Ent_Imp
                    if (pVal.ItemUID == "Ent_Imp")
                    {
                        abrirRelatorio("Descricao dos ambientes", oForm.Items.Item("74").Specific.Value);
                    }

                    //Laudo_Int
                    if (pVal.ItemUID == "Laudo_Int")
                    {
                        abrirRelatorio("Laudo intermediario", oForm.Items.Item("74").Specific.Value);
                    }
                    //NvAnalise
                    if (pVal.ItemUID == "NvAnalise")
                    {
                        abrirRelatorio("Analise critica", oForm.Items.Item("74").Specific.Value);
                    }
                    //Laudo_ent
                    if (pVal.ItemUID == "Laudo_Ent")
                    {
                        abrirRelatorio("Laudo de entrega", oForm.Items.Item("74").Specific.Value);
                    }
                    //Pesquisa de satisfacao
                    if (pVal.ItemUID == "Etg_Pq")
                    {
                        abrirRelatorio("Pesquisa de satisfacao", oForm.Items.Item("74").Specific.Value);
                    }
                    //NvLev
                    if (pVal.ItemUID == "NvLev")
                    {
                        abrirRelatorio("Levantamento", "");
                    }
                    //Etg_Decl
                    if (pVal.ItemUID == "Etg_Decl")
                    {
                        abrirRelatorio("Declaracao de conformidade", oForm.Items.Item("74").Specific.Value);
                    }

                }

                // Ao mudar o ambiente
                if (pVal.Before_Action && (EventEnum == SAPbouiCOM.BoEventTypes.et_COMBO_SELECT) && pVal.ItemUID == "Ent_Amb" && pVal.ItemChanged)
                {
                    // Verifica a descricao de Ent_Det se mudou e captura
                    oEditItem = ((SAPbouiCOM.EditText)oForm.Items.Item("Ent_Det").Specific);
                    string sEnt_Det = oEditItem.String;
                    try
                    {
                        if (sEnt_Det != sDescricaoOriginalAmbiente)
                        {
                            int idOOPR = int.Parse(((SAPbouiCOM.EditText)oForm.Items.Item("74").Specific).Value);
                            string selectedValue = ((SAPbouiCOM.ComboBox)oForm.Items.Item("Ent_Amb").Specific).Value;
                            int iSelectedValue;
                            if (selectedValue != "")
                            {
                                iSelectedValue = int.Parse(selectedValue);
                                // Atualiza a Descrição na Oportunidade de Vendas
                                AddOportunidadeVendas(idOOPR, "0", "0", "0", iSelectedValue, sEnt_Det);
                            }
                        }
                    }
                    catch
                    {
                    }
                }

                if (!pVal.Before_Action && (EventEnum == SAPbouiCOM.BoEventTypes.et_COMBO_SELECT) && pVal.ItemUID == "Ent_Amb" && pVal.ItemChanged)
                {
                    oEditItem = ((SAPbouiCOM.EditText)oForm.Items.Item("Ent_Det").Specific);

                    string idOOPR = ((SAPbouiCOM.EditText)oForm.Items.Item("74").Specific).Value;
                    string selectedValue = ((SAPbouiCOM.ComboBox)oForm.Items.Item("Ent_Amb").Specific).Value;

                    ambiente = new Ambiente(idOOPR);
                    oEditItem.Value = ambiente.getDescricaoEntrevista(selectedValue);
                }

                //Evento da Drop.

                if (!pVal.Before_Action && (EventEnum == SAPbouiCOM.BoEventTypes.et_COMBO_SELECT) & pVal.ItemChanged & (pVal.ItemUID == "Ela_Amb"))
                {
                    string coluna2 = pVal.ColUID;
                    if (coluna2 == "Ela_Amb_C2")
                    {
                        string linha = pVal.Row.ToString();
                    }
                }

                if (!pVal.Before_Action && (EventEnum == SAPbouiCOM.BoEventTypes.et_COMBO_SELECT) & pVal.ItemChanged & (pVal.ItemUID == "Ent_Proj"))
                {
                    upProjEnt = true;
                    //SBO_Application.MessageBox("Mudou Proj Entrevista.");
                }
                if (!pVal.Before_Action && (EventEnum == SAPbouiCOM.BoEventTypes.et_COMBO_SELECT) & pVal.ItemChanged & (pVal.ItemUID == "Med_Proj"))
                {
                    upProjMed = true;
                    //SBO_Application.MessageBox("Mudou Proj Medição.");
                }
                if (!pVal.Before_Action && (EventEnum == SAPbouiCOM.BoEventTypes.et_COMBO_SELECT) & pVal.ItemChanged & (pVal.ItemUID == "Apr_Proj"))
                {
                    upProjAps = true;
                    //SBO_Application.MessageBox("Mudou Proj Apresentação.");
                }
                if (!pVal.Before_Action && (EventEnum == SAPbouiCOM.BoEventTypes.et_COMBO_SELECT) & pVal.ItemChanged & (pVal.ItemUID == "Ent_Amb"))
                {
                    upEtvAmb = true;
                    //SBO_Application.MessageBox("Mudou Combo de Ambiente");
                }

                //Abre tela de Atividades.
                if (((pVal.ItemUID == "Ent_Age") & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED) & (pVal.Before_Action == false)))
                {
                    bBotaoAgendarFoiClicado = true;
                    SBO_Application.ActivateMenuItem("2563");
                }

                //Abre tela de Atividades.
                if (((pVal.ItemUID == "Med_Age") & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED) & (pVal.Before_Action == false)))
                {
                    bBotaoAgendarFoiClicado = true;
                    SBO_Application.ActivateMenuItem("2563");
                }

                //Clique do Botão Atualizar
                if (((pVal.ItemUID == "1") & (pVal.FormMode == 1) & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED) & (pVal.Before_Action == false)))
                {
                    if (ambiente.possuiAmbientesCadastrados())
                    {
                       Atualizar();
                    }
                }

                //Criar os campos do formulario.
                if (pVal.Before_Action && pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_LOAD)
                {
                    oForm = SBO_Application.Forms.GetFormByTypeAndCount(pVal.FormType, pVal.FormTypeCount);

                    AddItemsToForm();

                    oForm.Resize(300, 130);// (132, 100);

                    resumo = new Resumo(oForm);
                    fases = new Fases(oForm);
                }

                //Evento do Clique da aba Resumo.
                if (pVal.ItemUID == "Projeto1" & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED || pVal.EventType == SAPbouiCOM.BoEventTypes.et_CLICK) & pVal.Before_Action)
                {
                    resumo.disableCampos();
                    oForm.PaneLevel = 8;
                }

                //Evento do Clique da aba Fases.
                if (pVal.ItemUID == "Projeto2" & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED || pVal.EventType == SAPbouiCOM.BoEventTypes.et_CLICK) & pVal.Before_Action)
                {
                    oForm.PaneLevel = 9;
                }

                int panel = 9;
                if (pVal.ItemUID.StartsWith("Folder") & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED || pVal.EventType == SAPbouiCOM.BoEventTypes.et_CLICK) & pVal.Before_Action)
                {
                    switch (pVal.ItemUID)
                    {
                        case "Folder1": panel = 9;
                            break;
                        case "Folder2": panel = 10;
                            break;
                        case "Folder3": panel = 11;
                            break;
                        case "Folder4": panel = 12;
                            break;
                        case "Folder5": panel = 13;
                            break;
                        case "Folder6": panel = 14;
                            break;
                        case "Folder7": panel = 15;
                            break;
                        case "Folder8": panel = 16;
                            break;
                        case "Folder9": panel = 17;
                            break;
                    }

                    oForm.PaneLevel = panel;
                }

                if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST)
                {
                    SAPbouiCOM.IChooseFromListEvent oCFLEvento = ((SAPbouiCOM.IChooseFromListEvent)(pVal));
                    string sCFL_ID = oCFLEvento.ChooseFromListUID;
                    SAPbouiCOM.Form oForm = SBO_Application.Forms.Item(FormUID);
                    SAPbouiCOM.ChooseFromList oCFL = oForm.ChooseFromLists.Item(sCFL_ID);

                    if (oCFLEvento.BeforeAction == false && sCFL_ID == "CFL1")
                    {
                        SAPbouiCOM.DataTable oDataTable = oCFLEvento.SelectedObjects;
                        string valItemName = null;
                        string valItemCode = null;
                        try
                        {
                            valItemCode = System.Convert.ToString(oDataTable.GetValue(0, 0));
                            valItemName = System.Convert.ToString(oDataTable.GetValue(1, 0));

                            string qtdEstoque = GetQtdEmEstoque(valItemCode);
                            ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C4").Cells.Item(pVal.Row).Specific).Value = qtdEstoque;

                            ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C0").Cells.Item(pVal.Row).Specific).Value = valItemCode;
                            ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C1").Cells.Item(pVal.Row).Specific).Value = valItemName;
                        }
                        catch (Exception ex)
                        {
                        }
                    }
                    else if (oCFLEvento.BeforeAction == false && sCFL_ID == "CFL2")
                    {
                        SAPbouiCOM.DataTable oDataTable = oCFLEvento.SelectedObjects;
                        string valCarName = null;
                        string idFornecedor = null;
                        try
                        {
                            idFornecedor = System.Convert.ToString(oDataTable.GetValue(0, 0));
                            valCarName = System.Convert.ToString(oDataTable.GetValue(1, 0));

                            ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C6").Cells.Item(pVal.Row).Specific).Value = idFornecedor;
                            ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C3").Cells.Item(pVal.Row).Specific).Value = valCarName;
                        }
                        catch (Exception ex)
                        {
                        }
                    }
                }

                string coluna = pVal.ColUID;

                if (EventEnum == SAPbouiCOM.BoEventTypes.et_DOUBLE_CLICK && !pVal.BeforeAction)
                {
                    //Anexo de arquivo
                    if (coluna == "Ela_Amb_C7" || coluna == "Ela_Amb_C8" || coluna == "Ela_Amb_C9" || coluna == "Med_Amb_C1"
                                               || coluna == "Apv_Amb_C3" || coluna == "Ped_Amb_C7" || coluna == "Det_Amb_C7"
                                               || coluna == "Etg_Amb_C3" || coluna == "Mon_Amb_C3" || coluna == "Mon_Amb_C4"
                                               || coluna == "Mon_Amb_C5" || coluna == "Apv_Amb_C4" || coluna == "Ans_Amb_C0")
                    {
                        oNewItem = oForm.Items.Item(pVal.ItemUID);
                        oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
                        oEditItem = (SAPbouiCOM.EditText)oMatrix.Columns.Item(coluna).Cells.Item(pVal.Row).Specific;

                        GridComAnexo(oEditItem);
                    }

                    //Url
                    if (coluna == "Ped_Amb_C8" && ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Ped_Amb_C8").Cells.Item(pVal.Row).Specific).Value != "")
                    {
                        newProcess = new Process();
                        string valor = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Ped_Amb_C8").Cells.Item(pVal.Row).Specific).Value;
                        info = new ProcessStartInfo(valor);
                        newProcess.StartInfo = info;
                        newProcess.Start();

                    }
                }

                if (EventEnum == SAPbouiCOM.BoEventTypes.et_LOST_FOCUS && !pVal.BeforeAction)
                {
                    if (coluna == "Cmp_Amb_C2")
                    {
                        oNewItem = oForm.Items.Item("Det_Cmp");
                        oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                        string qtd = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C2").Cells.Item(pVal.Row).Specific).String;
                        decimal teste = Convert.ToDecimal(qtd);
                        string estoque = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C4").Cells.Item(pVal.Row).Specific).String;
                        decimal teste2 = Convert.ToDecimal(estoque);
                        if (qtd != "" && teste > teste2)
                        {
                            SBO_Application.MessageBox("Sem ítens sufucintes no estoque");
                        }
                    }
                }

                //Evento da grid de ambiente/análise crítica.
                if (!pVal.BeforeAction && pVal.ItemUID == "Apr_Amb" && EventEnum == SAPbouiCOM.BoEventTypes.et_CLICK && pVal.ColUID == "#" && pVal.Row > 0)
                {

                    if (modificouAnsCritica)
                    {
                        SBO_Application.MessageBox("Vai atualizar");
                        Atualizar();
                        oForm.Mode = SAPbouiCOM.BoFormMode.fm_OK_MODE;
                        modificouAnsCritica = false;
                    }

                    //Instancia a matriz de ambiente da aba apresentação.
                    oNewItem = oForm.Items.Item("Apr_Amb");
                    SAPbouiCOM.Matrix matrixApresentacao;
                    matrixApresentacao = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                    //Instancia a matriz de análise crítica da aba apresentação.
                    oNewItem = oForm.Items.Item("Ans_Amb");
                    SAPbouiCOM.Matrix matrixAnaliseCritica;
                    matrixAnaliseCritica = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                    //Pega a coluna onde vai setar os valores pra o ambiente na matriz de análise crítica.
                    oColumnsAnaliseCritica = matrixAnaliseCritica.Columns;
                    oColumnAnaliseCritica = oColumnsAnaliseCritica.Item("Ans_Amb_C0");

                    //Pega o id do ambiente e a descrição do ambiente.
                    oEditItem = (SAPbouiCOM.EditText)matrixApresentacao.Columns.Item("Apr_Amb_C2").Cells.Item(pVal.Row).Specific;
                    SAPbouiCOM.EditText oItemGrid = (SAPbouiCOM.EditText)matrixApresentacao.Columns.Item("Apr_Amb_C0").Cells.Item(pVal.Row).Specific;
                    idAmbiente = int.Parse(oEditItem.String);
                    string nomeGrid = oItemGrid.String;

                    //Mostra na matriz de análise crítica qual ambiente selecionado.
                    oColumnAnaliseCritica.TitleObject.Caption = "Analise Crítica (" + nomeGrid + ")";
                    LoadGridAnaliseCritica();
                    countMatrixAnaliseCriticaAntes = matrixAnaliseCritica.RowCount;

                    if (matrixAnaliseCritica.RowCount == 0)
                    {
                        matrixAnaliseCritica.AddRow(1, 1);
                    }
                }
                //Evento da grid de ambiente/análise crítica.
                if (!pVal.BeforeAction && pVal.ItemUID == "Ans_Amb" && EventEnum == SAPbouiCOM.BoEventTypes.et_KEY_DOWN && pVal.ColUID == "Ans_Amb_C0" && pVal.CharPressed == 9)
                {
                    oNewItem = oForm.Items.Item("Ans_Amb");
                    SAPbouiCOM.Matrix matrixAnaliseCritica;
                    matrixAnaliseCritica = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                    oEditItem = (SAPbouiCOM.EditText)matrixAnaliseCritica.Columns.Item("Ans_Amb_C0").Cells.Item(matrixAnaliseCritica.RowCount).Specific;
                    string nome = oEditItem.String;

                    if (matrixAnaliseCritica.RowCount > 0 && nome != "")
                    {
                        matrixAnaliseCritica.AddRow(1, matrixAnaliseCritica.RowCount + 1);
                        ((SAPbouiCOM.EditText)matrixAnaliseCritica.Columns.Item("Ans_Amb_C0").Cells.Item(matrixAnaliseCritica.RowCount).Specific).Value = "";
                        ((SAPbouiCOM.EditText)matrixAnaliseCritica.Columns.Item("Ans_Amb_C1").Cells.Item(matrixAnaliseCritica.RowCount).Specific).Value = "";
                    }
                }

                if (pVal.ItemUID == "Ans_Amb" && pVal.ColUID == "Ans_Amb_C0" && pVal.ItemChanged && !pVal.BeforeAction)
                {
                    SBO_Application.MessageBox("Teste");
                    modificouAnsCritica = true;
                }

                if (!pVal.BeforeAction && pVal.ItemUID == "Fab_Amb" && EventEnum == SAPbouiCOM.BoEventTypes.et_CLICK && pVal.ColUID == "Fab_#" && pVal.Row > 0)
                {
                    if (bGravouAvarias)
                    {
                        SBO_Application.MessageBox("Vai atualizar Avarias");
                        Atualizar();
                        oForm.Mode = SAPbouiCOM.BoFormMode.fm_OK_MODE;
                        bGravouAvarias = false;
                    }

                    oNewItem = oForm.Items.Item("Fab_Amb");
                    SAPbouiCOM.Matrix matrixFabrica;
                    matrixFabrica = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                    oNewItem = oForm.Items.Item("Ava_Amb");
                    SAPbouiCOM.Matrix matrixAvarias;
                    matrixAvarias = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                    SAPbouiCOM.Columns oColumnsAvarias = null;
                    SAPbouiCOM.Column oColumnAvarias = null;
                    oColumnsAvarias = matrixAvarias.Columns;
                    oColumnAvarias = oColumnsAvarias.Item("Ava_Amb_C0");

                    //Pega o id do ambiente e a descrição do ambiente.
                    oEditItem = (SAPbouiCOM.EditText)matrixFabrica.Columns.Item("Fab_Amb_C4").Cells.Item(pVal.Row).Specific;
                    SAPbouiCOM.EditText oItemGrid = (SAPbouiCOM.EditText)matrixFabrica.Columns.Item("Fab_Amb_C0").Cells.Item(pVal.Row).Specific;
                    iRowAmbiente = int.Parse(oEditItem.String);
                    string nomeGrid = oItemGrid.String;

                    oColumnAvarias.TitleObject.Caption = "Descrição (" + nomeGrid + ")";
                    LoadGridAvarias();
                    countMatrixAvariasAntes = matrixAvarias.RowCount;

                    if (matrixAvarias.RowCount == 0)
                    {
                        matrixAvarias.AddRow(1, 1);
                    }
                }

                if (!pVal.BeforeAction && pVal.ItemUID == "Ava_Amb" && EventEnum == SAPbouiCOM.BoEventTypes.et_KEY_DOWN && pVal.ColUID == "Ava_Amb_C0" && pVal.CharPressed == 9)
                {
                    oNewItem = oForm.Items.Item("Ava_Amb");
                    SAPbouiCOM.Matrix matrixAvarias;
                    matrixAvarias = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                    oEditItem = (SAPbouiCOM.EditText)matrixAvarias.Columns.Item("Ava_Amb_C0").Cells.Item(matrixAvarias.RowCount).Specific;
                    string nome = oEditItem.String;

                    if (matrixAvarias.RowCount > 0 && nome != "")
                    {
                        matrixAvarias.AddRow(1, matrixAvarias.RowCount + 1);
                        ((SAPbouiCOM.EditText)matrixAvarias.Columns.Item("Ava_Amb_C0").Cells.Item(matrixAvarias.RowCount).Specific).Value = "";
                        ((SAPbouiCOM.EditText)matrixAvarias.Columns.Item("Ava_Amb_C1").Cells.Item(matrixAvarias.RowCount).Specific).Value = "";
                    }
                }

                if (pVal.ItemUID == "Ava_Amb" && pVal.ColUID == "Ava_Amb_C0" && pVal.ItemChanged && !pVal.BeforeAction)
                {
                    SBO_Application.MessageBox("Teste Avarias");
                    bGravouAvarias = true;
                }

                //Evento da grid de ambiente/conferência medições.
                if (!pVal.BeforeAction && pVal.ItemUID == "Med_Amb" && EventEnum == SAPbouiCOM.BoEventTypes.et_CLICK && pVal.ColUID == "#" && pVal.Row > 0)
                {
                    //Instancia a matriz de ambiente da aba medições.
                    oNewItem = oForm.Items.Item("Med_Amb");
                    SAPbouiCOM.Matrix matrixMedicoes;
                    matrixMedicoes = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                    //Instancia a matriz de conferência medições da aba medições.
                    oNewItem = oForm.Items.Item("Med_Cnf");
                    SAPbouiCOM.Matrix matrixConferenciaMedicoes;
                    matrixConferenciaMedicoes = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                    //Pega a coluna onde vai setar os valores para o ambiente na matriz de conferência medições.
                    oColumnsConferenciaMedicoes = matrixConferenciaMedicoes.Columns;
                    oColumnConferenciaMedicoes = oColumnsConferenciaMedicoes.Item("med_Cnf_C1");

                    //Pega o id do ambiente e a descrição do ambiente.
                    oEditItem = (SAPbouiCOM.EditText)matrixMedicoes.Columns.Item("Med_Amb_C2").Cells.Item(pVal.Row).Specific;
                    SAPbouiCOM.EditText oItemGrid = (SAPbouiCOM.EditText)matrixMedicoes.Columns.Item("Med_Amb_C0").Cells.Item(pVal.Row).Specific;
                    iIdAmbienteMedicao = int.Parse(oEditItem.String);
                    string nomeGrid = oItemGrid.String;

                    //Mostra na matriz de conferência medições qual ambiente selecionado.
                    oColumnConferenciaMedicoes.TitleObject.Caption = "Conferente (" + nomeGrid + ")";
                    LoadGridConferenciaMedicao();
                    countMatrixConfMedAntes = matrixConferenciaMedicoes.RowCount;

                    if (matrixConferenciaMedicoes.RowCount == 0)
                    {
                        matrixConferenciaMedicoes.AddRow(1, 1);
                        //Projetistas - Grid Conferencia de Medicao
                        loadComboEmGrid("Med_Cnf", "med_Cnf_C1", projetistas);
                    }
                }
                //Evento da grid de ambiente/conferência medições.
                if (pVal.CharPressed == 9 && !pVal.BeforeAction && pVal.ItemUID == "Med_Cnf" && EventEnum == SAPbouiCOM.BoEventTypes.et_KEY_DOWN && pVal.ColUID == "med_Cnf_C1")
                {
                    oNewItem = oForm.Items.Item("Med_Cnf");
                    SAPbouiCOM.Matrix matrixConferenciaMedicao;
                    matrixConferenciaMedicao = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                    oEditItem = (SAPbouiCOM.EditText)matrixConferenciaMedicao.Columns.Item("Med_Cnf_C0").Cells.Item(matrixConferenciaMedicao.RowCount).Specific;
                    string data = oEditItem.String;
                    SAPbouiCOM.ComboBox combo = (SAPbouiCOM.ComboBox)matrixConferenciaMedicao.Columns.Item("med_Cnf_C1").Cells.Item(matrixConferenciaMedicao.RowCount).Specific;
                    string nome = combo.Value;

                    if (matrixConferenciaMedicao.RowCount > 0 && data != "" && nome != "")
                    {
                        matrixConferenciaMedicao.AddRow(1, matrixConferenciaMedicao.RowCount + 1);
                        ((SAPbouiCOM.EditText)matrixConferenciaMedicao.Columns.Item("Med_Cnf_C0").Cells.Item(matrixConferenciaMedicao.RowCount).Specific).Value = "";
                        //Projetistas - Grid Conferencia de Medicao
                        RemoveValoresDeCombo(ref combo);
                        loadComboEmGrid("Med_Cnf", "med_Cnf_C1", projetistas);
                        ((SAPbouiCOM.ComboBox)matrixConferenciaMedicao.Columns.Item("med_Cnf_C1").Cells.Item(matrixConferenciaMedicao.RowCount).Specific).Select("", SAPbouiCOM.BoSearchKey.psk_ByValue);
                        ((SAPbouiCOM.EditText)matrixConferenciaMedicao.Columns.Item("Med_Cnf_C2").Cells.Item(matrixConferenciaMedicao.RowCount).Specific).Value = "";

                    }
                }

                //Evento da grid de Entrega
                if (!pVal.BeforeAction && pVal.ItemUID == "Etg_Amb" && EventEnum == SAPbouiCOM.BoEventTypes.et_CLICK && pVal.ColUID == "Etg_#" && pVal.Row > 0)
                {

                    if (modificouPendecia)
                    {
                        SBO_Application.MessageBox("Vai atualizar Pendencia");
                        Atualizar();
                        oForm.Mode = SAPbouiCOM.BoFormMode.fm_OK_MODE;
                        modificouPendecia = false;
                    }

                    //Instancia a matriz de ambiente da aba apresentação.
                    oNewItem = oForm.Items.Item("Etg_Amb");
                    SAPbouiCOM.Matrix matrixEntrega;
                    matrixEntrega = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                    //Instancia a matriz de análise crítica da aba apresentação.
                    oNewItem = oForm.Items.Item("Pen_Amb");
                    SAPbouiCOM.Matrix matrixPendencia;
                    matrixPendencia = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                    //Pega a coluna onde vai setar os valores pra o ambiente na matriz de Pendencia.
                    oColumnsPendencia = matrixPendencia.Columns;
                    oColumnPendencia = oColumnsPendencia.Item("Pen_Amb_C0");

                    //Pega o id do ambiente e a descrição do ambiente.
                    oEditItem = (SAPbouiCOM.EditText)matrixEntrega.Columns.Item("Etg_Amb_C6").Cells.Item(pVal.Row).Specific;
                    SAPbouiCOM.EditText oItemGrid = (SAPbouiCOM.EditText)matrixEntrega.Columns.Item("Etg_Amb_C0").Cells.Item(pVal.Row).Specific;
                    idAmbientePendencia = int.Parse(oEditItem.String);
                    string nomeAmbiente = oItemGrid.String;

                    //Mostra na matriz de Pendencia qual ambiente selecionado.
                    oColumnPendencia.TitleObject.Caption = "Ambiente (" + nomeAmbiente + ")";
                    LoadGridPendencias();
                    countMatrixPendenciaAntes = matrixPendencia.RowCount;

                    if (matrixPendencia.RowCount == 0)
                    {
                        matrixPendencia.AddRow(1, 1);
                    }
                }
                //Evento da grid de ambiente/análise crítica.
                if (!pVal.BeforeAction && pVal.ItemUID == "Pen_Amb" && EventEnum == SAPbouiCOM.BoEventTypes.et_KEY_DOWN && pVal.ColUID == "Pen_Amb_C0" && pVal.CharPressed == 9)
                {
                    oNewItem = oForm.Items.Item("Pen_Amb");
                    SAPbouiCOM.Matrix matrixPendencia;
                    matrixPendencia = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                    oEditItem = (SAPbouiCOM.EditText)matrixPendencia.Columns.Item("Pen_Amb_C0").Cells.Item(matrixPendencia.RowCount).Specific;
                    string nome = oEditItem.String;

                    if (matrixPendencia.RowCount > 0 && nome != "")
                    {
                        matrixPendencia.AddRow(1, matrixPendencia.RowCount + 1);
                        ((SAPbouiCOM.EditText)matrixPendencia.Columns.Item("Pen_Amb_C0").Cells.Item(matrixPendencia.RowCount).Specific).Value = "";
                        ((SAPbouiCOM.EditText)matrixPendencia.Columns.Item("Pen_Amb_C1").Cells.Item(matrixPendencia.RowCount).Specific).Value = "";
                    }
                }

                if (pVal.ItemUID == "Pen_Amb" && pVal.ColUID == "Pen_Amb_C0" && pVal.ItemChanged && !pVal.BeforeAction)
                {
                    SBO_Application.MessageBox("Teste Pendencia");
                    modificouPendecia = true;
                }
            }

            if (pVal.FormType == 651)
            {
                if (pVal.EventType != SAPbouiCOM.BoEventTypes.et_FORM_UNLOAD)
                {
                    oFormAtual = SBO_Application.Forms.GetFormByTypeAndCount(pVal.FormType, pVal.FormTypeCount);

                    if (pVal.ItemUID == "Ata_Ativ" & pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED & !pVal.Before_Action)
                    {
                        abrirRelatorio("Ata de reuniao", oFormAtual.Items.Item("5").Specific.Value);
                    }

                    if (!pVal.Before_Action && (pVal.EventType == SAPbouiCOM.BoEventTypes.et_COMBO_SELECT) & pVal.ItemChanged & (pVal.ItemUID == "67"))
                    {
                        if (oFormAtual.Items.Item("67").Specific.Value == "M")
                        {
                            atividade.habilitaBotaoAta();
                        }
                        else
                        {
                            atividade.desabilitaBotaoAta();
                        }
                    }

                    if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_LOAD)
                    {

                        if (pVal.Before_Action)
                        {
                            atividade = new Atividade(oFormAtual);
                        }

                        if (bBotaoAgendarFoiClicado)
                        {
                            oFormPai = SBO_Application.Forms.GetFormByTypeAndCount(320, iUltimoFormTypeCount_SalesOpportunities);

                            sSalesOpportunities_Id = ((SAPbouiCOM.EditText)oFormPai.Items.Item("74").Specific).Value;
                            sBPCode = ((SAPbouiCOM.EditText)oFormPai.Items.Item("9").Specific).Value;

                            oFormAtual = SBO_Application.Forms.GetFormByTypeAndCount(pVal.FormType, pVal.FormTypeCount);

                            ((SAPbouiCOM.EditText)oFormAtual.Items.Item("9").Specific).Value = sBPCode;

                            bBotaoAgendarFoiClicado = false;
                        }
                    }
                }
            }
        }
예제 #33
0
        public void loadCombo(string combo, SAPbobsCOM.Recordset valores)
        {
            string sPrimeirovalorCombo = "";
            oNewItem = oForm.Items.Item(combo);
            SAPbouiCOM.ComboBox oCombo = ((SAPbouiCOM.ComboBox)(oNewItem.Specific));
            RemoveValoresDeCombo(ref oCombo);

            oCombo.ValidValues.Add("", "");

            int RecCount = valores.RecordCount;
            valores.MoveFirst();

            for (int RecIndex = 0; RecIndex <= RecCount - 1; RecIndex++)
            {
                //Se for combo de ambientes da aba de Entrevista
                if ((combo == "Ent_Amb") & (RecIndex == 0))
                    sPrimeirovalorCombo = valores.Fields.Item(0).Value.ToString();
                oCombo.ValidValues.Add(Convert.ToString(valores.Fields.Item(0).Value), Convert.ToString(valores.Fields.Item(1).Value));
                valores.MoveNext();
            }

            //Se for combo de ambientes da aba de Entrevista
            if (combo == "Ent_Amb")
            {
                oCombo.Select(sPrimeirovalorCombo, SAPbouiCOM.BoSearchKey.psk_ByValue);
            }
        }
예제 #34
0
        private void LoadGridItensComplementares()
        {
            string OpID = null;

            oForm.DataSources.DataTables.Item("oDataTableItc").Clear();
            oItem = oForm.Items.Item("74");
            oEditItem = ((SAPbouiCOM.EditText)(oItem.Specific));
            OpID = oEditItem.Value;
            oForm.DataSources.DataTables.Item("oDataTableItc").ExecuteQuery("select T1.ItemCode, T1.ItemName, T1.OnHand, T0.U_FLX_FB_ITC_QTD, T2.CardCode, T2.CardName, T0.U_FLX_FB_ITC_OBS, T0.Code, T0.U_FLX_FB_ITC_PRZETG, T0.U_FLX_FB_ITC_SOLICI, T0.U_FLX_FB_ITC_RECEB from [@FLX_FB_ITC] T0 inner join OITM T1 on T1.ItemCode = T0.U_FLX_FB_ITC_IDOITM inner join OCRD T2 on T2.CardCode = T0.U_FLX_FB_ITC_IDOCRD where T0.U_FLX_FB_ITC_IDOOPR = '" + OpID + "'");

            oItem = oForm.Items.Item("Det_Cmp");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();

            oItem = oForm.Items.Item("Mon_Itc");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();
        }
예제 #35
0
        private void LoadGridConferenciaMedicao()
        {
            string OpID = null;

            oForm.DataSources.DataTables.Item("oDataTable").Clear();
            oItem = oForm.Items.Item("74");
            oEditItem = ((SAPbouiCOM.EditText)(oItem.Specific));
            OpID = oEditItem.Value;
            oForm.DataSources.DataTables.Item("oDataTable").ExecuteQuery("select * from [@FLX_FB_CONFMED] where U_FLX_FB_CONFMED_ID = '" + OpID + "' and U_FLX_FB_CONFMED_IDA = '" + iIdAmbienteMedicao.ToString() + "'");

            oItem = oForm.Items.Item("Med_Cnf");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();
        }
예제 #36
0
 private void ContarLinhasIniciaisMatrixMedicoes()
 {
     //Conferência de Medições
     oNewItem = oForm.Items.Item("Med_Cnf");
     oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
     countMatrixConfMedAntes = oMatrix.RowCount;
     ListDataConfMed.Clear();
     ListConferenteCofMed.Clear();
     for (int i = 1; i <= oMatrix.RowCount; i++)
     {
         ListDataConfMed.Add(((SAPbouiCOM.EditText)oMatrix.Columns.Item("Med_Cnf_C0").Cells.Item(i).Specific).String);
         ListConferenteCofMed.Add(((SAPbouiCOM.EditText)oMatrix.Columns.Item("med_Cnf_C1").Cells.Item(i).Specific).String);
     }
 }
예제 #37
0
        public void Atualizar()
        {
            SAPbouiCOM.EditText oEdit = null;
            SAPbouiCOM.ComboBox oCombo = null;

            string etvProjetista = "";
            string apsProjetista = "";
            string medProjetista = "";
            string logradouro, numero, complemento, bairro, cidade, uf, pontoRef, etvData, etvHora, etvPrevisao, apsData, apsHora,
                medData, medHora, idOOPR = null;

            idOOPR = ((SAPbouiCOM.EditText)oForm.Items.Item("74").Specific).Value;

            oItem = oForm.Items.Item("End_Log");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            logradouro = oEdit.String;

            oItem = oForm.Items.Item("End_Num");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            numero = oEdit.String;

            oItem = oForm.Items.Item("End_Com");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            complemento = oEdit.String;

            oItem = oForm.Items.Item("End_Bai");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            bairro = oEdit.String;

            oItem = oForm.Items.Item("End_Cid");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            cidade = oEdit.String;

            oItem = oForm.Items.Item("End_UF");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            uf = oEdit.String;

            oItem = oForm.Items.Item("End_Ref");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            pontoRef = oEdit.String;

            //Abas Fases Entrevista
            oItem = oForm.Items.Item("Ent_Data");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            etvData = oEdit.String;

            oItem = oForm.Items.Item("Ent_Hora");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            etvHora = oEdit.String;

            if (upProjEnt)
            {
                oItem = oForm.Items.Item("Ent_Proj");
                oCombo = ((SAPbouiCOM.ComboBox)(oItem.Specific));
                etvProjetista = oCombo.Value;
                upProjEnt = false;
            }
            else
                etvProjetista = "0";

            oItem = oForm.Items.Item("Ent_Prev");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            etvPrevisao = oEdit.String;

            //Abas - Fase Apresentação

            oItem = oForm.Items.Item("Apr_Data");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            apsData = oEdit.String;

            oItem = oForm.Items.Item("Apr_Hora");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            apsHora = oEdit.String;

            if (upProjAps)
            {
                oItem = oForm.Items.Item("Apr_Proj");
                oCombo = ((SAPbouiCOM.ComboBox)(oItem.Specific));
                apsProjetista = oCombo.Value;
                upProjAps = false;
            }
            else
                apsProjetista = "0";

            //Aba - Fase Medição

            oItem = oForm.Items.Item("Med_Data");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            medData = oEdit.String;

            oItem = oForm.Items.Item("Med_Hora");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            medHora = oEdit.String;

            if (upProjMed)
            {
                oItem = oForm.Items.Item("Med_Proj");
                oCombo = ((SAPbouiCOM.ComboBox)(oItem.Specific));
                medProjetista = oCombo.Value;
                upProjMed = false;
            }
            else
                medProjetista = "0";

            int etvAmbiente = 0;
            if (upEtvAmb)
            {
                oItem = oForm.Items.Item("Ent_Amb");
                oCombo = ((SAPbouiCOM.ComboBox)(oItem.Specific));
                //if (oCombo.ValidValues.Count == 0)
                if (oCombo.Value != "")
                {
                    try
                    {
                        etvAmbiente = Convert.ToInt32(oCombo.Value);
                    }
                    catch
                    {
                    }
                }
            }

            string descAmb = null;
            oItem = oForm.Items.Item("Ent_Det");
            oEdit = ((SAPbouiCOM.EditText)(oItem.Specific));
            descAmb = oEdit.String;

            //Conferencia de Medições
            oNewItem = oForm.Items.Item("Med_Cnf");
            oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
            string data = null;
            string conferente = null;

            for (int i = 1; i <= oMatrix.RowCount; i++)
            {
                if (countMatrixConfMedAntes >= i)
                {
                    data = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Med_Cnf_C0").Cells.Item(i).Specific).String;
                    conferente = ((SAPbouiCOM.ComboBox)oMatrix.Columns.Item("med_Cnf_C1").Cells.Item(i).Specific).Value;

                    //string codeMed = GetIdConferenciaMedicaoParaUpdate(ListDataConfMed[i - 1].ToString(), Convert.ToInt32(idOOPR), ListConferenteCofMed[i - 1].ToString(), iIdAmbienteMedicao);
                    string codeMed = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Med_Cnf_C2").Cells.Item(i).Specific).String; ;

                    if (data != "" && conferente != "")
                        UpdateConferenciaDeMedicao(codeMed, codeMed, int.Parse(idOOPR), data, conferente, iIdAmbienteMedicao);
                }
                else
                {
                    data = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Med_Cnf_C0").Cells.Item(i).Specific).String;
                    conferente = ((SAPbouiCOM.ComboBox)oMatrix.Columns.Item("med_Cnf_C1").Cells.Item(i).Specific).Value;
                    if (data != "" && conferente != "")
                        AddConferenciaDeMedicao(int.Parse(idOOPR), data, conferente, iIdAmbienteMedicao);
                }
            }

            //Adiciona o anexo da medição.
            AddAnexoMedicao(Convert.ToInt32(idOOPR));

            //Adiciona Avarias
            oNewItem = oForm.Items.Item("Ava_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
            string descricao = null;

            for (int i = 1; i <= oMatrix.RowCount; i++)
            {
                descricao = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Ava_Amb_C0").Cells.Item(i).Specific).Value;
                if (countMatrixAvariasAntes >= i)
                {
                    string codeAvarias = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Ava_Amb_C1").Cells.Item(i).Specific).Value; ; //GetIdAvariasParaUpdate(ListNomeAvarias[i - 1].ToString(), Convert.ToInt32(idOOPR), iIdAmbiente);

                    UpdateAvarias(codeAvarias, codeAvarias, int.Parse(idOOPR), descricao, iRowAmbiente);
                }
                else
                {
                    AddAvarias(int.Parse(idOOPR), descricao, iRowAmbiente);
                }
            }

            //Adiciona Pendencias
            oNewItem = oForm.Items.Item("Pen_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
            string descricaoPend = null;
            string idPendencia = null;

            for (int i = 1; i <= oMatrix.RowCount; i++)
            {
                if (countMatrixPendenciaAntes >= i)
                {
                    descricaoPend = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Pen_Amb_C0").Cells.Item(i).Specific).Value;
                    idPendencia = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Pen_Amb_C1").Cells.Item(i).Specific).Value;
                    UpdatePendencias(descricaoPend, idPendencia);
                }
                else
                {
                    descricaoPend = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Pen_Amb_C0").Cells.Item(i).Specific).Value;
                    AddPendencias(Convert.ToInt32(idOOPR), descricaoPend, idAmbientePendencia);
                }
            }

            //Adiciona Analise Critica
            oNewItem = oForm.Items.Item("Ans_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
            string txtAnexo = null;
            string idAnaliseCritica = null;

            for (int i = 1; i <= oMatrix.RowCount; i++)
            {
                if (countMatrixAnaliseCriticaAntes >= i)
                {
                    txtAnexo = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Ans_Amb_C0").Cells.Item(i).Specific).Value;
                    idAnaliseCritica = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Ans_Amb_C1").Cells.Item(i).Specific).Value;
                    UpdateAnaliseCritica(txtAnexo, idAnaliseCritica);
                }
                else
                {
                    txtAnexo = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Ans_Amb_C0").Cells.Item(i).Specific).Value;
                    AddAnaliseCritica(Convert.ToInt32(idOOPR), idAmbiente, txtAnexo);
                }

                if (i == oMatrix.RowCount)
                {
                    LoadGridAnaliseCritica();
                }
            }

            //Adiciona Itens Complementares
            oNewItem = oForm.Items.Item("Det_Cmp");
            oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
            string idOITM = null;
            string idOCRD = null;
            string qtd = null;
            string observacao = null;
            string idItensComplementares = null;

            for (int i = 1; i <= oMatrix.RowCount; i++)
            {
                if (countMatrixItensComplementaresAntes >= i)
                {
                    idOITM = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C0").Cells.Item(i).Specific).String;
                    idOCRD = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C6").Cells.Item(i).Specific).Value;
                    qtd = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C2").Cells.Item(i).Specific).Value;
                    observacao = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C5").Cells.Item(i).Specific).Value;
                    idItensComplementares = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C7").Cells.Item(i).Specific).String;
                    UpdateItensComplementares(idOITM, idOCRD, qtd, observacao, idItensComplementares);
                }
                else
                {
                    idOITM = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C0").Cells.Item(i).Specific).String;
                    idOCRD = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C6").Cells.Item(i).Specific).Value;
                    qtd = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C2").Cells.Item(i).Specific).Value;
                    observacao = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C5").Cells.Item(i).Specific).Value;

                    AddItensComplementares(Convert.ToInt32(idOOPR), idOITM, idOCRD, qtd, observacao);
                }

                if (i == oMatrix.RowCount)
                {
                    //LoadGridAnaliseCritica();
                }
            }

            //Update Itens Complementares (Aba Montagem)
            oNewItem = oForm.Items.Item("Mon_Itc");
            oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
            string prazoEntrega = null;
            string solicitante = null;
            bool recebido = false;
            int check = 0;

            for (int i = 1; i <= oMatrix.RowCount; i++)
            {
                prazoEntrega = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Itc_Amb_C5").Cells.Item(i).Specific).String;
                solicitante = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Itc_Amb_C6").Cells.Item(i).Specific).String;
                recebido = ((SAPbouiCOM.CheckBox)oMatrix.Columns.Item("Itc_Amb_C7").Cells.Item(i).Specific).Checked;
                idItensComplementares = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Itc_Amb_10").Cells.Item(i).Specific).String;

                if (recebido)
                {
                    check = 1;
                }
                else
                {
                    check = 0;
                }

                UpdateItensComplementares(idItensComplementares, prazoEntrega, solicitante, check);
                LoadGridItensComplementares();
            }

            AddOportunidadeVendas(Convert.ToInt32(idOOPR), etvProjetista, medProjetista, apsProjetista, etvAmbiente, descAmb);
        }
예제 #38
0
        private void LoadGridAvarias()
        {
            string OpID = null;

            oForm.DataSources.DataTables.Item("oDataTableAvr").Clear();
            oItem = oForm.Items.Item("74");
            oEditItem = ((SAPbouiCOM.EditText)(oItem.Specific));
            OpID = oEditItem.Value;
            oForm.DataSources.DataTables.Item("oDataTableAvr").ExecuteQuery("select * from [@FLX_FB_AVR] where U_FLX_FB_AVR_IDOOPR = '" + OpID + "' and U_FLX_FB_AVR_IDAMBI = '" + iRowAmbiente.ToString() + "'");

            oItem = oForm.Items.Item("Ava_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();
        }
예제 #39
0
        private void LoadAmbientesInMatrix()
        {
            string OpID = null;

            oForm.DataSources.DataTables.Item("oMatrixDT").Clear();
            oItem = oForm.Items.Item("74");
            oEditItem = ((SAPbouiCOM.EditText)(oItem.Specific));
            OpID = oEditItem.Value;
            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] = '" + OpID + "'");
            //oForm.DataSources.DataTables.Item("oMatrixDT").ExecuteQuery("SELECT T2.Name as elbProj, T3.Name as detProj, T1.[Num], T1.[Descript], T0.* FROM OPR4 T0 INNER JOIN OOIN T1 ON T1.Num = T0.IntId inner join [@FLX_FB_PRJ] T2 on T2.Code = T0.U_FLX_FB_ELB_PROJETI inner join [@FLX_FB_PRJ] T3 on T3.Code = T0.U_FLX_FB_DET_PROJETI WHERE T0.[OprId] = '" + OpID + "'");

            oItem = oForm.Items.Item("Med_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();
            iRowAmbienteMedicao = 1;
            iIdAmbienteMedicao = int.Parse(((SAPbouiCOM.EditText)oMatrix.Columns.Item("Med_Amb_C2").Cells.Item(iRowAmbienteMedicao).Specific).Value);

            oItem = oForm.Items.Item("Res_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();

            oItem = oForm.Items.Item("Ela_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();

            oItem = oForm.Items.Item("Ver_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();

            oItem = oForm.Items.Item("Apr_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();

            oItem = oForm.Items.Item("Apv_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();

            oItem = oForm.Items.Item("Ped_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();

            oItem = oForm.Items.Item("Det_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();

            oItem = oForm.Items.Item("Fab_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();

            oItem = oForm.Items.Item("Mon_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();

            oItem = oForm.Items.Item("Etg_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();
        }
예제 #40
0
        private void LoadGridAnaliseCritica()
        {
            string OpID = null;

            oForm.DataSources.DataTables.Item("oDataTableAnalise").Clear();
            oItem = oForm.Items.Item("74");
            oEditItem = ((SAPbouiCOM.EditText)(oItem.Specific));
            OpID = oEditItem.Value;
            oForm.DataSources.DataTables.Item("oDataTableAnalise").ExecuteQuery("SELECT * FROM [@FLX_FB_ANLCRI] where U_FLX_FB_ANLCRI_ID = '" + OpID + "'" + "and U_FLX_FB_ANLCRI_AMBI = '" + idAmbiente + "'");

            oItem = oForm.Items.Item("Ans_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();
        }
예제 #41
0
        public void AddAnexoMedicao(int idOOPR)
        {
            try
            {
                SAPbobsCOM.SalesOpportunities oSalesOpportunities = null;
                oSalesOpportunities = checked((SAPbobsCOM.SalesOpportunities)conexao.getOCompany().GetBusinessObject(SAPbobsCOM.BoObjectTypes.oSalesOpportunities));
                string medAnexoLevantamento = null;
                string elbIniPrev = null;
                string elbTermPrev = null;
                string elbIniRealizado = null;
                string elbTermRealizado = null;
                string elbArqCad = null;
                string elbArqPRJ = null;
                string elbArqJPG = null;
                int elbProjetista = 0;
                string elbDatRevisao = null;
                string apsDetalhamento = null;
                string apvAprovadoPor = null;
                string apvDataApv = null;
                string apvAnexoPdf = null;
                string apvPranchaImagem = null;
                string apvMemorialDescritivo = null;
                string verData = null;
                string verObs = null;
                string verVerificadoPor = null;
                string pedData = null;
                string pedUrl = null;
                string pedNumero = null;
                string pedOrdemCompra = null;
                string pedValor = null;
                string pedSolicitante = null;
                string pedPrazEntrega = null;
                string pedAnexo = null;
                string detIniPrev = null;
                string detTermPrev = null;
                string detIniRealzidado = null;
                string detTermRealizado = null;
                string detAnexo = null;
                int detProjetista = 0;
                string fabExpedicao = null;
                string fabConferente = null;
                string fabRecebimento = null;
                string montResponsavel = null;
                string montDescricao = null;
                string montVstInt1 = null;
                string montVstInt2 = null;
                string montVstInt3 = null;
                string etgDatEntrega = null;
                string etgLaudoEntrega = null;
                string etgResponsavel = null;
                string etgDatSolucao = null;
                bool etgResolvido = false;

                oNewItem = oForm.Items.Item("Med_Amb");
                oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                oNewItem = oForm.Items.Item("Ela_Amb");
                SAPbouiCOM.Matrix matrixElaboracao;
                matrixElaboracao = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                oNewItem = oForm.Items.Item("Apr_Amb");
                SAPbouiCOM.Matrix matrixApresentacao;
                matrixApresentacao = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                oNewItem = oForm.Items.Item("Apv_Amb");
                SAPbouiCOM.Matrix matrixAprovacao;
                matrixAprovacao = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                oNewItem = oForm.Items.Item("Ver_Amb");
                SAPbouiCOM.Matrix matrixVerificacao;
                matrixVerificacao = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                oNewItem = oForm.Items.Item("Ped_Amb");
                SAPbouiCOM.Matrix matrixPedido;
                matrixPedido = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                oNewItem = oForm.Items.Item("Det_Amb");
                SAPbouiCOM.Matrix matrixDetalhamento;
                matrixDetalhamento = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                oNewItem = oForm.Items.Item("Fab_Amb");
                SAPbouiCOM.Matrix matrixFabrica;
                matrixFabrica = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                oNewItem = oForm.Items.Item("Mon_Amb");
                SAPbouiCOM.Matrix matrixMontagem;
                matrixMontagem = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                oNewItem = oForm.Items.Item("Etg_Amb");
                SAPbouiCOM.Matrix matrixEntrega;
                matrixEntrega = ((SAPbouiCOM.Matrix)(oNewItem.Specific));

                ArrayList idsAmbientes = ambiente.getIds();

                if (oSalesOpportunities.GetByKey(idOOPR) == true)
                {
                    for (int i = 0; i < oSalesOpportunities.Interests.Count; i++)
                    {
                        oSalesOpportunities.Interests.SetCurrentLine(i);
                        int id = Convert.ToInt32(idsAmbientes[i]);
                        if (oSalesOpportunities.Interests.RowNo == id)
                        {
                            //Instanciar a Grid de Ambientes
                            medAnexoLevantamento = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Med_Amb_C1").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_MED_LEVANTA").Value = medAnexoLevantamento;

                            //Instanciar a Grid de Elaboração

                            elbDatRevisao = ((SAPbouiCOM.EditText)matrixElaboracao.Columns.Item("Ela_Amb_C1").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ELB_REVISAO").Value = elbDatRevisao;

                            SAPbouiCOM.ComboBox combo;
                            //oItem = oForm.Items.Item("Ela_Amb_C2");
                            combo = (SAPbouiCOM.ComboBox)matrixElaboracao.Columns.Item("Ela_Amb_C2").Cells.Item(i + 1).Specific;
                            if (combo.Value != "")
                            {
                                elbProjetista = Convert.ToInt32(((SAPbouiCOM.ComboBox)matrixElaboracao.Columns.Item("Ela_Amb_C2").Cells.Item(i + 1).Specific).Value);
                                oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ELB_PROJETI").Value = elbProjetista;
                            }

                            elbIniPrev = ((SAPbouiCOM.EditText)matrixElaboracao.Columns.Item("Ela_Amb_C3").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ELB_INICIOP").Value = elbIniPrev;

                            elbTermPrev = ((SAPbouiCOM.EditText)matrixElaboracao.Columns.Item("Ela_Amb_C4").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ELB_TERMINP").Value = elbTermPrev;

                            elbIniRealizado = ((SAPbouiCOM.EditText)matrixElaboracao.Columns.Item("Ela_Amb_C5").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ELB_INICIOR").Value = elbIniRealizado;

                            elbTermRealizado = ((SAPbouiCOM.EditText)matrixElaboracao.Columns.Item("Ela_Amb_C6").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ELB_TERMINR").Value = elbTermRealizado;

                            elbArqCad = ((SAPbouiCOM.EditText)matrixElaboracao.Columns.Item("Ela_Amb_C7").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ELB_ARQCAD").Value = elbArqCad;

                            elbArqPRJ = ((SAPbouiCOM.EditText)matrixElaboracao.Columns.Item("Ela_Amb_C8").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ELB_ARQPRJ").Value = elbArqPRJ;

                            elbArqJPG = ((SAPbouiCOM.EditText)matrixElaboracao.Columns.Item("Ela_Amb_C9").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ELB_ARQJPG").Value = elbArqJPG;

                            //Instanciar a Grid de Verificação
                            verData = ((SAPbouiCOM.EditText)matrixVerificacao.Columns.Item("Ver_Amb_C1").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_VRF_DATEVER").Value = verData;

                            verVerificadoPor = ((SAPbouiCOM.ComboBox)matrixVerificacao.Columns.Item("Ver_Amb_C2").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_VRF_VERIFPO").Value = Convert.ToInt32(verVerificadoPor);

                            verObs = ((SAPbouiCOM.EditText)matrixVerificacao.Columns.Item("Ver_Amb_C3").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_VRF_OBS").Value = verObs;

                            //Instanciar a Grid de Apresentação
                            apsDetalhamento = ((SAPbouiCOM.EditText)matrixApresentacao.Columns.Item("Apr_Amb_C1").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ANC_DETALHA").Value = apsDetalhamento;

                            //Instanciar a Grid de Aprovação
                            apvAprovadoPor = ((SAPbouiCOM.ComboBox)matrixAprovacao.Columns.Item("Apv_Amb_C1").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_APR_APROVAD").Value = Convert.ToInt32(apvAprovadoPor);

                            apvDataApv = ((SAPbouiCOM.EditText)matrixAprovacao.Columns.Item("Apv_Amb_C2").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_APR_DATAAPR").Value = apvDataApv;

                            apvAnexoPdf = ((SAPbouiCOM.EditText)matrixAprovacao.Columns.Item("Apv_Amb_C3").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_APR_PDFCLIE").Value = apvAnexoPdf;

                            apvPranchaImagem = ((SAPbouiCOM.EditText)matrixAprovacao.Columns.Item("Apv_Amb_C4").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_APR_PRANIMG").Value = apvPranchaImagem;

                            apvMemorialDescritivo = ((SAPbouiCOM.EditText)matrixAprovacao.Columns.Item("Apv_Amb_C5").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_APR_MEMDESC").Value = apvMemorialDescritivo;

                            //Instanciar a Grid de Pedidos
                            pedData = ((SAPbouiCOM.EditText)matrixPedido.Columns.Item("Ped_Amb_C1").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_PED_DATE").Value = pedData;

                            pedNumero = ((SAPbouiCOM.EditText)matrixPedido.Columns.Item("Ped_Amb_C2").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_PED_NPEDIDO").Value = pedNumero;

                            pedOrdemCompra = ((SAPbouiCOM.EditText)matrixPedido.Columns.Item("Ped_Amb_C3").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_PED_ORDENDE").Value = pedOrdemCompra;

                            pedValor = ((SAPbouiCOM.EditText)matrixPedido.Columns.Item("Ped_Amb_C4").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_PED_VALOR").Value = pedValor;

                            pedSolicitante = ((SAPbouiCOM.ComboBox)matrixPedido.Columns.Item("Ped_Amb_C5").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_PED_SOLICIT").Value = Convert.ToInt32(pedSolicitante);

                            pedPrazEntrega = ((SAPbouiCOM.EditText)matrixPedido.Columns.Item("Ped_Amb_C6").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_PED_PRAZOEN").Value = pedPrazEntrega;

                            pedAnexo = ((SAPbouiCOM.EditText)matrixPedido.Columns.Item("Ped_Amb_C7").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_PED_ANEXOPE").Value = pedAnexo;

                            pedUrl = ((SAPbouiCOM.EditText)matrixPedido.Columns.Item("Ped_Amb_C8").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_PED_URL").Value = pedUrl;

                            //Instanciar a Grid de Detalhamento

                            combo = (SAPbouiCOM.ComboBox)matrixDetalhamento.Columns.Item("Det_Amb_C2").Cells.Item(i + 1).Specific;
                            if (combo.Value != "")
                            {
                                detProjetista = Convert.ToInt32(((SAPbouiCOM.ComboBox)matrixDetalhamento.Columns.Item("Det_Amb_C2").Cells.Item(i + 1).Specific).Value);
                                oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_DET_PROJETI").Value = detProjetista;
                            }

                            detIniPrev = ((SAPbouiCOM.EditText)matrixDetalhamento.Columns.Item("Det_Amb_C3").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_DET_INICIOP").Value = detIniPrev;

                            detTermPrev = ((SAPbouiCOM.EditText)matrixDetalhamento.Columns.Item("Det_Amb_C4").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_DET_TERMINP").Value = detTermPrev;

                            detIniRealzidado = ((SAPbouiCOM.EditText)matrixDetalhamento.Columns.Item("Det_Amb_C5").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_DET_INICIRE").Value = detIniRealzidado;

                            detTermRealizado = ((SAPbouiCOM.EditText)matrixDetalhamento.Columns.Item("Det_Amb_C6").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_DET_TERMINO").Value = detTermRealizado;

                            detAnexo = ((SAPbouiCOM.EditText)matrixDetalhamento.Columns.Item("Det_Amb_C7").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_DET_PDF").Value = detAnexo;

                            //Instanciar a Grid de Fábrica
                            fabExpedicao = ((SAPbouiCOM.EditText)matrixFabrica.Columns.Item("Fab_Amb_C1").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_FAB_EXPEDIC").Value = fabExpedicao;

                            fabRecebimento = ((SAPbouiCOM.EditText)matrixFabrica.Columns.Item("Fab_Amb_C2").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_FAB_RECEBIM").Value = fabRecebimento;

                            fabConferente = ((SAPbouiCOM.ComboBox)matrixFabrica.Columns.Item("Fab_Amb_C3").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_FAB_CONFERE").Value = Convert.ToInt32(fabConferente);

                            //Instanciar a Grid de Montagem
                            montResponsavel = ((SAPbouiCOM.ComboBox)matrixMontagem.Columns.Item("Mon_Amb_C1").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_MTG_RESPONS").Value = Convert.ToInt32(montResponsavel);

                            montDescricao = ((SAPbouiCOM.EditText)matrixMontagem.Columns.Item("Mon_Amb_C2").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_MTG_DESCRIC").Value = montDescricao;

                            montVstInt1 = ((SAPbouiCOM.EditText)matrixMontagem.Columns.Item("Mon_Amb_C3").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_MTG_VSTINT1").Value = montVstInt1;

                            montVstInt2 = ((SAPbouiCOM.EditText)matrixMontagem.Columns.Item("Mon_Amb_C4").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_MTG_VSTINT2").Value = montVstInt2;

                            montVstInt3 = ((SAPbouiCOM.EditText)matrixMontagem.Columns.Item("Mon_Amb_C5").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_MTG_VSTINT3").Value = montVstInt3;

                            //Instanciar a Grid de Entrega
                            etgDatEntrega = ((SAPbouiCOM.EditText)matrixEntrega.Columns.Item("Etg_Amb_C1").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ENT_ENTREGA").Value = etgDatEntrega;

                            etgResponsavel = ((SAPbouiCOM.ComboBox)matrixEntrega.Columns.Item("Etg_Amb_C2").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ENT_RESPONS").Value = Convert.ToInt32(etgResponsavel);

                            etgLaudoEntrega = ((SAPbouiCOM.EditText)matrixEntrega.Columns.Item("Etg_Amb_C3").Cells.Item(i + 1).Specific).Value;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ENT_LAUDO").Value = etgLaudoEntrega;

                            etgDatSolucao = ((SAPbouiCOM.EditText)matrixEntrega.Columns.Item("Etg_Amb_C4").Cells.Item(i + 1).Specific).String;
                            oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ENT_DATASOL").Value = etgDatSolucao;

                            etgResolvido = ((SAPbouiCOM.CheckBox)matrixEntrega.Columns.Item("Etg_Amb_C5").Cells.Item(i + 1).Specific).Checked;
                            if (etgResolvido)
                            {
                                oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ENT_RESOLVI").Value = 1;
                            }
                            else
                            {
                                oSalesOpportunities.Interests.UserFields.Fields.Item("U_FLX_FB_ENT_RESOLVI").Value = 0;
                            }

                            oSalesOpportunities.Update();
                        }
                    }
                }
            }
            catch (Exception ex)
            {
                SBO_Application.MessageBox(ex.Message, 1, "Ok", "", "");
            }
        }
예제 #42
0
        private void SBO_Application_MenuEvent(ref SAPbouiCOM.MenuEvent pVal, out bool BubbleEvent)
        {
            BubbleEvent = true;

            //Matrix de Conferencia de Medicao
            if (pVal.MenuUID == "AddRowMatrixConf" && pVal.BeforeAction == true)
            {
                oNewItem = oForm.Items.Item("Med_Cnf");
                oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
                oColumns = oMatrix.Columns;
                int numeroLinhas = oMatrix.RowCount;
                oMatrix.AddRow(1, numeroLinhas + 1);
                ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Med_Cnf_C0").Cells.Item(oMatrix.RowCount).Specific).Value = "";
                //((SAPbouiCOM.EditText)oMatrix.Columns.Item("med_Cnf_C1").Cells.Item(oMatrix.RowCount).Specific).Value = "";
            }

            //Matrix de Conferencia de Avarias
            if (pVal.MenuUID == "AddRowMatrixAvr" && pVal.BeforeAction == true)
            {
                oNewItem = oForm.Items.Item("Ava_Amb");
                oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
                oColumns = oMatrix.Columns;
                int numeroLinhas = oMatrix.RowCount;
                oMatrix.AddRow(1, numeroLinhas + 1);
                ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Ava_Amb_C0").Cells.Item(oMatrix.RowCount).Specific).Value = "";
            }

            //Matrix de Conferencia de Avarias
            if (pVal.MenuUID == "AddRowMatrixPend" && pVal.BeforeAction == true)
            {
                oNewItem = oForm.Items.Item("Pen_Amb");
                oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
                oColumns = oMatrix.Columns;
                int numeroLinhas = oMatrix.RowCount;
                oMatrix.AddRow(1, numeroLinhas + 1);
                ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Pen_Amb_C0").Cells.Item(oMatrix.RowCount).Specific).Value = "";
            }

            //Matrix de Itens Complementares
            if (pVal.MenuUID == "AddRowMatrixIt" && pVal.BeforeAction == true)
            {
                oNewItem = oForm.Items.Item("Det_Cmp");
                oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
                oColumns = oMatrix.Columns;
                int numeroLinhas = oMatrix.RowCount;
                oMatrix.AddRow(1, numeroLinhas + 1);
                ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C0").Cells.Item(oMatrix.RowCount).Specific).Value = "";
                ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C1").Cells.Item(oMatrix.RowCount).Specific).Value = "";
                ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C4").Cells.Item(oMatrix.RowCount).Specific).Value = "0.000000";
                ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C2").Cells.Item(oMatrix.RowCount).Specific).Value = "0.000000";
                ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C6").Cells.Item(oMatrix.RowCount).Specific).Value = "";
                ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C3").Cells.Item(oMatrix.RowCount).Specific).Value = "";
                ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C5").Cells.Item(oMatrix.RowCount).Specific).Value = "";
                ((SAPbouiCOM.EditText)oMatrix.Columns.Item("Cmp_Amb_C7").Cells.Item(oMatrix.RowCount).Specific).Value = "";

                oMatrix.FlushToDataSource();
            }
        }
예제 #43
0
 private void ContarLinhasIniciaisMatrixPendencias()
 {
     //Pendencias
     oNewItem = oForm.Items.Item("Pen_Amb");
     oMatrix = ((SAPbouiCOM.Matrix)(oNewItem.Specific));
     countMatrixPendenciaAntes = oMatrix.RowCount;
     ListNomePendencias.Clear();
     for (int i = 1; i <= oMatrix.RowCount; i++)
     {
         ListNomePendencias.Add(((SAPbouiCOM.EditText)oMatrix.Columns.Item("Pen_Amb_C0").Cells.Item(i).Specific).String);
     }
 }
예제 #44
0
        private void LoadGridPendencias()
        {
            string OpID = null;

            oForm.DataSources.DataTables.Item("oDataTablePend").Clear();
            oItem = oForm.Items.Item("74");
            oEditItem = ((SAPbouiCOM.EditText)(oItem.Specific));
            OpID = oEditItem.Value;
            oForm.DataSources.DataTables.Item("oDataTablePend").ExecuteQuery("select * from [@FLX_FB_PEN] where U_FLX_FB_PEN_IDOOPR = '" + OpID + "'" + "and U_FLX_FB_PEN_IDAMB = '" + idAmbientePendencia + "'");

            oItem = oForm.Items.Item("Pen_Amb");
            oMatrix = ((SAPbouiCOM.Matrix)(oItem.Specific));
            oMatrix.LoadFromDataSource();
        }