Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Adding Notes in the same row
Message
De
13/04/2007 13:31:20
 
 
À
13/04/2007 13:24:59
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 9 SP1
OS:
Windows 2000 SP4
Network:
Windows 2000 Server
Database:
Visual FoxPro
Divers
Thread ID:
01214141
Message ID:
01215637
Vues:
14
>>Hi Samuel,
>>
>>Would you please respond with a relevant piece of code (make sure to enable autoquote in message view setup)?
>>
>>Looking at the code only I do not see a problem. May be because I need to take a quick lunch break <g>
>
>Here is the code.
>
>
>OPEN DATABASE testdbase
>
>SELECT mynotes
>lcNotes = ""
>SET ORDER TO TAG tComPrt
>SEEK crsbom.partnum
>SCAN WHILE mynotes.partnum = crsbom.partnum
> IF EMPTY(mynotes.notes)
>  LOOP
> ENDIF
> lcNotes = m.lcNotes + ALLTRIM(mynotes.notes)+ space(1)
>ENDSCAN
>IF NOT EMPTY(m.lcNotes)
> REPLACE Notes WITH crsbom.notes + m.lcNotes IN crsbom
>ENDIF
>
Most likely, you confuse the program with 'lcNotes' and 'm.lcNotes'. Why can't you use one of them only?
Edward Pikman
Independent Consultant
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform