Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Adding Notes in the same row
Message
From
13/04/2007 13:31:20
 
 
To
13/04/2007 13:24:59
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Windows 2000 SP4
Network:
Windows 2000 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01214141
Message ID:
01215637
Views:
13
>>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
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform