View Single Post
  #7  
Old 29th August 2017, 19:16
Altrev Altrev is offline
Junior Member
 
Join Date: Oct 2009
Posts: 21
Altrev is on a distinguished road
Baan: BaaB IV c4 - DB: Informix - OS: HP-UX 11
Hi,
Here is an Update, the continue process still opens the wrong session, this is what I had to do in order to open the correct session using API for Sales Quotations:

Before accessing the API I had to select the record table by code:

select tdsls001.*
from tdsls001
where tdsls001.refa = :quote.item
order by tdsls001.refa
selectdo
sq.num = tdsls001.qono
endselect

with this select the following API works fine without the continue.process

tdslsf1101m000.handle.sub.process(prog.name$,"send")
tdslsf1101m000.put.Quotation_Number( sq.num )
ret = tdslsf1101m000.find(error.msg)

tdslsf1101m000.handle.sub.process("tdsls1107s000","add")
tdslsf1107s000.put.Quotation_Number( sq.num )
tdslsf1107s000.put.Position_Number.tdsls002.pono( sq.line.num )
tdslsf1107s000.put.Alternative( sq.altn )
tdslsf1107s000.put.Item( quote.item )
tdslsf1107s000.put.Planned_Delivery_Date( quote.date )
tdslsf1107s000.put.Ordered_Quantity( quote.qty )
tdslsf1107s000.put.Tax_Code( tax.code )
ret = tdslsf1107s000.insert( 1, error.msg )

sq.line.num = tdslsf1107s000.get.Position_Number.tdsls002.pono()

tdslsf1107s000.end(error.msg)

tdslsf1101m000.end(error.msg)

Thanks Mark and Bhushan for your help.

Regards,
Reply With Quote