Move a string from one column to another column using rexx

N.SUDHA · New User Joined: 06 Feb 2006 Posts: 8

how to move a string from one column to another column using rexx

ofer71 · Posted: Thu Feb 16, 2006 3:54 pm Post subject:

What do you mean by 'column' ? Do you mean DB2 columns ? Data columns shown in ISPF editor ?

O.

N.SUDHA · New User Joined: 06 Feb 2006 Posts: 8

how to move all picin statements of cobol program to 48th column using rexx

ofer71 · Posted: Thu Feb 16, 2006 4:34 pm Post subject:

2 Options:

1) Read the member line by line using EXECIO.

2) Write an edit-macro to do the job. It won't be easy, as you have to (1) find the PIC position in the line; (2) make sure that there is nothing in the 48th column; (3) insert the desired number of blank.

Enjoy

O.

N.SUDHA · New User Joined: 06 Feb 2006 Posts: 8

give me a sample program for the above work

ofer71 · Posted: Thu Feb 16, 2006 5:55 pm Post subject:

No problem. My rate is 80$ for an hour, and I estimate the work, including test, in 3 hours. I accept Visa, Mastercard or directly through PayPal.

When do you want me to start ?

O.