Before Form Starts
CHOOSE vCustID FROM #VALUES FOR (CustFirstName&CustLastName)CustID FROM
Customer +
WHERE CustID = .vCustID +
ORDER BY CustID +
AT 10 30 +
CHKBOX 1 +
TITLE 'Select Customer' +
CAPTION '' +
FORMATTED
SELECT CustLastName INTO vCustLastName FROM Customer WHERE CustID =
.vCustID
SET VAR vsget = (SGET(.vCustLastName,3,1))
*(SETUP TEMP TABLE)
APPEND Customer to tCustomer WHERE CustLastName CONT .vsget
Custom EEP after form starts
PROPERTY <ComponentID> VISIBLE 'FALSE'
DECLARE c1 CURSOR +
FOR SELECT +
CustID +
FROM PartsList
OPEN c1
FETCH C1 INTO +
vCustID2 INDIC ivCustID2
WHILE vCustID2 <> .vCustID THEN
PROPERTY TABLE <FormTableName> 'NEXT'
FETCH C1 INTO +
vCustID2 INDIC ivCustID2
ENDW
DROP CURSOR C1
PROPERTY <ComponentID> VISIBLE 'TRUE'
notice the use of this command
PROPERTY TABLE <FormTableName> 'NEXT'
instead of
NEXTROW
This code is untested.
On 4 Nov 2004 at 13:07, Lawrence Lustig wrote:
> > So what you want is a Dynamic Sub-Select..... Limit your Record Source in
> > the Where Clause, than by some other mechanism walk the Record Set based on a
> > Sub-Select on the Record Set.....
>
> Well, I'm not sure I follow that, but what I believe is wanted is the
ability
> to reposition the form within the current record set without having to
close
> and open the form. Currently we can move to the first, last, next, and
> previous records but if we want to move to some arbitrary record with an
> arbitrary value we have to do that in code -- with a bunch of NEXTROW
> statements that will refresh the form each time leading to furious
blinking and
> very poor performance (all EEPs would execute, etc).
>
> What would be really nice is if they could expose the underlying dataset
FIND
> and FILTER methods. Then we could "leap" directly to the record we
wanted.
> Navigation could then be controlled by a variable drop down box on the
top of
> the form, or by other mechanisms.
> --
> Larry
>
>
Victor Timmons
Tiz's Door Sales, Inc
425-258-2391
