Copy n paste n times


 
Thread Tools Search this Thread
Top Forums Shell Programming and Scripting Copy n paste n times
# 1  
Old 07-01-2013
Copy n paste n times

I have one mainframe copy book where I want to copy n times depend on occurs which mention below.
Example:
Below highlighted row mention “occurs 2 times” so I need to copy 2 times till next label 10.
Code:
 
C14992     10   FILLER                           PIC X(2835).                   
       01   EDW-EXTR-DETAIL-RECORD.                                             
           10     EDW-EXTR-BANK                  PIC X(10).                     
           10     EDW-EXTR-APPL                  PIC 9(03).                     
           10     EDW-EXTR-OUT-OF-STATE-REASON   PIC X(100).    
           10     FILLER                         PIC X(178).                    
       10     EDW-EXTR-ARRAY   OCCURS 2 TIMES.                             
             11     EDW-EXTR-TYPE                PIC X(30).                     
             11     EDW-EXTR-VOLUME              PIC X(30).                     
             11     EDW-EXTR-RANGE               PIC X(30).                     
             C14992       11     EDW-EXTR-CNTRY-CD            PIC X(40).
           10     FILLER                         PIC X(178).                    
Output should be:
C14992     10   FILLER                           PIC X(2835).                   
       01   EDW-EXTR-DETAIL-RECORD.                                             
           10     EDW-EXTR-BANK                  PIC X(10).                     
           10     EDW-EXTR-APPL                  PIC 9(03).                     
           10     EDW-EXTR-OUT-OF-STATE-REASON   PIC X(100).                    
           10     FILLER                         PIC X(178).                    
           10     EDW-EXTR-ARRAY   .                             
            11     EDW-EXTR-TYPE                PIC X(30).                     
            11     EDW-EXTR-VOLUME              PIC X(30).                     
            11     EDW-EXTR-RANGE               PIC X(30).                     
            C14992       11     EDW-EXTR-CNTRY-CD            PIC X(40).
           10     EDW-EXTR-ARRAY   .                             
            11     EDW-EXTR-TYPE                PIC X(30).                     
            11     EDW-EXTR-VOLUME              PIC X(30).                     
            11     EDW-EXTR-RANGE               PIC X(30).                     
            C14992       11     EDW-EXTR-CNTRY-CD            PIC X(40).

10 FILLER PIC X(178).
Is there any unix command achieve above task.

Last edited by vbe; 07-01-2013 at 05:41 AM..
# 2  
Old 07-01-2013
This is an unspecific specification. Can we rely on "occurs n times" to occur reliably? Where does the block to be copied n times stop? Is there always a "10 FILLER" line?
# 3  
Old 07-01-2013
occurance will change from copy book to copybook but that will not be issue,help me to get 14 occurs itslef and always it will be 10 filler line only.

Last edited by Scott; 07-01-2013 at 07:31 AM.. Reason: Code tags for code and data, not text
# 4  
Old 07-01-2013
Code:
awk     '/OCCURS .+ TIMES/ {n = $4; NF-=3; L=1}
         /10 + FILLER/  {for (i=1;i<n;i++) for (j=1;j<=c;j++) print B[j]; L=c=0}
         L              {B[++c]=$0}
         1
        ' file

# 5  
Old 07-01-2013
Below code is not working.

Code:
 
awk     '/OCCURS .+ TIMES/ {n = $4; NF-=3; L=1}
         /10 + FILLER/  {for (i=1;i<n;i++) for (j=1;j<=c;j++) print B[j]; L=c=0}
         L              {B[++c]=$0}
         1
        ' sam.txt


Last edited by Scott; 07-01-2013 at 08:17 AM.. Reason: Fixed code tags for the last time
# 6  
Old 07-01-2013
Quote:
Originally Posted by srivalli
Below code is not working. . . .
It is.

Maybe your sam.txt is not what you posted before.
# 7  
Old 07-01-2013
We are not a coding service here. RudiC's code WILL work with the partial specifications you gave. Please post the EXACT input and EXACT output you expect.

And note: 'is not working' == 'is not getting help'
Login or Register to Ask a Question

Previous Thread | Next Thread

10 More Discussions You Might Find Interesting

1. UNIX for Dummies Questions & Answers

Copy/paste in vi editor

Hello guys, I am trying to copy a line in vi editor and paste it with below commands but paste command is not working and instead of paste action prints the p character!! I should also mention that the server is Solaris... 1) crontab -e 2) j to move down 3) yy to copy the line 4) o to... (4 Replies)
Discussion started by: Newman
4 Replies

2. Shell Programming and Scripting

Copy and paste data

I need to copy from specified lines and paste the data into several other lines. XX123450008 xx.x xx.x xx.x xx.x xx.x xx.x xx.x xx.x xx.x xx.x xx.x xx.x xx.x XX123451895 xx.x xx.x xx.x xx.x xx.x xx.x xx.x xx.x xx.x xx.x xx.x xx.x xx.x ...... XX123452012 xx.x xx.x xx.x xx.x xx.x xx.x xx.x... (13 Replies)
Discussion started by: ncwxpanther
13 Replies

3. Shell Programming and Scripting

Copy and Paste to a new document

Hello, I am quite new to shell scripting so don't know all the tools available. What I'm trying to do is open a file optimal.txt search for objectiveValue and copy the number in quotes next to it. e.g. ... solutionName="incumbent" solutionIndex="-1" objectiveValue="13246" ... (6 Replies)
Discussion started by: StephanR
6 Replies

4. UNIX for Dummies Questions & Answers

Copy/Paste in Vi editor

Dear All, I have a file containing 12 lines. First 3 lines have 9 values and the remaining 9 lines with no values. I was trying to copy and paste these 9 values of the first 3 lines into last 9 lines simultaneously as A=1.491331, B=1.539000 ..... but I don't know how to cope with this... (9 Replies)
Discussion started by: sullah
9 Replies

5. UNIX for Dummies Questions & Answers

vi copy/paste problem

I'm having a problem copy/pasting from a txt file in windows to vi. What happens is I copy a chunk of text, go to the putty terminal, go into insert mode, and right click, and it will stop pasting at a random point and freeze up. Nothing I do gets out of it. This only happens on my account... (1 Reply)
Discussion started by: solidarity
1 Replies

6. Shell Programming and Scripting

sed copy paste

Hello, I have this path and file: /dir/dir/dir/dir/dir/dir/dir/dir/dir/THIS_SPOT/fle.txt I want to end up with: /dir/dir/dir/dir/dir/dir/dir/dir/dir/THIS_SPOT/fle.txtTHIS_SPOT Take the dir after the 10th slash, add a tab at the end and paste the dir it copied. Thanks (4 Replies)
Discussion started by: crowman
4 Replies

7. Shell Programming and Scripting

copy/paste with awk

Hi everybody, I have two XML files. I am working on a script that could copy and paste the contents of the first xml file to the desired location in the second xml file. Here is my first XML file. This is the second XML file. Finaly, I wnat to obtain something like that : ... (2 Replies)
Discussion started by: lsaas
2 Replies

8. Shell Programming and Scripting

Search, copy and paste

Can i search in a file for more than one string at a time? And copy the next string after that and paste it in column style? Is it possible? Thanks! (4 Replies)
Discussion started by: kingpeejay
4 Replies

9. UNIX for Dummies Questions & Answers

cut, copy + paste

Hi all! How do I cut, copy and paste under unix??? (2 Replies)
Discussion started by: aitor314
2 Replies

10. UNIX Desktop Questions & Answers

Cut, Copy and Paste with X

One of the things that I have learned to take for granted in the Win32 world is the cut, copy and paste hotkeys of ^X, ^C and ^V. I use these keys all the time under Win32 to copy and paste information from one GUI into another GUI. My question is, does X have a similiar standard? ... (4 Replies)
Discussion started by: auswipe
4 Replies
Login or Register to Ask a Question