jaycee99
17th June 2008, 11:50
How to make the LINE number start with 10 and then 20 when go for the next new line?

bdittmar
17th June 2008, 14:04
How to make the LINE number start with 10 and then 20 when go for the next new line?


Hello,

you can do it like this:

|--- functions for form and database PONO ---
function search.for.next.position.number()
{
last.pono = 0
on.main.table(search.last.used.position.number.in.table)
search.last.used.position.number.on.screen()
next.pono = min(int((last.pono + 1)/1.0)* 1,9999)
}

function search.last.used.position.number.in.table()
{
select dhsfc600._index1, dhsfc600.pono:last.pono
from dhsfc600
where dhsfc600._index1 = {:save.losn}
order by dhsfc600._index1 desc
as set with 1 rows
selectdo
endselect
}

function search.last.used.position.number.on.screen()
{
for occ.no = 1 to (filled.occ - 1)
do.occ.without.update(occ.no, check.last.used.position.number)
endfor
}

function check.last.used.position.number()
{
if dhsfc600.pono > last.pono then
last.pono = dhsfc600.pono
endif
}

Regards

jaycee99
18th June 2008, 04:09
What should i declared for this Error?

wiggum
18th June 2008, 11:51
You can't use the example code in a DAL only in a 4GL script.