baancust2
4th December 2007, 11:53
Hi,
We are trying to generate sales Order header and lines using the code given below, Header gets created successfully but the lines creation gives problem. It gives an error Cannot read the session or object tdsls00009058 continously in a loop .
Can someone please help?
function read.main.table()
{
domain tccom.cadr ofad1
String add1(20),add2(20),add3(20),result(30)
ret = stpapi.synchronize.dialog("tdsls4100mkro", "add", error7)
stpapi.put.field("tdsls4100mkro", "tdsls400.ofbp", cuno.f)
stpapi.put.field("tdsls4100mkro", "tdsls400.ofad", cadr.f)
stpapi.put.field("tdsls4100mkro", "tdsls400.cofc", cofc.f)
stpapi.put.field("tdsls4100mkro", "tdsls400.sotp", cotp.f)
stpapi.put.field("tdsls4100mkro", "tdsls400.orno", ord.seri)
stpapi.put.field("tdsls4100mkro", "tdsls400.oadt", str$(date.f))
stpapi.put.field("tdsls4100mkro", "tdsls400.ddat", str$(date.f))
stpapi.put.field("tdsls4100mkro", "tdsls400.ccur", "INR")
ret = stpapi.insert("tdsls4100mkro", true, error1)
stpapi.get.field("tdsls4100mkro", "tdsls400.orno", m.orno)
message("Sales Order %s",m.orno)
message("%s",error1)
fill.SO.lines()
stpapi.end.session("tdsls4100mkro", error2)
}
function fill.SO.lines()
{
string pono1(5)
stpapi.put.field("tdsls4101m000", "tdsls401.orno",m.orno)
ret = stpapi.change.view("tdsls4101m000", error3)
ret = stpapi.synchronize.dialog("tdsls4101m000", "modify", error7)
if ret then
stpapi.put.field("tdsls4101m000", "tdsls401.orno", m.orno)
stpapi.put.field("tdsls4101m000", "tdsls401.item.segment.1"," " )
stpapi.put.field("tdsls4101m000", "tdsls401.item.segment.2", item.f)
stpapi.put.field("tdsls4101m000", "tdsls401.qoor", "1")
stpapi.put.field("tdsls4101m000", "tdsls401.pric", str$(pric.f))
stpapi.put.field("tdsls4101m000", "tdsls401.ddta", str$(date.f))
stpapi.put.field("tdsls4101m000", "tdsls401.ccty", "IND")
stpapi.put.field("tdsls4101m000", "tdsls401.cvat", cvat.f)
stpapi.put.field("tdsls4101m000", "tdsls401.bptc", "IND")
stpapi.put.field("tdsls4101m000", "tdsls401.rnso", str$(seqn.2))
stpapi.put.field("tdsls4101m000", "tdsls401.rnsb", str$(seqn.1))
ret = stpapi.insert("tdsls4101m000", true, error4)
stpapi.get.field("tdsls4101m000","tdsls401.pono",pono1)
pono = lval(pono1)
message("Position no %s",pono1)
message("%s",error4)
stpapi.end.session("tdsls4101m000", error5)
stpapi.end.session("tdsls4101m000", error5)
endif
}
Regards,
Baancust2
We are trying to generate sales Order header and lines using the code given below, Header gets created successfully but the lines creation gives problem. It gives an error Cannot read the session or object tdsls00009058 continously in a loop .
Can someone please help?
function read.main.table()
{
domain tccom.cadr ofad1
String add1(20),add2(20),add3(20),result(30)
ret = stpapi.synchronize.dialog("tdsls4100mkro", "add", error7)
stpapi.put.field("tdsls4100mkro", "tdsls400.ofbp", cuno.f)
stpapi.put.field("tdsls4100mkro", "tdsls400.ofad", cadr.f)
stpapi.put.field("tdsls4100mkro", "tdsls400.cofc", cofc.f)
stpapi.put.field("tdsls4100mkro", "tdsls400.sotp", cotp.f)
stpapi.put.field("tdsls4100mkro", "tdsls400.orno", ord.seri)
stpapi.put.field("tdsls4100mkro", "tdsls400.oadt", str$(date.f))
stpapi.put.field("tdsls4100mkro", "tdsls400.ddat", str$(date.f))
stpapi.put.field("tdsls4100mkro", "tdsls400.ccur", "INR")
ret = stpapi.insert("tdsls4100mkro", true, error1)
stpapi.get.field("tdsls4100mkro", "tdsls400.orno", m.orno)
message("Sales Order %s",m.orno)
message("%s",error1)
fill.SO.lines()
stpapi.end.session("tdsls4100mkro", error2)
}
function fill.SO.lines()
{
string pono1(5)
stpapi.put.field("tdsls4101m000", "tdsls401.orno",m.orno)
ret = stpapi.change.view("tdsls4101m000", error3)
ret = stpapi.synchronize.dialog("tdsls4101m000", "modify", error7)
if ret then
stpapi.put.field("tdsls4101m000", "tdsls401.orno", m.orno)
stpapi.put.field("tdsls4101m000", "tdsls401.item.segment.1"," " )
stpapi.put.field("tdsls4101m000", "tdsls401.item.segment.2", item.f)
stpapi.put.field("tdsls4101m000", "tdsls401.qoor", "1")
stpapi.put.field("tdsls4101m000", "tdsls401.pric", str$(pric.f))
stpapi.put.field("tdsls4101m000", "tdsls401.ddta", str$(date.f))
stpapi.put.field("tdsls4101m000", "tdsls401.ccty", "IND")
stpapi.put.field("tdsls4101m000", "tdsls401.cvat", cvat.f)
stpapi.put.field("tdsls4101m000", "tdsls401.bptc", "IND")
stpapi.put.field("tdsls4101m000", "tdsls401.rnso", str$(seqn.2))
stpapi.put.field("tdsls4101m000", "tdsls401.rnsb", str$(seqn.1))
ret = stpapi.insert("tdsls4101m000", true, error4)
stpapi.get.field("tdsls4101m000","tdsls401.pono",pono1)
pono = lval(pono1)
message("Position no %s",pono1)
message("%s",error4)
stpapi.end.session("tdsls4101m000", error5)
stpapi.end.session("tdsls4101m000", error5)
endif
}
Regards,
Baancust2