Shell Programming and Scripting

10 bonuses D
   20 MATCHED
   30 UPD COL
   40 (SOL=30) 
   20 NOT MATCHED
   30 INS COL
   40 (SOL=30)
;


10 bonuses D
   20 MATCHED
   30 UPD COL
   40 (SOL=20) 
   20 NOT MATCHED
   30 INS COL
   40 (SOL=50)
;

10 bonuses D
   20 MATCHED AND (SOL=30)
   30 UPD COL
   20 NOT MATCHED AND (SOL=30)
   30 INS COL
;


10 bonuses D
   20 MATCHED AND (SOL=20)
   30 UPD COL
   20 NOT MATCHED AND (SOL=50)
   30 INS COL
;

BEGIN {
        RS=ORS="\n\n"
        FS=OFS="\n"
}

{
        A=B=0

        for(N=1; N<=NF; N++) {
                if(!A && $N ~ /^[ \t]*20[ \t]/) A=N
                if(!B && $N ~ /^[ \t]*40[ \t]/) B=N

                if(A && B)
                {
                        sub(/^[ \t]*40[ \t]+/, "", $B);
                        $A = $A " AND " $B

                        for(M=B; M<NF; M++) $M=$(M+1)
                        NF--;

                        A=B=0
                        N--
                }
        }
} 1

awk -f sect.awk data

10 bonuses D
   20 MATCHED AND (SOL=30)
   30 UPD COL
   20 NOT MATCHED AND (SOL=30)
   30 INS COL
;


10 bonuses D
   20 MATCHED AND (SOL=20)
   30 UPD COL
   20 NOT MATCHED AND (SOL=50)
   30 INS COL
;

$

awk '{A[$1]=$0} $1==40{print A[20] " AND " $2 RS A[30]} $1!~/^[234]0$/' file

awk '{A[i=$1]=$0; $1=x} i==40{print A[20] " AND" $0 RS A[30]} i!~/^[234]0$/' file

sed '/^ *20 /{N; N; s/\(.*\)\(\n.*\)\n *40\(.*\)/\1 AND\3\2/;}' file

tac file | awk '$1 == 40 {TMP = $2} $1 == 20 {print $0, "AND",  TMP} $1 !~ /^[24]0$/' | tac
10 bonuses D
   20 MATCHED AND (SOL=30)
   30 UPD COL
   20 NOT MATCHED AND (SOL=30)
   30 INS COL
;


10 bonuses D
   20 MATCHED AND (SOL=20)
   30 UPD COL
   20 NOT MATCHED AND (SOL=50)
   30 INS COL
;