求几个存储过程

Question

USE [Y6101]
GO
--管理员表
CREATE TABLE [dbo].[Admin](
[admin01] [int] IDENTITY(1,1) NOT NULL,--管理员ID
[admin02] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--管理员的(登录名)
[admin03] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--密码
[StatusRoles01] [int] NULL,--权限
[admin04] [int] NULL,--状态0=正常，9=删除
[admin05] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--安全密码
[admin06] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--三级密码
[admin07] [nvarchar](20) COLLATE Chinese_PRC_CI_AS NULL,--姓名
[admin08] [nvarchar](20) COLLATE Chinese_PRC_CI_AS NULL,--联系方式
[admin09] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--
[admin10] [datetime] NULL,--添加时间
 CONSTRAINT [PK_Admin] PRIMARY KEY NONCLUSTERED 
(
[admin01] ASC
)WITH (PAD_INDEX  = OFF, IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY]
GO
CREATE TABLE [dbo].[StatusRoles](
[StatusRoles01] [int] IDENTITY(1,1) NOT NULL,
[StatusRoles02] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,
[StatusRoles03] [nvarchar](4000) COLLATE Chinese_PRC_CI_AS NULL,
[StatusRoles04] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,
[StatusRoles05] [int] NULL,
 CONSTRAINT [PK_StatusRoles] PRIMARY KEY NONCLUSTERED 
(
[StatusRoles01] ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON [PRIMARY]
) ON [PRIMARY]GO
--管理员登录日志表
CREATE TABLE [dbo].[AdminLog](
[AdminLog01] [int] IDENTITY(1,1) NOT NULL,--后台登陆记录表ID
[admin02] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--管理员的名称
[AdminLog02] [datetime] NULL,--登陆后台的时间
[AdminLog03] [nvarchar](500) COLLATE Chinese_PRC_CI_AS NULL,--客户端浏览器的信息
[AdminLog04] [nvarchar](20) COLLATE Chinese_PRC_CI_AS NULL,--客户端的IP
 CONSTRAINT [PK_AdminLog] PRIMARY KEY NONCLUSTERED 
(
[AdminLog01] ASC
)WITH (PAD_INDEX  = OFF, IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY]
GO
CREATE TABLE [dbo].[IsWebOpen](
[IsWebOpen01] [int] NOT NULL,
[IsWebOpen02] [int] NULL,
[IsWebOpen03] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,
 CONSTRAINT [PK_IsWebOpen] PRIMARY KEY CLUSTERED 
(
[IsWebOpen01] ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON [PRIMARY]
) ON [PRIMARY]
GO--健康服务中心  别名：报单中心 
CREATE TABLE [dbo].[Agents](
[Agents01] [int] IDENTITY(1,1) NOT NULL,--自增长ID
[Agents02] [varchar](50) COLLATE Chinese_PRC_CI_AS NOT NULL,--主键，报单中心编号
[Agents03] [nvarchar](150) COLLATE Chinese_PRC_CI_AS NULL,--报单中心名称
[Agents04] [int] NOT NULL CONSTRAINT [DF_Agents_Agents04]  DEFAULT (0),--申请是否通过  0申请未通过  1申请了，并通过了
[Agents05] [text] COLLATE Chinese_PRC_CI_AS NULL,--备注
[Agents08] [int] NULL,--申请者ID
[Agents09] [int] NOT NULL CONSTRAINT [DF_Agents_Agents09]  DEFAULT (0),--权限
[Agents10] [datetime] NULL CONSTRAINT [DF_Agents_Agents10]  DEFAULT (getdate()),--申请时间
[Agents11] [varchar](50) COLLATE Chinese_PRC_CI_AS NULL,--会员编号
[Agents12] [money] NOT NULL CONSTRAINT [DF_Agents_Agents12]  DEFAULT (0),--汇入金额
[Agents13] [ntext] COLLATE Chinese_PRC_CI_AS NULL
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
GO
--B网图
CREATE TABLE [dbo].[B2_NetWork](
[NetWork01] [int] NOT NULL,--ID
[NetWork02] [datetime] NULL,--入点时间
[NetWork03] [int] NULL,--上代节点ID
[NetWork04] [int] NULL,--1左，2右
[NetWork05] [int] NULL,--层数
[NetWork06] [ntext] COLLATE Chinese_PRC_CI_AS NULL,--路径
[NetWork08] [int] NULL,--B网出局
[NetWork09] [money] NULL,--重复消费金额
[NetWork10] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--节点名称
[Users01] [int] NULL,--用户ID
 CONSTRAINT [PK_B2_NetWork] PRIMARY KEY CLUSTERED 
(
[NetWork01] ASC
)WITH (PAD_INDEX  = OFF, IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
GO--转账表
CREATE TABLE [dbo].[ChangeMoney](
[ChangeMoney01] [bigint] IDENTITY(1,1) NOT NULL,--自动增长ID
[Users01] [int] NULL,--转账人
[ChangeMoney02] [money] NULL,--转账金额
[ToUsers01] [int] NULL,--转账对象
[ChangeMoney03] [datetime] NULL,--转账时间
[ChangeMoney04] [int] NULL CONSTRAINT [DF_ChangeMoney_ChangeMoney04]  DEFAULT ((0))
) ON [PRIMARY]
GO
---------------------------------版权表
IF EXISTS (SELECT * FROM SYSOBJECTS WHERE  id = OBJECT_ID('DBO.Copyright'))
DROP TABLE DBO.Copyright
GO
CREATE TABLE [dbo].[Copyright](
[Copyright01] [int]   NOT NULL,--自动增长ID
[Copyright02] [nvarchar](100) NULL,--版权信息
    PRIMARY KEY(Copyright01)
)
GO--汇款表
CREATE TABLE [dbo].[EnsureRemit](
[EnsureRemit01] [int] IDENTITY(1,1) NOT NULL,--自增长
[EnsureRemit02] [varchar](50) COLLATE Chinese_PRC_CI_AS NULL,--开户银行
[EnsureRemit03] [varchar](50) COLLATE Chinese_PRC_CI_AS NULL,--帐户
[EnsureRemit04] [varchar](50) COLLATE Chinese_PRC_CI_AS NULL,--开户名
[EnsureRemit05] [datetime] NULL,--时间
[EnsureRemit06] [int] NULL,--状态，是否确认0未1已经确认
[EnsureRemit07] [money] NULL,--汇款金额
[users01] [int] NULL--用户id
) ON [PRIMARY]GO
--留言表
CREATE TABLE [dbo].[LeaveMsg](
[LeaveMsg01] [int] IDENTITY(1,1) NOT NULL,--自动增长ID
[LeaveMsg02] [ntext] COLLATE Chinese_PRC_CI_AS NOT NULL,--留言内容
[LeaveMsg03] [datetime] NOT NULL,--留言时间
[LeaveMsg04] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--留言主题
[LeaveMsg05] [int] NULL,--阅读与否(0未阅读，1已阅读)
[users01] [int] NULL,--留言人
[admin01] [int] NULL,--管理员
[tousers01] [int] NULL--收信人
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]GO--回复表
CREATE TABLE [dbo].[LeaveReMsg](
[LeaveReMsg01] [int] IDENTITY(1,1) NOT NULL,--回复ID
[LeaveMsg01] [int] NOT NULL,--留言ID
[LeaveReMsg02] [ntext] COLLATE Chinese_PRC_CI_AS NOT NULL,--回复内容
[LeaveReMsg03] [datetime] NOT NULL CONSTRAINT [DF_LeaveReMsg_LeaveReMsg03]  DEFAULT (getdate()),--回复时间
[users02] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--用户回复
[admin01] [int] NULL--管理员回复
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]GO--级别
CREATE TABLE [dbo].[Level](
[Level01] [int] NOT NULL,--级别
[Level02] [varchar](50) COLLATE Chinese_PRC_CI_AS NULL,--1普通会员，2贵宾会员
[Level03] [money] NULL,--投资金额　1、1580元 2、2880
[Level04] [int] NULL,--
[Level05] [money] NULL,--推荐奖A 1、158  2、258
[level06] [money] NULL,--推荐奖B 1、616  2、716
[level07] [money] NULL,--22倍增奖  458
[level08] [money] NULL,--服务中心报单费 1、79  2、300
[level09] [money] NULL,--普通会员报单费 1、40  2、100
[level10] [money] NULL,--
[levelPT] [varchar](20) COLLATE Chinese_PRC_CI_AS NULL,--级别名称(普通会员、VIP会员、加盟店、VIP加盟店)
 CONSTRAINT [PK_Level] PRIMARY KEY NONCLUSTERED 
(
[Level01] ASC
)WITH (PAD_INDEX  = OFF, IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY]GO
--错误表
CREATE TABLE [dbo].[ErrPageState](
[ErrPageState01] [int] IDENTITY(1,1) NOT NULL,
[ErrPageState02] [nvarchar](300) COLLATE Chinese_PRC_CI_AS NOT NULL CONSTRAINT [DF_ErrPageState_ErrPageState02]  DEFAULT (N''''),
[ErrPageState03] [nvarchar](300) COLLATE Chinese_PRC_CI_AS NOT NULL CONSTRAINT [DF_ErrPageState_ErrPageState03]  DEFAULT (N''''),
[ErrPageState04] [nvarchar](300) COLLATE Chinese_PRC_CI_AS NOT NULL CONSTRAINT [DF_ErrPageState_ErrPageState04]  DEFAULT (N''''),
[ErrPageState05] [nvarchar](300) COLLATE Chinese_PRC_CI_AS NOT NULL,
[State] [int] NOT NULL CONSTRAINT [DF_ErrPageState_State]  DEFAULT ((0)),
 CONSTRAINT [PK_ErrPageState] PRIMARY KEY CLUSTERED 
(
[ErrPageState01] ASC
)WITH (PAD_INDEX  = OFF, IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY]
GO--文章类型
CREATE TABLE [dbo].[NewsSort](
[NewsSort01] [int] NOT NULL,--类型ID
[NewsSort02] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--类型说明
[NewsSort03] [int] NOT NULL CONSTRAINT [DF_NewsSort_NewsSort03] DEFAULT ((0)),--对应类型ID，值0：为一级类。
 CONSTRAINT [PK_NewsSort] PRIMARY KEY CLUSTERED 
(
[NewsSort01] ASC
)WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY]
GO--实体类News (属性说明自动提取数据库字段的描述信息)
CREATE TABLE [dbo].[News](
[News01] [int] IDENTITY(1,1) NOT NULL,--新闻和公告表ID
[News02] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,-- 新闻标题
[News03] [ntext] COLLATE Chinese_PRC_CI_AS NULL,-- 新闻表正文
[News04] [int] NULL,--是否最新 (0否1是)
[News05] [datetime] NULL,--发布新闻的时间
[News06] [int] NULL,--公告等级 1=普通 2=紧急 3=重要
[admin01] [int] NULL,-- 新闻公告发布人
[NewsSort01] [int] NULL,--类型ID
 CONSTRAINT [PK_News] PRIMARY KEY NONCLUSTERED 
(
[News01] ASC
)WITH (PAD_INDEX  = OFF, IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
GO--奖金表
CREATE TABLE [dbo].[PM](
[PM01] [bigint] IDENTITY(1,1) NOT NULL,--自增长ID
[PM02] [money] NOT NULL CONSTRAINT [DF_PM_PM02]  DEFAULT ((0)),-- 奖金金额
[PM03] [int] NULL,--奖金类型
[PM04] [varchar](50) COLLATE Chinese_PRC_CI_AS NULL,--奖金类型说明
[PM05] [datetime] NOT NULL CONSTRAINT [DF_PM_PM05]  DEFAULT (getdate()),--获奖时间
[PM06] [int] NULL,--状态，是否是正式数据，为0是非正式在每次计算前都会删除
[PM07] [int] NOT NULL CONSTRAINT [DF__PM__PM07__19DFD96B]  DEFAULT ((0)),--是否结算0表示未结算，1表示已结算
[PM08] [datetime] NULL,--结算时间
[PM09] [int] NOT NULL CONSTRAINT [DF__PM__PM09__1AD3FDA4]  DEFAULT ((0)),--
[PM10] [int] NULL CONSTRAINT [DF_PM_PM10]  DEFAULT ((0)),--奖金来源，Users01
[users01] [int] NOT NULL,--获奖用户ID
[PM11] [money] NULL,--税额
[PM12] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL--奖金来源，Users02
) ON [PRIMARY]GO
--管理员高级密码
CREATE TABLE [dbo].[SencondP](
[sencondp01] [int] NOT NULL,
[sencondp02] [varchar](50) COLLATE Chinese_PRC_CI_AS NOT NULL,
[sencondp03] [int] NOT NULL
) ON [PRIMARY]GO
--设置前台权限表
CREATE TABLE [dbo].[SetSystem](
[SetSystem01] [int] IDENTITY(1,1) NOT NULL,--编号
[SetSystem02] [int] NULL,--会员修改银行信息权限0：不能修改1：可以修改
[SetSystem03] [int] NULL,--设置电子货币转账权限（0：不可以1：可以）
[SetSystem04] [int] NULL,--电子货币提现权限设置（0：不开通1：开通）
[SetSystem05] [int] NULL,--奖金转账权限设置（0：不可以1：可以）
[SetSystem06] [int] NULL,--奖金提现权限设置（0：不可以1：可以）
[SetSystem07] [int] NULL,--是否启动会员前台系统（0：不可以1：可以）
[SetSystem08] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--会员前台系统关闭说明
 CONSTRAINT [PK_SetSystem] PRIMARY KEY CLUSTERED 
(
[SetSystem01] ASC
)WITH (PAD_INDEX  = OFF, IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY]GO

Answer 1

--UsersNode
CREATE TABLE [dbo].[UsersNode](
[UsersNode01] [int] IDENTITY(1,1) NOT NULL,
[UsersNode02] [int] NULL,
[UsersNode03] [int] NULL,
[Users01] [int] NULL,
[UsersNode04] [int] NULL,
[ZZP01] [int] NULL,
[UsersNode05] [int] NULL,
 CONSTRAINT [PK_UsersNode] PRIMARY KEY NONCLUSTERED 
(
[UsersNode01] ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON [PRIMARY]
) ON [PRIMARY]GOCREATE TABLE [dbo].[ValueAdded]( 
[ValueAdded01] [int] IDENTITY(1,1) NOT NULL,
[ValueAdded02] [nvarchar](250) COLLATE Chinese_PRC_CI_AS NULL,
[ValueAdded03] [text] COLLATE Chinese_PRC_CI_AS NULL,
[ValueAdded04] [int] NULL,
[ValueAdded05] [datetime] NULL,
[admin01] [int] NULL,
[ValueAdded06] [int] NULL,
[ValueAdded07] [nvarchar](250) COLLATE Chinese_PRC_CI_AS NULL,
 CONSTRAINT [PK_ValueAdded] PRIMARY KEY NONCLUSTERED 
(
[ValueAdded01] ASC
)WITH (PAD_INDEX  = OFF, IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]GO--奖金转账表
CREATE TABLE [dbo].[BonusChangeMoney](
[ChangeMoney01] [bigint] IDENTITY(1,1) NOT NULL,--自动增长ID
[Users01] [int] NULL,--转出账户
[ChangeMoney02] [money] NULL,--转账金额
[ToUsers01] [int] NULL,--转入账户
[ChangeMoney03] [datetime] NULL--转账时间
) ON [PRIMARY]GO--奖金提现表
CREATE TABLE [dbo].[BonusTakeMoney](
[TakeMoney01] [int] IDENTITY(1,1) NOT NULL,--自动增长ID
[TakeMoney02] [datetime] NULL,--提现日期
[TakeMoney03] [money] NULL,--提现金额
[TakeMoney04] [int] NULL,--状态（0：未审批1：已审批）
[users01] [int] NULL,--提现人
[TakeMoney05] [money] NULL,--提现费
[TakeMoney06] [money] NULL,--实发金额
 CONSTRAINT [PK_BonusTakeMoney] PRIMARY KEY CLUSTERED 
(
[TakeMoney01] ASC
)WITH (PAD_INDEX  = OFF, IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY]GO--奖金发放记录表
CREATE TABLE [dbo].[IssueMoney](
[Issue01] [int] IDENTITY(1,1) NOT NULL,--奖金发放ID
[Issue02] [datetime] NULL,--奖金发放时间
[Issue03] [money] NULL,--发放金额
[Users01] [int] NULL,--已发放的用户ID
 CONSTRAINT [PK_IssueMoney] PRIMARY KEY CLUSTERED 
(
[Issue01] ASC
)WITH (PAD_INDEX  = OFF, IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY]GO--资源文件表
CREATE TABLE [dbo].[InforFiles](
[InforFiles01] [bigint] IDENTITY(1,1) NOT NULL,--自动增长ID
[InforFiles02] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--图片编号
[InforFiles03] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--图片标题
[InforFiles04] [nvarchar](10) COLLATE Chinese_PRC_CI_AS NULL,--
[InforFiles05] [int] NULL,--文件大小
[InforFiles06] [nvarchar](500) COLLATE Chinese_PRC_CI_AS NULL,--图片路径
[InforFiles07] [nvarchar](500) COLLATE Chinese_PRC_CI_AS NULL,--
[InforFiles08] [datetime] NULL,--上传时间
[admin01] [int] NULL--管理员ID
) ON [PRIMARY]GO--会员论坛表
CREATE TABLE [dbo].[Forum](
[Forum01] [bigint] IDENTITY(1,1) NOT NULL,
[Forum02] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--主题
[Forum03] [nvarchar](1000) COLLATE Chinese_PRC_CI_AS NULL,--内容
[Forum04] [int] NULL CONSTRAINT [DF_Forum_Forum04]  DEFAULT (0),--状态(0,1)
[Forum05] [datetime] NULL CONSTRAINT [DF_Forum_Forum05]  DEFAULT (getdate()),--时间
[Forum06] [int] NULL CONSTRAINT [DF_Forum_Forum06]  DEFAULT (0),--点击次数
[Forum07] [int] NULL CONSTRAINT [DF_Forum_Forum07]  DEFAULT (0),--回复次数
[users01] [int] NULL,--发布者(0为管理员，其它为会员ID)
 CONSTRAINT [PK_Forum] PRIMARY KEY NONCLUSTERED 
(
[Forum01] ASC
)WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY]--论坛回复
CREATE TABLE [dbo].[ForumReply](
[ForumReply01] [bigint] IDENTITY(1,1) NOT NULL,
[ForumReply02] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,--回复标题
[ForumReply03] [nvarchar](1000) COLLATE Chinese_PRC_CI_AS NULL,--回复内容
[ForumReply04] [int] NULL CONSTRAINT [DF_Forum_ForumReply04]  DEFAULT (0),--状态(0,1)
[ForumReply05] [datetime] NULL CONSTRAINT [DF_Forum_ForumReply05]  DEFAULT (getdate()),--回复时间
[Forum01] [int] null,--主题ID
[users01] [int] NULL,--回复者(0为管理员，其它为会员ID)
 CONSTRAINT [PK_ForumReply] PRIMARY KEY NONCLUSTERED 
(
[ForumReply01] ASC
)WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY]
go
--友情链接
CREATE TABLE [dbo].[Website_Url](
[Website_Url01] [int] IDENTITY(1,1) NOT NULL,
[Website_Url02] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,
[Website_Url03] [nvarchar](50) COLLATE Chinese_PRC_CI_AS NULL,
[Website_Url04] [datetime] NULL,
[Website_Url05] [int] NULL
) ON [PRIMARY]--初始化内容
INSERT INTO [Admin]([admin02],[admin03],[StatusRoles01],[admin04],[admin05],[admin06],[admin07],[admin08],[admin09],[admin10])
     VALUES('admin','698D51A19D8A121CE581499D7B701668',1,0,'698D51A19D8A121CE581499D7B701668'
           ,'698D51A19D8A121CE581499D7B701668','张三','1355555555','',getdate())
           
INSERT INTO [StatusRoles]([StatusRoles02],[StatusRoles03],[StatusRoles04],[StatusRoles05])
     VALUES('admin','MemberTreeView2.aspx,MemberTreeView.aspx,BusinessStatistics.aspx,SystemMoney.aspx,PrizeSearch.aspx,PrizeSearch1.aspx,BonusList.aspx,AddMoneyManage.aspx,BonusTakeMoney.aspx,BonusTakeMoney1.aspx,ChangeMoney.aspx,DoubleSpending.aspx,EmoneyManage.aspx,EmoneyList.aspx,EmoneyCheck.aspx,OpenMember_Admin.aspx,OpenMember_Admin1.aspx,DeclarationCenterOpen.aspx,ShopingReader.aspx,ProductList.aspx,ProductManage.aspx,ProductOrdersManage.aspx,PublisManage.aspx,Publis.aspx,LeaveMsg.aspx,Message.aspx,ContactUs.aspx,ValueAdd.aspx,UserPwdEdit.aspx,Set.aspx,AdminList.aspx,AddOrEditAdmin.aspx,SystemBank.aspx,backup.aspx,BonusSet.aspx,'
           ,'管理员',0)INSERT INTO [SystemMoney]([SystemMoney01],[SystemMoney02],[SystemMoney03],[Point])VALUES(0,0,0,0)INSERT INTO [IsWebOpen]([IsWebOpen01],[IsWebOpen02],[IsWebOpen03])VALUES(1,1,'系统开启中')INSERT INTO [SencondP]([sencondp01],[sencondp02],[sencondp03])VALUES(1,'111',1)--公司报单中心
INSERT INTO [Agents]([Agents02],[Agents03],[Agents04],[Agents05],[Agents08],[Agents09],[Agents10],[Agents11],[Agents12],[Agents13])
     VALUES('admin','公司',1,'',0,0,getdate(),'admin',0,'')

Answer 2

《1：1双轨制度》秒结
1、对碰奖：
级别 银卡【1单】 金卡【7单】 钻卡【12单】 皇冠【22单】
金额 400 2800 4800 8800
产品 防盗器 防盗器 防盗器 防盗器
封顶 500元 3500元 6000元 10000元
对碰（1:1） 每单30元 每单30元 每单30元 每单30元
每层最多对碰 10次 70次 120次 220次
2、开拓奖：
a、推荐第1、2个人时，推荐奖每单40元
b、从第3个人以后（包括第3个人），推荐奖每单200元
3、领导奖：
当第3个人推荐的前2个人整体往下2个点、2个点无限代享受每单160元。                                                                                        你推荐的人，当他推荐到第三个人，就是他自己拿了，每个人都是从第三个人开始享受领导奖。如，你推荐了A-B-C-D-E，从C开始推荐的前两个人的两两倍增下去的点点无限代每单160元都是你自己拿。
级别 银卡 金卡 钻卡 皇冠
领导奖 160元 1120 1920元 3520元
日封顶 500元 4000元 8000元 18000元
出局 5万 500万 1000万 2000万
4、幸运奖；
银卡享受9层见点拿钱每单10元
金卡享受14层见点拿钱每单10元
钻卡享受16层见点拿钱每单10元
皇冠享受18层见点拿钱每单10元
【注；1单10元，7单70元，12单120元，20单220元】
5、爱心奖：
推荐人的对碰奖、开拓奖、领导奖、贡献奖每次结算扣除10 %，奖励给自己推荐的人，直到返回投资金额的3倍止；    解释：（任何会员，无论有无业绩，都可以得到自己上属推荐人总奖金10%达到自己投资3倍止。）
6、服务中心：
金卡和钻卡级别开通每单奖励10元
皇冠级别开通每单奖励15元
首次预存5000元货币。方可申请。
7、全球分红1％【月结】（这个不用做）
皇冠可以享受全球总业绩1%的分红；
 
备注说明：
1.       重复消费
价格 银卡9折 金卡8折 钻石7折 皇冠6折
2.扣除5%税收
3.提现手续费3%(完成)
4.网络管理费50元，第一次奖金中扣除。
5.爱心奖：（解释）：是平均分配给推荐的会员。如果扣除推荐人10%是100元，推荐了1个会员，那100元就是1个会员的。推荐了2个会员，那100元就是每个会员50元。直到返回投资金额的3倍止；
 
6.参数设置为可调的：根据市场发展可以调整各个奖励：
对碰奖：日封顶、次数、单数，对碰金额、（1:1）
开拓奖：前2个的金额，2个后的金额
领导奖：各个级别领导奖金额、日封顶、出局。
幸运奖：各个级别见点金额、层数
爱心奖；扣除多少
服务中心：各级别开通奖励金额和申请条件7．所有级别可以升级，补交差额，升级的会员对上面所有的会员将不产生任何奖金。
8．找回密码，首页输入会员号用邮件发到邮箱动找回密码或修改密码。
 

Answer 3

SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.views WHERE object_id = OBJECT_ID(N'[dbo].[S_Users]'))--创建S_Users视图
EXEC dbo.sp_executesql @statement = N'CREATE VIEW [dbo].[S_Users]
AS
SELECT     TOP (100) PERCENT a.Users01, a.Users02, a.Users03, a.Users04, a.Users06, a.Users07, a.Users09, a.Users10, a.Users11, a.Users12, a.Users13, 
                      a.Users14, a.Users15, a.Users16, a.Users17, a.Users18, a.Users19, a.Users20, a.Users21, a.Users22, a.Users23, a.Users24, a.Users25, a.Users26, 
                      a.Users28, a.Users31, a.Users32, a.Users33, a.Users35, a.Users36, a.Users42, a.Users43, a.Users44, a.Agents01, a.Users45, a.Users57, 
                      dbo.[Level].Level01, dbo.[Level].Level02, dbo.[Level].Level03, dbo.Agents.Agents02
FROM         dbo.Users AS a INNER JOIN
                      dbo.Agents ON a.Agents01 = dbo.Agents.Agents01 INNER JOIN
                      dbo.[Level] ON a.Users18 = dbo.[Level].Level01
ORDER BY a.Users01 DESC' 
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[DeleteAll]') AND type in (N'P', N'PC'))
BEGIN
EXEC dbo.sp_executesql @statement = N'
CREATE procedure [dbo].[DeleteAll]as
delete from users where Users01<>1
update users set users32=0,users35=0,users38=0,users41=0,users42=0,users47=0,users24=0,users57=0,users58=0,users59=0,users60=0,users61=0,users63=0,users65=0,users66=0 where users01 = 1
delete from AdminLog 
delete from Agents where lower(Agents11)<>''admin''
delete from PM
delete from TakeMoney
delete from TakeMoneysPut
delete from News
delete from LeaveMsg
delete from LeaveReMsg
    delete from B2_NetWork
delete from BonusChangeMoney
delete from BonusTakeMoney
delete from IssueMoney
update systemMoney set systemmoney01 = 0 ,systemMoney02=0,systemMoney03=0
delete from ChangeMoney
delete from admin where admin02<>''admin''
delete from Forum
delete from ForumReply
delete from EnsureRemit
' 
END
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[SeePointBonus]') AND type in (N'P', N'PC'))
BEGIN
EXEC dbo.sp_executesql @statement = N'CREATE PROCEDURE [dbo].[SeePointBonus]
(
@users01 bigint
)AS
BEGIN
declare @nDate datetime,@users02 varchar(50),@users15 int,@users16 int,@users18 money,@bonus money,@users19 varchar(max)  --当前时间
declare @sUid int,@sLev int,@LevBad int,@tMoney money,@money money,@users26 datetime,@users35 money,@users47 int  --会员ID，层、层差
declare @users48 int,@money1 money,@money2 money,@money3 money,@money4 money,@users41 int
set @nDate=getdate()
select @users02=users02,@users19=users19,@users16=users16 from users where users01=@users01
select @money1=Level03,@money2=Level05,@money3=Level06,@money4=Level10 from [Level] where Level01=11
Declare W_cursor cursor For select users01,users16,users18,users26,users35,users47,users48 from users where users17=2 and users49=0 and (users01=1 or @users19 like ''%-''+ cast(users01 as varchar(10)) +''-%'') order by users01 desc
open W_cursor
fetch next from W_cursor into @sUid,@sLev,@users18,@users26,@users35,@users47,@users48
while @@fetch_status=0
BEGIN
if @users18=1
begin
if @users47=0
set @tMoney=2000
else if @users47=1
set @tMoney=10000
else if @users47=2
set @tMoney=1000000
else if @users47=3
set @tMoney=3000000
else if @users47=4
set @tMoney=6000000
else 
set @tMoney=0
end
else
begin
if @users47=0
set @tMoney=300000
else if @users47=1
set @tMoney=1000000
else if @users47=2
set @tMoney=6000000
else 
set @tMoney=0
end
if dateadd(dd,@users48,@users26)>=getdate()
begin
SET @LevBad=@users16-@sLev
if @LevBad<=4
set @bonus=@money1
else if @LevBad<=10
set @bonus=@money4
else if @LevBad<=24
set @bonus=@money2
else if @LevBad<=27
set @bonus=@money3
else
set @bonus=0
if @bonus>0
BEGIN
if @tMoney>0
begin
SET @money=@bonus+@users35
if @money>@tMoney
set @bonus=@tMoney-@users35
end
insert into PM (PM02,PM03,PM04,PM05,PM07,PM08,PM10,users01,PM12) values(@bonus,24,''见点奖'',@nDate,1,@nDate,@users01,@sUid,@users02)
update users set users35=users35+@bonus,users57=users57+@bonus,users61=users61+@bonus where users01=@sUid
--判断此获奖会员的网络管理费是否扣足80
select @users41=users41 from users where users01=@sUid
if @users41<80
begin
set @bonus=80-@users41
insert into PM (PM02,PM03,PM04,PM05,PM07,PM08,PM10,users01,PM12) values(@bonus,15,''网络管理费'',@nDate,1,@nDate,@users01,@sUid,@users02)
update users set users41=users41+@bonus,users57=users57-@bonus where users01=@sUid
end
END
end
else
update users set users49=1 where users01=@sUid
fetch next from W_cursor into @sUid,@sLev,@users18,@users26,@users35,@users47,@users48
END
close W_cursor
Deallocate W_cursor
END
' 
END
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[PayMoney]') AND type in (N'P', N'PC'))
BEGIN
EXEC dbo.sp_executesql @statement = N'CREATE PROCEDURE [dbo].[PayMoney] 

AS
BEGIN
--每个区月业绩都达到条件的会员的满层奖
declare @bonus money,@users01 int,@nDate datetime
set @nDate=getdate()
select @bonus=Level07 from [Level] where Level01=11
Declare H_cursor cursor For select users01 from users where users44=0 and users17=2 and users57>=@bonus order by users01 desc
open H_cursor
fetch next from H_cursor into @users01
while @@fetch_status=0
BEGIN
insert into PM (PM02,PM03,PM04,PM05,PM07,PM10,users01,PM12) values(@bonus,14,''缴纳互助金'',@nDate,0,null,@users01,'''')
update users set users57=users57-@bonus,users44=1 where users01=@users01
fetch next from H_cursor into @users01
END
close H_cursor
Deallocate H_cursor
END
' 
END
GO

Answer 4

SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[DoubleBonus]') AND type in (N'P', N'PC'))
BEGIN
EXEC dbo.sp_executesql @statement = N'
CREATE PROCEDURE [dbo].[DoubleBonus]
(
@users01 bigint,
@aa int
)AS
BEGIN
declare @nDate datetime,@users02 varchar(50),@bonus money,@users11 int  --当前时间、会员编号、所在区、奖金、推荐人ID
declare @sUid int,@Level07 int,@users18 int,@tMoney money,@money money
set @nDate=getdate()
select @users02=users02,@users11=users11,@users18=users18 from users where users01=@users01

select @bonus=Level07 from [Level] where Level01=@users18
while @aa<3
BEGIN
select @sUid=users11,@aa=users43 from users where users01=@users11 and users17=2  --上级一层
if @sUid=0
break
if @aa>=3 and @sUid<>0
BEGIN
select @tMoney=users42 from users where users01=@sUid
if @tMoney>=9000000
break
else
begin
set @money=@tMoney+@bonus
if @money>9000000
set @bonus=9000000-@tMoney
insert into PM (PM02,PM03,PM04,PM05,PM07,PM08,PM10,users01,PM12) values(@bonus,23,''领导奖金'',@nDate,1,@nDate,@users01,@sUid,@users02)
update users set users42=users42+@bonus,users57=users57+@bonus,users61=users61+@bonus where users01=@sUid
end
END
else if @aa>=3 and @sUid=0
break
set @users11=@sUid
END
END' 
END
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[WeekAccounts]') AND type in (N'P', N'PC'))
BEGIN
EXEC dbo.sp_executesql @statement = N'CREATE PROCEDURE [dbo].[WeekAccounts] 
@reInt int output
AS
BEGIN
--互助奖金结算
declare @bonus money,@users01 int,@users02 varchar(50),@nDate datetime,@Levbad int,@uPath varchar(max)
declare @Level08 money,@Level09 money,@sUid int
set @nDate=getdate()
set @reInt=0
select @Level08=Level08,@Level09=Level09 from [Level] where Level01=11
Declare H_cursor cursor For select users01,users02,users19 from users where users44=1 and users17=2 order by users01 desc
open H_cursor
fetch next from H_cursor into @users01,@users02,@uPath
while @@fetch_status=0
BEGIN
set @Levbad=0
Declare W_cursor cursor For select users01 from users where users44=1 and users17=2 and (users01=1 or @uPath like ''%-''+ cast(users01 as varchar(10)) +''-%'') order by users01 desc
open W_cursor
fetch next from W_cursor into @sUid
while @@fetch_status=0
BEGIN
if @Levbad<10
set @bonus=@Level08
else if @Levbad<16
set @bonus=@Level08
else
set @bonus=0
if @bonus>0
begin
insert into PM (PM02,PM03,PM04,PM05,PM07,PM08,PM10,users01,PM12) values(@bonus,25,''互助奖'',@nDate,1,@nDate,@users01,@sUid,@users02)
update users set users57=users57+@bonus,users61=users61+@bonus where users01=@sUid
end
set @Levbad=@Levbad+1
fetch next from W_cursor into @sUid
END
close W_cursor
Deallocate W_cursor
set @reInt=@reInt+1
fetch next from H_cursor into @users01,@users02,@uPath
END
close H_cursor
Deallocate H_cursor
if @reInt>0
begin
select @bonus=sum(pm02) from pm where pm03=14 and pm07=0
update systemMoney set SystemMoney01=SystemMoney01+@bonus
update users set users44=0 where users44=1
update pm set pm07=1,pm08=@nDate where pm03=14 and pm07=0
end
END' 
END
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[SetERR]') AND type in (N'P', N'PC'))
BEGIN
EXEC dbo.sp_executesql @statement = N'CREATE PROCEDURE [dbo].[SetERR]
@ErrPageState02 nvarchar(300),
@ErrPageState03 nvarchar(300),
@ErrPageState04 nvarchar(300)
AS
BEGIN
-- SET NOCOUNT ON added to prevent extra result sets from
-- interfering with SELECT statements.
SET NOCOUNT ON;
INSERT INTO [ErrPageState] ([ErrPageState02], [ErrPageState03], [ErrPageState04], [ErrPageState05], [state]) VALUES (@ErrPageState02, @ErrPageState03, @ErrPageState04, GETDATE(), 0)
END' 
END
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[NodeDt]') AND type in (N'P', N'PC'))
BEGIN
EXEC dbo.sp_executesql @statement = N'CREATE procedure  [dbo].[NodeDt]
@uid int,
@b int
as
declare @path varchar(3000)
declare @ub varchar(3000)
select @ub=Users16,@path=Users19 from users where users01=@uid
select UsersNode02,UsersNode03,UsersNode05,users02 from UsersNode,  users,
(select users01 from users where users16>=@ub and users16<=(@b+@ub) and users19 like @path+''%'' ) as a
where a.users01=UsersNode.users01 and users.users01=a.users01 order by users02,usersnode03
' 
END
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[JoinPoint]') AND type in (N'P', N'PC'))
BEGIN
EXEC dbo.sp_executesql @statement = N'CREATE PROCEDURE [dbo].[JoinPoint]
(
@users01 bigint,
@users11 int,
@uPath varchar(max) output,
@users15 int output
)AS
BEGIN
declare @num int,@users14 varchar(50),@users13 int,@users16 int  --当前时间、父节点编号、父节点ID
select top 1 @users13=users01 from users a where a.users19 like (select users19 from users b where b.users01=@users11)+''%'' 
and (select count(0) from users c where c.users13=a.users01)<2
select @num=count(0) from users where users13=@users13 and users17>0
if @num=0
set @users15=1
else
set @users15=2
select @uPath=users19,@users14=users14,@users16=users16 from users where users01=@users13
set @uPath=@uPath+''-''+cast(@users01 as varchar(10))
set @users16=@users16+1
update users set users15=@users15,users13=@users13,users14=@users14,users16=@users16,users19=@uPath where users01=@users01
END
' 
END
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.views WHERE object_id = OBJECT_ID(N'[dbo].[S_Admin]'))
EXEC dbo.sp_executesql @statement = N'--视图
CREATE VIEW [dbo].[S_Admin]
AS
SELECT dbo.Admin.admin01, dbo.Admin.admin02, dbo.Admin.admin03, dbo.StatusRoles.StatusRoles02, dbo.Admin.StatusRoles01, dbo.Admin.admin04, 
                      dbo.Admin.admin07, dbo.Admin.admin10
FROM dbo.Admin INNER JOIN
                      dbo.StatusRoles ON dbo.Admin.StatusRoles01 = dbo.StatusRoles.StatusRoles01
      
' 
GO

Answer 5

SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[openusers]') AND type in (N'P', N'PC'))
BEGIN
EXEC dbo.sp_executesql @statement = N'CREATE PROCEDURE [dbo].[openusers] 
@users01 bigint,
@UsersID int, --执行开通的会员ID
@isAgents int, --是否报单中心：0不是，1是
@reInt int output
AS
BEGIN
declare @uPath varchar(max),@users15 int,@Neare int,@sUid int,@users02 varchar(50),@nDate datetime,@users45 money,@users11 int
declare @users18 int,@bonus money,@count int,@hasMoney money,@users41 int
select @users02=users02,@users11=users11,@users18=users18,@users45=users45 from users where users01=@users01
set @nDate=getdate()
set @reInt=0 -- ==会员自动入位
exec [JoinPoint] @users01,@users11,@uPath output,@users15 output -- ==报单奖Start==
if @UsersID=0
begin
set @bonus=@users45
update systemMoney set systemMoney01=systemMoney01+@bonus
insert into PM (PM02,PM03,PM04,PM05,PM07,PM08,PM10,users01,PM12) values(@bonus,13,''后台开通会员'',@nDate,1,@nDate,@users01,0,@users02)
set @reInt=@reInt+1
end
else
begin
select @hasMoney=users24 from users where users01=@UsersID
if @hasMoney>=@users45 
begin
set @bonus=@users45
set @hasMoney=@hasMoney-@bonus
insert into PM (PM02,PM03,PM04,PM05,PM07,PM08,PM10,users01,PM12) values(@bonus,12,''开通会员扣电子币'',@nDate,1,@nDate,@users01,@UsersID,@users02)
--获得奖金
--是否报单中心
if @isAgents=0
select @bonus=Level09 from [Level] where Level01=(select users18 from users where users01=@users01)
else
select @bonus=Level08 from [Level] where Level01=(select users18 from users where users01=@users01)
insert into PM (PM02,PM03,PM04,PM05,PM07,PM08,PM10,users01,PM12) values(@bonus,26,''报单费'',@nDate,1,@nDate,@users01,@UsersID,@users02)
update users set users24=@hasMoney,users57=users57+@bonus,users61=users61+@bonus where users01=@UsersID
--判断此获奖会员的网络管理费是否扣足80
select @users41=users41 from users where users01=@UsersID
if @users41<80
begin
set @bonus=80-@users41
insert into PM (PM02,PM03,PM04,PM05,PM07,PM08,PM10,users01,PM12) values(@bonus,15,''网络管理费'',@nDate,1,@nDate,@users01,@UsersID,@users02)
update users set users41=users41+@bonus,users57=users57-@bonus where users01=@UsersID
end

set @reInt=@reInt+1
end
else
begin
set @reInt=-2 --会员电子币余额不足
return
end
end
-- ==报单奖End== --==会员业绩Start==
Declare W_cursor cursor For select users01,users15 from users where (users01=1 or @uPath like ''%-''+ cast(users01 as varchar(10)) +''-%'') order by users01 desc
open W_cursor
fetch next from W_cursor into @sUid,@Neare
while @@fetch_status=0
BEGIN
if @sUid<>@users01
begin
if @users15=1
update users set users58=users58+1,users63=users63+1 where users01=@sUid
else
update users set users60=users60+1,users66=users66+1 where users01=@sUid
end
set @users15=@Neare
fetch next from W_cursor into @sUid,@Neare
END
close W_cursor
Deallocate W_cursor
--==会员业绩End== -- ==推荐奖Start==
if @users11<>0
begin
--修改直推人数
update users set users47=users47+1 where users01=@users11

end
declare @aa int  --此会员直推人数
select @aa=count(0) from users where users17>0 and users11=@users11
set @aa=@aa+1
--修改新开通会员的,其它
update users set users17=2,users26=@nDate,users43=@aa,users50=@UsersID where users01=@users01

declare @users17 int
if @users11<>0
begin
select @users17=users17 from users where users01=@users11
if @users17=2
begin
if @aa<3
begin
select @bonus=Level05 from [Level] where level01=@users18
insert into PM (PM02,PM03,PM04,PM05,PM07,PM08,PM10,users01,PM12) values(@bonus,21,''推荐奖金(A)'',@nDate,1,@nDate,@users01,@users11,@users02)
update users set users57=users57+@bonus,users61=users61+@bonus where users01=@users11
--判断此获奖会员的网络管理费是否扣足80
select @users41=users41 from users where users01=@users11
if @users41<80
begin
set @bonus=80-@users41
insert into PM (PM02,PM03,PM04,PM05,PM07,PM08,PM10,users01,PM12) values(@bonus,15,''网络管理费'',@nDate,1,@nDate,@users01,@users11,@users02)
update users set users41=users41+@bonus,users57=users57-@bonus where users01=@users11
end

--22倍增奖
exec [DoubleBonus] @users01,@aa
end
else
begin
select @bonus=Level06 from [Level] where level01=@users18
insert into PM (PM02,PM03,PM04,PM05,PM07,PM08,PM10,users01,PM12) values(@bonus,22,''推荐奖金(B)'',@nDate,1,@nDate,@users01,@users11,@users02)
update users set users57=users57+@bonus,users61=users61+@bonus where users01=@users11
end
end
end
-- ==推荐奖End ===

--见点奖
select @count=count(0) from users where users17>0 and users01<>@users01
if @count>0
exec [SeePointBonus] @users01
exec [PayMoney]
END
' 
END

Answer 6

不至于，T-SQL层面技术含量并不高。