how to work with multiple forms

[Former Member]

Hi

I am developing an application in which it contain 6 forms..

i am able to create them and run a single form.. now,, i have to implement code for all the remaining forms.. what shall i do..

this is wht i wrote for a add mode of one single form ..

Private Sub SBO_Application_MenuEvent(ByRef pVal As SAPbouiCOM.MenuEvent, ByRef BubbleEvent As Boolean) Handles SBO_Application.MenuEvent

If (pVal.MenuUID = "1282") And (pVal.BeforeAction = False) Then '1282 for Add Mode

oForm = SBO_Application.Forms.Item("TBL_QPLAN_")

'oForm.Select()

getNextDocNum()

oItem = oForm.Items.Item("MATRIX")

oMatrix = oItem.Specific

oColumns = oMatrix.Columns

oMatrix.AddRow()

End If

Now there are many forms how to write the code to select and operate that particular form..

Thanks regarding.

[Former Member · Accepted solution]

Hi..

use this code..

Give menu event

If pVal.BeforeAction = False Then

Try

Select Case pVal.MenuUID

Case "MenuID"

LoadFromXml1("1.srf")

FormS = SBO_Application.Forms.Item("Fourm Uid")

Case "MenuID"

LoadFromXml2("2.srf")

FormS = SBO_Application.Forms.Item("Fourm Uid")

Case "MenuID"

LoadFromXml3("3.srf")

FormS = SBO_Application.Forms.Item("Fourm Uid")

Case "MenuID"

LoadFromXml4("4.srf")

FormS = SBO_Application.Forms.Item("Fourm Uid")

Case "MenuID"

LoadFromXml4("5.srf")

FormS = SBO_Application.Forms.Item("Fourm Uid")

Case "MenuID"

LoadFromXml4("6.srf")

FormS = SBO_Application.Forms.Item("Fourm Uid")

Catch ex As Exception

SBO_Application.MessageBox(ex.Message)

End Try

End Select

Regards...

Billa 2007

[Former Member · Accepted solution]

Thanks fro ur reply.

i am selecting forms as u directed only.. now how to select the menuid 1282 and 1281 for each form.

[Former Member · Accepted solution]

Hi...

ur form u use any docnum or docentry

if use means

oForm.DataBrowser.BrowseBy = "docnum or docentry - ID"

It will take automatically Navigation.

u want Add mode...

After loading Srf give this one

oFrm.Mode = SAPbouiCOM.BoFormMode.fm_ADD_MODE Or oFrm.Mode = SAPbouiCOM.BoFormMode.fm_UPDATE_MODE

Regards...

Billa 2007

[Former Member · Accepted solution]

hI

I HOPE U GET ME..

all my forms ae opened but when to enter the data.. selecting the mode buttons is critical over here,,

previously only one form is there i wrote pav.menuid=1282 then form.select, and other functions.

now how to select each form..

mode and find modes..

[Former Member · Accepted solution]

Hi...

for get menuid=1282..ok

use this one

Each and Every form After loading srf

oForm.DataBrowser.BrowseBy = "docnum or docentry - ItemID(Textbox)"

Regards

Billa 2007

[Former Member · Accepted solution]

U can have a Case statement with the form Types and u can get the Active form.

Plz have a look at the code sample to get an idea...

If pVal.MenuID = "1281"

oForm = Sbo_Appln.Forms.ActiveForm

strFormType = oForm.TypeEx

Case FormType

Case strFormType

'Ur Code here for the conditins

Hope it helps u..

Vasu Natari.

[Former Member · Accepted solution]

Hi Babu,

you can use Form unique id to recognize each form separately.

For Ex in Menu event,

OForm = sbo_application.Forms.ActiveForm

Select Case pVal.MenuUID

Case "1282"

Select Case OForm.UniqueID

case "Form1Uid"

validations

case "Form2Uid"

validations

case "Form3Uid"

validations

.

.

.

End Select

End Select

you can follow the same scenario in Item Event too.

Regards,

Ganesh K