怎样用awk进行分段统计累加

hcang

有如下文本：

业务流水帐      2004年12月28日      部门： 1号
--------------------------------------------------------------------------
A4                 2                  60.00
A3                 3                  120.00
B16                6                  90.00

本项合计：             11                 270.00

16列单            10                  400.00
16列双             2                   100.00

本项合计               12                   500.00
------------------------------------------------------------------------
业务流水帐      2004年12月28日      部门： 2号
--------------------------------------------------------------------------
A4                 1                  30.00
A3                 2                  80.00
B15                4                  60.00

本项合计：         7                 170.00

16列单            5                  200.00
16列双             2                   100.00

本项合计           7                   300.00
.
.
.
..

希望通过简短的awk计算得出如下结果(即把每个部门的“本项合计”统计累加)：
1号       23             770.00
2号       14             470.00
3号……………..
4号…………

卡龙1980

begin{
}
{if($0 ~ /业务流水帐/){
  dipartment=$4;
  count1=0;
  count2=0;
  while(getline){
       if($0 ~ /^本项合计/){
          count1 = count1+$2;
          count2 = count2+$3;
          }
       if($0 ~ /----------/){
          break;
       }
   }
  print departmen"  "count1"  "count2"\n";
}
}
end{
}

launch401

/^业务流水帐/{i=0;department=$4;num1=0;num2=0}
/--------/{i++; if (i==2) print department, num1, num2}
/^本项合计/{num1+=$2;num2+=$3}

hcang

to 卡龙1980：打印出两行0；
to launch401:只打印出01部门的统计数

launch401

业务流水帐 2004年12月28日 部门： 1号
--------------------------------------------------------------------------
A4 2 60.00
A3 3 120.00
B16 6 90.00

本项合计： 11 270.00

16列单 10 400.00
16列双 2 100.00

本项合计 12 500.00
------------------------------------------------------------------------
业务流水帐 2004年12月28日 部门： 2号
--------------------------------------------------------------------------
A4 1 30.00
A3 2 80.00
B15 4 60.00

本项合计： 7 170.00

16列单 5 200.00
16列双 2 100.00

本项合计 7 300.00
－－－－－－－－－－－－－－－－－－－－－－－－－－－

应该是这种文本就能打印出两行了。就是每个部门的记录都用－－－－线开始和结束

hcang

to launch401,如果文本中没有------,怎样处理

xxb-xue

#!/bin/sh
#get what information wanting

grep -E "业务流水账|本项合计" a.txt|awk 'BEGIN {i=0}
                                         {if($0~/业务流水账/)
                                            {i=i+1}
                                                            else
                                            { if($0~/本项合计/)
                                                {a+=$2}
                                            }
                                          }
                                         END {for(j=1;j<=i;j++)
                                               {print j"号"": "a[j]}
                                             }'

现在在学习AWK,有不正确的地方，请DX多多帮忙！！

waker

1. awk ' /业务流水帐/{ n=$4; if(!ind[i]){ind[i++]=n;}}
   
2. /本项合计/{sum[n]+=$3;}
   
3. END{for(j=0;j<i;j++){print "部门：",ind[j],"合计：",sum[ind[j]];}}'
   

复制代码

hcang

GOOD，收！还是Waker厉害，利用数组，又很简单，谢了。同时谢参与的各位！！！