Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Problem with seek()
Message
De
11/10/2003 07:08:02
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
 
À
10/10/2003 17:52:39
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00837690
Message ID:
00837800
Vues:
24
>Hello everyone. In my application I am doing the following seek()
>command.
>
>IF SEEK(route_status_vp.depot_id+DTOC(route_status_vp.delivery_date);
> + route_status_vp.route_id+route_status_vp.load_number+'Y', ;
> 'palletize_customers_vp', 'palletize')
>
>Let me explain how this is used. I pop up a modal form where the user
>changes a combobox in a grid for each record he wants selected
>(changes palletize field from N to Y or vice versa). When done
>changing records, the user clicks and OK button to close the form
>which executes my code. On the first run I change 2 records to have
>palletize = 'Y'. The system returns a T from the seek. I then run
>the form again and change the same records back to 'N' from 'Y' but
>the seek returns T again. I tried a locate and it worked correctly.
>I displayed all the fields resulting from the seek and the palletize
>field it returns is .F.
>
>Any ideas?
>
>Jason

What is the index key expression ?
When seek returns .t. what does :
lcSeek = route_status_vp.depot_id+DTOC(route_status_vp.delivery_date);
	+ route_status_vp.route_id+route_status_vp.load_number+'Y'
IF SEEK(lcSeek, 'palletize_customers_vp', 'palletize')

lcAlias = 'palletize_customers_vp'
lcKey = 'palletize'
select (lcAlias)
lcKeyValue = evaluate(Key(lcAlias,Tagno(lcKey,lcAlias,lcAlias),lcAlias))
? lcKeyValue = lcSeek, lcKeyValue == lcSeek
? lcKeyValue
? lcSeek
return ?
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform