Sub bbBatch_Clicked
Private m As Map
m.Initialize
m.Put("CallFrom",Me)
m.Put("SubToCall","MySub")
CallSubDelayed2(ModSearchFrmN, "ShowData",m)
End Sub
And here are the codes from module ModSearchFrmN
B4X:
Sub Globals
Private CallFrom As Object
Private SubToCall As String
End Sub
Sub ShowData(Params As Map)
CallFrom = Params.Get("CallFrom")
SubToCall = Params.Get("SubToCall")
End Sub
Sub Test(RowId As Int)
CallSubDelayed2(CallFrom, SubToCall,RowId) 'this is the error line
Activity.Finish
End Sub
Change the codes into like this solved the problem
B4X:
Sub bbBatch_Clicked
Private m As Map
m.Initialize
m.Put("CallFrom",Me)
m.Put("SubToCall","My_Sub") 'change Sub Name from MySub to My_Sub
CallSubDelayed2(ModSearchFrmN, "ShowData",m)
End Sub
Sub bbBatch_Clicked Private m AsMap m.Initialize
m.Put("CallFrom",Me)
m.Put("SubToCall","My_Sub") 'change Sub Name from MySub to My_Sub CallSubDelayed2(ModSearchFrmN, "ShowData",m) End Sub