` Printed Icetips Article

Icetips Article



Templates: Getting files used in application
1998-10-31 -- Jim Katz
 
Newsgroups: comp.lang.clarion

Yeah, just declare your own multi-symbol, %MyUsedFiles with the Unique
attribute:

#FOR(%Module)
  #FOR(%Procedure)
     #ADD(%MyUsedFiles,%Primary)
     #FOR(%Secondary)
       #ADD(%MyUsedFiles,%Secondary)
     #ENDFOR
     #FOR(%OtherFiles)
       #ADD(%MyUsedFiles,%OtherFiles)
     #ENDFOR
   #ENDFOR
#ENDFOR
#DISPLAY('All files used: '&ITEMS(%MyUsedFiles))

HTH
Jean-Marc wrote:
>
> >Try: %UsedFile.
>
> Hi Jim,
> I just did. Still ITEMS(%UsedFile) = ITEMS(%File) even though all the files
> are not used.
> Any other ideas?
> Thks.
> --
> Jean-Marc@starlinx.com

--
Jim Katz
Certified Clarion Developer
CTO iTradeZone,Inc.
http://www.iag.net/~jimkatz/
Using Clarion for Windows
Always looking for the simpler solution.



Printed May 4, 2024, 7:13 pm
This article has been viewed/printed 35114 times.
Google search has resulted in 18 hits on this article since January 25, 2004.