Hi,
I try to call tdsls4820s000 from tdsls4404m000 via AFS.
In debugg mode I can enter the session tdsls4820s000.
But when I leave the session the orno.select to Export is empty.
Any help would be higly apreciated.
Icke

element = 1
g_sel = tcyesno.yes
stpapi.put.field("tdsls4404m000","selection",str$(etol(g_sel)))
stpapi.handle.subproc("tdsls4404m000","tdsls4820s000", "send")
select tdssn148.*
from tdssn148
where tdssn148.pror = tcyesno.yes
selectdo
get.orno.045()
stpapi.put.field( "tdsls4820s000", "tdsls040.orno", str$(tdsls045.orno) )
stpapi.put.field( "tdsls4820s000", "orno.select", str$(tdsls045.orno), element )
stpapi.save( "tdsls4820s000", err_upd )
element = element + 1
endselect
stpapi.end.session( "tdsls4820s000", err_upd )
g_def = tcyesno.no |nur zu testzwecken
stpapi.put.field("tdsls4404m000","definite",str$(etol(g_def)))
stpapi.set.report("tdsls4404m000","rtdsls440401000",g_devc,err_upd)
stpapi.handle.subproc("tdsls4404m000","tdsls4820s000", "kill")
stpapi.continue.process( "tdsls4404m000", err_upd )
endif
stpapi.end.session( "tdsls4404m000", err_upd )

I have never used send in any of my function servers- so I am not sure how it works. Are you trying to zoom to a session to select or insert values? You may also need to use stpapi.mark to set a record before exiting the tdsls4820s000 session.

Mark

Hi Mark,
good hint with stpapi.zoom.option().
I changed the code like below.
The point is.
You have to call the stpapi.continue.process() after put.fields.
because no field sections in the script are executed during the put.field call, so no validation is performed.
So, thanks a lot for you help.
Icke

element = 1
g_sel = tcyesno.yes
stpapi.put.field("tdsls4404m000","selection",str$(etol(g_sel)))
stpapi.handle.subproc("tdsls4404m000","tdsls4820s000", "add")
stpapi.zoom.option("tdsls4404m000", 1, "tdsls4820s000", err_upd)|!!!!!!!!!!!!!!!!!!
select tdssn148.*
from tdssn148
where tdssn148.pror = tcyesno.yes
selectdo
get.orno.045()
stpapi.put.field( "tdsls4820s000", "tdsls040.orno", str$(tdsls045.orno) )
stpapi.put.field( "tdsls4820s000", "orno.select", str$(tdsls045.orno),element)
element = element + 1
endselect
stpapi.continue.process( "tdsls4820s000", err_upd )|!!!!!!!!!!!!!!!!!!!!
stpapi.end.session( "tdsls4820s000", err_upd )
g_def = tcyesno.no |nur zu testzwecken
stpapi.put.field("tdsls4404m000","definite",str$(etol(g_def)))
stpapi.set.report("tdsls4404m000","rtdsls440401000",g_devc,err_upd)
stpapi.handle.subproc("tdsls4404m000","tdsls4820s000", "kill")
stpapi.continue.process( "tdsls4404m000", err_upd )
endif
stpapi.end.session( "tdsls4404m000", err_upd )