Welcome To The Home Of The Visual FoxPro Experts  
home. signup. forum. archives. search. google. articles. downloads. faq. members. weblogs. file info. rss.
 From: Boudewijn Lutgerink
  Where is Boudewijn Lutgerink?
 Hoonaardstraat, Driel
 Netherlands
 Boudewijn Lutgerink
 To: Raymond Wong
  
 
 
 Raymond Wong
 Tags
Subject: RE: Help me with this code
Thread ID: 50691 Message ID: 50760 # Views: 1 # Ratings: 0
Version: Visual FoxPro 7 Category: Reports and Printers
Date: Monday, September 06, 2004 6:55:23 AM         
   


> Hi,
>
> I have the following code in addrefno.prg file to be used in a variable in a report:
> ~~~~~~~
> LPARAMETERS cRefno,cRefList
>
> IF !INLIST(cRefList,ALLTRIM(cRefno))
> IF cRefList = "NONE"
> cRefList = ALLTRIM(cRefno)
> ELSE
> cRefList = ALLTRIM(cRefList)+","+ALLTRIM(cRefno)
> ENDIF
> ENDIF
>
> RETURN cRefList
> ~~~~~~~
>
> The variable has a Value to Store of "addrefno(refno,refno_list)" with addrefno being the code above. The variable is placed in the detail band.
>
> My report looks like these (grouped by item):
> Refno refno_list
> ------- --------------------------
> Item1
> 127473 127473
> 127473 127473
> Item2
> 153610 127473, 153610
> 153610 127473, 153610, 153610
> Item 3
> 153610 127473, 153610, 153610, 153610
> 153610 127473, 153610, 153610, 153610, 153610
>
> Is there something wrong with addrefno's code ?
>
> Thanks,
> Raymond

Could you please give an example of the expected result as well?

Boudewijn LutgeĀ®ink
There are 10 types of people: Those that do understand binary calculations and those that do not.

ENTIRE THREAD

Help me with this code Posted by Raymond Wong @ 9/4/2004 6:08:49 PM
RE: Help me with this code Posted by Boudewijn Lutgerink @ 9/6/2004 6:55:23 AM
RE: Help me with this code Posted by Raymond Wong @ 9/6/2004 10:33:27 AM
RE: Help me with this code Posted by Andy Kramek @ 9/6/2004 12:55:32 PM
RE: Help me with this code Posted by Raymond Wong @ 9/7/2004 10:40:08 AM
RE: Help me with this code Posted by Juan Antonio Santana @ 9/7/2004 12:32:02 PM
RE: Help me with this code Posted by Andy Kramek @ 9/7/2004 1:18:35 PM
RE: Help me with this code Posted by Raymond Wong @ 9/7/2004 1:43:38 PM
RE: Help me with this code Posted by Boudewijn Lutgerink @ 9/7/2004 1:38:26 PM