Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Return date
Message
From
07/02/2006 07:52:05
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Return date
Environment versions
Visual FoxPro:
VFP 8
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01094224
Message ID:
01094224
Views:
62
hi all,

any help idea.

i need to delete customer client_no from mynewtable(allres) where found this records at old table (allresdintial) via condition ...ex


i have text1 as date and text2 as number got it from combobox have numbers as 3,6,9,12, and field name at newtable and old table is dat.
 thisform.text1.value=05/06/2006
if thisform.text2.value=3
    thisform.text3.value=thisform.text1.value-3 months  && result as 05/03/2006

DELETE FROM allres  WHERE EXISTS(SELECT * FROM allresdintial WHERE clint_no=allres.clint_no and allresdintial.dat>=thisform.text3.value)


if thisform.text2.value=6
    thisform.text3.value=thisform.text1.value-6 months  && result as 
DELETE FROM allres  WHERE EXISTS(SELECT * FROM allresdintial WHERE clint_no=allres.clint_no and allresdintial.dat>=thisform.text3.value)


if thisform.text2.value=9
    thisform.text3.value=thisform.text1.value-9 months  && result as 
DELETE FROM allres  WHERE EXISTS(SELECT * FROM allresdintial WHERE clint_no=allres.clint_no and allresdintial.dat>=thisform.text3.value)

if thisform.text2.value=12   
 thisform.text3.value=thisform.text1.value-12 months  && result as 

DELETE FROM allres  WHERE EXISTS(SELECT * FROM allresdintial WHERE clint_no=allres.clint_no and allresdintial.dat>=thisform.text3.value)
thanks .
Next
Reply
Map
View

Click here to load this message in the networking platform