🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: bit.listserv.tsorexx
14 messages
14 total messages Started by Trimble, John Fri, 26 Apr 2013 18:03
Help with column specific output using Rexx
#143
Author: Trimble, John
Date: Fri, 26 Apr 2013 18:03
13 lines
2509 bytes
I am working on converting an assembler program to Rexx so it can be supported by programmers that are not familiar with IBM assembler.  The assembler program takes a variable input file and turns it into a fixed format file with additional spacing in the record for processing later by other programs.  I am familiar with parsing fixed data input using columns, but not with producing fixed columnar data output.  Does anyone have suggestions and or samples of how to accomplish that?  


John Trimble, CISSP
Information Security Technical Architect
Corporate Security
Fishers, IN 
317-806-0269
john.trimble@salliemae.com

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
Re: Help with column specific output using Rexx
#144
Author: Dave Salt
Date: Fri, 26 Apr 2013 18:20
33 lines
3160 bytes
I usually use LEFT and RIGHT to ensure fields are padded to a consistent length.

HTH,

Dave Salt

SimpList(tm) - try it; you'll get it! 

http://www.mackinney.com/products/program-development/simplist.html  


> Date: Fri, 26 Apr 2013 14:03:08 -0400
> From: john.trimble@SALLIEMAE.COM
> Subject: Help with column specific output using Rexx
> To: TSO-REXX@VM.MARIST.EDU
> 
> I am working on converting an assembler program to Rexx so it can be supported by programmers that are not familiar with IBM assembler.  The assembler program takes a variable input file and turns it into a fixed format file with additional spacing in the record for processing later by other programs.  I am familiar with parsing fixed data input using columns, but not with producing fixed columnar data output.  Does anyone have suggestions and or samples of how to accomplish that?  
> 
> 
> John Trimble, CISSP
> Information Security Technical Architect
> Corporate Security
> Fishers, IN 
> 317-806-0269
> john.trimble@salliemae.com
> 
> ----------------------------------------------------------------------
> For TSO-REXX subscribe / signoff / archive access instructions,
> send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
 		 	   		  
----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
Re: Help with column specific output using Rexx
#145
Author: Trimble, John
Date: Fri, 26 Apr 2013 18:26
56 lines
3745 bytes
So how do I make the output fields a consistent length?




John Trimble, CISSP
Information Security Technical Architect
Corporate Security
Fishers, IN 
317-806-0269
john.trimble@salliemae.com


-----Original Message-----
From: TSO REXX Discussion List [mailto:TSO-REXX@vm.marist.edu] On Behalf Of Dave Salt
Sent: Friday, April 26, 2013 2:20 PM
To: TSO-REXX@vm.marist.edu
Subject: Re: [TSO-REXX] Help with column specific output using Rexx

I usually use LEFT and RIGHT to ensure fields are padded to a consistent length.

HTH,

Dave Salt

SimpList(tm) - try it; you'll get it! 

http://www.mackinney.com/products/program-development/simplist.html  


> Date: Fri, 26 Apr 2013 14:03:08 -0400
> From: john.trimble@SALLIEMAE.COM
> Subject: Help with column specific output using Rexx
> To: TSO-REXX@VM.MARIST.EDU
> 
> I am working on converting an assembler program to Rexx so it can be supported by programmers that are not familiar with IBM assembler.  The assembler program takes a variable input file and turns it into a fixed format file with additional spacing in the record for processing later by other programs.  I am familiar with parsing fixed data input using columns, but not with producing fixed columnar data output.  Does anyone have suggestions and or samples of how to accomplish that?  
> 
> 
> John Trimble, CISSP
> Information Security Technical Architect Corporate Security Fishers, 
> IN
> 317-806-0269
> john.trimble@salliemae.com
> 
> ----------------------------------------------------------------------
> For TSO-REXX subscribe / signoff / archive access instructions, send 
> email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
 		 	   		  
----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions, send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX

This E-Mail has been scanned for viruses.

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
Re: Help with column specific output using Rexx
#146
Author: Jeff Byrum
Date: Fri, 26 Apr 2013 18:32
37 lines
3461 bytes
You can just use the REXX SAY command with a list of variables, and use built-in functions to format each column.

Left-aligned column 8 characters wide: LEFT(var1,8)
Right-aligned column 6 characters wide: RIGHT(var2,6)
Right-aligned numeric field 5 characters wide with leading blanks: FORMAT(var3,5)

See doc for the FORMAT function for many more options.

If you wanted 4 spaces between each column described above, you could do this:

SEP = '  '
Say LEFT(var1,8) SEP, 
    RIGHT(var2,6) SEP,
    FORMAT(var3,5)

Note that since I am not using the concatenation symbol, ||, REXX will insert a space between each operand, so I defined "SEP" as only 2 spaces.

-----Original Message-----
From: TSO REXX Discussion List [mailto:TSO-REXX@VM.MARIST.EDU] On Behalf Of Trimble, John
Sent: Friday, April 26, 2013 2:03 PM
To: TSO-REXX@VM.MARIST.EDU
Subject: Help with column specific output using Rexx

I am working on converting an assembler program to Rexx so it can be supported by programmers that are not familiar with IBM assembler.  The assembler program takes a variable input file and turns it into a fixed format file with additional spacing in the record for processing later by other programs.  I am familiar with parsing fixed data input using columns, but not with producing fixed columnar data output.  Does anyone have suggestions and or samples of how to accomplish that?  


John Trimble, CISSP
Information Security Technical Architect Corporate Security Fishers, IN
317-806-0269
john.trimble@salliemae.com

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions, send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
Re: Help with column specific output using Rexx
#148
Author: Trimble, John
Date: Fri, 26 Apr 2013 18:36
59 lines
4223 bytes
Thanks, that's what I needed.  




John Trimble, CISSP
Information Security Technical Architect
Corporate Security
Fishers, IN 
317-806-0269
john.trimble@salliemae.com


-----Original Message-----
From: TSO REXX Discussion List [mailto:TSO-REXX@vm.marist.edu] On Behalf Of Jeff Byrum
Sent: Friday, April 26, 2013 2:32 PM
To: TSO-REXX@vm.marist.edu
Subject: Re: [TSO-REXX] Help with column specific output using Rexx

You can just use the REXX SAY command with a list of variables, and use built-in functions to format each column.

Left-aligned column 8 characters wide: LEFT(var1,8) Right-aligned column 6 characters wide: RIGHT(var2,6) Right-aligned numeric field 5 characters wide with leading blanks: FORMAT(var3,5)

See doc for the FORMAT function for many more options.

If you wanted 4 spaces between each column described above, you could do this:

SEP = '  '
Say LEFT(var1,8) SEP, 
    RIGHT(var2,6) SEP,
    FORMAT(var3,5)

Note that since I am not using the concatenation symbol, ||, REXX will insert a space between each operand, so I defined "SEP" as only 2 spaces.

-----Original Message-----
From: TSO REXX Discussion List [mailto:TSO-REXX@VM.MARIST.EDU] On Behalf Of Trimble, John
Sent: Friday, April 26, 2013 2:03 PM
To: TSO-REXX@VM.MARIST.EDU
Subject: Help with column specific output using Rexx

I am working on converting an assembler program to Rexx so it can be supported by programmers that are not familiar with IBM assembler.  The assembler program takes a variable input file and turns it into a fixed format file with additional spacing in the record for processing later by other programs.  I am familiar with parsing fixed data input using columns, but not with producing fixed columnar data output.  Does anyone have suggestions and or samples of how to accomplish that?  


John Trimble, CISSP
Information Security Technical Architect Corporate Security Fishers, IN
317-806-0269
john.trimble@salliemae.com

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions, send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions, send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX

This E-Mail has been scanned for viruses.

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
Re: Help with column specific output using Rexx
#151
Author: EXT-Schwarz, Barry
Date: Fri, 26 Apr 2013 21:23
18 lines
2736 bytes
You decide how long each field should be as part of your design.  You can probably determine these values from the assembler code that you are converting from.

Then you process the fields sequentially.  For the first, you simply assign to your string.  For each subsequent field, you append to the previous result.  Something like
     string = left(value1,len1)
     string = string || left(value2,len2)

> -----Original Message-----
> From: TSO REXX Discussion List [mailto:TSO-REXX@vm.marist.edu] On
> Behalf Of Trimble, John
> Sent: Friday, April 26, 2013 11:26 AM
> To: TSO-REXX@vm.marist.edu
> Subject: Re: Help with column specific output using Rexx
>
> So how do I make the output fields a consistent length?

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
Re: Help with column specific output using Rexx
#152
Author: Steve Comstock
Date: Fri, 26 Apr 2013 21:27
42 lines
3257 bytes
On 4/26/2013 12:35 PM, EXT-Schwarz, Barry wrote:
> You decide how long each field should be as part of your design.  You can probably determine these values from the assembler code that you are converting from.
>
> Then you process the fields sequentially.  For the first, you simply assign to your string.  For each subsequent field, you append to the previous result.  Something like
>       string = left(value1,len1)
>       string = string || left(value2,len2)

Except, as some posters have shown, you may need to
append spaces and then truncate to the field size
you want.


>
>> -----Original Message-----
>> From: TSO REXX Discussion List [mailto:TSO-REXX@vm.marist.edu] On
>> Behalf Of Trimble, John
>> Sent: Friday, April 26, 2013 11:26 AM
>> To: TSO-REXX@vm.marist.edu
>> Subject: Re: Help with column specific output using Rexx
>>
>> So how do I make the output fields a consistent length?

--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-355-2752
http://www.trainersfriend.com

* To get a good Return on your Investment, first make an investment!
   + Training your people is an excellent investment

* Try our tool for calculating your Return On Investment
     for training dollars at
   http://www.trainersfriend.com/ROI/roi.html

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
Re: Help with column specific output using Rexx
#153
Author: Jeff Byrum
Date: Fri, 26 Apr 2013 21:39
52 lines
3680 bytes
Well, most people wouldn't want to *truncate* data.  The purpose of using LEFT and RIGHT in this context is to make sure each value is *padded* with enough blanks (on the right or left) to make the report appear in regular columns.  So you want the second operand (the number) to be the *largest* width that you anticipate for each field.


-----Original Message-----
From: TSO REXX Discussion List [mailto:TSO-REXX@VM.MARIST.EDU] On Behalf Of Steve Comstock
Sent: Friday, April 26, 2013 5:27 PM
To: TSO-REXX@VM.MARIST.EDU
Subject: Re: Help with column specific output using Rexx

On 4/26/2013 12:35 PM, EXT-Schwarz, Barry wrote:
> You decide how long each field should be as part of your design.  You can probably determine these values from the assembler code that you are converting from.
>
> Then you process the fields sequentially.  For the first, you simply assign to your string.  For each subsequent field, you append to the previous result.  Something like
>       string = left(value1,len1)
>       string = string || left(value2,len2)

Except, as some posters have shown, you may need to append spaces and then truncate to the field size you want.


>
>> -----Original Message-----
>> From: TSO REXX Discussion List [mailto:TSO-REXX@vm.marist.edu] On 
>> Behalf Of Trimble, John
>> Sent: Friday, April 26, 2013 11:26 AM
>> To: TSO-REXX@vm.marist.edu
>> Subject: Re: Help with column specific output using Rexx
>>
>> So how do I make the output fields a consistent length?

--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-355-2752
http://www.trainersfriend.com

* To get a good Return on your Investment, first make an investment!
   + Training your people is an excellent investment

* Try our tool for calculating your Return On Investment
     for training dollars at
   http://www.trainersfriend.com/ROI/roi.html

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions, send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
Re: Help with column specific output using Rexx
#154
Author: Steve Comstock
Date: Fri, 26 Apr 2013 22:10
86 lines
4973 bytes
On 4/26/2013 3:38 PM, Jeff Byrum wrote:
> Well, most people wouldn't want to *truncate* data. The purpose of using
> LEFTand RIGHT in this context is to make sure each value is *padded* with enough
blanks (on the right or left) to make the report appear in regular columns. So
you want the second operand (the number) to be the *largest* width that you
anticipate for each field.

Well, just a different perspective: I first pad with a fixed number
of spaces then truncate the resulting string to the desired length.
That's what I meant when I said 'append spaces'; maybe that's not clear.


>
>
> -----Original Message-----
> From: TSO REXX Discussion List [mailto:TSO-REXX@VM.MARIST.EDU] On Behalf Of Steve Comstock
> Sent: Friday, April 26, 2013 5:27 PM
> To: TSO-REXX@VM.MARIST.EDU
> Subject: Re: Help with column specific output using Rexx
>
> On 4/26/2013 12:35 PM, EXT-Schwarz, Barry wrote:
>> You decide how long each field should be as part of your design.  You can probably determine these values from the assembler code that you are converting from.
>>
>> Then you process the fields sequentially.  For the first, you simply assign to your string.  For each subsequent field, you append to the previous result.  Something like
>>        string = left(value1,len1)
>>        string = string || left(value2,len2)
>
> Except, as some posters have shown, you may need to append spaces and then truncate to the field size you want.
>
>
>>
>>> -----Original Message-----
>>> From: TSO REXX Discussion List [mailto:TSO-REXX@vm.marist.edu] On
>>> Behalf Of Trimble, John
>>> Sent: Friday, April 26, 2013 11:26 AM
>>> To: TSO-REXX@vm.marist.edu
>>> Subject: Re: Help with column specific output using Rexx
>>>
>>> So how do I make the output fields a consistent length?
>
> --
>
> Kind regards,
>
> -Steve Comstock
> The Trainer's Friend, Inc.
>
> 303-355-2752
> http://www.trainersfriend.com
>
> * To get a good Return on your Investment, first make an investment!
>     + Training your people is an excellent investment
>
> * Try our tool for calculating your Return On Investment
>       for training dollars at
>     http://www.trainersfriend.com/ROI/roi.html
>
> ----------------------------------------------------------------------
> For TSO-REXX subscribe / signoff / archive access instructions, send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
>
> ----------------------------------------------------------------------
> For TSO-REXX subscribe / signoff / archive access instructions,
> send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
>


--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-355-2752
http://www.trainersfriend.com

* To get a good Return on your Investment, first make an investment!
   + Training your people is an excellent investment

* Try our tool for calculating your Return On Investment
     for training dollars at
   http://www.trainersfriend.com/ROI/roi.html

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
Re: Help with column specific output using Rexx
#155
Author: Jeff Byrum
Date: Fri, 26 Apr 2013 22:17
103 lines
5819 bytes
Not sure I understand why you would append spaces and then truncate when you can do it all with one function: LEFT.

Let's say I have a column that consists of TSO userids.  I know the maximum length of a value (at our site) is 8.  So I code:

	LEFT(TSO_UID,8)

All the userid's will have as many blanks appended to the end as required to make the value 8 characters wide, anywhere from 0 to 7 blanks.  That's it -- only one operation.

-----Original Message-----
From: TSO REXX Discussion List [mailto:TSO-REXX@VM.MARIST.EDU] On Behalf Of Steve Comstock
Sent: Friday, April 26, 2013 6:10 PM
To: TSO-REXX@VM.MARIST.EDU
Subject: Re: Help with column specific output using Rexx

On 4/26/2013 3:38 PM, Jeff Byrum wrote:
> Well, most people wouldn't want to *truncate* data. The purpose of 
> using LEFTand RIGHT in this context is to make sure each value is 
> *padded* with enough
blanks (on the right or left) to make the report appear in regular columns. So you want the second operand (the number) to be the *largest* width that you anticipate for each field.

Well, just a different perspective: I first pad with a fixed number of spaces then truncate the resulting string to the desired length.
That's what I meant when I said 'append spaces'; maybe that's not clear.


