进销存系统单号算号器

进销存系统单号算号器
1.       单号存储表 DLL 的 SQLCODE
2.       存储过程的 sybase/mssql2005 代码实现
3.       调用存储过程代码
// 单号表
create table dbo.t_get_billno
(
number_type char(1) not null,
billno char(10) not null,
owner_name char(10) not null,
create_date datetime not null,
flag char(1) not null
)
alter table dbo.t_get_billno
add constraint t_get_billno_px primary key nonclustered (number_type,billno)

//billno creater
drop PROCEDURE dbo.get_mu_billno;
CREATE PROCEDURE dbo.get_mu_billno(
    @number_type char(1),
    @owner_name char(10),
    @first_number char(9) output
)
AS
declare @i int
declare @ctempno char(9)
declare @ctemp1 char(6)
declare @ctemp2 char(1)
declare @itemp3 int

begin

select @ctemp1=substring(CONVERT(varchar(30),getdate(),101),9,2)+substring(CONVERT(varchar(30),getdate(),101),1,2)+substring(CONVERT(varchar(30),getdate(),101),4,2)
        select @ctempno=max(billno)
        from t_get_billno
        tablockx
        where (number_type=@number_type) and (substring(billno,2,6) =@ctemp1)

        if (@ctempno=NULL)
            begin
                  select @itemp3=0
             end
        else
            begin
                select @itemp3=convert(int,substring(@ctempno,8,2))
            end
        if (@itemp3=99)
            begin
                  return 3
            end
        else
            begin
                select @itemp3=@itemp3+1
            end
        select @ctempno=@number_type+@ctemp1+replicate('0',(2-datalength(ltrim(str(@itemp3,2,0)))))+ltrim(str(@itemp3,2,0))
        insert into t_get_billno values(@number_type,@ctempno,@owner_name,getdate(),'0')
        select @first_number=@ctempno

return 0
end

//call procedure with pb
string number_type,owner_name,getno
DECLARE p_get_billno PROCEDURE FOR dbo.get_mu_billno
@number_type =:number_type,
@owner_name=:owner_name,
@first_number = :getno output;
number_type=sle_ctype.text
owner_name=g_username
execute p_get_billno;
fetch p_get_billno into :getno;
close p_get_billno;
commit;
if getno='' then
    messagebox('Warning!','check data Error !')
else
        dw_1.setredraw(false)
        dw_1.retrieve(number_type)
        dw_1.setredraw(true)
        st_row.text=string(dw_1.rowcount())
end if

进销存系统单号算号器相关推荐

有哪些好用的进销存系统值得推荐？
本人从事软件行业7年有余,对市面上常见的管理软件颇有了解,以下是我经过对30多家进销存系统的市场反馈和各方评价,而初步筛选出的几家比较好用.且带有免费版本的进销存系统. 下面本人将从每家系统的功能性. ...
新版PHP云进销存系统ERP销售库存仓库员工管理系统源码
简介: 新版云进销存系统ERP销售库存仓库员工管理系统源码,2022独家版本,带合同报价单打印,修复子账号不显示新加客户的BUG,还有其他方面的优化,网上流传的大多数都是老版本,没有这些功能,注意甄别 ...
基于SSM的网页版进销存系统项目说明
阿里云演示地址演示账号:17705696620 ,演示密码:111111. 项目图片项目背景本人工作有8年时间,工作采用C语言进行金融POS终端的开发,主要是进行收单机构的支付平台的对接(85 ...
大型商业进销存系统源码
推荐免费下载大型商业进销存系统源码下载地址:http://www.hur.cn/tg/linkin.asp?linkid=150286 下载地址:[URL=http://www.hur.cn/tg/ ...
进销存系统数据库设计
进销存系统数据库设计报告产品管理功能 1 产品类型基本信息表:(提供增删改) 字段名类型宽度主键否外键否类型ID 整数 Yes No 类型 ...
勤哲EXCEL服务器财务进销存系统
勤哲EXCEL服务器财务进销存系统详情咨询QQ:203415306 系统流程图 1)基础信息: [商品信息] 录入一张[商品信息]表,这里对几点进行说明: 输入"商品全名"后,& ...
进销存系统的先进先出设计思路解决方案
进销存系统的先进先出设计思路如题,进销存一般客户要求先进的货先卖,请问各位大侠有什么好的办法实现这个功能?特别是频繁进货如何实现先进先出 ------解决方案-------------------- ...
佳顺通用进销存系统去广告_母婴收银系统应该如何选择？
母婴收银系统应该如何选择?这样类似的问题在各大提问平台上浏览量竟达到数万次.而市面上琳琅满目的收银软件遍布,尤其在搜索引擎里一搜相关问题,不是营销号的匿名回答就是漫天的广告砸来,那么母婴收银系统应该如 ...
（附源码）SSM医院药品进销存系统JAVA计算机毕业设计项目
项目运行环境配置: Jdk1.8 + Tomcat7.0 + Mysql + HBuilderX(Webstorm也行)+ Eclispe(IntelliJ IDEA,Eclispe,MyEclis ...

进销存系统单号算号器

进销存系统单号算号器相关推荐

最新文章

热门文章