Welcome To The Home Of The Visual FoxPro Experts  
home. signup. forum. archives. search. google. articles. downloads. faq. members. weblogs. file info. rss.
 From: Raymond Wong
  
 
 
 Raymond Wong
 Tags
Subject: Help me with this code
Thread ID: 50691 Message ID: 50691 # Views: 1 # Ratings: 0
Version: Visual FoxPro 7 Category: Reports and Printers
Date: Saturday, September 04, 2004 6:08:49 PM         
   


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


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