Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Pick List
Message
De
29/03/2004 12:25:02
 
 
À
29/03/2004 12:23:21
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Divers
Thread ID:
00890438
Message ID:
00890504
Vues:
26
Here is the code that I'm currently running. It is updating everything all at once. That why I want to give the users the options ton update particular ones only to cut down on the processing time...:

CREATE CURSOR NsnsWanted (cNsn c(2))

INSERT INTO NsnsWanted(cNsn) VALUES ("10")
INSERT INTO NsnsWanted(cNsn) VALUES ("23")
INSERT INTO NsnsWanted(cNsn) VALUES ("24")
INSERT INTO NsnsWanted(cNsn) VALUES ("26")
INSERT INTO NsnsWanted(cNsn) VALUES ("28")
INSERT INTO NsnsWanted(cNsn) VALUES ("29")
INSERT INTO NsnsWanted(cNsn) VALUES ("30")
INSERT INTO NsnsWanted(cNsn) VALUES ("31")
INSERT INTO NsnsWanted(cNsn) VALUES ("39")
INSERT INTO NsnsWanted(cNsn) VALUES ("40")
INSERT INTO NsnsWanted(cNsn) VALUES ("41")
INSERT INTO NsnsWanted(cNsn) VALUES ("42")
INSERT INTO NsnsWanted(cNsn) VALUES ("49")
INSERT INTO NsnsWanted(cNsn) VALUES ("51")
INSERT INTO NsnsWanted(cNsn) VALUES ("52")
INSERT INTO NsnsWanted(cNsn) VALUES ("53")
INSERT INTO NsnsWanted(cNsn) VALUES ("58")
INSERT INTO NsnsWanted(cNsn) VALUES ("59")
INSERT INTO NsnsWanted(cNsn) VALUES ("60")
INSERT INTO NsnsWanted(cNsn) VALUES ("61")
INSERT INTO NsnsWanted(cNsn) VALUES ("62")
INSERT INTO NsnsWanted(cNsn) VALUES ("63")
INSERT INTO NsnsWanted(cNsn) VALUES ("67")
INSERT INTO NsnsWanted(cNsn) VALUES ("68")
INSERT INTO NsnsWanted(cNsn) VALUES ("69")
INSERT INTO NsnsWanted(cNsn) VALUES ("70")
INSERT INTO NsnsWanted(cNsn) VALUES ("71")
INSERT INTO NsnsWanted(cNsn) VALUES ("72")
INSERT INTO NsnsWanted(cNsn) VALUES ("73")
INSERT INTO NsnsWanted(cNsn) VALUES ("74")
INSERT INTO NsnsWanted(cNsn) VALUES ("75")
INSERT INTO NsnsWanted(cNsn) VALUES ("76")
INSERT INTO NsnsWanted(cNsn) VALUES ("79")
INSERT INTO NsnsWanted(cNsn) VALUES ("80")
INSERT INTO NsnsWanted(cNsn) VALUES ("81")
INSERT INTO NsnsWanted(cNsn) VALUES ("83")
INSERT INTO NsnsWanted(cNsn) VALUES ("84")
INSERT INTO NsnsWanted(cNsn) VALUES ("85")
INSERT INTO NsnsWanted(cNsn) VALUES ("89")
INSERT INTO NsnsWanted(cNsn) VALUES ("91")
INSERT INTO NsnsWanted(cNsn) VALUES ("95")
INSERT INTO NsnsWanted(cNsn) VALUES ("96")
INSERT INTO NsnsWanted(cNsn) VALUES ("99")

SELECT NSN, ITEM_NAME, ITEM_NOMEN, UNIT_ISSUE, PRICE, DATETIME() AS pro_time, VAL(price) as tot_price, VAL(measqty) AS MEAS_QTY, VAL(price) / VAL(measqty) as Price_per ;
FROM fed_temp ;
JOIN NsnsWanted ;
ON LEFT(nsn,2)=NsnsWanted.cNsn ;
WHERE !EMPTY(item_name) ;
INTO TABLE (oVar.SysDataPath) + 'fedlog.dbf'
Thanks in Advance.

J. Turner
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform