【正文】 e IS NOT NULL THENtmpValue := tmpValue||39。 UserTel = 39。||ValueArr(7)。ELSEtmpValue := tmpValue||39。, UserTel = 39。||ValueArr(7)。END IF。END IF。IF ConditionArr(8) IS NOT NULL THENIF tmpCondition IS NOT NULL THENtmpCondition := tmpCondition||39。 UserPsw = 39。||ConditionArr(8)。ELSEtmpCondition := tmpCondition||39。 AND UserPsw = 39。||ConditionArr(8)。END IF。END IF。IF ValueArr(8) IS NOT NULL THENIF tmpValue IS NOT NULL THENtmpValue := tmpValue||39。 UserPsw = 39。||ValueArr(8)。ELSEtmpValue := tmpValue||39。, UserPsw = 39。||ValueArr(8)。END IF。END IF。IF ConditionArr(9) IS NOT NULL THENIF tmpCondition IS NOT NULL THENtmpCondition := tmpCondition||39。 UserIsBorrow = 39。||ConditionArr(9)。ELSE tmpCondition := tmpCondition||39。 AND UserIsBorrow = 39。||ConditionArr(9)。END IF。END IF。IF ValueArr(9) IS NOT NULL THENIF tmpValue IS NOT NULL THEN tmpValue := tmpValue||39。 UserIsBorrow = 39。||ValueArr(9)。ELSEtmpValue := tmpValue||39。, UserIsBorrow = 39。||ValueArr(9)。END IF。.. . . ..學習好幫手END IF。IF ConditionArr(10) IS NOT NULL THENIF tmpCondition IS NOT NULL THENtmpCondition := tmpCondition||39。 UserBorrowCnt = 39。||ConditionArr(10)。ELSEtmpCondition := tmpCondition||39。 AND UserBorrowCnt = 39。||ConditionArr(10)。END IF。END IF。IF ValueArr(10) IS NOT NULL THENIF tmpValue IS NOT NULL THENtmpValue := tmpValue||39。 UserBorrowCnt = 39。||ValueArr(10)。ELSEtmpValue := tmpValue||39。, UserBorrowCnt = 39。||ValueArr(10)。END IF。END IF。strValues := 39。UPDATE Users SET 39。||strValues||39。WHERE 39。||strCondition。execute immediate strValues。UpdateRes := 1。 mit。EXCEPTION WHEN NO_DATA_FOUND THEN UpdateRes := SQLCODE。WHEN OTHERS THENUpdateRes := SQLCODE。ROLLBACK TO SAVEPOINT SP1。END。存儲過程名稱 SearchOnUsers存儲過程描述 查找記錄項的存儲過程參數(shù)說明參數(shù)一：需要更新的記錄的查找條件，數(shù)組記錄一次對應用戶姓名、學號、性別、所屬角色編號、單位、郵箱和電話、密碼如果不需要某一項作為查找條件時，該項對應位置傳入 NULL參數(shù)二：查找返回的結果數(shù)組，數(shù)組記錄依次對應用戶姓名、學號、性別、所屬角色編號、單位、郵箱和電話、密碼最后一個參數(shù)為查找結果的返回值，成功時返回 1，否則返回出錯代碼.. . . ..學習好幫手存儲過程實現(xiàn) CREATE or REPLACE PROCEDURE SearchOnUsers(ConditionArr in Users_Arr,ValueArr out Users_Arr,SearchRes out integer)IStmpCondition varchar(500)。BEGINSAVEPOINT SP1。tmpCondition := NULL。IF ConditionArr(0) IS NOT NULL THENtmpCondition := tmpCondition || 39。 UserID = 39。||ConditionArr(0)。END IF。IF ConditionArr(1) IS NOT NULL THENIF tmpCondition IS NOT NULL THENtmpCondition := tmpCondition || 39。 UserName = 39。||ConditionArr(1)。ELSEtmpCondition := tmpCondition || 39。 ADD UserName = 39。||ConditionArr(1)。END IF。END IF。IF ConditionArr(2) IS NOT NULL THENIF tmpCondition IS NOT NULL THENtmpCondition := tmpCondition || 39。 UserNum = 39。||ConditionArr(2)。ELSEtmpCondition := tmpCondition || 39。 ADD UserNum = 39。||ConditionArr(2)。END IF。END IF。IF ConditionArr(3) IS NOT NULL THENIF tmpCondition IS NOT NULL THENtmpCondition := tmpCondition || 39。 UserSex = 39。||ConditionArr(3)。ELSEtmpCondition := tmpCondition || 39。 ADD UserSex = 39。||ConditionArr(3)。END IF。END IF。IF ConditionArr(4) IS NOT NULL THENIF tmpCondition IS NOT NULL THENtmpCondition := tmpCondition || 39。 UserRole = 39。||ConditionArr(4)。ELSEtmpCondition := tmpCondition || 39。 ADD UserRole = 39。||ConditionArr(4)。END IF。END IF。.. . . ..學習好幫手IF ConditionArr(5) IS NOT NULL THENIF tmpCondition IS NOT NULL THENtmpCondition := tmpCondition || 39。 UserUnit = 39。||ConditionArr(5)。ELSEtmpCondition := tmpCondition || 39。 ADD UserUnit = 39。||ConditionArr(5)。END IF。END IF。IF ConditionArr(6) IS NOT NULL THENIF tmpCondition IS NOT NULL THENtmpCondition := tmpCondition || 39。 UserEmail = 39。||ConditionArr(6)。ELSEtmpCondition := tmpCondition || 39。 ADD UserEmail = 39。||ConditionArr(6)。END IF。END IF。IF ConditionArr(7) IS NOT NULL THENIF tmpCondition IS NOT NULL THENtmpCondition := tmpCondition || 39。 UserTel = 39。||ConditionArr(7)。ELSEtmpCondition := tmpCondition || 39。 ADD UserTel = 39。||ConditionArr(7)。END IF。END IF。IF ConditionArr(8) IS NOT NULL THENIF tmpCondition IS NOT NULL THENtmpCondition := tmpCondition || 39。 UserPsw = 39。||ConditionArr(8)。ELSEtmpCondition := tmpCondition || 39。 ADD UserPsw = 39。||ConditionArr(8)。END IF。END IF。IF ConditionArr(9) IS NOT NULL THENIF tmpCondition IS NOT NULL THENtmpCondition := tmpCondition || 39。 UserIsBorrow = 39。||ConditionArr(9)。ELSE tmpCondition := tmpCondition || 39。 ADD UserIsBorrow = 39。||ConditionArr(9)。END IF。END IF。IF ConditionArr(10) IS NOT NULL THENIF tmpCondition IS NOT NULL THENtmpCondition := tmpCondition || 39。 UserBorrowCnt = 39。||ConditionArr(10)。ELSE.. . . ..學習好幫手tmpCondition := tmpCondition || 39。 ADD UserBorrowCnt = 39。||ConditionArr(10)。END IF。END IF。tmpCondition := 39。SELECT UserID INTO ValueArr(0), UserName INTO ValueArr(1), UserNum INTO ValueArr(2),UserSex INTO ValueArr(3),UserRole INTO ValueArr(4),UserUnit INTO ValueArr(5), UserEmail INTO ValueArr(6),UserTel INTO ValueArr(7), UserPsw INTO ValueArr(8),UserIsBorrow INTO ValueArr(9),UserBorrowCnt INTO ValueArr(10) FROM Users WHERE 39。|| tmpCondition。execute immediate tmpCondition。SearchRes := 1。mit。EXCEPTION WHEN NO_DATA_FOUND THEN SearchRes := SQLCODE。WHEN OTHERS THENSearchRes := SQLCODE。ROLLBACK TO SAVEPOINT SP1。END。存儲過程名稱 InsertToUserRole存儲過程描述 創(chuàng)建存儲過程插入用戶角色記錄存儲過程實現(xiàn) CREATE or REPLACE PROCEDURE InsertToUserRole(ItemName in varchar,ItemDescribe in varchar,BorrowCnt in integer,BorrowDays in integer,ContinueCnt in integer,ContinueDays in integer,InsertRes out integer)isBEGINSAVEPOINT SP1。INSERT TO UserRole (RoleID,RoleName,RoleDescribe,RoleBorrowCnt,RoleBrorowDays,RoleBo