diff --git a/A09财务通用管理/Financial.dproj.local b/A09财务通用管理/Financial.dproj.local index a4e4f0c..e20641e 100644 --- a/A09财务通用管理/Financial.dproj.local +++ b/A09财务通用管理/Financial.dproj.local @@ -1,90 +1,62 @@  - 1899-12-30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas - 1899-12-30 00:00:00.000.742,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas - 1899-12-30 00:00:00.000.159,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_CustStatementWriteOff.pas - 1899-12-30 00:00:00.000.987,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_PayableInput.pas - 1899-12-30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas - 1899-12-30 00:00:00.000.979,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_InvoiceOutInPut.pas - 1899-12-30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899-12-30 00:00:00.000.895,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_InvoiceOutList.pas - 1899-12-30 00:00:00.000.871,D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceInInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceOutInPut.dfm - 1899-12-30 00:00:00.000.868,D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\Financial.dproj - 1899-12-30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899-12-30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas - 1899-12-30 00:00:00.000.728,=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceOutList.pas - 1899-12-30 00:00:00.000.885,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_ExpenseList.pas - 1899-12-30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas - 1899-12-30 00:00:00.000.621,D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceInList.pas=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceOutList.pas - 1899-12-30 00:00:00.000.772,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas - 1899-12-30 00:00:00.000.103,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_BankSel.pas - 1899-12-30 00:00:00.000.806,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas - 1899-12-30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas= - 1899-12-30 00:00:00.000.052,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_CollectList.pas - 1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm - 1899-12-30 00:00:00.000.064,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas - 1899-12-30 00:00:00.000.446,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_BankFlowList.pas - 1899-12-30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas - 1899-12-30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas - 1899-12-30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas= - 1899-12-30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas - 1899-12-30 00:00:00.000.765,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_BankFlowTotalList.pas - 1899-12-30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas= - 1899-12-30 00:00:00.000.307,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas - 1899-12-30 00:00:00.000.381,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_ReceivableInput.pas - 1899-12-30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas - 1899-12-30 00:00:00.000.874,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_PayableList.pas - 1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm - 1899-12-30 00:00:00.000.040,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas - 1899-12-30 00:00:00.000.659,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_CustStatement.pas - 1899-12-30 00:00:00.000.727,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas - 1899-12-30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas - 1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899-12-30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas - 1899-12-30 00:00:00.000.345,=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_FtyStatement.pas - 1899-12-30 00:00:00.000.508,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_ReceivableList.pas - 1899-12-30 00:00:00.000.621,D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceInList.dfm=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceOutList.dfm - 1899-12-30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas - 1899-12-30 00:00:00.000.453,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_PayInput.pas - 1899-12-30 00:00:00.000.912,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_PayList.pas - 1899-12-30 00:00:00.000.871,D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceInInPut.pas=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceOutInPut.pas - 1899-12-30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas - 1899-12-30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas - 1899-12-30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas - 1899-12-30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas - 1899-12-30 00:00:00.000.076,=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceOutInPut.pas + 1899/12/30 00:00:00.000.446,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_BankFlowList.pas + 1899/12/30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas + 1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas + 1899/12/30 00:00:00.000.868,D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\Financial.dproj=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\InformationBase.dproj + 1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas= + 1899/12/30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas + 1899/12/30 00:00:00.000.621,D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceOutList.dfm=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceInList.dfm + 1899/12/30 00:00:00.000.871,D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceOutInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceInInPut.dfm + 1899/12/30 00:00:00.000.064,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas + 1899/12/30 00:00:00.000.621,D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceOutList.pas=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceInList.pas + 1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm + 1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas + 1899/12/30 00:00:00.000.052,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_CollectList.pas + 1899/12/30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas + 1899/12/30 00:00:00.000.772,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas + 1899/12/30 00:00:00.000.508,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_ReceivableList.pas + 1899/12/30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas + 1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas + 1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas + 1899/12/30 00:00:00.000.103,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_BankSel.pas + 1899/12/30 00:00:00.000.912,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_PayList.pas + 1899/12/30 00:00:00.000.076,=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceOutInPut.pas + 1899/12/30 00:00:00.000.871,D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceOutInPut.pas=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceInInPut.pas + 1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm + 1899/12/30 00:00:00.000.806,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas + 1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas + 1899/12/30 00:00:00.000.885,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_ExpenseList.pas + 1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas + 1899/12/30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas + 1899/12/30 00:00:00.000.765,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_BankFlowTotalList.pas + 1899/12/30 00:00:00.000.159,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_CustStatementWriteOff.pas + 1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas + 1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas= + 1899/12/30 00:00:00.000.659,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_CustStatement.pas + 1899/12/30 00:00:00.000.040,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas + 1899/12/30 00:00:00.000.874,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_PayableList.pas + 1899/12/30 00:00:00.000.345,=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_FtyStatement.pas + 1899/12/30 00:00:00.000.453,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_PayInput.pas + 1899/12/30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas + 1899/12/30 00:00:00.000.727,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas + 1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas + 1899/12/30 00:00:00.000.307,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas + 1899/12/30 00:00:00.000.979,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_InvoiceOutInPut.pas + 1899/12/30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas= + 1899/12/30 00:00:00.000.728,=D:\Dp10Repo\项目代码\RTBasics\A09财务通用管理\U_InvoiceOutList.pas + 1899/12/30 00:00:00.000.987,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_PayableInput.pas + 1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas + 1899/12/30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas + 1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas + 1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas + 1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas + 1899/12/30 00:00:00.000.742,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas + 1899/12/30 00:00:00.000.381,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_ReceivableInput.pas + 1899/12/30 00:00:00.000.895,=D:\Dp10RepoV1\项目代码\RTBasicsV1\A09财务通用管理\U_InvoiceOutList.pas - - - - - - - - - - - - - - - - - - - - - - - - - - - - diff --git a/A09财务通用管理/Financial.identcache b/A09财务通用管理/Financial.identcache index f728346..df03590 100644 Binary files a/A09财务通用管理/Financial.identcache and b/A09财务通用管理/Financial.identcache differ diff --git a/E01梭织生产计划/TatPlan.dproj.local b/E01梭织生产计划/TatPlan.dproj.local index 3eb9086..1dae354 100644 --- a/E01梭织生产计划/TatPlan.dproj.local +++ b/E01梭织生产计划/TatPlan.dproj.local @@ -1,76 +1,76 @@  - 1899/12/30 00:00:00.000.747,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanList.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYList.pas - 1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas - 1899/12/30 00:00:00.000.220,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas - 1899/12/30 00:00:00.000.806,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\Unit1.pas= - 1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm - 1899/12/30 00:00:00.000.383,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard1.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard.dfm - 1899/12/30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_JHDTJ.dfm - 1899/12/30 00:00:00.000.577,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_FactoryInput2.pas - 1899/12/30 00:00:00.000.555,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas - 1899/12/30 00:00:00.000.469,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanMachInput.pas - 1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas - 1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas 1899/12/30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas - 1899/12/30 00:00:00.000.414,D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.pas=D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.pas - 1899/12/30 00:00:00.000.959,D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.pas= - 1899/12/30 00:00:00.000.759,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCard1.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.dfm + 1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas + 1899/12/30 00:00:00.000.555,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas + 1899/12/30 00:00:00.000.806,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\Unit1.pas= 1899/12/30 00:00:00.000.873,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas - 1899/12/30 00:00:00.000.628,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas - 1899/12/30 00:00:00.000.709,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.pas - 1899/12/30 00:00:00.000.957,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanInPut.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYInPut.dfm - 1899/12/30 00:00:00.000.308,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnInfoInPut.pas - 1899/12/30 00:00:00.000.812,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatWBCardInPut.pas=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.pas - 1899/12/30 00:00:00.000.258,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas - 1899/12/30 00:00:00.000.747,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanList.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYList.dfm - 1899/12/30 00:00:00.000.600,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatGYSel.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.dfm + 1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm + 1899/12/30 00:00:00.000.577,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_FactoryInput2.pas + 1899/12/30 00:00:00.000.759,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCard1.dfm + 1899/12/30 00:00:00.000.383,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard1.dfm + 1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas + 1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas + 1899/12/30 00:00:00.000.469,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanMachInput.pas + 1899/12/30 00:00:00.000.452,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\TatPlan.dproj + 1899/12/30 00:00:00.000.220,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas + 1899/12/30 00:00:00.000.959,D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.pas= + 1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas + 1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas + 1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas 1899/12/30 00:00:00.000.460,=D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.pas + 1899/12/30 00:00:00.000.414,D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.pas=D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.pas + 1899/12/30 00:00:00.000.308,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnInfoInPut.pas + 1899/12/30 00:00:00.000.957,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYInPut.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanInPut.pas + 1899/12/30 00:00:00.000.258,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas + 1899/12/30 00:00:00.000.812,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.pas=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatWBCardInPut.pas + 1899/12/30 00:00:00.000.709,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.pas + 1899/12/30 00:00:00.000.628,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas + 1899/12/30 00:00:00.000.552,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatPlanCard.pas + 1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas= 1899/12/30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas 1899/12/30 00:00:00.000.248,=D:\Dp10RepoV1\项目代码\花蝴蝶\T00贸易通用窗体\U_TradeSalesContractSel.pas - 1899/12/30 00:00:00.000.452,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\TatPlan.dproj=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\InformationBase.dproj - 1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas + 1899/12/30 00:00:00.000.383,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard1.pas 1899/12/30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas + 1899/12/30 00:00:00.000.600,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatGYSel.pas 1899/12/30 00:00:00.000.228,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas - 1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas= - 1899/12/30 00:00:00.000.552,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatPlanCard.pas - 1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899/12/30 00:00:00.000.926,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanList.pas - 1899/12/30 00:00:00.000.759,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCard1.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.pas - 1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas= - 1899/12/30 00:00:00.000.957,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanInPut.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYInPut.pas - 1899/12/30 00:00:00.000.203,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_WBSpecSel.pas + 1899/12/30 00:00:00.000.600,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatGYSel.dfm 1899/12/30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas= + 1899/12/30 00:00:00.000.747,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYList.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanList.pas + 1899/12/30 00:00:00.000.812,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.dfm=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatWBCardInPut.dfm + 1899/12/30 00:00:00.000.926,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanList.pas + 1899/12/30 00:00:00.000.719,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.pas + 1899/12/30 00:00:00.000.203,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_WBSpecSel.pas + 1899/12/30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_JHDTJ.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.pas 1899/12/30 00:00:00.000.354,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas - 1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas + 1899/12/30 00:00:00.000.414,D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.dfm=D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.dfm 1899/12/30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas 1899/12/30 00:00:00.000.556,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas - 1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm - 1899/12/30 00:00:00.000.414,D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.dfm=D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.dfm - 1899/12/30 00:00:00.000.416,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut1.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut.pas + 1899/12/30 00:00:00.000.306,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas + 1899/12/30 00:00:00.000.957,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYInPut.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanInPut.dfm + 1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas + 1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas= 1899/12/30 00:00:00.000.547,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanMachList.pas 1899/12/30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas - 1899/12/30 00:00:00.000.306,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas - 1899/12/30 00:00:00.000.719,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.pas - 1899/12/30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_JHDTJ.pas - 1899/12/30 00:00:00.000.125,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_TatClothInfoSel.pas + 1899/12/30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas + 1899/12/30 00:00:00.000.747,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYList.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanList.dfm 1899/12/30 00:00:00.000.297,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用组件\FrameDateSel.pas 1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas - 1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899/12/30 00:00:00.000.812,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatWBCardInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.dfm + 1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas 1899/12/30 00:00:00.000.467,=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.pas 1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas + 1899/12/30 00:00:00.000.759,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCard1.pas + 1899/12/30 00:00:00.000.125,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_TatClothInfoSel.pas 1899/12/30 00:00:00.000.876,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanInPut.pas - 1899/12/30 00:00:00.000.416,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut1.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut.dfm - 1899/12/30 00:00:00.000.383,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard1.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard.pas + 1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm + 1899/12/30 00:00:00.000.416,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut1.pas 1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas - 1899/12/30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas + 1899/12/30 00:00:00.000.416,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut1.dfm 1899/12/30 00:00:00.000.561,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatCardInPut.pas 1899/12/30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas + 1899/12/30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_JHDTJ.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.dfm 1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas - 1899/12/30 00:00:00.000.600,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatGYSel.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas diff --git a/E01梭织生产计划/TatPlan.identcache b/E01梭织生产计划/TatPlan.identcache index 6b36389..d425042 100644 Binary files a/E01梭织生产计划/TatPlan.identcache and b/E01梭织生产计划/TatPlan.identcache differ diff --git a/E01梭织生产计划/U_TatGYInPut.dfm b/E01梭织生产计划/U_TatGYInPut.dfm index ef5e578..c782dec 100644 --- a/E01梭织生产计划/U_TatGYInPut.dfm +++ b/E01梭织生产计划/U_TatGYInPut.dfm @@ -72,7 +72,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut Ctl3D = False ParentCtl3D = False TabOrder = 1 - ExplicitTop = 24 + ExplicitTop = 36 object Label2: TLabel Left = 567 Top = 9 @@ -557,7 +557,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut TabOrder = 26 Width = 150 end - object WB_YarnDensity: TcxTextEdit + object C_FinishLongitudeDensity: TcxTextEdit Tag = 2 Left = 121 Top = 152 @@ -582,7 +582,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut Height = 414 Align = alClient TabOrder = 2 - Properties.ActivePage = cxTabSheet1 + Properties.ActivePage = cxTabSheet2 Properties.CustomButtons.Buttons = <> Properties.Style = 9 ClientRectBottom = 414 @@ -658,8 +658,6 @@ inherited frmTatGYInPut: TfrmTatGYInPut Height = 384 Align = alClient TabOrder = 1 - ExplicitLeft = -2 - ExplicitTop = -1 object TV1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> @@ -1185,6 +1183,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ParentFont = False TabOrder = 0 + ExplicitTop = -1 end end end diff --git a/E01梭织生产计划/U_TatGYInPut.pas b/E01梭织生产计划/U_TatGYInPut.pas index a174d83..47f8b40 100644 --- a/E01梭织生产计划/U_TatGYInPut.pas +++ b/E01梭织生产计划/U_TatGYInPut.pas @@ -167,7 +167,7 @@ type Label4: TLabel; WB_ReedNote: TcxTextEdit; Label5: TLabel; - WB_YarnDensity: TcxTextEdit; + C_FinishLongitudeDensity: TcxTextEdit; Label12: TLabel; GKBH: TcxTextEdit; procedure TBCloseClick(Sender: TObject); @@ -851,6 +851,17 @@ begin Application.MessageBox('ƷŲΪ!', 'ʾ', 0); Exit; end; + if Trim(WB_Code.Text) = '' then + begin + Application.MessageBox('ձŲΪ!', 'ʾ', 0); + Exit; + end; + if Trim(WB_Name.Text) = '' then + begin + Application.MessageBox('ƲΪ!', 'ʾ', 0); + Exit; + end; + // if Trim(OrdQty.Text) = '' then // begin @@ -1517,7 +1528,7 @@ begin Self.Y_Note_PLJ.Text := Trim(frmWBSpecSel.CDS_1.fieldbyname('WB_YarnArrNote').AsString); Self.WB_ReedNote.Text := Trim(frmWBSpecSel.CDS_1.fieldbyname('WB_ReedNote').AsString); Self.GKBH.Text := Trim(frmWBSpecSel.CDS_1.fieldbyname('GKBH').AsString); - Self.WB_YarnDensity.Text := Trim(frmWBSpecSel.CDS_1.fieldbyname('WB_YarnDensity').AsString); + Self.C_FinishLongitudeDensity.Text := Trim(frmWBSpecSel.CDS_1.fieldbyname('WB_YarnDensity').AsString); with ADOQuery1 do begin diff --git a/E02梭织经轴仓库/U_GetDllForm.pas b/E02梭织经轴仓库/U_GetDllForm.pas index bf1aae8..3f1eced 100644 --- a/E02梭织经轴仓库/U_GetDllForm.pas +++ b/E02梭织经轴仓库/U_GetDllForm.pas @@ -20,7 +20,7 @@ uses U_EmptyBeamInList, U_EmptyBeamOutList, U_EmptyBeamStkList, U_TatWBOutputList, U_TatWBOutputList1, U_WarpBeamQianList, U_TatWBOutputList_CZ, U_TatWBOutputList_SZ, U_TatWBOutputList_JT, U_TatWBOutputList_XB, - U_TatWBOutputList_XZ, U_TatOutputList1, U_TatWBPlan; + U_TatWBOutputList_XZ, U_TatOutputList1, U_TatWBPlan,U_TatWBNeedList; ///////////////////////////////////////////////////////////////// @@ -215,6 +215,18 @@ begin end; end; + 131: //ͳ + begin + with TfrmTatWBNeedList.Create(Application.MainForm, Title, trim(Parameters1), trim(Parameters2), trim(Parameters3), trim(Parameters4), trim(Parameters5), trim(Parameters10)) do + begin + fFormID := FormID; + FormStyle := mstyle; + WindowState := mstate; + BorderStyle := mborderstyle; + mnewHandle := Handle; + end; + end; + 211: // begin with TfrmWarpBeamInList.Create(Application.MainForm, Title, trim(Parameters1), trim(Parameters2), trim(Parameters3), trim(Parameters4), trim(Parameters5), trim(Parameters10)) do // diff --git a/E02梭织经轴仓库/U_TatWBNeedList.dfm b/E02梭织经轴仓库/U_TatWBNeedList.dfm new file mode 100644 index 0000000..eb654f4 --- /dev/null +++ b/E02梭织经轴仓库/U_TatWBNeedList.dfm @@ -0,0 +1,450 @@ +inherited frmTatWBNeedList: TfrmTatWBNeedList + Caption = #32463#36724#38656#27714#32479#35745 + ClientHeight = 792 + ClientWidth = 1540 + Font.Height = -16 + Visible = True + WindowState = wsMaximized + ExplicitWidth = 1556 + ExplicitHeight = 831 + PixelsPerInch = 96 + TextHeight = 21 + object ToolBar1: TToolBar [0] + Tag = 1 + Left = 0 + Top = 0 + Width = 1540 + Height = 30 + AutoSize = True + ButtonHeight = 30 + ButtonWidth = 89 + Caption = 'ToolBar1' + Color = clSkyBlue + DisabledImages = DataLink_WarpBeamStk.cxImageList_bar + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -12 + Font.Name = #23435#20307 + Font.Style = [] + Images = DataLink_WarpBeamStk.cxImageList_bar + List = True + ParentColor = False + ParentFont = False + ShowCaptions = True + TabOrder = 5 + object TBRafresh: TToolButton + Left = 0 + Top = 0 + AutoSize = True + Caption = #21047#26032 + ImageIndex = 1 + OnClick = TBRafreshClick + end + object TBFind: TToolButton + Left = 63 + Top = 0 + AutoSize = True + Caption = #36807#28388 + ImageIndex = 0 + OnClick = TBFindClick + end + object ToolButton2: TToolButton + Left = 126 + Top = 0 + AutoSize = True + Caption = #21333#20215#20462#25913 + ImageIndex = 3 + Visible = False + OnClick = ToolButton2Click + end + object TbLook: TToolButton + Left = 213 + Top = 0 + AutoSize = True + Caption = #26597#30475 + ImageIndex = 8 + OnClick = TbLookClick + end + object ToolButton3: TToolButton + Left = 276 + Top = 0 + AutoSize = True + Caption = #23545#36134 + ImageIndex = 19 + OnClick = ToolButton3Click + end + object ToolButton4: TToolButton + Left = 339 + Top = 0 + AutoSize = True + Caption = #25764#38144#23545#36134 + ImageIndex = 11 + OnClick = ToolButton4Click + end + object TBdel: TToolButton + Left = 426 + Top = 0 + AutoSize = True + Caption = #21024#38500 + ImageIndex = 5 + OnClick = TBdelClick + end + object TBPrint: TToolButton + Left = 489 + Top = 0 + AutoSize = True + Caption = #25171#21360 + ImageIndex = 21 + Visible = False + end + object TBExport: TToolButton + Left = 552 + Top = 0 + AutoSize = True + Caption = #23548#20986'Excel' + ImageIndex = 20 + OnClick = TBExportClick + end + object ToolButton1: TToolButton + Left = 645 + Top = 0 + AutoSize = True + Caption = #20445#23384#26684#24335 + ImageIndex = 16 + OnClick = ToolButton1Click + end + object TBClose: TToolButton + Left = 732 + Top = 0 + AutoSize = True + Caption = #20851#38381 + ImageIndex = 7 + OnClick = TBCloseClick + end + end + object Panel1: TPanel [1] + Left = 0 + Top = 30 + Width = 1540 + Height = 79 + Align = alTop + BevelInner = bvRaised + BevelOuter = bvLowered + Color = clWhite + ParentBackground = False + TabOrder = 6 + object Label2: TLabel + Left = 300 + Top = 46 + Width = 96 + Height = 21 + Caption = #25972#32463#24037#33402#21517#31216 + end + object Label1: TLabel + Left = 25 + Top = 46 + Width = 96 + Height = 21 + Caption = #25972#32463#24037#33402#32534#21495 + end + inline frmFrameDateSel1: TfrmFrameDateSel + Left = 2 + Top = 2 + Width = 1536 + Height = 37 + Align = alTop + Color = clWhite + ParentBackground = False + ParentColor = False + TabOrder = 0 + ExplicitLeft = 2 + ExplicitTop = 2 + ExplicitWidth = 1536 + ExplicitHeight = 37 + inherited lbl2: TLabel + Width = 16 + Height = 21 + ExplicitWidth = 16 + ExplicitHeight = 21 + end + end + object WB_Name: TcxTextEdit + Tag = 2 + Left = 402 + Top = 42 + ParentFont = False + Properties.OnChange = pcidPropertiesChange + TabOrder = 1 + Width = 150 + end + object WB_Code: TcxTextEdit + Tag = 2 + Left = 127 + Top = 42 + ParentFont = False + Properties.OnChange = pcidPropertiesChange + TabOrder = 2 + Width = 150 + end + end + object cxGrid1: TcxGrid [2] + Left = 0 + Top = 138 + Width = 1540 + Height = 654 + Align = alClient + PopupMenu = PopupMenu1 + TabOrder = 2 + ExplicitTop = 144 + object Tv1: TcxGridDBTableView + Navigator.Buttons.CustomButtons = <> + ScrollbarAnnotations.CustomAnnotations = <> + DataController.DataSource = DS_1 + DataController.Filter.AutoDataSetFilter = True + DataController.Summary.DefaultGroupSummaryItems = <> + DataController.Summary.FooterSummaryItems = < + item + Format = #20849' 0 '#34892 + Kind = skCount + end + item + Kind = skSum + end + item + Kind = skSum + end + item + Kind = skSum + end + item + Kind = skSum + end + item + Kind = skSum + end + item + Kind = skSum + end> + DataController.Summary.SummaryGroups = <> + OptionsCustomize.ColumnFiltering = False + OptionsView.Footer = True + OptionsView.GroupByBox = False + object Tv1Column14: TcxGridDBColumn + Caption = #36873#25321 + DataBinding.FieldName = 'ssel' + DataBinding.IsNullValueType = True + PropertiesClassName = 'TcxCheckBoxProperties' + Properties.ImmediatePost = True + HeaderAlignmentHorz = taCenter + Width = 66 + end + object Tv1Column2: TcxGridDBColumn + Caption = #25972#32463#24037#33402#32534#21495 + DataBinding.FieldName = 'WB_Code' + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Options.Editing = False + Width = 139 + end + object Tv1Column7: TcxGridDBColumn + Caption = #25972#32463#24037#33402#21517#31216 + DataBinding.FieldName = 'WB_Name' + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Options.Editing = False + Width = 149 + end + object Tv1Column3: TcxGridDBColumn + Caption = #24635#22836#20221 + DataBinding.FieldName = 'WB_YarnQty' + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Options.Editing = False + Width = 66 + end + object Tv1Column27: TcxGridDBColumn + Caption = #29301#32463#31576#21495 + DataBinding.FieldName = 'WB_ReedNo' + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Options.Editing = False + Width = 87 + end + object Tv1Column26: TcxGridDBColumn + Caption = #32463#36724#38376#24133 + DataBinding.FieldName = 'WB_Width' + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Options.Editing = False + Width = 95 + end + object Tv1Column28: TcxGridDBColumn + Caption = #31576#31359#20837#27861 + DataBinding.FieldName = 'WB_ReedNote' + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Options.Editing = False + Width = 87 + end + object Tv1Column1: TcxGridDBColumn + Caption = #32463#23494 + DataBinding.FieldName = 'WB_YarnDensity' + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 60 + end + object Tv1Column4: TcxGridDBColumn + Caption = #26410#23433#25490#25968#37327'(M)' + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Styles.Content = cxStyle1 + Styles.Header = cxStyle1 + Width = 121 + end + end + object cxGrid1Level1: TcxGridLevel + GridView = Tv1 + end + end + object MovePanel2: TMovePanel [3] + Left = 496 + Top = 220 + Width = 289 + Height = 49 + BevelInner = bvLowered + Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31245#21518#12290#12290#12290 + Color = clSkyBlue + Font.Charset = GB2312_CHARSET + Font.Color = clRed + Font.Height = -14 + Font.Name = #23435#20307 + Font.Style = [fsBold] + ParentFont = False + TabOrder = 3 + Visible = False + end + object cxTabControl1: TcxTabControl [4] + Left = 0 + Top = 109 + Width = 1540 + Height = 29 + Align = alTop + TabOrder = 4 + Properties.CustomButtons.Buttons = <> + Properties.Style = 9 + Properties.TabIndex = 0 + Properties.Tabs.Strings = ( + #26410#23545#36134 + #24050#23545#36134 + #20840#37096) + OnChange = cxTabControl1Change + ExplicitLeft = -1 + ExplicitTop = 106 + ClientRectRight = 0 + ClientRectTop = 0 + end + inherited cxProgressBar2: TcxProgressBar + ExplicitHeight = 29 + end + inherited ADOQueryBaseCmd: TADOQuery + Connection = DataLink_WarpBeamStk.ADOLink + Left = 1017 + Top = 288 + end + inherited ADOQueryBaseTemp: TADOQuery + Connection = DataLink_WarpBeamStk.ADOLink + Left = 1001 + Top = 209 + end + object ADOQueryCmd: TADOQuery + Connection = DataLink_WarpBeamStk.ADOLink + Parameters = <> + Left = 804 + Top = 288 + end + object ADOQueryMain: TADOQuery + Connection = DataLink_WarpBeamStk.ADOLink + LockType = ltReadOnly + Parameters = <> + Left = 892 + Top = 280 + end + object ADOQueryTemp: TADOQuery + Connection = DataLink_WarpBeamStk.ADOLink + LockType = ltReadOnly + Parameters = <> + Left = 718 + Top = 286 + end + object DS_1: TDataSource + DataSet = CDS_Main + Left = 176 + Top = 288 + end + object cxGridPopupMenu1: TcxGridPopupMenu + Grid = cxGrid1 + PopupMenus = <> + Left = 920 + Top = 192 + end + object CDS_Main: TClientDataSet + Aggregates = <> + Params = <> + Left = 183 + Top = 354 + end + object RMGridReport1: TRMGridReport + ThreadPrepareReport = True + InitialZoom = pzDefault + PreviewButtons = [rmpbZoom, rmpbLoad, rmpbSave, rmpbPrint, rmpbFind, rmpbPageSetup, rmpbExit, rmpbExport, rmpbNavigator] + DefaultCollate = False + SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\' + PreviewOptions.RulerUnit = rmutScreenPixels + PreviewOptions.RulerVisible = False + PreviewOptions.DrawBorder = False + PreviewOptions.BorderPen.Color = clGray + PreviewOptions.BorderPen.Style = psDash + CompressLevel = rmzcFastest + CompressThread = False + LaterBuildEvents = True + OnlyOwnerDataSet = False + Left = 792 + Top = 184 + ReportData = {} + end + object PopupMenu1: TPopupMenu + Left = 544 + Top = 168 + object N1: TMenuItem + Caption = #20840#36873 + OnClick = N1Click + end + object N2: TMenuItem + Caption = #20840#24323 + OnClick = N2Click + end + end + object CDS_2: TClientDataSet + Aggregates = <> + Params = <> + Left = 248 + Top = 360 + end + object GPM_2: TcxGridPopupMenu + PopupMenus = <> + Left = 960 + Top = 368 + end + object DS_2: TDataSource + DataSet = CDS_2 + Left = 248 + Top = 296 + end + object cxStyleRepository1: TcxStyleRepository + PixelsPerInch = 96 + object cxStyle1: TcxStyle + AssignedValues = [svTextColor] + TextColor = clRed + end + end +end diff --git a/E02梭织经轴仓库/U_TatWBNeedList.pas b/E02梭织经轴仓库/U_TatWBNeedList.pas new file mode 100644 index 0000000..453a822 --- /dev/null +++ b/E02梭织经轴仓库/U_TatWBNeedList.pas @@ -0,0 +1,438 @@ +unit U_TatWBNeedList; + +interface + +uses + Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, + Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage, + cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView, + cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses, + cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls, + ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient, + cxDropDownEdit, MovePanel, cxButtonEdit, cxCalendar, RM_System, RM_Common, + RM_Class, RM_GridReport, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, + dxDateRanges, dxBarBuiltInMenu, U_BaseList, cxCheckBox, Vcl.Menus, + dxScrollbarAnnotations, FrameDateTimeSel, cxContainer, cxTextEdit, U_SLTGDTP, + cxMemo, Vcl.Imaging.jpeg, FrameDateSel, cxPC, dxSkinsCore, + dxSkinsDefaultPainters, cxProgressBar, dxSkinWXI; + +type + TfrmTatWBNeedList = class(TfrmBaseList) + ToolBar1: TToolBar; + TBRafresh: TToolButton; + TBFind: TToolButton; + TBExport: TToolButton; + TBPrint: TToolButton; + TBClose: TToolButton; + Panel1: TPanel; + ADOQueryCmd: TADOQuery; + ADOQueryMain: TADOQuery; + ADOQueryTemp: TADOQuery; + DS_1: TDataSource; + cxGridPopupMenu1: TcxGridPopupMenu; + CDS_Main: TClientDataSet; + Tv1: TcxGridDBTableView; + cxGrid1Level1: TcxGridLevel; + cxGrid1: TcxGrid; + MovePanel2: TMovePanel; + RMGridReport1: TRMGridReport; + TBdel: TToolButton; + ToolButton1: TToolButton; + Tv1Column14: TcxGridDBColumn; + Tv1Column2: TcxGridDBColumn; + Tv1Column3: TcxGridDBColumn; + Tv1Column7: TcxGridDBColumn; + PopupMenu1: TPopupMenu; + N1: TMenuItem; + N2: TMenuItem; + CDS_2: TClientDataSet; + GPM_2: TcxGridPopupMenu; + DS_2: TDataSource; + Tv1Column26: TcxGridDBColumn; + Tv1Column27: TcxGridDBColumn; + Tv1Column28: TcxGridDBColumn; + frmFrameDateSel1: TfrmFrameDateSel; + ToolButton2: TToolButton; + cxTabControl1: TcxTabControl; + ToolButton3: TToolButton; + ToolButton4: TToolButton; + Label2: TLabel; + WB_Name: TcxTextEdit; + Tv1Column1: TcxGridDBColumn; + Tv1Column4: TcxGridDBColumn; + cxStyleRepository1: TcxStyleRepository; + cxStyle1: TcxStyle; + TbLook: TToolButton; + Label1: TLabel; + WB_Code: TcxTextEdit; + procedure FormDestroy(Sender: TObject); + procedure FormClose(Sender: TObject; var Action: TCloseAction); + procedure FormCreate(Sender: TObject); + procedure TBRafreshClick(Sender: TObject); + procedure ConNoMChange(Sender: TObject); + procedure TBCloseClick(Sender: TObject); + procedure FormShow(Sender: TObject); + procedure TBExportClick(Sender: TObject); + procedure TBFindClick(Sender: TObject); + procedure pcidChange(Sender: TObject); + procedure TBdelClick(Sender: TObject); + procedure ToolButton1Click(Sender: TObject); + procedure ToolButton2Click(Sender: TObject); + procedure N1Click(Sender: TObject); + procedure N2Click(Sender: TObject); + procedure pcidPropertiesChange(Sender: TObject); + procedure cxTabControl1Change(Sender: TObject); + procedure ToolButton3Click(Sender: TObject); + procedure ToolButton4Click(Sender: TObject); + procedure TbLookClick(Sender: TObject); + private + FLeft, FTop: Integer; + procedure InitGrid(); + procedure setstatus(); + { Private declarations } + public + fsyrName, canshu1, canshu2: string; + { Public declarations } + end; + +var + frmTatWBNeedList: TfrmTatWBNeedList; + Mach: array of TfrmSLTGDTP; + +implementation + +uses + U_DataLink, U_RTFun, U_ZDYHelp, U_OutPutHelp,U_WBNeedLook; + +{$R *.dfm} + +procedure TfrmTatWBNeedList.setstatus(); +begin + ToolButton3.Enabled := False; + ToolButton4.Enabled := False; + TBdel.Enabled := False; + + Label1.Visible := false; + + + case cxTabControl1.TabIndex of + 0: + begin + ToolButton3.Enabled := true; + TBdel.Enabled := true; + + Label1.Visible := true; + + end; + 1: + begin + ToolButton4.Enabled := true; + end; + 2: + begin + + end; + end; + +end; + + + +procedure TfrmTatWBNeedList.FormDestroy(Sender: TObject); +begin + inherited; + frmTatWBNeedList := nil; +end; + +procedure TfrmTatWBNeedList.FormClose(Sender: TObject; var Action: TCloseAction); +begin + inherited; + Action := caFree; +end; + +procedure TfrmTatWBNeedList.FormCreate(Sender: TObject); +begin + inherited; + + frmFrameDateSel1.EndDate.Date := SGetServerDateTime(ADOQueryTemp); + frmFrameDateSel1.BegDate.Date := frmFrameDateSel1.EndDate.Date - 30; + fsyrName := trim(DdataBase); + canshu1 := trim(DParameters1); +end; + +procedure TfrmTatWBNeedList.InitGrid(); +var + Msql, mbegdate, menddate: string; + SqlStr: string; +begin + +// mbegdate := FormatDateTime('yyyy-MM-dd', frmFrameDateSel1.begdate.Date) + ' ' + FormatDateTime('HH:nn', frmFrameDateSel1.begTime.Time); +// menddate := FormatDateTime('yyyy-MM-dd', frmFrameDateSel1.enddate.Date) + ' ' + FormatDateTime('HH:nn', frmFrameDateSel1.endTime.Time); + +// SqlStr := SqlStr + 'and A.GOTime<''' + trim(menddate) + ''' '; + + SqlStr := ' select A.* from Tat_WB_Spec A'; + + +// case cxTabControl1.TabIndex of +// 0: +// begin +// SqlStr := SqlStr + ' and isnull(ISDZ,0) = 0'; +// end; +// 1: +// begin +// SqlStr := SqlStr + ' and isnull(ISDZ,0) = 1'; +// end; +// 2: +// begin +// +// end; +// end; + +// SqlStr := SqlStr + ' order by IOTime desc'; +// ShowMessage(SqlStr); + + InitCDSData(ADOQueryMain, CDS_Main, Tv1, SqlStr, SGetFilters(Panel1, 1, 2), ''); +end; + +procedure TfrmTatWBNeedList.N1Click(Sender: TObject); +begin + SelOKNo(CDS_Main, true); +end; + +procedure TfrmTatWBNeedList.N2Click(Sender: TObject); +begin + SelOKNo(CDS_Main, False); +end; + +procedure TfrmTatWBNeedList.TBRafreshClick(Sender: TObject); +begin +// MovePanel2.Visible := True; +// MovePanel2.Refresh; + ToolBar1.SetFocus; + InitGrid(); +// MovePanel2.Visible := False; +end; + +procedure TfrmTatWBNeedList.ToolButton1Click(Sender: TObject); +begin + WriteCxGrid(self.Caption + tv1.Name, Tv1, 'Ʒֿ'); +end; + +procedure TfrmTatWBNeedList.ToolButton2Click(Sender: TObject); +var + MGOIDS: string; +begin + if CDS_Main.IsEmpty then + exit; + + if not CDS_Main.Locate('SSel', True, []) then + begin + application.MessageBox('ѡ', 'ʾ'); + Exit; + end; + + with CDS_Main do + begin + DisableControls; + while CDS_Main.Locate('SSel', True, []) do + begin + MGOIDS := MGOIDS + Trim(CDS_Main.fieldbyname('GOID').AsString) + ','; + CDS_Main.Delete; + end; + EnableControls; + end; + +end; + +procedure TfrmTatWBNeedList.ToolButton3Click(Sender: TObject); +var + WSql: string; +begin + if CDS_Main.IsEmpty then + Exit; + if CDS_Main.Locate('SSel', True, []) = False then + begin + Application.MessageBox('ûѡ!', 'ʾ', 0); + Exit; + end; + + WSql := SelCDSKey(CDS_Main, ['TWIOID'])[0]; + try + ADOQueryCmd.Connection.BeginTrans; + with ADOQueryCmd do + begin + Close; + Sql.Clear; + Sql.Add('exec P_Tat_WB_IO_DZ '); + Sql.Add(' @GOIDS=' + quotedstr(Trim(WSql))); + Sql.Add(',@DCode=' + Quotedstr(DCode)); + Sql.Add(',@DName=' + Quotedstr(DName)); + Open; + end; + if ADOQueryCmd.FieldByName('intReturn').AsInteger = -1 then + begin + raise Exception.Create(pchar(trim(ADOQueryCmd.FieldByName('ShowMsg').AsString))); + end; + ADOQueryCmd.Connection.CommitTrans; + InitGrid(); + application.MessageBox('˳ɹ', 'ʾϢ'); + except + ADOQueryCmd.Connection.RollbackTrans; + application.MessageBox(PChar(Exception(ExceptObject).Message), 'ʾϢ', 0); + end; +end; + +procedure TfrmTatWBNeedList.ToolButton4Click(Sender: TObject); +var + WSql: string; +begin + if CDS_Main.IsEmpty then + Exit; + if CDS_Main.Locate('SSel', True, []) = False then + begin + Application.MessageBox('ûѡ!', 'ʾ', 0); + Exit; + end; + + WSql := SelCDSKey(CDS_Main, ['TWIOID'])[0]; + try + ADOQueryCmd.Connection.BeginTrans; + with ADOQueryCmd do + begin + Close; + Sql.Clear; + Sql.Add('exec P_Tat_WB_IO_CXDZ '); + Sql.Add(' @GOIDS=' + quotedstr(Trim(WSql))); + Sql.Add(',@DCode=' + Quotedstr(DCode)); + Sql.Add(',@DName=' + Quotedstr(DName)); + Open; + end; + if ADOQueryCmd.FieldByName('intReturn').AsInteger = -1 then + begin + raise Exception.Create(pchar(trim(ADOQueryCmd.FieldByName('ShowMsg').AsString))); + end; + ADOQueryCmd.Connection.CommitTrans; + InitGrid(); + application.MessageBox('˳ɹ', 'ʾϢ'); + except + ADOQueryCmd.Connection.RollbackTrans; + application.MessageBox(PChar(Exception(ExceptObject).Message), 'ʾϢ', 0); + end; +end; + +procedure TfrmTatWBNeedList.ConNoMChange(Sender: TObject); +begin + if ADOQueryMain.Active then + begin + SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2)); + end; +end; + +procedure TfrmTatWBNeedList.cxTabControl1Change(Sender: TObject); +begin + setstatus(); + initgrid(); +end; + +procedure TfrmTatWBNeedList.TBCloseClick(Sender: TObject); +begin + + Close; +end; + +procedure TfrmTatWBNeedList.FormShow(Sender: TObject); +begin + inherited; + ReadCxGrid(self.Caption + tv1.Name, Tv1, 'Ʒֿ'); + canshu1 := self.fParameters1; + canshu2 := self.fParameters2; + setstatus(); + initgrid(); +end; + +procedure TfrmTatWBNeedList.TBExportClick(Sender: TObject); +begin + if ADOQueryMain.IsEmpty then + exit; + TcxGridToExcel(self.Caption, cxGrid1); +end; + +procedure TfrmTatWBNeedList.TBFindClick(Sender: TObject); +begin + if ADOQueryMain.Active then + begin + SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2)); + SCreateCDS(ADOQueryMain, CDS_Main); + SInitCDSData(ADOQueryMain, CDS_Main); + end; +end; + +procedure TfrmTatWBNeedList.TbLookClick(Sender: TObject); +begin + inherited; + try + frmWBNeedLook := TfrmWBNeedLook.Create(Application); + with frmWBNeedLook do + begin + + if ShowModal = 1 then + begin + Self.InitGrid(); + end; + end; + finally + frmWBNeedLook.Free; + end; +end; + +procedure TfrmTatWBNeedList.pcidChange(Sender: TObject); +begin + TBFind.Click; +end; + +procedure TfrmTatWBNeedList.pcidPropertiesChange(Sender: TObject); +begin + TBFind.Click; +end; + +procedure TfrmTatWBNeedList.TBdelClick(Sender: TObject); +var + WSql: string; +begin + if CDS_Main.IsEmpty then + Exit; + if CDS_Main.Locate('SSel', True, []) = False then + begin + Application.MessageBox('ûѡ!', 'ʾ', 0); + Exit; + end; + + WSql := SelCDSKey(CDS_Main, ['GOID'])[0]; + try + ADOQueryCmd.Connection.BeginTrans; + with ADOQueryCmd do + begin + Close; + Sql.Clear; + Sql.Add('exec P_Tat_Plan_OutPut_Del '); + Sql.Add(' @GOIDS=' + quotedstr(Trim(WSql))); + Sql.Add(',@DCode=' + Quotedstr(DCode)); + Sql.Add(',@DName=' + Quotedstr(DName)); + Open; + end; + if ADOQueryCmd.FieldByName('intReturn').AsInteger = -1 then + begin + raise Exception.Create(pchar(trim(ADOQueryCmd.FieldByName('ShowMsg').AsString))); + end; + ADOQueryCmd.Connection.CommitTrans; + InitGrid(); + application.MessageBox('ɾɹ', 'ʾϢ'); + except + ADOQueryCmd.Connection.RollbackTrans; + application.MessageBox(PChar(Exception(ExceptObject).Message), 'ʾϢ', 0); + end; +end; + +end. + diff --git a/E02梭织经轴仓库/U_TatWBOutputList1.dfm b/E02梭织经轴仓库/U_TatWBOutputList1.dfm index 5426580..f713010 100644 --- a/E02梭织经轴仓库/U_TatWBOutputList1.dfm +++ b/E02梭织经轴仓库/U_TatWBOutputList1.dfm @@ -1,10 +1,10 @@ inherited frmTatWBOutputList1: TfrmTatWBOutputList1 Caption = #21047#21345#20449#24687 ClientHeight = 792 - ClientWidth = 1653 + ClientWidth = 1540 Font.Height = -16 WindowState = wsMaximized - ExplicitWidth = 1669 + ExplicitWidth = 1556 ExplicitHeight = 831 PixelsPerInch = 96 TextHeight = 21 @@ -12,7 +12,7 @@ inherited frmTatWBOutputList1: TfrmTatWBOutputList1 Tag = 1 Left = 0 Top = 0 - Width = 1653 + Width = 1540 Height = 30 AutoSize = True ButtonHeight = 30 @@ -30,7 +30,7 @@ inherited frmTatWBOutputList1: TfrmTatWBOutputList1 ParentColor = False ParentFont = False ShowCaptions = True - TabOrder = 0 + TabOrder = 6 object TBRafresh: TToolButton Left = 0 Top = 0 @@ -116,14 +116,14 @@ inherited frmTatWBOutputList1: TfrmTatWBOutputList1 object Panel1: TPanel [1] Left = 0 Top = 30 - Width = 1653 + Width = 1540 Height = 79 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clWhite ParentBackground = False - TabOrder = 1 + TabOrder = 7 object Label3: TLabel Left = 56 Top = 46 @@ -173,7 +173,7 @@ inherited frmTatWBOutputList1: TfrmTatWBOutputList1 inline frmFrameDateSel1: TfrmFrameDateSel Left = 2 Top = 2 - Width = 1649 + Width = 1536 Height = 37 Align = alTop Color = clWhite @@ -182,8 +182,14 @@ inherited frmTatWBOutputList1: TfrmTatWBOutputList1 TabOrder = 2 ExplicitLeft = 2 ExplicitTop = 2 - ExplicitWidth = 1649 + ExplicitWidth = 1536 ExplicitHeight = 37 + inherited lbl2: TLabel + Width = 16 + Height = 21 + ExplicitWidth = 16 + ExplicitHeight = 21 + end end object Price: TcxTextEdit Left = 890 @@ -214,7 +220,7 @@ inherited frmTatWBOutputList1: TfrmTatWBOutputList1 object cxGrid1: TcxGrid [2] Left = 0 Top = 138 - Width = 1653 + Width = 1540 Height = 448 Align = alClient PopupMenu = PopupMenu1 @@ -524,7 +530,7 @@ inherited frmTatWBOutputList1: TfrmTatWBOutputList1 object Panel2: TPanel [4] Left = 0 Top = 586 - Width = 1653 + Width = 1540 Height = 206 Align = alBottom Caption = 'Panel2' @@ -532,7 +538,7 @@ inherited frmTatWBOutputList1: TfrmTatWBOutputList1 object cxGrid2: TcxGrid Left = 1 Top = 1 - Width = 1123 + Width = 1010 Height = 204 Align = alClient TabOrder = 0 @@ -715,7 +721,7 @@ inherited frmTatWBOutputList1: TfrmTatWBOutputList1 end end object GroupBox1: TGroupBox - Left = 1124 + Left = 1011 Top = 1 Width = 528 Height = 204 @@ -737,7 +743,7 @@ inherited frmTatWBOutputList1: TfrmTatWBOutputList1 object cxTabControl1: TcxTabControl [5] Left = 0 Top = 109 - Width = 1653 + Width = 1540 Height = 29 Align = alTop TabOrder = 5 diff --git a/E02梭织经轴仓库/U_TatWBOutputList1.pas b/E02梭织经轴仓库/U_TatWBOutputList1.pas index 3244021..498a1f2 100644 --- a/E02梭织经轴仓库/U_TatWBOutputList1.pas +++ b/E02梭织经轴仓库/U_TatWBOutputList1.pas @@ -11,26 +11,10 @@ uses ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient, cxDropDownEdit, MovePanel, cxButtonEdit, cxCalendar, RM_System, RM_Common, RM_Class, RM_GridReport, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, - dxDateRanges, dxBarBuiltInMenu, - U_BaseList, cxCheckBox, Vcl.Menus, dxScrollbarAnnotations, - FrameDateTimeSel, cxContainer, cxTextEdit, U_SLTGDTP, cxMemo, Vcl.Imaging.jpeg, - - - - - - - - - - - - - - - - FrameDateSel, cxPC, dxSkinsCore, dxSkinsDefaultPainters, cxProgressBar, - dxSkinWXI; + dxDateRanges, dxBarBuiltInMenu, U_BaseList, cxCheckBox, Vcl.Menus, + dxScrollbarAnnotations, FrameDateTimeSel, cxContainer, cxTextEdit, U_SLTGDTP, + cxMemo, Vcl.Imaging.jpeg, FrameDateSel, cxPC, dxSkinsCore, + dxSkinsDefaultPainters, cxProgressBar, dxSkinWXI; type TfrmTatWBOutputList1 = class(TfrmBaseList) diff --git a/E02梭织经轴仓库/U_WBNeedLook.dfm b/E02梭织经轴仓库/U_WBNeedLook.dfm new file mode 100644 index 0000000..2174cee --- /dev/null +++ b/E02梭织经轴仓库/U_WBNeedLook.dfm @@ -0,0 +1,407 @@ +inherited frmWBNeedLook: TfrmWBNeedLook + Left = 105 + Top = 131 + Caption = #22806#27424#30424#22836#21015#34920 + ClientHeight = 667 + ClientWidth = 1540 + Font.Height = -16 + Position = poMainFormCenter + ExplicitLeft = -689 + ExplicitWidth = 1556 + ExplicitHeight = 706 + PixelsPerInch = 96 + TextHeight = 21 + object ToolBar1: TToolBar [0] + Tag = 1 + Left = 0 + Top = 0 + Width = 1540 + Height = 30 + AutoSize = True + ButtonHeight = 30 + ButtonWidth = 99 + Caption = 'ToolBar1' + Color = clWhite + Images = DataLink_WarpBeamStk.cxImageList_bar + List = True + ParentColor = False + ShowCaptions = True + TabOrder = 2 + object TBRafresh: TToolButton + Left = 0 + Top = 0 + AutoSize = True + Caption = #21047#26032 + ImageIndex = 1 + OnClick = TBRafreshClick + end + object TBFind: TToolButton + Left = 71 + Top = 0 + AutoSize = True + Caption = #36807#28388 + ImageIndex = 0 + Visible = False + OnClick = TBFindClick + end + object ToolButton2: TToolButton + Left = 142 + Top = 0 + AutoSize = True + Caption = #20445#23384#26684#24335 + ImageIndex = 16 + OnClick = ToolButton2Click + end + object TBClose: TToolButton + Left = 245 + Top = 0 + AutoSize = True + Caption = #20851#38381 + ImageIndex = 7 + OnClick = TBCloseClick + end + end + object Panel1: TPanel [1] + Left = 0 + Top = 30 + Width = 1540 + Height = 43 + Align = alTop + BevelInner = bvRaised + BevelOuter = bvLowered + Color = clWhite + ParentBackground = False + TabOrder = 3 + object Label3: TLabel + Left = 268 + Top = 10 + Width = 48 + Height = 21 + Caption = #30424#22836#21495 + end + object Label4: TLabel + Left = 46 + Top = 10 + Width = 64 + Height = 21 + Caption = #20986#21040#21333#20301 + end + object WBNO: TcxTextEdit + Tag = 2 + Left = 320 + Top = 6 + Properties.OnChange = FromCoNamePropertiesChange + TabOrder = 0 + Width = 150 + end + object ToCoName: TcxTextEdit + Tag = 2 + Left = 114 + Top = 6 + Properties.OnChange = FromCoNamePropertiesChange + TabOrder = 1 + Width = 150 + end + end + inherited cxProgressBar2: TcxProgressBar + ExplicitHeight = 29 + end + object Panel2: TPanel [4] + Left = 0 + Top = 73 + Width = 793 + Height = 594 + Align = alLeft + TabOrder = 4 + object cxGrid1: TcxGrid + Left = 1 + Top = 1 + Width = 791 + Height = 592 + Align = alClient + TabOrder = 0 + ExplicitLeft = -3 + ExplicitTop = -2 + ExplicitWidth = 591 + object TV1: TcxGridDBTableView + Navigator.Buttons.CustomButtons = <> + ScrollbarAnnotations.CustomAnnotations = <> + DataController.DataSource = DS_1 + DataController.Summary.DefaultGroupSummaryItems = <> + DataController.Summary.FooterSummaryItems = <> + DataController.Summary.SummaryGroups = <> + OptionsView.GroupByBox = False + object TV1Column1: TcxGridDBColumn + Caption = #32455#36896#21333#21495 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 83 + end + object TV1Column2: TcxGridDBColumn + Caption = #23458#25143 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + end + object TV1Column3: TcxGridDBColumn + Caption = #20135#21697#32534#21495 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 84 + end + object TV1Column4: TcxGridDBColumn + Caption = #20135#21697#21517#31216 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 85 + end + object TV1Column5: TcxGridDBColumn + Caption = #25972#32463#24037#33402#32534#21495 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 121 + end + object TV1Column6: TcxGridDBColumn + Caption = #25972#32463#24037#33402#21517#31216 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 109 + end + object TV1Column7: TcxGridDBColumn + Caption = #35746#21333#25968#37327 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Styles.Header = cxStyle1 + Width = 84 + end + object TV1Column8: TcxGridDBColumn + Caption = #24050#19978#36724#25968#37327 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Styles.Header = cxStyle2 + Width = 104 + end + end + object cxGrid1Level1: TcxGridLevel + GridView = TV1 + end + end + end + object Panel3: TPanel [5] + Left = 793 + Top = 73 + Width = 747 + Height = 594 + Align = alClient + TabOrder = 5 + ExplicitLeft = 584 + ExplicitTop = 312 + ExplicitWidth = 185 + ExplicitHeight = 41 + object cxGrid2: TcxGrid + Left = 1 + Top = 1 + Width = 745 + Height = 248 + Align = alTop + TabOrder = 0 + ExplicitLeft = 5 + ExplicitTop = 6 + ExplicitWidth = 945 + object TV2: TcxGridDBTableView + Navigator.Buttons.CustomButtons = <> + ScrollbarAnnotations.CustomAnnotations = <> + DataController.DataSource = DS_2 + DataController.Summary.DefaultGroupSummaryItems = <> + DataController.Summary.FooterSummaryItems = <> + DataController.Summary.SummaryGroups = <> + OptionsView.GroupByBox = False + object TV2Column1: TcxGridDBColumn + Caption = #25972#32463#24037#33402#32534#21495 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 124 + end + object TV2Column2: TcxGridDBColumn + Caption = #25972#32463#24037#33402#21517#31216 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 124 + end + object TV2Column3: TcxGridDBColumn + Caption = #36724#21345#21495 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 71 + end + object TV2Column4: TcxGridDBColumn + Caption = #36801#32463#26426#21488 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 86 + end + object TV2Column5: TcxGridDBColumn + Caption = #25972#32463#24037 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 70 + end + object TV2Column6: TcxGridDBColumn + Caption = #24211#23384#25968#37327 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 85 + end + object TV2Column7: TcxGridDBColumn + Caption = #24211#20301 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 54 + end + end + object cxGrid2Level1: TcxGridLevel + GridView = TV2 + end + end + object cxGrid3: TcxGrid + Left = 1 + Top = 249 + Width = 745 + Height = 344 + Align = alClient + TabOrder = 1 + ExplicitLeft = 5 + ExplicitWidth = 945 + object TV3: TcxGridDBTableView + Navigator.Buttons.CustomButtons = <> + ScrollbarAnnotations.CustomAnnotations = <> + DataController.DataSource = DS_3 + DataController.Summary.DefaultGroupSummaryItems = <> + DataController.Summary.FooterSummaryItems = <> + DataController.Summary.SummaryGroups = <> + OptionsView.GroupByBox = False + object TV3Column1: TcxGridDBColumn + Caption = #25972#32463#35745#21010#21333#21495 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 131 + end + object TV3Column2: TcxGridDBColumn + Caption = #36724#21345#21495 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 90 + end + object TV3Column3: TcxGridDBColumn + Caption = #24320#21345#26102#38388 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 90 + end + object TV3Column4: TcxGridDBColumn + Caption = #36801#32463#26426#21488 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 90 + end + object TV3Column5: TcxGridDBColumn + Caption = #32463#36724#31867#22411 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 90 + end + object TV3Column6: TcxGridDBColumn + Caption = #24320#21345#25968#37327 + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Width = 90 + end + end + object cxGrid3Level1: TcxGridLevel + GridView = TV3 + end + end + end + inherited ADOQueryBaseCmd: TADOQuery + Connection = DataLink_WarpBeamStk.ADOLink + Left = 313 + Top = 128 + end + inherited ADOQueryBaseTemp: TADOQuery + Connection = DataLink_WarpBeamStk.ADOLink + Left = 209 + Top = 129 + end + object ADOQueryCmd: TADOQuery + ConnectionString = 'BS_Cloth_IO' + Parameters = <> + Left = 480 + Top = 128 + end + object ADOQueryMain: TADOQuery + Connection = DataLink_WarpBeamStk.ADOLink + LockType = ltReadOnly + Parameters = <> + Left = 568 + Top = 128 + end + object ADOQueryTemp: TADOQuery + ConnectionString = 'BS_Cloth_IO' + LockType = ltReadOnly + Parameters = <> + Left = 408 + Top = 128 + end + object DS_1: TDataSource + DataSet = CDS_1 + Left = 144 + Top = 280 + end + object cxGridPopupMenu1: TcxGridPopupMenu + PopupMenus = <> + Left = 536 + Top = 240 + end + object PopupMenu1: TPopupMenu + Left = 472 + Top = 208 + end + object cxStyleRepository1: TcxStyleRepository + PixelsPerInch = 96 + object cxStyle1: TcxStyle + AssignedValues = [svTextColor] + TextColor = clRed + end + object cxStyle2: TcxStyle + AssignedValues = [svTextColor] + TextColor = clMenuHighlight + end + end + object DS_2: TDataSource + DataSet = CDS_2 + Left = 200 + Top = 280 + end + object CDS_3: TClientDataSet + Aggregates = <> + Params = <> + Left = 256 + Top = 208 + end + object CDS_1: TClientDataSet + Aggregates = <> + Params = <> + Left = 144 + Top = 208 + end + object CDS_2: TClientDataSet + Aggregates = <> + Params = <> + Left = 200 + Top = 208 + end + object DS_3: TDataSource + DataSet = CDS_2 + Left = 256 + Top = 280 + end +end diff --git a/E02梭织经轴仓库/U_WBNeedLook.pas b/E02梭织经轴仓库/U_WBNeedLook.pas new file mode 100644 index 0000000..6335afa --- /dev/null +++ b/E02梭织经轴仓库/U_WBNeedLook.pas @@ -0,0 +1,235 @@ +unit U_WBNeedLook; + +interface + +uses + Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, + Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage, + cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView, + cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses, + cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls, + ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient, + cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset, + RM_System, RM_GridReport, Menus, cxCalendar, cxButtonEdit, cxTextEdit, + cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, dxDateRanges, + dxBarBuiltInMenu, U_BaseList, dxScrollbarAnnotations, cxContainer, + dxSkinsCore, dxSkinsDefaultPainters, cxProgressBar; + +type + TfrmWBNeedLook = class(TfrmBaseList) + ToolBar1: TToolBar; + TBRafresh: TToolButton; + TBFind: TToolButton; + TBClose: TToolButton; + Panel1: TPanel; + ADOQueryCmd: TADOQuery; + ADOQueryMain: TADOQuery; + ADOQueryTemp: TADOQuery; + DS_1: TDataSource; + cxGridPopupMenu1: TcxGridPopupMenu; + PopupMenu1: TPopupMenu; + Label3: TLabel; + Label4: TLabel; + WBNO: TcxTextEdit; + ToCoName: TcxTextEdit; + ToolButton2: TToolButton; + Panel2: TPanel; + Panel3: TPanel; + TV1: TcxGridDBTableView; + cxGrid1Level1: TcxGridLevel; + cxGrid1: TcxGrid; + TV2: TcxGridDBTableView; + cxGrid2Level1: TcxGridLevel; + cxGrid2: TcxGrid; + TV3: TcxGridDBTableView; + cxGrid3Level1: TcxGridLevel; + cxGrid3: TcxGrid; + TV1Column1: TcxGridDBColumn; + TV1Column2: TcxGridDBColumn; + TV1Column3: TcxGridDBColumn; + TV1Column4: TcxGridDBColumn; + TV1Column5: TcxGridDBColumn; + TV1Column6: TcxGridDBColumn; + TV1Column7: TcxGridDBColumn; + TV1Column8: TcxGridDBColumn; + cxStyleRepository1: TcxStyleRepository; + cxStyle1: TcxStyle; + cxStyle2: TcxStyle; + TV2Column1: TcxGridDBColumn; + TV2Column2: TcxGridDBColumn; + TV2Column3: TcxGridDBColumn; + TV2Column4: TcxGridDBColumn; + TV2Column5: TcxGridDBColumn; + TV2Column6: TcxGridDBColumn; + TV2Column7: TcxGridDBColumn; + TV3Column1: TcxGridDBColumn; + TV3Column2: TcxGridDBColumn; + TV3Column3: TcxGridDBColumn; + TV3Column4: TcxGridDBColumn; + TV3Column5: TcxGridDBColumn; + TV3Column6: TcxGridDBColumn; + DS_2: TDataSource; + CDS_3: TClientDataSet; + CDS_1: TClientDataSet; + CDS_2: TClientDataSet; + DS_3: TDataSource; + procedure FormDestroy(Sender: TObject); + procedure FormClose(Sender: TObject; var Action: TCloseAction); + procedure TBRafreshClick(Sender: TObject); + procedure ConNoMChange(Sender: TObject); + procedure TBCloseClick(Sender: TObject); + procedure FormShow(Sender: TObject); + procedure TBFindClick(Sender: TObject); + procedure MPRTCodeNameChange(Sender: TObject); + procedure SXBatchNOChange(Sender: TObject); + procedure FromCoNameChange(Sender: TObject); + procedure Tv1CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean); + procedure FormCreate(Sender: TObject); + procedure ToolButton2Click(Sender: TObject); + procedure FromCoNamePropertiesChange(Sender: TObject); + private + canshu1, FStkName, canshu3: string; + procedure InitGrid(); + + { Private declarations } + public + + { Public declarations } + end; + +var + frmWBNeedLook: TfrmWBNeedLook; + +implementation + +uses + U_DataLink, U_RTFun; + +{$R *.dfm} + +procedure TfrmWBNeedLook.FormDestroy(Sender: TObject); +begin + inherited; + frmWBNeedLook := nil; +end; + +procedure TfrmWBNeedLook.FormClose(Sender: TObject; var Action: TCloseAction); +begin + inherited; + Action := caFree; +end; + +procedure TfrmWBNeedLook.FormCreate(Sender: TObject); +begin + inherited; + canshu1 := Trim(self.fParameters1); + FStkName := Trim(self.fParameters2); + canshu3 := Trim(self.fParameters3); +end; + +procedure TfrmWBNeedLook.InitGrid(); +begin + try + ADOQueryMain.DisableControls; + with ADOQueryMain do + begin + Filtered := False; + Close; + sql.Clear; + sql.Add(' EXEC P_TatWB_StkALL '); + + sql.Add(' select A.WBNo ORGWBNo,B.*,C.* from Tat_WB_Stk A inner join Tat_WB_IO B on A.STKTWIOID=B.TWIOID '); + sql.Add(' left join Tat_WB_Card C on C.WBCID=B.WBCID '); + sql.Add(' where B.IOFlag ='''' and B.IOType = ''ӹ'' and A.WBNo like ''%JZ%'' and isnull(CLFlag,0)=0 '); + + +// sql.Add(' select A.* '); +// sql.Add(' from Tat_WB_IO A '); +// sql.Add(' where A.STKName ='''' and A.IOFlag ='''' and A.WBNo like ''%JZ%'' and isnull(CLFlag,0)=0 '); +// sql.Add(' and not EXISTS (select * from Tat_WB_IO X where X.STKName ='''' and X.IOFlag ='''' and A.WBNO =X.WBNO) '); +// +// sql.Add(' UNION ALL '); +// +// sql.Add(' select A.* '); +// sql.Add(' from Tat_WB_IO A '); +// sql.Add(' where A.STKName ='''' and A.IOFlag ='''' and A.WBNo like ''%JZ%'' and isnull(CLFlag,0)=0 '); +// sql.Add(' and not EXISTS (select * from Tat_WB_IO X where X.STKName ='''' and X.IOFlag ='''' and A.WBNO =X.WBNO) '); +// ShowMessage(Sql.text); + Open; + end; + + SCreateCDS(ADOQueryMain, CDS_1); + SInitCDSData(ADOQueryMain, CDS_1); + finally + ADOQueryMain.EnableControls; + end; +end; + +procedure TfrmWBNeedLook.TBRafreshClick(Sender: TObject); +begin + InitGrid(); +end; + +procedure TfrmWBNeedLook.ConNoMChange(Sender: TObject); +begin + if ADOQueryMain.Active then + begin + SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2)); + end; +end; + +procedure TfrmWBNeedLook.TBCloseClick(Sender: TObject); +begin + + Close; +end; + +procedure TfrmWBNeedLook.FormShow(Sender: TObject); +begin + inherited; + ReadCxGrid(trim(Self.Caption), Tv1, 'Ⱦɫֿ'); + InitGrid(); +end; + +procedure TfrmWBNeedLook.TBFindClick(Sender: TObject); +begin + if ADOQueryMain.Active then + begin + SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2)); + SCreateCDS(ADOQueryMain, CDS_1); + SInitCDSData(ADOQueryMain, CDS_1); + end; +end; + +procedure TfrmWBNeedLook.MPRTCodeNameChange(Sender: TObject); +begin + TBFind.Click; +end; + +procedure TfrmWBNeedLook.SXBatchNOChange(Sender: TObject); +begin + TBFind.Click; +end; + +procedure TfrmWBNeedLook.FromCoNameChange(Sender: TObject); +begin + TBFind.Click; +end; + +procedure TfrmWBNeedLook.FromCoNamePropertiesChange(Sender: TObject); +begin + TBFind.Click; +end; + +procedure TfrmWBNeedLook.ToolButton2Click(Sender: TObject); +begin + WriteCxGrid(trim(Self.Caption), Tv1, 'Ⱦɫֿ'); +end; + +procedure TfrmWBNeedLook.Tv1CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean); +begin + ModalResult := 1; +end; + +end. + diff --git a/E02梭织经轴仓库/WarpBeamStk.dproj.local b/E02梭织经轴仓库/WarpBeamStk.dproj.local index 1f267a9..428f11e 100644 --- a/E02梭织经轴仓库/WarpBeamStk.dproj.local +++ b/E02梭织经轴仓库/WarpBeamStk.dproj.local @@ -125,19 +125,19 @@ - 1899-12-30 00:00:00.000.444,D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_WBSpecInPut.dfm - 1899-12-30 00:00:00.000.318,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_JT.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_XB.dfm - 1899-12-30 00:00:00.000.584,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_CZ.pas - 1899-12-30 00:00:00.000.556,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_SZ.pas - 1899-12-30 00:00:00.000.535,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_JT.pas - 1899-12-30 00:00:00.000.318,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_JT.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_XB.pas - 1899-12-30 00:00:00.000.585,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_XZ.pas - 1899-12-30 00:00:00.000.444,D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_WBSpecInPut.pas - 1899-12-30 00:00:00.000.922,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas - 1899-12-30 00:00:00.000.717,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A02基础产品管理\U_TatClothInfoInput.pas= - 1899-12-30 00:00:00.000.158,=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatGYSel.pas - 1899-12-30 00:00:00.000.512,=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas - 2025-07-10 16:55:54.423,D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatPlanSel2.pas=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas - 2025-07-10 16:55:54.423,D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatPlanSel2.dfm=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatPlanSel.dfm + 1899/12/30 00:00:00.000.535,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_JT.pas + 1899/12/30 00:00:00.000.717,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A02基础产品管理\U_TatClothInfoInput.pas= + 1899/12/30 00:00:00.000.444,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_WBSpecInPut.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.pas + 1899/12/30 00:00:00.000.444,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_WBSpecInPut.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.dfm + 1899/12/30 00:00:00.000.584,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_CZ.pas + 1899/12/30 00:00:00.000.318,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_XB.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_JT.pas + 1899/12/30 00:00:00.000.556,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_SZ.pas + 1899/12/30 00:00:00.000.585,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_XZ.pas + 1899/12/30 00:00:00.000.318,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_XB.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E02梭织经轴仓库\U_TatWBOutputList_JT.dfm + 1899/12/30 00:00:00.000.922,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas + 1899/12/30 00:00:00.000.423,D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatPlanSel.dfm=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatPlanSel2.dfm + 1899/12/30 00:00:00.000.158,=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatGYSel.pas + 1899/12/30 00:00:00.000.423,D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatPlanSel2.pas + 1899/12/30 00:00:00.000.512,=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas diff --git a/E02梭织经轴仓库/WarpBeamStk.identcache b/E02梭织经轴仓库/WarpBeamStk.identcache index 0540796..e481974 100644 Binary files a/E02梭织经轴仓库/WarpBeamStk.identcache and b/E02梭织经轴仓库/WarpBeamStk.identcache differ diff --git a/E02梭织经轴仓库/testDll.identcache b/E02梭织经轴仓库/testDll.identcache index 8e8dad4..5f7d627 100644 Binary files a/E02梭织经轴仓库/testDll.identcache and b/E02梭织经轴仓库/testDll.identcache differ diff --git a/E02梭织经轴仓库/testDll.res b/E02梭织经轴仓库/testDll.res index 2465ca0..e116c48 100644 Binary files a/E02梭织经轴仓库/testDll.res and b/E02梭织经轴仓库/testDll.res differ diff --git a/E04梭织坯布仓库/TatClothStk.dproj.local b/E04梭织坯布仓库/TatClothStk.dproj.local index 41dd0d5..1d3c3d8 100644 --- a/E04梭织坯布仓库/TatClothStk.dproj.local +++ b/E04梭织坯布仓库/TatClothStk.dproj.local @@ -1,95 +1,95 @@  - 1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas - 1899/12/30 00:00:00.000.471,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm - 1899/12/30 00:00:00.000.181,=D:\Dp10Repo\项目代码\路尚\B02基础纱线仓库\U_YarnInfoInPut.pas - 1899/12/30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas - 1899/12/30 00:00:00.000.456,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas - 1899/12/30 00:00:00.000.316,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_TatClothInfoInput.pas - 1899/12/30 00:00:00.000.471,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas - 1899/12/30 00:00:00.000.875,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.pas= - 1899/12/30 00:00:00.000.390,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.dfm - 1899/12/30 00:00:00.000.538,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRtInPut.dfm - 1899/12/30 00:00:00.000.408,D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothStkList.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E03梭织坯布检验\U_DCGCL.pas + 1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas + 1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas + 1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas 1899/12/30 00:00:00.000.559,=D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothInList_ZDDY.pas 1899/12/30 00:00:00.000.506,=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.pas - 1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas - 1899/12/30 00:00:00.000.930,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothInList.pas - 1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas - 1899/12/30 00:00:00.000.094,D:\Dp10Repo\项目代码\RTBasics\E03梭织坯布仓库\TatClothStk.dproj=D:\Dp10Repo\项目代码\RTBasics\E03梭织坯布仓库\KnitClothStk.dproj + 1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas + 1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas + 1899/12/30 00:00:00.000.456,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas + 1899/12/30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas + 1899/12/30 00:00:00.000.181,=D:\Dp10Repo\项目代码\路尚\B02基础纱线仓库\U_YarnInfoInPut.pas 1899/12/30 00:00:00.000.025,D:\Dp10RepoV1\项目代码\花蝴蝶\B03基础物料仓库\U_ProductInfoInPut.pas= - 1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas - 1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899/12/30 00:00:00.000.627,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas - 1899/12/30 00:00:00.000.390,=D:\Dp10Repo\项目代码\路尚\A00通用窗体\U_ProductInfoSel.pas + 1899/12/30 00:00:00.000.141,D:\Dp10RepoV1\项目代码\D10szJinCheng\B02基础纱线仓库\U_SXCKList.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothInList.dfm + 1899/12/30 00:00:00.000.541,=D:\Dp10Repo\项目代码\路尚\A00通用窗体\U_YarnInfoSel.pas + 1899/12/30 00:00:00.000.618,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoProcessListSel.pas + 1899/12/30 00:00:00.000.744,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoProcessInput.pas + 1899/12/30 00:00:00.000.094,D:\Dp10Repo\项目代码\RTBasics\E03梭织坯布仓库\KnitClothStk.dproj=D:\Dp10Repo\项目代码\RTBasics\E03梭织坯布仓库\TatClothStk.dproj + 1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas + 1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas + 1899/12/30 00:00:00.000.659,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.dfm=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.dfm + 1899/12/30 00:00:00.000.538,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRtInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.dfm + 1899/12/30 00:00:00.000.930,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothInList.pas + 1899/12/30 00:00:00.000.663,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRList.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas 1899/12/30 00:00:00.000.376,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitDRtInPut.pas + 1899/12/30 00:00:00.000.408,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E03梭织坯布检验\U_DCGCL.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothStkList.dfm 1899/12/30 00:00:00.000.280,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRSel.pas 1899/12/30 00:00:00.000.338,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_WBSpecSel.pas - 1899/12/30 00:00:00.000.663,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRList.dfm - 1899/12/30 00:00:00.000.390,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.pas=D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.pas - 1899/12/30 00:00:00.000.538,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRtInPut.pas + 1899/12/30 00:00:00.000.999,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothStkList.pas + 1899/12/30 00:00:00.000.390,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.dfm 1899/12/30 00:00:00.000.500,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas - 1899/12/30 00:00:00.000.141,D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothInList.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\B02基础纱线仓库\U_SXCKList.pas - 1899/12/30 00:00:00.000.720,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.dfm - 1899/12/30 00:00:00.000.862,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoTechnicsinput.pas - 1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas - 1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm + 1899/12/30 00:00:00.000.538,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRtInPut.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.pas + 1899/12/30 00:00:00.000.471,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.dfm + 1899/12/30 00:00:00.000.627,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas + 1899/12/30 00:00:00.000.390,=D:\Dp10Repo\项目代码\路尚\A00通用窗体\U_ProductInfoSel.pas + 1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm 1899/12/30 00:00:00.000.057,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitDRList.pas 1899/12/30 00:00:00.000.680,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas - 1899/12/30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas - 1899/12/30 00:00:00.000.999,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothStkList.pas + 1899/12/30 00:00:00.000.875,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.pas= + 1899/12/30 00:00:00.000.316,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_TatClothInfoInput.pas + 1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas 1899/12/30 00:00:00.000.752,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitPlanSel.pas= 1899/12/30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas 1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas= - 1899/12/30 00:00:00.000.408,D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothStkList.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E03梭织坯布检验\U_DCGCL.dfm - 1899/12/30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas= - 1899/12/30 00:00:00.000.442,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas + 1899/12/30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas + 1899/12/30 00:00:00.000.862,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoTechnicsinput.pas + 1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas 1899/12/30 00:00:00.000.187,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.pas= - 1899/12/30 00:00:00.000.720,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas=D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.pas + 1899/12/30 00:00:00.000.390,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.pas 1899/12/30 00:00:00.000.439,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas - 1899/12/30 00:00:00.000.813,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothOutList.pas - 1899/12/30 00:00:00.000.141,D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothInList.dfm=D:\Dp10RepoV1\项目代码\D10szJinCheng\B02基础纱线仓库\U_SXCKList.dfm + 1899/12/30 00:00:00.000.471,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.pas + 1899/12/30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas= 1899/12/30 00:00:00.000.267,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.pas - 1899/12/30 00:00:00.000.659,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.pas - 1899/12/30 00:00:00.000.411,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.pas= 1899/12/30 00:00:00.000.669,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothInEdit.pas - 1899/12/30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas + 1899/12/30 00:00:00.000.411,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.pas= + 1899/12/30 00:00:00.000.813,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothOutList.pas + 1899/12/30 00:00:00.000.442,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas + 1899/12/30 00:00:00.000.189,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothOutEdit.pas 1899/12/30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas 1899/12/30 00:00:00.000.436,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas - 1899/12/30 00:00:00.000.189,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothOutEdit.pas + 1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm 1899/12/30 00:00:00.000.231,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas - 1899/12/30 00:00:00.000.526,=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用组件\FrameDateSel.pas - 1899/12/30 00:00:00.000.663,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRList.pas - 1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas= - 1899/12/30 00:00:00.000.695,=D:\Dp10Repo\项目代码\路尚\B03基础物料仓库\U_ProductInfoInPut.pas + 1899/12/30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas 1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas + 1899/12/30 00:00:00.000.695,=D:\Dp10Repo\项目代码\路尚\B03基础物料仓库\U_ProductInfoInPut.pas + 1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas= 1899/12/30 00:00:00.000.038,D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\Unit1.pas= - 1899/12/30 00:00:00.000.326,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\T00贸易通用窗体\U_TradeSalesContractSel.pas - 1899/12/30 00:00:00.000.132,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitPlanSel.pas - 1899/12/30 00:00:00.000.961,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoInput.pas - 1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm - 1899/12/30 00:00:00.000.754,D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnInfoInPut.pas= - 1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas - 1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899/12/30 00:00:00.000.744,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoProcessInput.pas - 1899/12/30 00:00:00.000.618,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoProcessListSel.pas - 1899/12/30 00:00:00.000.541,=D:\Dp10Repo\项目代码\路尚\A00通用窗体\U_YarnInfoSel.pas - 1899/12/30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas - 1899/12/30 00:00:00.000.822,D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\KnitClothStk.dproj=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\InformationBase.dproj - 1899/12/30 00:00:00.000.139,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoTechnicsSel.pas - 1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas - 1899/12/30 00:00:00.000.659,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.dfm + 1899/12/30 00:00:00.000.526,=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用组件\FrameDateSel.pas 1899/12/30 00:00:00.000.378,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.pas= + 1899/12/30 00:00:00.000.961,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoInput.pas + 1899/12/30 00:00:00.000.720,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas + 1899/12/30 00:00:00.000.663,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm + 1899/12/30 00:00:00.000.754,D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnInfoInPut.pas= + 1899/12/30 00:00:00.000.408,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E03梭织坯布检验\U_DCGCL.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothStkList.pas + 1899/12/30 00:00:00.000.141,D:\Dp10RepoV1\项目代码\D10szJinCheng\B02基础纱线仓库\U_SXCKList.pas=D:\Dp10RepoV1\项目代码\D10szJinCheng\E04梭织坯布仓库\U_TatClothInList.pas + 1899/12/30 00:00:00.000.720,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm + 1899/12/30 00:00:00.000.132,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitPlanSel.pas + 1899/12/30 00:00:00.000.139,=D:\Dp10Repo\项目代码\路尚\A02基础产品管理\U_ClothInfoTechnicsSel.pas + 1899/12/30 00:00:00.000.822,D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\KnitClothStk.dproj 1899/12/30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas + 1899/12/30 00:00:00.000.659,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.pas=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.pas + 1899/12/30 00:00:00.000.326,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\T00贸易通用窗体\U_TradeSalesContractSel.pas + 1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas + 1899/12/30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas + 1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas 2025/07/03 14:12:23.000.877,=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E04梭织坯布仓库\U_TatClothStkList.pas 2025/07/12 10:29:31.000.435,=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E04梭织坯布仓库\U_TatClothStkSel.pas - 2025/07/12 10:34:14.410,D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E04梭织坯布仓库\U_TatClothStkSel.pas= - 2025/07/12 10:51:18.202,=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E04梭织坯布仓库\U_TatClothStkSel.pas - 2025/07/12 10:53:24.590,D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E04梭织坯布仓库\U_TatClothStkSel.pas= - 2025/07/12 10:53:58.993,=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E04梭织坯布仓库\U_TatClothStkSel.pas + 2025/07/12 10:34:14.000.410,D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E04梭织坯布仓库\U_TatClothStkSel.pas= + 2025/07/12 10:51:18.000.202,=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E04梭织坯布仓库\U_TatClothStkSel.pas + 2025/07/12 10:53:24.000.590,D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E04梭织坯布仓库\U_TatClothStkSel.pas= + 2025/07/12 10:53:58.000.993,=D:\Dp10RepoV1\项目代码\D10SZKaiXiYa\E04梭织坯布仓库\U_TatClothStkSel.pas diff --git a/E04梭织坯布仓库/TatClothStk.identcache b/E04梭织坯布仓库/TatClothStk.identcache index 786a13f..39de191 100644 Binary files a/E04梭织坯布仓库/TatClothStk.identcache and b/E04梭织坯布仓库/TatClothStk.identcache differ