Information générale
Catégorie:
Codage, syntaxe et commandes
Titre:
IF NOT SEEK(Please help what is it really doing in this code
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
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement