Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
What is wrong with my code?
Message
De
22/09/2003 13:36:40
 
 
À
22/09/2003 13:25:35
Julie Ball
Gardner Publications, Inc.
Cincinnati, Ohio, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00831182
Message ID:
00831189
Vues:
16
>I have a form that displays company address info in text boxes then processes that company does in a grid. I have add/edit buttons for each part of the form (address and process info). Everything seems to be working correctly until I need to verify the process that is being added does not already exist for that company. I am just not sure what is wrong with my code. No matter what the process is added and no error message was given. I am using VFP 7. Kudus to whoever helps me with this dilemma.
Hello Julie;

To be a little more specific, just knowing your all project:

But, there is something that can be changed (I believe):
l_prcode  = this.value
l_cocode  = this.parent.otherfield.value
*
IF  EMPTY( l_prcode )
    MESSAGEBOX( 'Product Code is required.', 48, 'Please fix your entry' )
    RETURN .F.
ELSE
    sele myalias
    SEEK l_cocode + l_prcode
    IF  .not. FOUND()
        MESSAGEBOX( 'Product Code is required.', 48, 'Product does not exist' )
        RETURN .F.
    ELSE
        MESSAGEBOX( 'Listing has been added.' )
        RETURN .T.
    ENDIF
ENDIF      			
HTH


Claudio
"Now to him who is able to do immeasurably more than all we ask or imagine, according to his power that is at work within us, Ephesians 3:20
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform