SCOUG-Programming Mailing List Archives

<< Previous Message << >> Next Message >>

Date:	Thu, 8 Nov 2001 06:00:39 PDT
From:	Peter Skye <pskye@peterskye.com >
Reply-To:	scoug-programming@scoug.com
To:	scoug-programming@scoug.com
Subject:	SCOUG-Programming: ANSI Rexx Functions

Content Type: text/plain

dallas_kincyb wrote:
>

Not sure if you're looking for the function names or the functionality.
Here's some functionality:

> fullyqualifiedfilename = Qualify( filename )

SysFileTree()

> newhaystack = CHANGESTR( needle, haystack, newneedle )

translate()

> count = COUNTSTR( needle, haystack )

I wrote a PosList() routine a few days ago which creates a stem variable
list of the positions in a string where a "needle" string occurs. The
returned .0 stem value contains the "count". It uses Pos() and indexes
its way through the string.

- Peter

=====================================================

To unsubscribe from this list, send an email message
to "steward@scoug.com". In the body of the message,
put the command "unsubscribe scoug-programming".

For problems, contact the list owner at
"rollin@scoug.com".

=====================================================

Return to [ 08 | November | 2001 ]

SCOUG, Warp Expo West, and Warpfest are trademarks of the Southern California OS/2 User Group. OS/2, Workplace Shell, and IBM are registered trademarks of International Business Machines Corporation. All other trademarks remain the property of their respective owners.