>
>
> -----Original Message-----
> From: TSO REXX Discussion List [mailto:TSO-REXX@VM.MARIST.EDU] On 
> Behalf Of Steve Comstock
> Sent: Friday, April 26, 2013 5:27 PM
> To: TSO-REXX@VM.MARIST.EDU
> Subject: Re: Help with column specific output using Rexx
>
> On 4/26/2013 12:35 PM, EXT-Schwarz, Barry wrote:
>> You decide how long each field should be as part of your design.  You can probably determine these values from the assembler code that you are converting from.
>>
>> Then you process the fields sequentially.  For the first, you simply assign to your string.  For each subsequent field, you append to the previous result.  Something like
>>        string = left(value1,len1)
>>        string = string || left(value2,len2)
>
> Except, as some posters have shown, you may need to append spaces and then truncate to the field size you want.
>
>
>>
>>> -----Original Message-----
>>> From: TSO REXX Discussion List [mailto:TSO-REXX@vm.marist.edu] On 
>>> Behalf Of Trimble, John
>>> Sent: Friday, April 26, 2013 11:26 AM
>>> To: TSO-REXX@vm.marist.edu
>>> Subject: Re: Help with column specific output using Rexx
>>>
>>> So how do I make the output fields a consistent length?
>
> --
>
> Kind regards,
>
> -Steve Comstock
> The Trainer's Friend, Inc.
>
> 303-355-2752
> http://www.trainersfriend.com
>
> * To get a good Return on your Investment, first make an investment!
>     + Training your people is an excellent investment
>
> * Try our tool for calculating your Return On Investment
>       for training dollars at
>     http://www.trainersfriend.com/ROI/roi.html
>
> ----------------------------------------------------------------------
> For TSO-REXX subscribe / signoff / archive access instructions, send 
> email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
>
> ----------------------------------------------------------------------
> For TSO-REXX subscribe / signoff / archive access instructions, send 
> email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
>


--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-355-2752
http://www.trainersfriend.com

* To get a good Return on your Investment, first make an investment!
   + Training your people is an excellent investment

* Try our tool for calculating your Return On Investment
     for training dollars at
   http://www.trainersfriend.com/ROI/roi.html

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions, send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
Re: Help with column specific output using Rexx
#156
Author: Glenn Knickerbocker
Date: Sat, 27 Apr 2013 03:28
21 lines
2521 bytes
On 4/26/2013 2:03 PM, Trimble, John wrote:
> I am familiar with parsing fixed data input using columns, but not
> with producing fixed columnar data output.

If you want to specify the columns by position rather than width,
analogous to parsing by absolute patterns like so:

  Parse Var line 1 field1 12 field2 17 field3

then OVERLAY() can be a convenient way to build your output:

  line = Overlay(field2, field1, 12)
  line = Overlay(field3, line, 17)

You can use that in combination with formatting using RIGHT() and
FORMAT() to align the fields, of course.

  line = Overlay(field2, Right(field1, 10))
  line = Overlay(Format(field3, 6, 2), line, 17)

�R
Re: Help with column specific output using Rexx
#157
Author: Glenn Knickerbocker
Date: Sat, 27 Apr 2013 20:34
25 lines
2238 bytes
On 4/26/2013 2:03 PM, Trimble, John wrote:
> I am familiar with parsing fixed data input using columns, but not
> with producing fixed columnar data output.

If you want to specify the columns by position rather than width,
analogous to parsing by absolute patterns like so:

  Parse Var line 1 field1 12 field2 17 field3

then OVERLAY() can be a convenient way to build your output:

  line = Overlay(field2, field1, 12)
  line = Overlay(field3, line, 17)

You can use that in combination with formatting using RIGHT() and
FORMAT() to align the fields, of course.

  line = Overlay(field2, Right(field1, 10))
  line = Overlay(Format(field3, 6, 2), line, 17)

�R

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
Re: Help with column specific output using Rexx
#158
Author: Adrian Stern
Date: Sun, 28 Apr 2013 10:01
97 lines
5127 bytes
The best way to produce formatted output is with the overlay function:
Eg lineOut        = overlay(var1, var2, var3, var4, var5)
Where:
var1 is the data to be inserted
var2 is the variable it's to be inserted into
var3 is the start position of the field
var4 is the length of the field
var5 is the padding character (if required)

