【文章內(nèi)容簡介】 10yes加班類別 年終獎表t_end_pay用來放置年終獎勵信息，該表字段如表339所示。 表339Column nameData typewidthnull備注Emp_nonumeric6no員工號(主鍵)Year_endvarchar4no年份Ending_paynumeric6no獎金額員工保險表t_insurance用來放置員工保險信息，該表字段如表3310所示。 表3310Column nameData typewidthnull備注Emp_nonumeric6no員工號(主鍵)Emp_insurnumeric6yes員工保險Insur_datedateyes保險領(lǐng)取日期1醫(yī)療保險表t_medicre用來放置員工醫(yī)療保險信息，該表字段如表3311所示。 表3311Column nameData typewidthnull備注Emp_nonumeric6no員工號(主鍵)Med_paynumeric6yes醫(yī)療報銷Med_safenumeric6yes保險費Med_datedateno保險生成時間創(chuàng)建系統(tǒng)用戶表t_yonghubiaoCREATE TABLE t_yonghubiao( Yonghu numeric(5) not null, Mima numeric(6) not null, Quanxian numeric(2) not null)創(chuàng)建員工基本信息表CREATE TABLE t_emp_informationbasic（emp_no numeric(6) not null,Emp_name varchar(10) null,Dept_id numeric(3) null,Job_id numeric(3) null,Emp_gender varchar(10) null,Emp_birthday date null,Emp_hometown varchar(8) null,Emp_nation varchar(10) null,Emp_id numeric(18) null,Emp_marriage varchar(2) null,Emp_health varchar(20) null,Emp_zzmm varchar(4) null,Emp_startwork date null,Emp_state varchar(10) null,Emp_state_date date null,Emp_homeadress vaechar(10) null,Emp_telephone numeric(11) null,Emp_bank_id numeric(19))創(chuàng)建工作崗位表CREATE TABLE t_job(Job_id numeric(3) not null,Job_name varchar(10) null,Job_authorty varchar(20) null,Job_duty varchar(20) )創(chuàng)建員工月工資表CREATE TABLE t_month_pay( Emp_no numeric(6) not null,Emp_name varchar(10) null,Base_pay numeric(6) not null,Subsidy numeric(6) null,Attendan numeric(6) null,Med numeric(6) null,Insur numeric(6) null,Month_total numeric(6) null,Pay_date date)創(chuàng)建工資標(biāo)準(zhǔn)表CREATE TABLE t_wage_level(Job_id numeric(3) not null,Job_name varchar(10) null,Job_pay numeric(6)null)考勤管理表CREATE TABLE t_attendance(Emp_no numeric(6) not null,Emp_name varchar(10) null,Attendance_date date null,Attendance_daynumber numeric(3) null,Attendance_type varchar(3) null,Attendance_reason varchar(20) null)缺勤類型表CREATE TABLE t_attendance_type(Attendance_type varchar(3) not null,Attendance_mc varchar(10) null,Attendance_explain varchar(10) null)創(chuàng)建加班補貼表CREATE TABLE t_subsidy(Emp_no numeric(6) not null,Subsidy_date date not null,Subsidy_daynumber numeric(2) null,Subsidy_type varchar(10) null)創(chuàng)建年終獎表CREATE TABLE t_end_pay(Emp_no numeric(6) not null,Yesr_end varchar(4) not null,Ending_pay numeric(6) no null)創(chuàng)建員工保險表CREATE TABLE t_insurance(Emp_no numeric(6) not null,Emp_insur numeric(6) null,Insur_date date null) 創(chuàng)建醫(yī)療保險表CREATE TABLE t_medicre(Emp_no numeric(6) not null,Med_pay numeric(6) null,Med_safe numeric(6) null,Med_date date not null)4 應(yīng)用窗口的創(chuàng)建根據(jù)需求分析、功能設(shè)計的結(jié)果，實現(xiàn)公司工資管理各模塊的功能。在進(jìn)行系統(tǒng)設(shè)計時，應(yīng)當(dāng)將那些可能被重復(fù)使用的功能編寫成通用的過程或函數(shù)，這樣可以減少代碼量，使得程序流程明了，減少程序員編寫以閱讀程序工作量，方便系統(tǒng)的日常維護(hù)。在該系統(tǒng)中主要通用的模塊代碼如下所示。聲明公共變量。用來放置用戶在程序中要使用到的數(shù)據(jù)集變量。 int job_id_global int emp_no_globallong g_rownumber系統(tǒng)程序運行后登錄窗口被彈出，用戶根據(jù)系統(tǒng)用戶口令登入，窗口效果如圖421。圖421“用戶”文本控件提示輸入的sle_user單行文本控件用于用戶編號的輸入。“密碼”文本控件提示輸入的sle_password單行文本控件用于提供用戶密碼的輸入。“登錄”按鈕控件是實現(xiàn)登錄功能的主要程序控件，其單擊觸發(fā)事件如附錄11 示?！叭∠卑粹o控件實現(xiàn)系統(tǒng)退出功能。系統(tǒng)用戶從登錄窗口成功登錄之后，就進(jìn)入到了本工資管理系統(tǒng)的主界面，本系統(tǒng)主界面比較簡單主要提供給用戶進(jìn)行功能導(dǎo)航，其頁面左上端顯示著系統(tǒng)菜單，用戶可對菜單進(jìn)行選擇從而進(jìn)入各個模塊。具體的程序運行界面圖431所示：圖431主界面的窗體設(shè)計主要進(jìn)行菜單模塊設(shè)計，主窗體菜單結(jié)構(gòu)如圖432圖432菜單結(jié)構(gòu)該菜單主要提供從主界面向下級窗體的打開連接，其中，兩個有代表性的程序代碼為：（1） 打開下級窗體程序。如“員工信息管理”菜單下的“員工信息總覽”子菜單的點擊觸發(fā)事件程序代碼：opensheet(w_employee_information,w_main,5,layered!) 觸發(fā)該事件后，“員工信息總覽”窗口將以平鋪的方式在主界面上打開，并且在“窗口”菜單中將產(chǎn)生一條窗口鏈接。（2） 編輯窗口的打開方式。本系統(tǒng)提供了三種模式的打開方式選擇，默認(rèn)下的打開方式是平鋪，具體程序如： “窗口”菜單下的“水平”子菜單的clicked事件程序代碼：(tilehorizontal!)該事件觸發(fā)后將使已經(jīng)打開的窗口按水平方式重新排列。 “窗口”菜單下的“層疊”子菜單的clicked事件程序代碼：(cascade!)該事件觸發(fā)后將使已經(jīng)打開的窗口按水平方式重新排列。 “窗口”菜單下的“平鋪”子菜單的clicked事件程序代碼：(layer!)該事件觸發(fā)后將使已經(jīng)打開的窗口按水平方式重新排列。 信息瀏覽窗口由主界面窗口中“員工信息管理”菜單的“詳細(xì)員工信息”子菜單調(diào)用，此事件點擊觸發(fā)后該信息瀏覽窗口將在主窗口中打開，如圖441。 信息瀏覽窗口中放置有七個控件，st_ti文本控件顯示了該窗口的標(biāo)題，dw_infor_browse控件作為數(shù)據(jù)的顯示窗口，五個按鈕控件將觸發(fā)clicked事件程序。數(shù)據(jù)窗口控件dw_infor_browse的open事件中編寫如下程序：(sqlca)()在dw_infor_browse控件的dataobject屬性中，連接d_information_change數(shù)據(jù)窗口，以調(diào)用表格信息。圖441 “最前一條”按鈕控件的clicked事件觸發(fā)時將在數(shù)據(jù)窗口控件中顯示表格中的第一條信息，其程序： //將數(shù)據(jù)窗口滾動到第一條 (0) “前一條”按鈕控件的clicked事件觸發(fā)時將顯示當(dāng)前信息記錄的前一條，其程序：//定義當(dāng)前行數(shù)integer row_current//數(shù)據(jù)窗口向前滾動一條記錄row_current = ()//如果已是第一條，彈出警告if row_current = 1 then messagebox(警告,已經(jīng)是最前一條記錄)end if “后一條”按鈕控件的clicked事件觸發(fā)時將顯示當(dāng)前信息記錄的后一條，其程序：//定義總行數(shù)integer row_count//定義當(dāng)前行integer row_current//向后滾到一條row_current = ()//得到總行數(shù)row_count = ()//判斷是否是最后一條if row_current = row_count then messagebox(警告,已經(jīng)是最后一條)end if “最后一條”按鈕控件的clicked事件用于顯示信息表格中的最后一條，其程序：//定義參數(shù) 表的總行數(shù)integer row_count//得到表的總數(shù)row_count = ()//滾動到最后一條記錄(ro