Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Record Process Time
Message
De
30/03/2004 17:27:00
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Record Process Time
Divers
Thread ID:
00891016
Message ID:
00891016
Vues:
60
Can anyone tell me if there's an quicker way than what is currently coded? Is it necessary to update teh view before I continue processing? or can i just cotninue to add records and update the table once the process i complete?

sele fedlog

SCAN
SELECT V_UPNOMEN
=REQUERY()

IF _TALLY = 0 && REcord not found in Nomen table, THEN INSERT IN!
INSERT INTO V_UPNOMEN(pk_nom_id, nsn, item_name, item_desc) VALUES (oVar.NextId, oVar.ThisNsn, ALLTRIM(oVar.Item_name), ALLTRIM(oVar.Item_desc))
SELECT v_upNomen
ELSE &&RECORD FOUND IN NOMEN TABLE, CHECK IF UPDATES ARE NECESSARY
DO CASE
CASE EMPTY(ALLTRIM(V_UPNOMEN.item_desc))
REPLACE V_UPNOMEN.ITEM_DESC WITH ALLTRIM(UPPER(oVar.Item_Desc))

cASE EMPTY(ALLTRIM(V_UPNOMEN.item_name))
REPLACE V_UPNOMEN.ITEM_NAME WITH ALLTRIM(UPPER(oVar.Item_Name))
ENDCASE
endif
SELECT v_upNomen
=TABLEUPDATE(.T.)
=REQUERY()

SELECT FEDLOG
ENDSCAN
Thanks in Advance.

J. Turner
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform