【導(dǎo)讀】{ "error_code": 17, "error_msg": "Open api daily request limit reached" }

　　

【正文】 aseWage(Id,GiveDate:string):string。 根據(jù)員工編號(hào)和月份返回基本工資 function GetAllowance1(Id,GiveDate:string):string。 根據(jù)員工編號(hào)和月份返回出差補(bǔ)貼 function GetAllowance2(Id,GiveDate:string):string。 根據(jù)員工編號(hào)和月份返回公共補(bǔ)貼 function GetReward(Id,GiveDate:string):string。 根據(jù)員工編號(hào)和月份返回獎(jiǎng)金 function GetOverTimeMoney(Id,GiveDate:string):string。 根據(jù)員工編號(hào)和月份返回加班費(fèi) function GetDeductCheck(Id,GiveDate:string):string。 根據(jù)員工編號(hào)和月份返回口考核 function GetAgedMoney(Id,GiveDate:string):string。 根據(jù)員工編號(hào)和月份返回養(yǎng)老保險(xiǎn) function GetMedicalMoney(Id,GiveDate:string):string。 根據(jù)員工編號(hào)和月份返回醫(yī)療保險(xiǎn) function GetCompoMoney(Id,GiveDate:string):string。 根據(jù)員工編號(hào)和月份返回工傷保險(xiǎn) function GetUnemployMoney(Id,GiveDate:string):string。 根據(jù)員工編號(hào)和月份返回失業(yè)保險(xiǎn) function GetHouseMoney(Id,GiveDate:string):string。 根據(jù)員工編號(hào)和月份返回住房公積金 function GetIneTax(Id,GiveDate:string):string。 根據(jù)員工編號(hào)和月份返回個(gè)人所得稅 function GetRealWage(Id,GiveDate:string):string。 根據(jù)員工編號(hào)和月份返回實(shí)發(fā)工資 function WagesRecs(SQL:string):OLEVariant。 通過(guò)傳遞 SQL 語(yǔ)句返回工資信息記錄 procedure RecInsert(InsertSQl:string)。 通過(guò)傳遞 SQL 語(yǔ)句執(zhí)行插入操作過(guò)程 procedure RecUpdate(UpdateSQl:string)。 通過(guò)傳遞 SQL 語(yǔ)句執(zhí)行修改操作過(guò)程 procedure RecDel(Id,GiveDate:string)。 通過(guò) SQL 按員工編號(hào)和月份執(zhí)行刪除操作過(guò)程 procedure RecDel1(Name,GiveDate:string)。 通過(guò) SQL 按員工姓名和月份執(zhí)行刪除操作過(guò)程 procedure RecDel2(Id:string)。 通過(guò) SQL 按員工編號(hào)執(zhí)行刪除操作過(guò)程 procedure RecDel3(Name:string)。 通過(guò) SQL 按員工姓名執(zhí)行刪除操作過(guò)程 procedure RecDel4(GiveDate:string)。 通過(guò) SQL 按月份執(zhí)行刪除操作過(guò)程 4. Twageset類 Twageset 類 封裝了對(duì) WAGE_SET 表的各種操作，類中定義的方法和過(guò)程如表 412所示。 表 412 Twageset 類封裝的方法和過(guò)程 方法或過(guò)程名 具體說(shuō)明 function wagesetRec(Id:string):Boolean。 根據(jù)方案編號(hào)判斷記錄是否存在 function wagesetRec1(FindSQL:string):Boolean。 通過(guò)傳遞 SQL 語(yǔ)句判斷查詢記錄是否存在 function GetIdLists():Tstrings。 通過(guò) SQL 語(yǔ)句獲取所有工資方案編號(hào) function GetJingLi(Id:string):string。 根據(jù)工資方案編號(hào)返回經(jīng)理工資 Delphi + SQL Server 企業(yè)人事管理系統(tǒng)設(shè)計(jì)報(bào)告書 25 function GetFuJingLi(Id:string):string。 根據(jù)工資方案編號(hào)返回副經(jīng)理工資 function GetKeZhang(Id:string):string。 根據(jù)工資方案編號(hào)返回科長(zhǎng)工資 function GetFuKeZhang(Id:string):string。 根據(jù)工資方案編號(hào)返回副科長(zhǎng)工資 function GetBuZhang(Id:string):string。 根據(jù)工資方案編號(hào)返回部長(zhǎng)工資 function GetFuBuZhang(Id:string):string。 根據(jù)工資方案編號(hào)返回副部長(zhǎng)工資 function GetPuTong(Id:string):string。 根據(jù)工資方案編號(hào)返回普通員工工資 function GetTeJi_YG(Id:string):string。 根據(jù)工資方案編號(hào)返回特級(jí)員工工資 function GetYiJi_YG(Id:string):string。 根據(jù)工資方案編號(hào)返回一級(jí)員工工資 function GetErJi_YG(Id:string):string。 根據(jù)工資方案編號(hào)返回二級(jí)員工工資 function GetYangLao_BX(Id:string):string。 根據(jù)工資方案編號(hào)返回養(yǎng)老保險(xiǎn) function GetGongShang_BX(Id:string):string。 根據(jù)工資方案編號(hào)返回工傷保險(xiǎn) function GetYiLiao_BX(Id:string):string。 根據(jù)工資方案編號(hào)返回醫(yī)療保險(xiǎn) function GetShiYe_BX(Id:string):string。 根據(jù)工資方案編號(hào)返回失業(yè)保險(xiǎn) function GetChiDao(Id:string):string。 根據(jù)工資方案編號(hào)返回遲到扣除 function GetKuangGong(Id:string):string。 根據(jù)工資方案編號(hào)返回礦工扣除 function GetZaoTui(Id:string):string。 根據(jù)工資方案編號(hào)返 回早退扣除 function GetQingJia(Id:string):string。 根據(jù)工資方案編號(hào)返回請(qǐng)假扣除 function GetJiaBan_JR(Id:string):string。 根據(jù)工資方案編號(hào)返回節(jié)假日加班工資 function GetJiaBan_QT(Id:string):string。 根據(jù)工資方案編號(hào)返回其他加班工資 function GetChuChai(Id:string):string。 根據(jù)工資方案編號(hào)返回出差補(bǔ)貼 function GetGongLing(Id:string):string。 根據(jù)工資方案編號(hào)返回工齡工資（ /年） function GetShuiLv(Id:string):string。 根據(jù)工資方案編號(hào)返回稅率（ %） function GetXiaXian(Id:string):string。 根據(jù)工資方案編號(hào)返回征稅下限 function GetJiangJin(Id:string):string。 根據(jù)工資方案編號(hào)返回獎(jiǎng)金 function wagesetRecs(SQL:string):OLEVariant。 通過(guò) SQL 語(yǔ)句返回方案信息 procedure RecInsert(InsertSQl:string)。 通過(guò) SQL 語(yǔ)句執(zhí)行插入操作過(guò)程 procedure RecUpdate(UpdateSQl:string)。 通過(guò) SQL 語(yǔ)句執(zhí)行修改操作過(guò)程 procedure RecDel(Id:string)。 通過(guò) SQL 語(yǔ)句執(zhí)行刪除操作過(guò)程 5. Tcheckinfo類 Tcheckinfo 類 封裝了對(duì) CHECK_INFO 表的各種操作，類中定義的方法和過(guò)程如表413所示。 Delphi+SQL Server 企業(yè)人事管理系統(tǒng)設(shè)計(jì)報(bào)告書 26 表 413 Tcheck_info 類封裝的方法和過(guò)程 方法或過(guò)程名 具體說(shuō)明 function CheckInfoRec(Id,month:string):Boolean。 根據(jù)員工編號(hào)和月份判斷記錄是否存在 function CheckInfoRec1(Name,month:string):Boolean。 根據(jù)員工姓名和月份判斷記錄是否存在 function CheckInfoRec2(Id:string):Boolean。 根據(jù)員工編號(hào)判斷記錄是否 存在 function CheckInfoRec3(Name:string):Boolean。 根據(jù)員工姓名判斷記錄是否存在 function CheckInfoRec4(month:string):Boolean。 根據(jù)月份判斷記錄是否存在 function GetWorkerName(Id,month:string):string。 根據(jù)員工編號(hào)和月份返回員工姓名 function GetMonthDays(Id,month:string):string。 根據(jù)員工編號(hào)和月份返回當(dāng)月天數(shù) function GetHolidays(Id,month:string):string。 根據(jù)員工編號(hào)和月份返回員工公休假天數(shù) function GetReWorkDays(Id,month:string):string。 根據(jù)員工編號(hào)和月份返回員工實(shí)際出勤天數(shù) function GetWorkDays(Id,month:string):string。 根據(jù)員工編號(hào)和月份返回員工應(yīng)出勤天數(shù) function GetBusinessDays(Id,month:string):string。 根據(jù)員工編號(hào)和月份返回員工出差天數(shù) function GetAbsentDays(Id,month:string):string。 根據(jù)員工編號(hào)和月份返回員工礦工天數(shù) function GetLeaveTimes(Id,month:string):string。 根據(jù)員工編號(hào)和月份返回員工請(qǐng)假天數(shù) function GetLateTimes(Id,month:string):string。 根據(jù)員工編號(hào)和月份返回員工遲到天數(shù) function GetLeaEarTimes(Id,month:string):string。 根據(jù)員工編號(hào)和月份返回員工早退天數(shù) function GetHOliOverTimes(Id,month:string):string。 根據(jù)員工編號(hào)和月份返回員工節(jié)假日加班次數(shù) function GetOtherOverTimes(Id,month:string):string。 根據(jù)員工編號(hào)和月份返回員工其他加班次數(shù) function GetRemark(Id,month:string):string。 根據(jù)員工編號(hào)和月份返回員工備注 function CheckInfoRecs(SQL:string):OLEVariant。 通過(guò) SQL 語(yǔ)句返回查詢信息 procedure RecInsert(InsertSQl:string)。 通過(guò) SQL 語(yǔ)句執(zhí)行插入操作過(guò)程 procedure RecUpdate(UpdateSQl:string)。 通過(guò) SQL 語(yǔ)句執(zhí)行修改操作過(guò)程 procedure RecDel(Id,month:string)。 通過(guò) SQL 語(yǔ)句執(zhí)行按員工編號(hào)和月份刪除操作過(guò)程 procedure RecDel1(Name,month:string)。 通過(guò) SQL 語(yǔ)句執(zhí)行按員工姓名和月份刪除操作過(guò)程 procedure RecDel2(Id:string) 通過(guò) SQL 語(yǔ)句執(zhí)行按員工編號(hào)刪除操作過(guò)程 procedure RecDel3(Name:string)。 通過(guò) SQL 語(yǔ)句執(zhí)行按員工姓名刪除操作過(guò)程 procedure RecDel4(month:string)。 通過(guò) SQL 語(yǔ)句執(zhí)行按月份刪除操作過(guò)程 6. Tprotitle類 Tprotitle類 封裝了對(duì) PRO_TITLE表的各種操作，類中定義的方法和過(guò)程如表 414所示。 Delphi + SQL Server 企業(yè)人事管理系統(tǒng)設(shè)計(jì)報(bào)告書 27 表 414 Tportitle 類封裝的方法和過(guò)程 方法或過(guò)程名 具體說(shuō)明 function ProtitleRec(Id:string):Boolean。 根據(jù)員工編號(hào)判斷記錄是否存在 function ProtitleRec1(Name:string):Boolean。 根據(jù)員工姓名判斷記錄是否存在 function ProtitleRec2(Dji:string):Boolean。 根據(jù)等級(jí)判斷記錄是否存在 function ProtitleRec3(Id,Dji:string):Boolean。 根據(jù)員工編號(hào)和等級(jí)判斷記錄是否存在 function ProtitleRec4(Name,Dji:string):Boolean。 根據(jù)員工姓名和等級(jí)判斷記錄是否存在 function ProtitleRec1(FindSQL:string