Create ITShop requests using scripts

I want to create New ITShop Requests from a csv file that only has the userid and the product name. I created a script which reads the same and tried to create the same in the following way:

Dim dbpwo As IEntity

dbpwo = Session.Source.CreateNew("PersonWantsorg")

Dim bag As New PropertyBag()

bag.PutValue("uid_personordered", uidperson)
bag.PutValue("uid_personinserted", uidpersinsterd)
bag.PutValue("uid_Org", uiditshoporg)
bag.PutValue("Orderstate", "New")

dbpwo.CallMethod("FillOrder", bag)
dbpwo.Save(Session)

However the process seems not work. It is not throwing any exception, and not creating any personwantsorg object as well. Please advise/guide/suggest what could be done here to achieve my objective.

Version is 8.1.2.

Parents Reply Children
No Data