I have an edit macro that might help, extract from the help screen:

ARRANGE  I|M|O|X c l t s                               
                                                   
Parameter description                              
                                                   
 I Insert block at 'to', leave the original.       
 O overlay at 'to' with block, leave the original. 
 M Insert block at 'to', whitespace the original.  
 X Insert block at 'to', delete the original       
 c    Colomn                                       
 l    Length of sub-field.                         
 t    To colomn.                                   

And a small sample for moving a block:
Sample original data:
=COLS> ----+----1----+----2----+----3----+----4----+-
****** ********************************* Top of Data 
000001 key1                                          
000002 .... this line does not contain any value     
000003 .... this line do contain the key1 value      
000004 .... this line also does not contain any value
000005 .... this line do contain the lastkey value   
000006 .... this line also contains the lastkey value
000007 lastkey                                                

Sample command: arrange m 1 5 25 

Sample modified data:
=COLS> ----+----1----+----2----+----3----+----4----+----5-
****** ********************************* Top of Data *****
000001                         key1                       
000002      this line does not .... contain any value     
000003      this line do contai.... n the key1 value      
000004      this line also does....  not contain any value
000005      this line do contai.... n the lastkey value   
000006      this line also cont.... ains the lastkey value
000007      ey                 lastk                      

I can send it to you if you like, it's not on the CBT web.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to