check it out
Adrian

-----Original Message-----
From: TSO REXX Discussion List [mailto:TSO-REXX@VM.MARIST.EDU] On Behalf Of
Trimble, John
Sent: den 26 april 2013 19:36
To: TSO-REXX@VM.MARIST.EDU
Subject: Re: [TSO-REXX] Help with column specific output using Rexx

Thanks, that's what I needed.




John Trimble, CISSP
Information Security Technical Architect
Corporate Security
Fishers, IN
317-806-0269
john.trimble@salliemae.com


-----Original Message-----
From: TSO REXX Discussion List [mailto:TSO-REXX@vm.marist.edu] On Behalf Of
Jeff Byrum
Sent: Friday, April 26, 2013 2:32 PM
To: TSO-REXX@vm.marist.edu
Subject: Re: [TSO-REXX] Help with column specific output using Rexx

You can just use the REXX SAY command with a list of variables, and use
built-in functions to format each column.

Left-aligned column 8 characters wide: LEFT(var1,8) Right-aligned column 6
characters wide: RIGHT(var2,6) Right-aligned numeric field 5 characters wide
with leading blanks: FORMAT(var3,5)

See doc for the FORMAT function for many more options.

If you wanted 4 spaces between each column described above, you could do
this:

SEP = '  '
Say LEFT(var1,8) SEP,
    RIGHT(var2,6) SEP,
    FORMAT(var3,5)

Note that since I am not using the concatenation symbol, ||, REXX will
insert a space between each operand, so I defined "SEP" as only 2 spaces.

-----Original Message-----
From: TSO REXX Discussion List [mailto:TSO-REXX@VM.MARIST.EDU] On Behalf Of
Trimble, John
Sent: Friday, April 26, 2013 2:03 PM
To: TSO-REXX@VM.MARIST.EDU
Subject: Help with column specific output using Rexx

I am working on converting an assembler program to Rexx so it can be
supported by programmers that are not familiar with IBM assembler.  The
assembler program takes a variable input file and turns it into a fixed
format file with additional spacing in the record for processing later by
other programs.  I am familiar with parsing fixed data input using columns,
but not with producing fixed columnar data output.  Does anyone have
suggestions and or samples of how to accomplish that?


John Trimble, CISSP
Information Security Technical Architect Corporate Security Fishers, IN
317-806-0269
john.trimble@salliemae.com

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions, send email
to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions, send email
to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX

This E-Mail has been scanned for viruses.

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
Antwort: [TSO-REXX] Help with column specific output using Rexx
#164
Author: Andreas Fischer
Date: Mon, 29 Apr 2013 07:48
41 lines
2822 bytes
well you got a lot of useful answers, but why using an assembler or rexx
program for that task and not pgm sort? i guess it will do the job, and it
will do it extremly fast.

regards,
andi


TSO REXX Discussion List <TSO-REXX@VM.MARIST.EDU> schrieb am 26.04.2013
20:03:08:

> Von: "Trimble, John" <john.trimble@SALLIEMAE.COM>
> An: TSO-REXX@VM.MARIST.EDU,
> Datum: 26.04.2013 20:03
> Betreff: [TSO-REXX] Help with column specific output using Rexx
> Gesendet von: TSO REXX Discussion List <TSO-REXX@VM.MARIST.EDU>
>
> I am working on converting an assembler program to Rexx so it can be
> supported by programmers that are not familiar with IBM assembler.
> The assembler program takes a variable input file and turns it into
> a fixed format file with additional spacing in the record for
> processing later by other programs.  I am familiar with parsing
> fixed data input using columns, but not with producing fixed
> columnar data output.  Does anyone have suggestions and or samples
> of how to accomplish that?
>
>
> John Trimble, CISSP
> Information Security Technical Architect
> Corporate Security
> Fishers, IN
> 317-806-0269
> john.trimble@salliemae.com
>
> ----------------------------------------------------------------------
> For TSO-REXX subscribe / signoff / archive access instructions,
> send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LISTSERV@VM.MARIST.EDU with the message: INFO TSO-REXX
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads