Since our databases are not the same, I had to modify the code some to get it to run, my modified version is below. The only 'real' change I had to do was to remove the word 'browse' from your def frame statement because that would not pass syntax here. (I'm on CHARACTER V9.1d)
That aside, it worked fine with no labels that I wouldn't expect.
Check your open query statement.
Also check for a 'title' line where the title is 'browse-name'.
If you haven't already, search your code for 'browse-name' to see if it's in there anywhere. If so, then that's probably the line with the problem.
Good luck, Mark.
define temp-table t-supplier no-undo
field product-code like part-file.partno
field product-name like part-file.descr
field supplier-key like part-file.vcode
field supplier-name like part-file.fulldescr
index k-product-code product-code ascending.
for each part-file where part-file.partno begins 'per' no-lock:
create t-supplier.
assign t-supplier.product-code = part-file.partno
t-supplier.product-name = part-file.descr
t-supplier.supplier-key = part-file.vcode
t-supplier.supplier-name = part-file.fulldescr.
end.
define query q-supplier for t-supplier scrolling.
define browse br-supplier query q-supplier no-lock display
product-code format "xx-x-xxxxx-xxxxxxxx"
product-name format "x(20)"
supplier-key format "x(12)"
supplier-name format "x(30)"
with size 99 by 12.75 font 14 separators.
define frame default-frame
br-supplier at row 6.75 col 3.
open query q-supplier for each t-supplier.
enable br-supplier with frame default-frame.
wait-for close of frame default-frame.
Bigpoppa said:
Here you go:
define temp-table t-supplier no-undo
field product-code like oe-prod-location.product-code
field product-name like oe-prod-location.product-name
field supplier-key like suppname.supplier-code
field supplier-name like suppname.supplier-name
index k-product-code product-code ascending.
define query q-supplier for t-supplier scrolling.
define browse br-supplier query q-supplier no-lock display
product-code format "xx-x-xxxxx-xxxxxxxx"
product-name format "x(20)"
supplier-key format "x(12)"
supplier-name format "x(30)"
with size 99 by 12.75 font 14 separators.
define frame default-frame
browse br-supplier at row 6.75 col 3.
I assume it has something to do with the definitions, since the label appears as soon as I run the form.