合同管理系統(tǒng)

合同管理系統(tǒng)合同管理系統(tǒng)合同管理系統(tǒng)沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙成績(jī)?cè)u(píng)定表學(xué)生姓名朱世誠(chéng)班級(jí)學(xué)號(hào)1209010228專(zhuān)業(yè)信息與計(jì)算科學(xué)課程設(shè)計(jì)題目合同管理系統(tǒng)評(píng)語(yǔ)組長(zhǎng)署名：成績(jī)?nèi)掌?014年12月18日i沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙課程設(shè)計(jì)任務(wù)書(shū)學(xué)院理學(xué)院專(zhuān)業(yè)信息與計(jì)算科學(xué)學(xué)生姓名朱世誠(chéng)班級(jí)學(xué)號(hào)1209010228課程設(shè)計(jì)題目合同管理系統(tǒng)實(shí)踐授課要求與任務(wù):利用VB6.0及SQLServer2000設(shè)計(jì)一個(gè)職工合同管理系統(tǒng)，數(shù)據(jù)庫(kù)里包括5個(gè)表：密碼表、職工合同簽署信息、職工合同續(xù)簽信息以及合同停止信息。密碼表用于記錄取戶(hù)名及密碼；職工合同簽署信息用于記錄合同簽署的基本信息；職工合同續(xù)簽信息用于記錄合同續(xù)簽的基本信息；合同停止信息用于記錄合同停止的基本信息。在主控窗體中（MID窗體）點(diǎn)擊各菜單實(shí)現(xiàn)管理和查問(wèn)公司和職工間的所有合同信息。詳盡功能包括：合同簽署：用于管理公司與職工簽署的勞動(dòng)合同。包括職員編號(hào)、合同名稱(chēng)、合同編號(hào)、合同限時(shí)、合同簽署日期、備注等。合同續(xù)簽：用于辦理已到期合同的續(xù)簽事務(wù)，包括職員編號(hào)、合同編號(hào)、合同續(xù)簽到日期、合同續(xù)簽限時(shí)、新合同號(hào)、備注。合同停止：用于停止已簽署的合同，包括職員編號(hào)、合同編號(hào)、合同停止時(shí)間、備注等。用戶(hù)的登錄和注冊(cè)功能：工作計(jì)劃與進(jìn)度安排:第15周：數(shù)據(jù)庫(kù)設(shè)計(jì)，利用SQLServer創(chuàng)辦數(shù)據(jù)庫(kù)及數(shù)據(jù)表。整體構(gòu)造設(shè)計(jì)，設(shè)計(jì)調(diào)試系統(tǒng)首頁(yè)、登岸窗體及MDI窗體。第16周：管理功能設(shè)計(jì)，設(shè)計(jì)調(diào)試各樣數(shù)據(jù)管理功能窗體及打印報(bào)表功能。撰寫(xiě)課程設(shè)計(jì)報(bào)告，查收與爭(zhēng)論。指導(dǎo)教師：專(zhuān)業(yè)負(fù)責(zé)人：學(xué)院授課副院長(zhǎng)：2014年11月27日2014年11月28日2014年11月28日ii沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙大綱數(shù)據(jù)庫(kù)技術(shù)是現(xiàn)代信息科學(xué)與技術(shù)的重要組成部分，是計(jì)算機(jī)數(shù)據(jù)辦理與信息管理系統(tǒng)的核心。數(shù)據(jù)庫(kù)技術(shù)研究和解決了計(jì)算機(jī)信息辦理過(guò)程中大量數(shù)據(jù)有效地組織和儲(chǔ)藏的問(wèn)題，在數(shù)據(jù)庫(kù)系統(tǒng)中減少許據(jù)儲(chǔ)藏冗余、實(shí)現(xiàn)數(shù)據(jù)共享、保障數(shù)據(jù)安全以及高效地檢索數(shù)據(jù)和辦理數(shù)據(jù)。在公司經(jīng)營(yíng)管理中,采買(mǎi)是最重要的一個(gè)環(huán)節(jié)。它關(guān)于公司降低經(jīng)營(yíng)成本、保證產(chǎn)質(zhì)量量、縮短生產(chǎn)周期擁有特別重要的意義。采買(mǎi)管理為降低采買(mǎi)成本、提高采買(mǎi)效益供給了廣闊的空間，但同時(shí)也為采買(mǎi)管理帶來(lái)了新的機(jī)遇和挑戰(zhàn)。目前,我國(guó)大部分公司仍舊沒(méi)有成立健全的供給鏈管理體系,物質(zhì)的采買(mǎi)還存在機(jī)構(gòu)設(shè)置分別,資源浪費(fèi)嚴(yán)重,信息傳達(dá)滯后等問(wèn)題。本系統(tǒng)的主要功能是職工合同管理，對(duì)職工的合同簽署信息、合同續(xù)簽信息和合同停止信息進(jìn)行管理和改正。本系統(tǒng)的數(shù)據(jù)庫(kù)是用SQLserver2000軟件進(jìn)行創(chuàng)辦與設(shè)計(jì)，分別包括簽署信息表、續(xù)簽信息表和合同停止信息表三個(gè)表。經(jīng)過(guò)系統(tǒng)ODBC數(shù)據(jù)源管理工具把已創(chuàng)辦的數(shù)據(jù)源與系統(tǒng)數(shù)據(jù)庫(kù)相連。利用VB軟件對(duì)系統(tǒng)的窗口進(jìn)行設(shè)計(jì)，經(jīng)過(guò)這些窗體進(jìn)行登錄操作，對(duì)輸入的用戶(hù)信息進(jìn)行考證，和注冊(cè)新用戶(hù)操作，并能夠?qū)?shù)據(jù)進(jìn)行增添與刪除、查問(wèn)及改正等操作。重點(diǎn)詞：合同管理系統(tǒng)；SQLserver2000；VB軟件iii沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙目錄1系統(tǒng)功能概括.........................................................11.1合同管理系統(tǒng)功能分析.............................................11.2系統(tǒng)構(gòu)造圖......................................................12數(shù)據(jù)庫(kù)設(shè)計(jì)...........................................................12.1需求分析.........................................................22.2E-R模型.........................................................22.3關(guān)系模型.........................................................42.4表構(gòu)造設(shè)計(jì).......................................................43.1用戶(hù)登錄.........................................................73.2主窗體界面.......................................................93.3增添改正刪除頁(yè)面................................................103.4查問(wèn)頁(yè)面........................................................153.5注冊(cè)新用戶(hù)......................................................184課設(shè)總結(jié).............................................................20參照文件...............................................................21iv沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙系統(tǒng)功能概括1.1合同管理系統(tǒng)功能分析合同管理系統(tǒng)主要功能是用計(jì)算機(jī)對(duì)職工合同的簽署、續(xù)簽以及停止進(jìn)行登記、查問(wèn)、刪除等操作以及對(duì)職工合同的簽署、續(xù)簽、停止信息進(jìn)行記錄以及打印報(bào)表等操作。本系統(tǒng)運(yùn)用了VB6.0及SQLServer2000，主要設(shè)計(jì)了以下幾大功能：對(duì)職工合同簽署、續(xù)簽以及停止信息進(jìn)行改正、錄入、閱讀及刪除。按查問(wèn)條件對(duì)工合同簽署、續(xù)簽以及停止信息進(jìn)行查問(wèn)。1.2系統(tǒng)構(gòu)造圖用戶(hù)注退冊(cè)出新功用能戶(hù)

圖1合同管理管理系統(tǒng)整體構(gòu)造合同管理系統(tǒng)管理查問(wèn)合合合合合合同同同同同同簽續(xù)終簽續(xù)終訂簽止訂簽止添添添查查查加加加詢(xún)?cè)冊(cè)儎h刪刪除除除修修修改改改1沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙數(shù)據(jù)庫(kù)設(shè)計(jì)2.1需求分析在主控窗體中（MID窗體）點(diǎn)擊各菜單實(shí)現(xiàn)管理和查問(wèn)公司和職工間的所有合同信息。詳盡功能包括：合同簽署：用于管理公司與職工簽署的勞動(dòng)合同。包括職員編號(hào)、合同名稱(chēng)、合同編號(hào)、合同限時(shí)、合同簽署日期、備注等。合同續(xù)簽：用于辦理已到期合同的續(xù)簽事務(wù)，包括職員編號(hào)、合同編號(hào)、合同續(xù)簽到日期、合同續(xù)簽限時(shí)、新合同號(hào)、備注。合同停止：用于停止已簽署的合同，包括職員編號(hào)、合同編號(hào)、合同停止時(shí)間、備注等。用戶(hù)的登錄和注冊(cè)功能：2.2E-R模型實(shí)體及屬性圖本系統(tǒng)有合同簽署，合同續(xù)簽。合同停止三個(gè)實(shí)體，三個(gè)實(shí)體相對(duì)獨(dú)立且相互之間不存在聯(lián)系。（1）合同簽署實(shí)體及屬性圖以下：合同簽署職員編號(hào)備注合同名稱(chēng)合同簽署日合同編號(hào)合同限時(shí)圖2合同簽署實(shí)體及屬性2沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙（2）合同續(xù)簽實(shí)體及屬性圖以下：合同續(xù)簽職員編號(hào)備注合同編號(hào)新合同號(hào)合同續(xù)簽到日期合同續(xù)簽限時(shí)圖3合同續(xù)簽實(shí)體及屬性（3）合同停止實(shí)體及屬性圖以下：合同停止職員編號(hào)備注合同編號(hào)合同停止時(shí)間圖4合同停止實(shí)體及屬性（4）密碼表實(shí)體及屬性以下：密碼表用戶(hù)名密碼圖5密碼表實(shí)體及屬性3沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙2.3關(guān)系模型合同簽署（職員編號(hào)，合同名稱(chēng)，合同編號(hào)，合同限時(shí)，合同簽署日期，備注）合同續(xù)簽（職員編號(hào)，合同編號(hào)，合同續(xù)簽到日期，合同續(xù)簽限時(shí)，新合同號(hào)，備注）合同停止（職員編號(hào)，合同編號(hào)，合同停止時(shí)間，備注）密碼表(用戶(hù)名，密碼)用于記錄注冊(cè)過(guò)的用戶(hù)名及密碼2.4表構(gòu)造設(shè)計(jì)本系統(tǒng)在SQLServer2000數(shù)據(jù)庫(kù)里共設(shè)計(jì)了4個(gè)數(shù)據(jù)表來(lái)記錄數(shù)據(jù)：用戶(hù)表、職工合同簽署信息、職工合同續(xù)簽信息、職工合同停止信息。合同簽署信息的成立與基本數(shù)據(jù)：SQL語(yǔ)句以下：CREATETABLE[dbo].[職工合同簽署信息]([職員編號(hào)][int]NOTNULL,[合同名稱(chēng)][char](10)COLLATEChinese_PRC_CI_ASNULL,[合同編號(hào)][char](10)COLLATEChinese_PRC_CI_ASNULL,[合同限時(shí)][char](10)COLLATEChinese_PRC_CI_ASNULL,[合同簽署日期][char](20)COLLATEChinese_PRC_CI_ASNULL,[備注][int]NULL)ON[PRIMARY]4沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙職工合同簽署信息表合同續(xù)簽信息的成立與基本數(shù)據(jù)：SQL語(yǔ)句以下：CREATETABLE[dbo].[職工合同續(xù)簽信息]([職員編號(hào)][int]NOTNULL,[合同編號(hào)][char](10)COLLATEChinese_PRC_CI_ASNULL,[合同續(xù)簽到日期][char](20)COLLATEChinese_PRC_CI_ASNULL,[合同續(xù)簽限時(shí)][char](20)COLLATEChinese_PRC_CI_ASNULL,[新合同號(hào)][char](10)COLLATEChinese_PRC_CI_ASNULL,[備注][int]NULL)ON[PRIMARY]職工合同續(xù)簽信息表合同停止信息的成立與基本數(shù)據(jù)：SQL語(yǔ)句以下：CREATETABLE[dbo].[合同停止信息]([職員編號(hào)][int]NOTNULL,[合同編號(hào)][char](10)COLLATEChinese_PRC_CI_ASNULL,[合同停止時(shí)間][char](20)COLLATEChinese_PRC_CI_ASNULL,[備注][int]NULL,)ON[PRIMARY]職工合同停止信息表5沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙密碼表的成立與基本數(shù)據(jù)：SQL語(yǔ)句以下：createtable用戶(hù)(用戶(hù)名CHAR(10),密碼CHAR(8));密碼表6沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙系統(tǒng)各功能模塊的詳盡設(shè)計(jì)3.1用戶(hù)登錄輸入用戶(hù)名及對(duì)應(yīng)密碼，即可登錄，否則會(huì)提示有關(guān)的警示信息，按“取消”則退回主窗體界面。頁(yè)面設(shè)計(jì)以下：1、登錄頁(yè)面2、詳盡設(shè)計(jì)代碼PrivateSubCommand1_Click()StaticmiCountAsIntegerDimSQLStrAsStringSQLStr="Select*from密碼表Where用戶(hù)名='"&Text1&"'"Adodc1.RecordSource=SQLStrAdodc1.RefreshIfAdodc1.Recordset.BOFThenMsgBox"用戶(hù)名錯(cuò)誤，從頭輸入",vbExclamation,"警示"Text1.Text="":Text1.SetFocusElse'判斷密碼可否正確7沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙IfAdodc1.Recordset.Fields("密碼")=Text2ThenMDIForm1.mDataMng.Enabled=TrueUnloadMeElseMsgBox"密碼錯(cuò)誤，從頭輸入",vbExclamation,"警示"Text2.Text="":Text2.SetFocusEndIfEndIfmiCount=miCount+1IfmiCount=3ThenUnloadMe'若已輸入3次，則封閉窗體EndSubPrivateSubCommand2_Click()UnloadMeEndSub8沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙3.2主窗體界面用戶(hù)菜單能夠?qū)崿F(xiàn)注冊(cè)新用戶(hù)和退出功能；數(shù)據(jù)管理菜單可對(duì)數(shù)據(jù)庫(kù)里的職工合同簽訂、續(xù)簽、停止信息進(jìn)行改正、增添、刪除和查問(wèn)。頁(yè)面設(shè)計(jì)以下：1、主窗體頁(yè)面2、詳盡設(shè)計(jì)代碼PrivateSubMDIForm_Load()mDataMng.Enabled=FalseEndSubPrivateSubmFDenglu_Click()Denglu.ShowEndSubPrivateSubmDzhuce_Click()zcxyh.ShowEndSubPrivateSubmDqdxx_Click()9沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙qdxx.ShowEndSubPrivateSubmDxqxx_Click()xqxx.ShowEndSubPrivateSubmDzzxx_Click()zzxx.ShowEndSubPrivateSubmFExit_Click()EndEndSub3.3增添改正刪除頁(yè)面對(duì)數(shù)據(jù)庫(kù)里的職工合同簽署、續(xù)簽、停止信息進(jìn)行改正、增添、刪除，并且能夠進(jìn)入查問(wèn)界面。頁(yè)面設(shè)計(jì)以下：1、職工合同簽署、續(xù)簽、停止信息的增添改正刪除頁(yè)面：10沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙2、詳盡設(shè)計(jì)代碼：PrivateSubCommand1_Click()Form1.ShowEndSubPrivateSubForm_Load()11沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙CmdFirst.Enabled=False'[首記錄](méi)按鈕無(wú)效CmdPre.Enabled=False'[前移]按鈕無(wú)效CmdNext.Enabled=True'[后移]按鈕有效CmdLast.Enabled=True'[末記錄](méi)按鈕有效CmdAdd.Enabled=True'[增添]按鈕有效CmdDel.Enabled=True'[刪除]按鈕有效CmdOk.Enabled=False'[確定]按鈕無(wú)效CmdEsc.Enabled=False'[取消]按鈕無(wú)效Label7.Caption="記錄："&Adodc1.Recordset.AbsolutePosition&"/"&Adodc1.Recordset.RecordCountEndSubPrivateSubCmdAdd_Click()'[增添]按鈕的單擊事件Adodc1.Recordset.AddNewCmdAdd.Enabled=FalseCmdDel.Enabled=FalseCmdOk.Enabled=TrueCmdEsc.Enabled=TrueEndSubPrivateSubCmdOk_Click()'單擊[確認(rèn)]按鈕Adodc1.Recordset.UpdateCmdAdd.Enabled=TrueCmdDel.Enabled=TrueCmdOk.Enabled=FalseCmdEsc.Enabled=FalseEndSubPrivateSubCmdDel_Click()'單擊[刪除]按鈕x=MsgBox("確實(shí)要?jiǎng)h除目前記錄嗎？",vbYesNo+vbQuestion,"確認(rèn)")Ifx=vbYesThenAdodc1.Recordset.Delete12沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙Adodc1.Recordset.MoveNextIfAdodc1.Recordset.EOFThenAdodc1.Recordset.MoveLastEndIfElseAdodc1.RefreshEndIfEndSubPrivateSubCmdEsc_Click()'取消按鈕Adodc1.RefreshCmdAdd.Enabled=TrueCmdDel.Enabled=TrueCmdOk.Enabled=FalseCmdEsc.Enabled=FalseEndSubPrivateSubCmdFirst_Click()Adodc1.Recordset.MoveFirst'記錄指針移到首記錄（顯示首記錄）CmdFirst.Enabled=False'讓[首記錄](méi)按鈕無(wú)效CmdPre.Enabled=False'讓[前移]按鈕無(wú)效CmdNext.Enabled=True'讓[后移]按鈕有效CmdLast.Enabled=True'讓[末記錄](méi)按鈕有效'在Label6上顯示目前記錄號(hào)/記錄總數(shù)：Label7.Caption="記錄："&Adodc1.Recordset.AbsolutePosition&"/"&Adodc1.Recordset.RecordCountEndSubPrivateSubCmdPre_Click()Adodc1.Recordset.MovePrevious'記錄指針移到前一條記錄CmdNext.Enabled=TrueCmdLast.Enabled=True13沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙IfAdodc1.Recordset.BOFThen'若是記錄指針移到首記錄從前,Adodc1.Recordset.MoveFirst'則記錄指針移到首記錄上CmdFirst.Enabled=FalseCmdPre.Enabled=FalseEndIfLabel7.Caption="記錄："&Adodc1.Recordset.AbsolutePosition&"/"&Adodc1.Recordset.RecordCountEndSubPrivateSubCmdNext_Click()Adodc1.Recordset.MoveNext記'錄指針移到下一條記錄CmdFirst.Enabled=TrueCmdPre.Enabled=TrueIfAdodc1.Recordset.EOFThen'若是記錄指針移到了末記錄此后Adodc1.Recordset.MoveLast'則記錄指針移到末記錄上CmdNext.Enabled=FalseCmdLast.Enabled=FalseEndIfLabel7.Caption="記錄："&Adodc1.Recordset.AbsolutePosition&"/"&Adodc1.Recordset.RecordCountEndSubPrivateSubCmdLast_Click()Adodc1.Recordset.MoveLast'移到末記錄CmdFirst.Enabled=TrueCmdPre.Enabled=TrueCmdNext.Enabled=FalseCmdLast.Enabled=FalseLabel7.Caption="記錄："&Adodc1.Recordset.AbsolutePosition&"/"&Adodc1.Recordset.RecordCountEndSub14沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙PrivateSubCmdN_Click()DimnAsIntegern=Text7.TextAdodc1.Recordset.MovenLabel7.Caption="記錄："&Adodc1.Recordset.AbsolutePosition&"/"&Adodc1.Recordset.RecordCountEndSub3.4查問(wèn)頁(yè)面對(duì)數(shù)據(jù)庫(kù)里的職工合同簽署、續(xù)簽、停止信息進(jìn)行查問(wèn)。頁(yè)面設(shè)計(jì)以下：1、職工合同簽署信息查問(wèn)頁(yè)面：15沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙2、職工合同簽署信息詳盡設(shè)計(jì)代碼：PrivateSubCmdBack_Click()qdxx.ShowUnloadMeEndSubPrivateSubForm_Load()Combo1.AddItem"職員編號(hào)"'為組合列表框增添各選項(xiàng)Combo1.AddItem"合同名稱(chēng)"Combo1.AddItem"合同編號(hào)"Combo1.Text="職員編號(hào)"'讓組合框初始選中"姓名"項(xiàng)Text1.Text=""'清空文本框EndSubPrivateSubCommand1_Click()DimstrAsStringstr="Select職工合同簽署信息.*From職工合同簽署信息"str=str&"Where職工合同簽署信息."&Combo1.Text&"Like'"&Text1&"%'"Adodc1.RecordSource=strAdodc1.RefreshEndSub3、職工合同續(xù)簽信息查問(wèn)頁(yè)面：16沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙4、職工合同續(xù)簽信息詳盡設(shè)計(jì)代碼:PrivateSubCmdBack_Click()xqxx.ShowUnloadMeEndSubPrivateSubForm_Load()Combo1.AddItem"職員編號(hào)"'為組合列表框增添各選項(xiàng)Combo1.AddItem"合同編號(hào)"Combo1.Text="職員編號(hào)"'讓組合框初始選中"姓名"項(xiàng)Text1.Text=""'清空文本框EndSubPrivateSubCommand1_Click()DimstrAsStringstr="Select職工合同續(xù)簽信息.*From職工合同續(xù)簽信息"str=str&"Where職工合同續(xù)簽信息."&Combo1.Text&"Like'"&Text1&"%'"Adodc1.RecordSource=strAdodc1.RefreshEndSub5、職工合同停止信息查問(wèn)頁(yè)面：17沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙6、職工合同停止信息詳盡設(shè)計(jì)代碼：PrivateSubCmdBack_Click()zzxx.ShowUnloadMeEndSubPrivateSubForm_Load()Combo1.AddItem"職員編號(hào)"'為組合列表框增添各選項(xiàng)Combo1.AddItem"合同編號(hào)"Combo1.Text="職員編號(hào)"'讓組合框初始選中"姓名"項(xiàng)Text1.Text=""'清空文本框EndSubPrivateSubCommand1_Click()DimstrAsStringstr="Select合同停止信息.*From合同停止信息"str=str&"Where合同停止信息."&Combo1.Text&"Like'"&Text1&"%'"Adodc1.RecordSource=strAdodc1.RefreshEndSub3.5注冊(cè)新用戶(hù)輸入用戶(hù)名、密碼及確認(rèn)密碼，即可注冊(cè)新用戶(hù)，否則會(huì)提示有關(guān)的警示信息，按“取消”則退回主窗體界面。1、注冊(cè)新用戶(hù)頁(yè)面：18沈陽(yáng)理工大學(xué)課程設(shè)計(jì)專(zhuān)用紙2、詳盡設(shè)計(jì)代碼:PrivateSubCmdOk_Click()DimSQLStrAsStringIfText1=""ThenMsgBox"請(qǐng)輸入用戶(hù)名！",vbExclamation,"確認(rèn)用戶(hù)名"Text1.SetFocusExitSubElseSQLStr="Select*from密碼表where用戶(hù)名='"&Text1&"'"Adodc1.RecordSource=SQ