Find first Problem

[make]

Hi everybody !

I have wrote a query like this :

Load_Products:
for EACH cust.m2t2f2aM NO-LOCK,
EACH cust.xartikel WHERE m2t2f2aM.kombi_kz = xartikel.glas
AND xartikel.geloescht = false NO-LOCK :
Produkt-Combo:add-last(m2t2f2am.liefertext).
end.

But this query display all entries from my xartikel.glas.
I only want to show the first of each.

How can i do that ?

2nd Question :

How can i delete all Items of a Combo-box ?


Greetings (esp. to Emma !!)

Make

 

[dkellgren]

Combo-box clear:

If List-Item type:
cb-Name:list-items = "".

If List-Item-Pairs type:
cb-Name:list-item-pairs = ?.

A nice way to "clear" out the screen-value (without DELETING the items) is to use:
cb-Name:list-items = cb-Name:list-items.

-dk-

 

[make]

Is there a chance that I dont have to go over the whole xartikel ?
The code works, but its very slow. I only use the xartikel.glas and xartikel.geloescht field. ?

Make

 

[Balwinder]

I would make the following changes to your code:


for EACH cust.m2t2f2aM NO-LOCK:
FIND FIRST cust.xartikel WHERE m2t2f2aM.kombi_kz = xartikel.glas
AND xartikel.geloescht = false NO-LOCK NO-ERORR.
IF AVAILABLE cust.xartikel THEN ASSIGN
Produkt-Combo:add-last(m2t2f2am.liefertext).