我的第一个shell程序-白红宇

初学SHELL，

==========================main.sh======================================

GSDM=0000 # 市公司代码

clear

while true

echo "请输入出单机构代码(格式为:0000**;前6位;如:000003)"

read MAKECOM

if [ "$MAKECOM" <> '' ] && [ `expr length $MAKECOM` = "6" ]

then

if [ `expr substr $MAKECOM 1 4` = $GSDM ]

then

break

else

echo "错误的出单机构代码，请重输!"

else

echo "错误的出单机构代码，请重输!"

done

while true

echo "请输入业务归属机构代码(格式为:0000**;前6位;如:000003)"

read COMCODE

if [ "$COMCODE" <> '' ] && [ `expr length $COMCODE` = "6" ]

then

if [ `expr substr $COMCODE 1 4` = $GSDM ]

then

break

else

echo "错误的业务归属代码，请重输!"

else

echo "错误的业务归属代码，请重输!"

done

while true

echo "请输入险种代码(格式为:D/P/A,车险/非车险,A代表全部)"

read XZDM

if [ "$XZDM" = "D" ] && [ `expr length $XZDM` = "1" ]

then CLASSESCODE=" classescode[1,1] = 'D' " ;

break

else

if [ "$XZDM" = "P" ] && [ `expr length $XZDM` = "1" ]

then CLASSESCODE=" classescode[1,1] <> 'D' " ;

break

else

if [ "$XZDM" = "A" ] [ `expr length $XZDM` = "1" ]

then CLASSESCODE=" classescode <> '' " ;

break

else

echo "错误的险种代码，请重输!"

done

while true

echo "请输入险别代码(格式为:S/J/A,商业险/交强险,A代表全部)"

read XBDM

if [ "$XBDM" = "S" ] && [ `expr length $XBDM` = "1" ]

then KINDCODE_R=" ('R21','R30') " ;KINDCODE_P=" ('P10','P30') " ;

break

else

if [ "$XBDM" = "J" ] && [ `expr length $XBDM` = "1" ]

then KINDCODE_R=" ('R29','R39') " ;KINDCODE_P=" ('P19','P39') " ;

break

else

if [ "$XBDM" = "A" ] && [ `expr length $XBDM` = "1" ]

then KINDCODE_R=" ('R21','R30','R29','R39') " ;KINDCODE_P=" ('P10','P30','P19','P39') " ;

break

else

echo "错误的险别代码，请重输!"

done

while true

echo "请输入收付起始日期(格式为:YYYYMMDD;如:20060101)"

read STARTDATE

if [ `expr substr $STARTDATE 1 3` = "200" ] && [ `expr length $STARTDATE` = "8" ]

then break

else

echo "错误的日期，请重输!"

done

while true

echo "请输入收付终止日期(格式为:YYYYMMDD;如:20060101)"

read ENDDATE

if [ `expr substr $ENDDATE 1 3` = "200" ] && [ `expr length $ENDDATE` = "8" ]

then break

else

echo "错误的日期，请重输!"

done

clear

echo " "

echo "出单机构代码(格式为:0000**;前6位;如:000003): " $MAKECOM

echo " "

echo "业务归属机构代码(格式为:0000**;前6位;如:000003): " $COMCODE

echo " "

echo "险种代码(格式为:D/P/A,车险/非车险,A代表全部): " $XZDM

echo " "

echo "险别代码(格式为:S/J/A,商业险/交强险,A代表全部): " $XBDM

echo " "

echo "收付起始日期(格式为:YYYYMMDD;如:20060101)： " $STARTDATE

echo " "

echo "收付终止日期(格式为:YYYYMMDD;如:20060101)： " $ENDDATE

echo " "

echo "以上输入是否正确（Y/N）？若按 Y ，开始提数；否则中断退出。"

read YESORNO

if [ "$YESORNO" = "Y" ] || [ "$YESORNO" = "y" ]

then

clear ; echo " " ;

echo "正在生成数据，请稍候..."

sh cmd.sh "$MAKECOM" "$COMCODE" "$XZDM" "$XBDM" "$STARTDATE" "$ENDDATE" "$CLASSESCODE" "$KINDCODE_R" "$KINDCODE_P"

else

break

read KEYPUT

if [ "$KEYPUT" <> "" ]

then exit

else exit

=============================cmd.sh=====================================

# 收付费库名

GSDM=0000 # 市公司代码

FTPIP=192.168.0.1 # ftp 登录 IP 地址

FTPUSER=test # ftp 登录用户名

FTPPASS=test # ftp 登录密码

MAKECOM=$1

COMCODE=$2

XZDM=$3

XBDM=$4

STARTDATE=$5

ENDDATE=$6

CLASSESCODE=$7

KINDCODE_R=$8

KINDCODE_P=$9

echo " "

echo $MAKECOM $COMCODE $XZDM $XBDM $STARTDATE $ENDDATE $SFFDB $GSDM

echo " "

isql $SFFDB - <<! 0>>sssf.$COMCODE.log 1>>sssf1.$COMCODE.log 2>>sssf2.$COMCODE.log

unload to "sff_r.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.unl"

select

policyno,classescode,rateamount,kindcode,departcode[1,6],acceptopname,deskdate,documentno,insurant

from $SFFDB:sf02

where ksdm[1,6] = "$MAKECOM"

and departcode[1,6] = "$COMCODE"

and kindcode in $KINDCODE_R

and $CLASSESCODE

and procflag in ("Y","F")

and deskdate >= "$STARTDATE" and deskdate <= "$ENDDATE"

order by deskdate,policyno,kindcode ;

unload to "sff_p.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.unl"

select

policyno,classescode,-rateamount,kindcode,departcode[1,6],acceptopname,deskdate,documentno,insurant

from $SFFDB:sf02

where ksdm[1,6] = "$MAKECOM"

and departcode[1,6] = "$COMCODE"

and kindcode in $KINDCODE_P

and $CLASSESCODE

and procflag in ("Y","F")

and deskdate >= "$STARTDATE" and deskdate <= "$ENDDATE"

order by deskdate,policyno,kindcode ;

cat head.unl sff_r.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.unl sff_p.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.unl > sff.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.unl

rm sff_r.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.unl sff_p.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.unl

toHtml() {

awk < sff.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.unl '

BEGIN{

FS="|"

title=sprintf("%s","'$title'")

printf("<HTML>\n")

printf("<HEAD>\n")

print "<meta http-equiv=Content-Type content=\"text/html; charset=gb2312\">"

printf("<TITLE> %s (%s %s年%s月)</TITLE>\n",title,"'$gsname'","'$yyyy'","'$mm'")

print "<style>"

print "<!--"

print "th {font-size:16px}"

print "td {font-size:14px}"

print "-->"

print "</style>"

printf("</HEAD>\n")

printf("<BODY><TABLE border=\"1\" align=\"center\" bordercolorlight=\"#FC9C0C\">\n")

}

{ for (m=1;m<=NF-1;m++) {

if(m==1) {

printf(" <TR align=\"right\" valign=\"middle\">\n")

printf(" <TD align=\"left\" nowrap>%s&nbsp</TD>\n",$m)

}

else

{

if($m==0) printf(" <TD>0</TD>\n")

else

if(m==3) printf(" <TD align=\"right\" nowrap>%s</TD>\n",$m)

else

printf(" <TD align=\"left\" nowrap>%s&nbsp</TD>\n",$m)

}

if(m==NF-1) printf(" </TR>\n\n") }

}

END {

print "</TABLE>"

print "</BODY>"

print "</HTML>"

}

toHtml sff.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.unl > sff.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.xls

rm sff.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.unl

echo "数据生成完毕!"

echo " "

echo "正在向市公司内部网传送数据，请稍候..."

ftp -n $FTPIP <<!

user $FTPUSER $FTPPASS

cd $COMCODE/信息技术部

bin

put sff.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.xls 实收实付.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.xls

pwd

dir 实收实付.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.xls

rm sff.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.xls

echo " "

echo "数据提取结束，并已传至市公司内部网；"

echo " "

echo "请在内部网，数据服务栏目“信息技术部”目录下载数据！"

echo " "

echo "您此次提取数据的文件名为：实收实付.$COMCODE.$XZDM.$XBDM.$STARTDATE-$ENDDATE.xls"

==========================head.unl==================================

字段名1|字段名2|字段名3|......|

本文转自ipist 51CTO博客，原文链接：http://blog.51cto.com/ipist/11119

，如需转载请自行联系原作者