合同自动编号

[weilin_ai]

我的合同编号是：CQHM-CQ200910-050202-0001 其中CQHM是固定的，CQ200910是根据年月生成，050202是产品规格（还有050404，100202，100404等，根据下拉菜单选择自动显示），0001是流水号，我现在需要对此合同编号进行自动编号，选择050202型号，编号CQHM-CQ200910-050202-0001的流水号加1，如果选择050404型号，编号CQHM-CQ200910-050404-0001的流水号加1，其他型号也一样，请问该如何实现? 我是用js自动填充数据的

[fadfayger]

用sql判断相同型号的个数，生流水号

[weilin_ai]

能不能说详细点，谢谢

[凡夫与俗子]

我这有个类似的，但是我的格式：str（固定前缀）年月日流水号（0001）
跟据你说的可以用ajax来做
选了一个产品后js传参数（产品编号）到函数生成页面
在函数页生成你需要的格式再返回填充。

'********************************************************************************************
'函数名：--newpzbh()
'作  用：--凭证编号自动生成
'参  数：--str --模块字母前缀

function newpzbh(str)
	pz_y=year(date) 	'//获取系统日期的年份
	pz_m=month(date)	'//获取系统日期的月份
	pz_d=day(date)		'//获取系统日期的日子
	if pz_m>=1 and pz_m<=9 then pz_m="0"&pz_m	'//给1-9月补足0
	if pz_d>=1 and pz_d<=9 then pz_d="0"&pz_d	'//给1-9日补足0
	
	pz_key=cstr(str&pz_y&pz_m&pz_d) 	'//字母年月日组成前缀
	
	Sql="select count(*) from sunline_pzb where pzbh like '"&pz_key&"%'" '//查询包含pz_key的pzbh
	if conn.execute(Sql)(0)=0 then	
		pzbh=pz_key&"0001"		'//不存在则从0001开始计数
	else     
		'//存在则取出数值最大的记录+1成为新的凭证编号
		set pzRs=server.CreateObject("adodb.recordset")
		pzSql="select top 1 * from sunline_pzb where pzbh like '"&pz_key&"%' order by pzbh desc"
		pzRs.open pzSql,conn,1,1
		
		pzbh=right(pzRs("pzbh"),4) '//截取凭证编号的右边四位
		pzbh=pzbh+1				'//右四位+1
		pzbh=right("000"&pzbh,4) '//右四位+1后前面为0则补上0，不然会丢失0，不能组成四位
		pzbh=pz_key&pzbh   '//重新加上前缀
			
		pzRs.close
		set pzRs = nothing
	end if
	newpzbh=pzbh	'//返回凭证编号
end function
'*******************************************************************************************

[Dogfish]

ajax先拿最大的流水号码，再编合同编号。

[weilin_ai]

问题是在数据库的同一个字段里 有CQHM-CQ200910-050202-0001 ，CQHM-CQ200910-050404-0001 ，CQHM-CQ200910-100202-0001 ，CQHM-CQ200910-100404-0001 ，CQHM-CQ200910-200202-0001 ，CQHM-CQ200910-200404-0001 等这些数据 如何判断那个型号的大小呢？