Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
IF NOT SEEK(Please help what is it really doing in this code
Message
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
IF NOT SEEK(Please help what is it really doing in this code
Divers
Thread ID:
00601039
Message ID:
00601039
Vues:
63
Please can someone help me on this piece of code.
when i debugged the code it is going into this message
=MESSAGEBOX("Project and Work Package Combination is not valid",16)
can someone please tell me what does it mean by IF NOT SEEK

Here is the code please help me.
----------

LOCAL ret_val
ret_val = .t.
* check the project and workpkg to see if valid
set step on
SELECT Workpkg
CurWorkpkgRecord = RECNO()
CurWorkpkgOrder = ORDER()
SET ORDER TO wpFirst
IF NOT SEEK(thisform.txtWorkpkg_no.value + thisform.txtProject_no.value)
=MESSAGEBOX("Project and Work Package Combination is not valid",16)
thisform.txtProject_no.setfocus
ret_val = .f.
ENDIF

IF ret_val
Ret_val = DODEFAULT()
ENDIF
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform