SCOUG-HELP Mailing List Archives

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

Date:	Mon, 28 Jul 2003 16:13:19 PDT7
From:	Peter Skye <pskye@peterskye.com >
Reply-To:	scoug-help@scoug.com
To:	scoug-help@scoug.com
Subject:	SCOUG-Help: utility to convert records to lines ?

Content Type: text/plain

=====================================================
If you are responding to someone asking for help who
may not be a member of this list, be sure to use the
REPLY TO ALL feature of your email program.
=====================================================

Steven Levine wrote:
>
> Just write it in 5 lines of REXX and be done with it. :-)
>
> do while chars('inFile') >= 83
> x = charin('InFile',,83)
> call lineout 'outFile', x
> end
> say 'I did not bother to read the last' chars('inFile') 'characters'
>
> The speed should be good enough.

I made it a generic program -- 130 lines with command line parameters
for source, target and record length plus full error checking. CharIn()
worked fine, thanks.

- 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-help".

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

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

Return to [ 28 | July | 2003 ]

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.