一种新的编程思路（中）：

难得糊涂编程法 GBDP （适用jsp、asp等编程）

GBDP技术实现设想：（General Blackbox Dynamic Programming）

开发速度快、代码量少、通用，数据库表自动生成，记录自动增加，

修改，删除，系统设计工作量少，可以在需求不明确的情况下开工，

渐进式开发，拥有需求频繁更改、代码基本不动的自适应能力。特

别适合国内软件乱序开发的国情

主要解决问题：

系统设计工作量大，需求更改影响大，项目交接困难，编程风格各

异，数据库备份困难的问题

已经实现功能：

数据表自动生成，记录自动增加，修改，删除，自动文件上传

注：发表后代码／／都变成了file:／／ , 请改正

一个复杂的实现范例：

ntGBDPScript.jsp 自动记录载入模块 (“上”包含源代码)

ntDB.java 数据库存取模块（本文包含源代码）

ntGBDPDefine.jsp

ntGBDPUpload2-1.jsp 自动数据分析处理模块(“上”包含源代码)

ntGBDPUpload2-2.jsp 自动数据保存处理模块(“上”包含源代码)

-------------------------------------------------------

_jh_in.jsp 录入和修改页面,涉及计算

<%-- 买入统计卡 --%>

<%@page contentType="text/html;charset=GBK" %>

<%@page import="java.lang.*,java.net.*,java.sql.*,java.text.*,java.util.*" %>

<%@page import="dba.ntDB" %>

<%@page session="true" %>

<%@page errorPage="error.jsp"%>

<%@include file="ntGBDPDefine.jsp" %>

file://全局变量定义

globalTableName = "_jh_in";

parentKey = "买入外汇统计卡";

parentValue = "";

dbName = "myDB";

<%@include file="ntGBDPUpload2-1.jsp" %>

<% // check data

String errorString = "";

if( isPost && requestHt.get("numeric汇入金额").equals("") )

errorString = "请填写汇入金额";

else if( isPost && requestHt.get("numeric牌价").equals("") )

errorString = "请填写牌价";

String entpName = (String)requestHt.get("全称");

String entpAccount = (String)requestHt.get("帐号");

if( entpName == null ) entpName = "";

if( entpAccount == null ) entpAccount = "";

int entpId = 0;

if( !entpName.equals("") || !entpAccount.equals("") )

{

nt.executeQuery(dbName,

"select pid from _jh where "+

" ( k='企业名称' and v = '"+ entpName.trim() +"' )"+

" or ( k='帐号' and v = '"+ entpAccount.trim() +"' )"+

"");

if( nt.rowCount > 0 ){

entpId = Integer.parseInt( nt.data[0][0] );

requestHt.put("企业id",""+ entpId );

requestHt.put("企业隶属单位", nt.getKV("_jh",entpId,"隶属单位") );

}

else

errorString = "没有找到这个企业";

}

if( !errorString.equals("") )

{

out.println("<script>alert('错误！"+ errorString +"！');history.back();</script>");

return;

}

<% // auto calculate

if( isPost && !requestHt.get("submit_auto").equals("") )

{

file://导入数据

double hrje = Double.parseDouble((String)requestHt.get("numeric汇入金额"));

double pj = Double.parseDouble((String)requestHt.get("numeric牌价"));

file://计算数据

double yhsxf = hrje * 0.25 * 0.01 ; // 银行手续费

double gssxf = hrje * 3 * 0.01 ; // 公司手续费

double whje = hrje * ( 1 - 0.25*0.01 - 3 * 0.01 );// 外汇金额

double rmbje = hrje * pj ; // 人民币金额

double qcz = rmbje * 0.11 ; // 区财政

double zcz = rmbje * 0.08 ; // 镇财政 -- 村属8% 镇属9%

if( nt.getKV("_jh", entpId , "企业隶属").equals("镇属企业") )

zcz = rmbje * 0.09 ;

double csr = rmbje * 0.06 ; file://村收入村属6% 镇属0

if( nt.getKV("_jh", entpId , "企业隶属").equals("镇属企业") )

csr = 0.0 ;

double zqy = 0.0 ; file://镇企业村属0 镇属5%0

if( nt.getKV("_jh", entpId , "企业隶属").equals("镇属企业") )

zqy = rmbje * 0.05 ;

double je = rmbje -qcz - zcz - zqy - csr ; file://净额

file://导出数据

requestHt.put("numeric银行手续费",""+ yhsxf );

requestHt.put("numeric公司手续费",""+ gssxf );

requestHt.put("numeric外汇金额" ,""+ whje );

requestHt.put("numeric人民币金额",""+ rmbje );

requestHt.put("numeric区财政" ,""+ qcz );

requestHt.put("numeric镇财政" ,""+ zcz );

requestHt.put("numeric村收入" ,""+ csr );

requestHt.put("numeric镇企业" ,""+ zqy );

requestHt.put("numeric净额" ,""+ je );

file://requestHt.put("numeric",""+ );

file://requestHt.remove("全称"); file://冗余数据由"企业id"代替->row 45

file://requestHt.remove("帐号"); file://冗余数据

}

<%@include file="ntGBDPUpload2-2.jsp" %>

<html>

<head>

<title>买入外汇统计卡</title>

</head>

<p align="center">买入外汇统计卡</p>

<td>

<tr>

<input type="hidden" name="<%= hasId?"id":"nouse" %>" value="<%= id %>" >

</td>

<td width="113">DC45C

</td>

</td>

</td>

</td>

</td>

</tr>

</table>

汇<br>

单<br>

位</div>

</td>

</td>

</td>

</tr>

</td>

</td>

</tr>

</td>

<td colspan="3">HKD

</td>

</tr>

<div align="center">银行手续费</div>

</td>

<td colspan="3">HKD

</td>

</tr>

<div align="center">公司手续费</div>

</td>

<td colspan="3">HKD

</td>

</tr>

</td>

</td>

<div align="center">人民币金额</div>

</td>

</tr>

<div align="center">HKD

</div>

</td>

</div>

</td>

<div align="center">￥

</div>

</td>

</tr>

<div align="center">缴市财政：￥

</div>

</td>

<div align="center">区财政：￥

</div>

</td>

<div align="center">托收手续费：￥

</div>

</td>

</tr>

<div align="center">镇 财 政：￥

</div>

</td>

<div align="center">区企业：￥

</div>

</td>

<div align="center">净  额：￥

</div>

</td>

</tr>

<div align="center">镇 企 业：￥

</div>

</td>

<div align="center">村收入：￥

</div>

</td>

</tr>

</table>

<tr>

自动计算

</td>

</td>

</td>

</td>

</td>

</tr>

</table>

<tr>

<td>

<input type="submit" name="<%= hasId?"edit":"add" %>" value="确定" class="bd">

</div>

</td>

</tr>

</table>

</td>

</tr></form>

</table>

</body>

</html>

<%@include file="ntGBDPScript.jsp" %>

-------------------------------------------------------

_jh_fc.jsp 用于统计显示

<%@page contentType="text/html;charset=GBK" %>

<%@page import="java.lang.*,java.net.*,java.sql.*,java.text.*,java.util.*" %>

<%@page import="dba.ntDB" %>

<%@page session="true" %>

<%@page errorPage="error.jsp"%>

<%@include file="ntGBDPDefine.jsp" %>

<% // 头部包含年份和月份选择：

String y,m,d,h;

y=(new SimpleDateFormat("yyyy")).format(new java.util.Date());

m=(new SimpleDateFormat("MM")).format(new java.util.Date());

d=(new SimpleDateFormat("dd")).format(new java.util.Date());

h=(new SimpleDateFormat("HH")).format(new java.util.Date());

int year,month;

year = Integer.parseInt( y );

month= Integer.parseInt( m );

try{

if( request.getParameter("year")!=null )

year = Integer.parseInt( request.getParameter("year") );

if( request.getParameter("month")!=null )

month = Integer.parseInt( request.getParameter("month") );

}catch(Exception e){

year = Integer.parseInt(y);

month = Integer.parseInt(m);

}

file://结汇总额

sql=

" select isNull(sum(v),0.0) from _jh_in_numeric "+

" where k='numeric汇入金额' "+

" and pid in "+

" ( select pid from _jh_in_datetime "+

" where k='date日期' and v >= '"+year+"-"+month+"-01' "+

" and v <= '"+year+"-"+month+"-"+nt.ntGetMonthDayCount(year,month) +"' "+

" ) "+

"";

nt.executeQuery(dbName,sql);

double JieHuiZongE = Double.parseDouble( nt.data[0][0] ) ;

file://村分配金额

sql=

" select isNull(sum(v),0.0) from _jh_in_numeric "+

" where k='numeric村收入' "+

" and pid in "+

" ( select pid from _jh_in_datetime "+

" where k='date日期' and v >= '"+year+"-"+month+"-01' "+

" and v <= '"+year+"-"+month+"-"+nt.ntGetMonthDayCount(year,month) +"' "+

" ) "+

"";

nt.executeQuery(dbName,sql);

double CunFenPeiJinE = Double.parseDouble( nt.data[0][0] ) ;

file://中国银行

double ZhongGuoYinHang = JieHuiZongE * 0.25 * 0.01 ;

file://商务单位

double ShangWuDanWei = JieHuiZongE * 0.03 ;

file://区财政

sql=

" select isNull(sum(v),0.0) from _jh_in_numeric "+

" where k='numeric区财政' "+

" and pid in "+

" ( select pid from _jh_in_datetime "+

" where k='date日期' and v >= '"+year+"-"+month+"-01' "+

" and v <= '"+year+"-"+month+"-"+nt.ntGetMonthDayCount(year,month) +"' "+

" ) "+

"";

nt.executeQuery(dbName,sql);

double QuCaiZheng = Double.parseDouble( nt.data[0][0] ) ;

file://镇财政

sql=

" select isNull(sum(v),0.0) from _jh_in_numeric "+

" where k='numeric镇财政' "+

" and pid in "+

" ( select pid from _jh_in_datetime "+

" where k='date日期' and v >= '"+year+"-"+month+"-01' "+

" and v <= '"+year+"-"+month+"-"+nt.ntGetMonthDayCount(year,month) +"' "+

" ) "+

"";

nt.executeQuery(dbName,sql);

double ZhenCaiZheng = Double.parseDouble( nt.data[0][0] ) ;

file://主管单位分配金额

sql=

" select isNull(sum(v),0.0) from _jh_in_numeric "+

" where k='numeric镇企业' "+

" and pid in "+

" ( select pid from _jh_in_datetime "+

" where k='date日期' and v >= '"+year+"-"+month+"-01' "+

" and v <= '"+year+"-"+month+"-"+nt.ntGetMonthDayCount(year,month) +"' "+

" ) "+

"";

nt.executeQuery(dbName,sql);

double zhuGuanDanWeiFenPeiJinE = Double.parseDouble( nt.data[0][0] ) ;

file://村主管单位

double CunZhuGuanDanWei =

CunFenPeiJinE + zhuGuanDanWeiFenPeiJinE ;

file://返拨镇外汇分成款总额

double FanBoZhen =

CunFenPeiJinE + zhuGuanDanWeiFenPeiJinE + ZhenCaiZheng ;

file://取出村定义

ntDB ntCun = new ntDB();

ntCun.executeQuery(dbName,

"select v , 'null' as x from _jh_define where k='名称' "+

" and pid in "+

" ( select pid from _jh_define where k='属性' and v='村' "+

" )"+

" order by id desc "+

"");

file://取出主管单位定义

ntDB ntZGDW = new ntDB();

ntZGDW.executeQuery(dbName,

"select v , 'null' as x from _jh_define where k='名称' "+

" and pid in "+

" ( select pid from _jh_define where k='属性' and v='主管单位' "+

" )"+

" order by id desc "+

"");

file://用金额替换x

for(int i=0;i<ntCun.rowCount;i++){

sql=

" select isNull(sum(v),0.0) from _jh_in_numeric "+

" where k='numeric村收入' "+

" and pid in "+

" ( select pid from _jh_in_datetime "+

" where k='date日期' and v >= '"+year+"-"+month+"-01' "+

" and v <= '"+year+"-"+month+"-"+nt.ntGetMonthDayCount(year,month) +"' "+

" ) "+

" and pid in "+

" ( select pid from _jh_in "+

" where k='企业隶属单位' and v = '"+ ntCun.data[i][0] +"'"+

" ) "+

"";

nt.executeQuery(dbName,sql);

ntCun.data[i][1] = (new DecimalFormat("#,##0.00")).format(Double.parseDouble( nt.data[0][0] )) ;

}

for(int i=0;i<ntZGDW.rowCount;i++){

sql=

" select isNull(sum(v),0.0) from _jh_in_numeric "+

" where k='numeric镇企业' "+

" and pid in "+

" ( select pid from _jh_in_datetime "+

" where k='date日期' and v >= '"+year+"-"+month+"-01' "+

" and v <= '"+year+"-"+month+"-"+nt.ntGetMonthDayCount(year,month) +"' "+

" ) "+

" and pid in "+

" ( select pid from _jh_in "+

" where k='企业隶属单位' and v = '"+ ntZGDW.data[i][0] +"'"+

" ) "+

"";

nt.executeQuery(dbName,sql);

ntZGDW.data[i][1] = (new DecimalFormat("#,##0.00")).format(Double.parseDouble( nt.data[0][0] ));

}

<html>

<head>

<title>深圳市坪山镇外商结汇分成表</title>

</head>

<div align="center">深圳市坪山镇外商结汇分成表</div>

<td>

<input type="text" name="year" value="<%= year%>" size="4" class="bd">

年

<input type="text" name="month" value="<%= month%>" size="2" class="bd">

月  <a href="javascript:frm.submit();">提交</a>   结汇总额:

<%= (new DecimalFormat("#,##0.00")).format( JieHuiZongE ) %> 港币</div>

</td>

<div align="center">返拨镇外汇分成款总额: <%= (new DecimalFormat("#,##0.00")).format( FanBoZhen ) %>

元</div>

</td>

</tr>

</td>

</td>

</td>

<div align="center">其中村委分配金额：<br>

<%= (new DecimalFormat("#,##0.00")).format( CunFenPeiJinE ) %>

元</div>

</td>

<div align="center">各主管单位分配金额：<br>

<%= (new DecimalFormat("#,##0.00")).format( zhuGuanDanWeiFenPeiJinE ) %>

元</div>

</td>

</tr>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</div>

</td>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</div>

</td>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</td>

</td>

</td>

</td>

</td>

</td>

</tr>

</table>

<tr>

<td>经发办负责人: </td>

<td>单位负责人: </td>

</tr>

</table>

</td>

</tr></form>

</table>

</body>

</html>