Leenaa
26th March 2003, 10:08
hi all,
i m facing a problem regarding selectempty
My Query is following ************
select tidel002.citt,tidel002.item,tidel002.aitc
from tidel002
where tidel002._index1 = {:tibom010.sitm}
selectdo
selectempty
tidel002.citt = ""
tidel002.aitc = ""
rprt_send()
endselect
Is this a right syntax,as it is not satisfactory,plz help me out where i m wrong !
shirodk
26th March 2003, 10:41
Put rprt_send() after endselect & try
Sanjay
morpheus
26th March 2003, 11:21
If you could specify what exactly you are trying to achieve...
Leenaa
26th March 2003, 12:03
My script ***
select tibom010.mitm,tibom010.sitm,tibom010.cwar
from tibom010
where tibom010.sitm = :bom.sitm| item
as set with 1 rows
selectdo
select tidel002.citt,tidel002.item,tidel002.aitc
from tidel002
where tidel002._index1 = {:tibom010.sitm}
order by tidel002.citt
selectdo
select tcmcs027.citt,tcmcs027.dsca
from tcmcs027
where tcmcs027._index1 = {:tidel002.citt}
selectdo
dsca = tcmcs027.dsca
selectempty
dsca = ""
endselect
selectempty
tidel002.citt = ""
tidel002.aitc = ""
rprt_send()
endselect
endselect
I want to print all the dsca of tibom010.sitm ,from this script It is giving only one dsca against one item,
morpheus
26th March 2003, 12:25
select tibom010.mitm,tibom010.sitm,tibom010.cwar
from tibom010
where tibom010.sitm = :bom.sitm
as set with 1 rows |will return ONLY 1 record
selectdo
select tidel002.citt,tidel002.item,tidel002.aitc
from tidel002
where tidel002._index1 = {:tibom010.sitm}
order by tidel002.citt
selectdo
select tcmcs027.citt,tcmcs027.dsca
from tcmcs027
where tcmcs027._index1 = {:tidel002.citt}
selectdo
rprt_send()
endselect
endselect
endselect
Good Luck
Leenaa
26th March 2003, 13:05
hi morphes !!!!
thanx for ur info,
i add something in this and it solves my problem !
select tibom010.mitm,tibom010.sitm,tibom010.cwar
from tibom010
where tibom010.sitm = :bom.sitm
as set with 1 rows
selectdo
select tidel002.citt,tidel002.item,tidel002.aitc
from tidel002
where tidel002._index1 = {:tibom010.sitm}
order by tidel002.citt
selectdo
select tcmcs027.citt,tcmcs027.dsca
from tcmcs027
where tcmcs027._index1 = {:tidel002.citt}
selectdo
rprt_send()
endselect
selectempty
tcmcs027.dsca=""
endselect
endselect