Add new project but "BP Project" in Accounting not updated.

Question

Hi,
This is a bit tricky.  If you have a solution for this it would be cool.
I have a UDF called Project Name and when the user adds the Sales Order,
I would like the "BP Project" in Accounting be updated with the new project which I just added with the ProjectService
I've been able to add the value with the ValidValues of the IComboBox for the BP Project item but
seems that there's something not working well.
It pops the Projects dialog like if the item doesn't exist but I just added it with the ProjectService and its really in the table
So what I suspect is that the control BP Project on the form needs to be updated but I don't know how to do it.
Any good and simple idea to update this control ?
I did look with DataBind and everything but I'm unable to figure out how to do it
Edited by: Marc Roussel on May 1, 2008 8:30 PM

Answer 1

Thank you very much.  It is working this way.  Better have this way then no way I'm glad to share the code with you all
Here's the code that starts the process from the ItemEvent
if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED && pVal.BeforeAction)
    if (pVal.FormType == 139 && pVal.ItemUID == "1")
        if (SBO_Application.Forms.ActiveForm.Mode == BoFormMode.fm_ADD_MODE || SBO_Application.Forms.ActiveForm.Mode == BoFormMode.fm_UPDATE_MODE)
            BubbleEvent = ValidateProjectName();
This is the code that validates if the UDF project name is there and if yes, try to create it by calling the method below
private bool ValidateProjectName()
        bool ReturnBubble = true;
        SAPbouiCOM.EditText ProjectName = null;
        try
            ProjectName = (SAPbouiCOM.EditText)SBO_Application.Forms.GetForm("-139", 0).Items.Item("U_project_name").Specific;
        catch
            SBO_Application.SendKeys("^+U");
            ProjectName = (SAPbouiCOM.EditText)SBO_Application.Forms.GetForm("-139", 0).Items.Item("U_project_name").Specific;
        string ProjectCode = ProjectName.Value.ToString().Trim();
        if (ProjectCode == "")
            ReturnBubble = false;
            FortSum.SAP.ShowMessage(SBO_Application, "Le nom du projet ne peux pas être vide...", "The project's name can't be empty...");
        else
            if (!IsProjectExist(ProjectCode))
                CreateProject(ProjectCode, ProjectCode, false);
        System.Runtime.InteropServices.Marshal.ReleaseComObject(ProjectName);
        ProjectName = null;
        return ReturnBubble;
Here's the code that creates the project : (Note - ProjectForm.Visible = false does nothing since the form pops up anyway)
private bool CreateProject(string ProjectCode, string ProjectName)
        bool Done = true;
        try
            SAPbouiCOM.ComboBox Projects = (SAPbouiCOM.ComboBox)SBO_Application.Forms.GetForm("139", 0).Items.Item("157").Specific;
            Projects.Select("Define New", BoSearchKey.psk_ByValue);
            SAPbouiCOM.Form ProjectForm = SBO_Application.Forms.GetForm("711", 1);
            ProjectForm.Visible = false;
            SAPbouiCOM.Matrix ProjectsMatrix = (SAPbouiCOM.Matrix)ProjectForm.Items.Item("3").Specific;
            ((SAPbouiCOM.EditText)ProjectsMatrix.Columns.Item("PrjCode").Cells.Item(ProjectsMatrix.RowCount).Specific).Value = ProjectCode;
            ((SAPbouiCOM.EditText)ProjectsMatrix.Columns.Item("PrjName").Cells.Item(ProjectsMatrix.RowCount).Specific).Value = ProjectName;
            ProjectForm.Items.Item("1").Click(BoCellClickType.ct_Regular);
            ProjectForm.Close();
            Projects.Select(ProjectCode, BoSearchKey.psk_ByValue);
            FortSum.General.ReleaseComObject(new object[] { ProjectForm, ProjectsMatrix });
            ProjectForm = null;
            ProjectsMatrix = null;
        catch (Exception ex)
            FortSum.SAP.ShowMessage(SBO_Application, ex.Message, ex.Message);
            Done = false;
        return Done;