投坯进度
This commit is contained in:
“ddf”
parent
2b5581cd90
commit
239a66ccb9
|
|
@ -1,62 +1,62 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<BorlandProject>
|
||||
<Transactions>
|
||||
<Transaction>1899/12/30 00:00:00.000.811,=D:\Dp10Repo\项目代码\RTBasics\D01针织生产计划\U_KnitPlanList.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.951,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.726,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.257,=D:\Dp10Repo\项目代码\恒赫\D01针织生产计划\U_MachPlanSet.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.911,=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.064,D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_KnitPlanSel.pas=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.509,D:\Dp10Repo\项目代码\RTBasics\D00针织通用窗体\U_KnitSalesContractSel.pas=D:\Dp10Repo\项目代码\RTBasics\T00贸易通用窗体\U_TradeSalesContractSel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.925,D:\Dp10Repo\项目代码\RTBasics\D01针织生产计划\Unit1.pas=</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.756,D:\Dp10Repo\项目代码\园中圆\D01针织生产计划\U_KnitPlanCardDel.pas=D:\Dp10Repo\项目代码\园中圆\D01针织生产计划\U_KnitPlanCard.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.139,D:\RTFormwork\项目代码\RTBasicsV1\A02基础产品管理\U_KnitClothInfoInput.pas=</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.983,D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_KnitPlanSel.pas=</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.612,=D:\Dp10Repo\项目代码\RTBasics\D00针织通用窗体\U_KnitPlanSel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.111,=D:\Dp10Repo\项目代码\共佳\B02基础纱线仓库\U_YarnInfoInPut.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.140,=D:\RTFormwork\public10\design\U_cxGridCustomSet.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.881,=D:\Dp10Repo\项目代码\RTBasics\D01针织生产计划\U_KnitCardInPut.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.638,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.031,=D:\Dp10Repo\项目代码\RTBasics\T00贸易通用窗体\U_TradeSalesContractSel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.756,D:\Dp10Repo\项目代码\园中圆\D01针织生产计划\U_KnitPlanCardDel.dfm=D:\Dp10Repo\项目代码\园中圆\D01针织生产计划\U_KnitPlanCard.dfm</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.264,=D:\Dp10Repo\项目代码\RTBasics\D01针织生产计划\U_KnitPlanCard.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.667,=D:\Dp10Repo\项目代码\共佳\A02基础产品管理\U_KnitClothInfoInput.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas=</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.181,=D:\RTFormwork\public10\design\U_FormLayOutDesign.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.798,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.709,D:\RTFormwork\项目代码\RTBasicsV1\B02基础纱线仓库\U_YarnInfoInPut.pas=</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.509,D:\Dp10Repo\项目代码\RTBasics\D00针织通用窗体\U_KnitSalesContractSel.dfm=D:\Dp10Repo\项目代码\RTBasics\T00贸易通用窗体\U_TradeSalesContractSel.dfm</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.929,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatCardInPut.pas=</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.064,D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_KnitPlanSel.dfm=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.dfm</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.945,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_KnitClothInfoSel.pas</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.988,D:\Dp10Repo\项目代码\RTBasics\D01针织生产计划\KnitPlan.dproj=D:\Dp10Repo\项目代码\RTBasics\D01针织生产计划\InformationBase.dproj</Transaction>
|
||||
<Transaction>1899/12/30 00:00:00.000.232,=D:\RTFormwork\项目代码\RTBasicsV1\A00通用窗体\U_LoomSel.pas</Transaction>
|
||||
<Transaction>2024/07/16 16:57:34.000.480,=D:\RTFormwork\项目代码\RTBasicsV1\A00通用组件\FramePagingSel.pas</Transaction>
|
||||
<Transaction>2024/07/16 16:57:34.000.356,=D:\RTFormwork\项目代码\RTBasicsV1\A00通用组件\FrameDateSel.pas</Transaction>
|
||||
<Transaction>2024/07/16 17:00:42.000.758,=D:\RTFormwork\public10\design\U_BaseDataLink.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.811,=D:\Dp10Repo\项目代码\RTBasics\D01针织生产计划\U_KnitPlanList.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.951,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.726,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.257,=D:\Dp10Repo\项目代码\恒赫\D01针织生产计划\U_MachPlanSet.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.064,D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.pas=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_KnitPlanSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.911,=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.756,D:\Dp10Repo\项目代码\园中圆\D01针织生产计划\U_KnitPlanCard.dfm=D:\Dp10Repo\项目代码\园中圆\D01针织生产计划\U_KnitPlanCardDel.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.925,D:\Dp10Repo\项目代码\RTBasics\D01针织生产计划\Unit1.pas=</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.509,D:\Dp10Repo\项目代码\RTBasics\T00贸易通用窗体\U_TradeSalesContractSel.dfm=D:\Dp10Repo\项目代码\RTBasics\D00针织通用窗体\U_KnitSalesContractSel.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.139,D:\RTFormwork\项目代码\RTBasicsV1\A02基础产品管理\U_KnitClothInfoInput.pas=</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.983,D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_KnitPlanSel.pas=</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.612,=D:\Dp10Repo\项目代码\RTBasics\D00针织通用窗体\U_KnitPlanSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.111,=D:\Dp10Repo\项目代码\共佳\B02基础纱线仓库\U_YarnInfoInPut.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.140,=D:\RTFormwork\public10\design\U_cxGridCustomSet.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.756,D:\Dp10Repo\项目代码\园中圆\D01针织生产计划\U_KnitPlanCard.pas=D:\Dp10Repo\项目代码\园中圆\D01针织生产计划\U_KnitPlanCardDel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.031,=D:\Dp10Repo\项目代码\RTBasics\T00贸易通用窗体\U_TradeSalesContractSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.509,D:\Dp10Repo\项目代码\RTBasics\T00贸易通用窗体\U_TradeSalesContractSel.pas=D:\Dp10Repo\项目代码\RTBasics\D00针织通用窗体\U_KnitSalesContractSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.181,=D:\RTFormwork\public10\design\U_FormLayOutDesign.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.638,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.988,D:\Dp10Repo\项目代码\RTBasics\D01针织生产计划\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\D01针织生产计划\KnitPlan.dproj</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.798,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.709,D:\RTFormwork\项目代码\RTBasicsV1\B02基础纱线仓库\U_YarnInfoInPut.pas=</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.945,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_KnitClothInfoSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.232,=D:\RTFormwork\项目代码\RTBasicsV1\A00通用窗体\U_LoomSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.881,=D:\Dp10Repo\项目代码\RTBasics\D01针织生产计划\U_KnitCardInPut.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.929,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatCardInPut.pas=</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.667,=D:\Dp10Repo\项目代码\共佳\A02基础产品管理\U_KnitClothInfoInput.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.064,D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.dfm=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_KnitPlanSel.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas=</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.264,=D:\Dp10Repo\项目代码\RTBasics\D01针织生产计划\U_KnitPlanCard.pas</Transaction>
|
||||
<Transaction>2024-07-16 16:57:34.000.356,=D:\RTFormwork\项目代码\RTBasicsV1\A00通用组件\FrameDateSel.pas</Transaction>
|
||||
<Transaction>2024-07-16 16:57:34.000.480,=D:\RTFormwork\项目代码\RTBasicsV1\A00通用组件\FramePagingSel.pas</Transaction>
|
||||
<Transaction>2024-07-16 17:00:42.000.758,=D:\RTFormwork\public10\design\U_BaseDataLink.pas</Transaction>
|
||||
</Transactions>
|
||||
<ProjectSortOrder AutoSort="0" SortType="0">
|
||||
<File Path="android-support-v4.dex.jar"/>
|
||||
|
|
|
|||
Binary file not shown.
|
|
@ -382,8 +382,8 @@ inherited frmKnitPlanInPut: TfrmKnitPlanInPut
|
|||
ParentFont = False
|
||||
end
|
||||
object Label4: TLabel
|
||||
Left = 1260
|
||||
Top = 132
|
||||
Left = 893
|
||||
Top = 158
|
||||
Width = 65
|
||||
Height = 12
|
||||
Caption = #21152#24037#21333#20301#65306
|
||||
|
|
@ -393,7 +393,6 @@ inherited frmKnitPlanInPut: TfrmKnitPlanInPut
|
|||
Font.Name = #23435#20307
|
||||
Font.Style = [fsBold]
|
||||
ParentFont = False
|
||||
Visible = False
|
||||
end
|
||||
object Label6: TLabel
|
||||
Left = 916
|
||||
|
|
@ -1018,13 +1017,12 @@ inherited frmKnitPlanInPut: TfrmKnitPlanInPut
|
|||
#35797#26679#21333)
|
||||
end
|
||||
object FtyCoName: TBtnEditC
|
||||
Left = 1321
|
||||
Top = 128
|
||||
Left = 954
|
||||
Top = 154
|
||||
Width = 120
|
||||
Height = 20
|
||||
ReadOnly = True
|
||||
TabOrder = 22
|
||||
Visible = False
|
||||
OnBtnUpClick = FtyCoNameBtnUpClick
|
||||
OnBtnDnClick = CustNameBtnDnClick
|
||||
end
|
||||
|
|
|
|||
|
|
@ -276,11 +276,11 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
ParentFont = False
|
||||
Properties.DropDownListStyle = lsFixedList
|
||||
Properties.Items.Strings = (
|
||||
'M'
|
||||
'Y'
|
||||
'Kg')
|
||||
''
|
||||
#22823#36135#21333
|
||||
#22806#21457#21333
|
||||
#35797#26679#21333)
|
||||
TabOrder = 5
|
||||
Text = 'M'
|
||||
Width = 150
|
||||
end
|
||||
inline frmFrameDateSel1: TfrmFrameDateSel
|
||||
|
|
@ -315,8 +315,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
Align = alClient
|
||||
PopupMenu = PopupMenu1
|
||||
TabOrder = 2
|
||||
ExplicitTop = 217
|
||||
ExplicitHeight = 425
|
||||
object Tv1: TcxGridDBTableView
|
||||
Navigator.Buttons.CustomButtons = <>
|
||||
ScrollbarAnnotations.CustomAnnotations = <>
|
||||
|
|
@ -392,17 +390,12 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
OptionsCustomize.ColumnFiltering = False
|
||||
OptionsView.Footer = True
|
||||
OptionsView.GroupByBox = False
|
||||
Styles.IncSearch = DataLink_KnitPlan.SHuangSe
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Styles.Inactive = DataLink_KnitPlan.SHuangSe
|
||||
Styles.Selection = DataLink_KnitPlan.SHuangSe
|
||||
object v1OrderNo: TcxGridDBColumn
|
||||
Caption = #21512#21516#21495
|
||||
DataBinding.FieldName = 'ConNo'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 100
|
||||
end
|
||||
object Tv1Column2: TcxGridDBColumn
|
||||
|
|
@ -427,7 +420,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 71
|
||||
end
|
||||
object Tv1Column1: TcxGridDBColumn
|
||||
|
|
@ -447,7 +439,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
Properties.ShowTime = False
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 82
|
||||
end
|
||||
object v1Column21: TcxGridDBColumn
|
||||
|
|
@ -456,7 +447,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 92
|
||||
end
|
||||
object v1Column2: TcxGridDBColumn
|
||||
|
|
@ -465,7 +455,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 73
|
||||
end
|
||||
object v1Column20: TcxGridDBColumn
|
||||
|
|
@ -482,7 +471,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 67
|
||||
end
|
||||
object v1PRTMF: TcxGridDBColumn
|
||||
|
|
@ -491,7 +479,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 69
|
||||
end
|
||||
object Tv1Column3: TcxGridDBColumn
|
||||
|
|
@ -508,7 +495,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 76
|
||||
end
|
||||
object v1Column6: TcxGridDBColumn
|
||||
|
|
@ -517,7 +503,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 59
|
||||
end
|
||||
object v1Column22: TcxGridDBColumn
|
||||
|
|
@ -526,7 +511,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 63
|
||||
end
|
||||
object v1Column7: TcxGridDBColumn
|
||||
|
|
@ -535,7 +519,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 72
|
||||
end
|
||||
object v1PRTOrderQty: TcxGridDBColumn
|
||||
|
|
@ -544,7 +527,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 92
|
||||
end
|
||||
object v1Column12: TcxGridDBColumn
|
||||
|
|
@ -553,7 +535,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 64
|
||||
end
|
||||
object v1Column4: TcxGridDBColumn
|
||||
|
|
@ -562,7 +543,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Styles.Header = DataLink_KnitPlan.Default
|
||||
Width = 68
|
||||
end
|
||||
object Tv1Column7: TcxGridDBColumn
|
||||
|
|
@ -623,7 +603,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
#24050#32467#26463
|
||||
#20840#37096)
|
||||
OnChange = cxTabControl1Change
|
||||
ExplicitTop = 189
|
||||
ClientRectBottom = 30
|
||||
ClientRectRight = 1540
|
||||
ClientRectTop = 30
|
||||
|
|
@ -635,8 +614,6 @@ inherited frmKnitPlanList: TfrmKnitPlanList
|
|||
Height = 453
|
||||
Align = alRight
|
||||
TabOrder = 4
|
||||
ExplicitTop = 217
|
||||
ExplicitHeight = 425
|
||||
object Label6: TLabel
|
||||
Left = 28
|
||||
Top = 48
|
||||
|
|
|
|||
|
|
@ -278,11 +278,10 @@ begin
|
|||
2:
|
||||
begin
|
||||
sql.Add('and isnull(Status,''0'') =''10'' ');
|
||||
sql.Add(' and A.FillTIme>=''' + Trim(FormatDateTime('yyyy-MM-dd', frmFrameDateSel1.BegDate.Date)) + '''');
|
||||
sql.Add(' and A.FillTIme<''' + Trim(FormatDateTime('yyyy-MM-dd',frmFrameDateSel1. EndDate.Date + 1)) + '''');
|
||||
end;
|
||||
end;
|
||||
sql.add('order by A.FILLTIME DESC');
|
||||
// ShowMessage(sql.Text);
|
||||
Open;
|
||||
end;
|
||||
SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
|
||||
|
|
|
|||
|
|
@ -31,7 +31,7 @@ uses
|
|||
U_PictureUpload in '..\A00ͨÓô°Ìå\U_PictureUpload.pas' {frmPictureUpload},
|
||||
U_ZDYHelpSel in '..\..\..\public10\ThreeFun\Form\U_ZDYHelpSel.pas' {frmZDYHelpSel},
|
||||
U_TradePlanScheduleDetail in 'U_TradePlanScheduleDetail.pas' {frmTradePlanScheduleDetail},
|
||||
U_TradePlanSchedule in 'U_TradePlanSchedule.pas' {frmTradePlanSchedule},
|
||||
U_TradePlanSchedule1 in 'U_TradePlanSchedule1.pas' {frmTradePlanSchedule1},
|
||||
U_SysLogHelp in '..\..\..\public10\ThreeFun\Form\U_SysLogHelp.pas' {frmSysLogHelp},
|
||||
U_BaseDataLink in '..\..\..\public10\design\U_BaseDataLink.pas' {BaseDataLink: TDataModule},
|
||||
U_TradePlanColorList in 'U_TradePlanColorList.pas' {frmTradePlanColorList},
|
||||
|
|
|
|||
|
|
@ -211,8 +211,8 @@
|
|||
<Form>frmTradePlanScheduleDetail</Form>
|
||||
<FormType>dfm</FormType>
|
||||
</DCCReference>
|
||||
<DCCReference Include="U_TradePlanSchedule.pas">
|
||||
<Form>frmTradePlanSchedule</Form>
|
||||
<DCCReference Include="U_TradePlanSchedule1.pas">
|
||||
<Form>frmTradePlanSchedule1</Form>
|
||||
<FormType>dfm</FormType>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\..\..\public10\ThreeFun\Form\U_SysLogHelp.pas">
|
||||
|
|
|
|||
|
|
@ -1,37 +1,38 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<BorlandProject>
|
||||
<Transactions>
|
||||
<Transaction>1899-12-30 00:00:00.000.537,=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanCard.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.568,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.472,=D:\Dp10Repo\public10\ThreeFun\Form\U_SysLogHelp.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.030,=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanProfit.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.937,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanColorInPut.dfm=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanProofInPut.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.329,=D:\Dp10Repo\项目代码\RTBasics\G01贸易生产计划\U_TradeInspSet.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.629,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanColorList.pas=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanProofList.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.537,=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanCard.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.764,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradeCardInStk.pas=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradeCardInPut.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.505,D:\Dp10RepoV1\项目代码\花蝴蝶\T01贸易生产计划\U_TradeLabelSel.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\T01贸易生产计划\U_TradeInspSet.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.440,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_InputBoxCard.pas=D:\Dp10RepoV1\项目代码\须上\A00通用窗体\U_InputBoxSingleNumber.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.629,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanColorList.pas=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanProofList.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.937,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanColorInPut.pas=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanProofInPut.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.904,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelpSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.314,=D:\Dp10RepoV1\项目代码\花蝴蝶\T01贸易生产计划\U_TradePlanInPut.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.514,D:\Dp10Repo\项目代码\RTBasics\G01贸易生产计划\TradePlan.dproj=D:\Dp10Repo\项目代码\RTBasics\G01贸易生产计划\InformationBase.dproj</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.505,D:\Dp10RepoV1\项目代码\花蝴蝶\T01贸易生产计划\U_TradeLabelSel.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\T01贸易生产计划\U_TradeInspSet.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.832,=D:\Dp10Repo\项目代码\RTBasics\G01贸易生产计划\U_TradePlanList.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.764,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradeCardInStk.dfm=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradeCardInPut.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.314,=D:\Dp10RepoV1\项目代码\花蝴蝶\T01贸易生产计划\U_TradePlanInPut.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.600,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.994,=D:\Dp10Repo\项目代码\RTBasics\T01贸易生产计划\U_TradePlanScheduleDetail.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.276,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_UserSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.681,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.764,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradeCardInStk.dfm=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradeCardInPut.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.956,D:\Dp10Repo\项目代码\RTBasics\T01贸易生产计划\U_TradePlanList.pas=D:\Dp10Repo\项目代码\RTBasics\T01贸易生产计划\U_TradePlanMulFtyList.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.276,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_UserSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.332,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.904,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelpSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.956,D:\Dp10Repo\项目代码\RTBasics\T01贸易生产计划\U_TradePlanList.pas=D:\Dp10Repo\项目代码\RTBasics\T01贸易生产计划\U_TradePlanMulFtyList.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction>
|
||||
|
|
@ -45,32 +46,33 @@
|
|||
<Transaction>1899-12-30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas=</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.396,=D:\Dp10RepoV1\项目代码\花蝴蝶\A00通用组件\FrameDateSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.713,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.649,=D:\Dp10Repo\项目代码\RTBasics\T01贸易生产计划\U_TradePlanSchedule.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.134,=D:\Dp10Repo\项目代码\RTBasics\G00贸易通用窗体\U_TradeSalesContractSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.649,=D:\Dp10Repo\项目代码\RTBasics\T01贸易生产计划\U_TradePlanSchedule.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.713,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.747,=D:\RTFormwork\项目代码\RTBasicsV1\T01贸易生产计划\U_TradePlanList.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.956,D:\Dp10Repo\项目代码\RTBasics\T01贸易生产计划\U_TradePlanList.dfm=D:\Dp10Repo\项目代码\RTBasics\T01贸易生产计划\U_TradePlanMulFtyList.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.081,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanProofInPut.pas=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanInPut.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.442,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\PdfPrint.dll=</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.103,=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\PdfPrint.dll</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.440,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_InputBoxCard.pas=D:\Dp10RepoV1\项目代码\须上\A00通用窗体\U_InputBoxSingleNumber.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.629,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanColorList.dfm=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanProofList.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.442,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\PdfPrint.dll=</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.780,=D:\Dp10RepoV1\项目代码\花蝴蝶\T01贸易生产计划\U_TradePlanList.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.629,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanColorList.dfm=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanProofList.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.440,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_InputBoxCard.dfm=D:\Dp10RepoV1\项目代码\须上\A00通用窗体\U_InputBoxSingleNumber.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.081,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanProofInPut.pas=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanInPut.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.686,=D:\Dp10RepoV1\项目代码\须上\A00通用窗体\U_InputBoxSingleNumber.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.082,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanProofInPut.dfm=D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_TradePlanInPut.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.560,=D:\Dp10RepoV1\public10\ThreeFun\Fun\U_printPdf.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.370,=D:\Dp10Repo\项目代码\RTBasics\T00贸易通用窗体\U_TradePlanSel.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.686,=D:\Dp10RepoV1\项目代码\须上\A00通用窗体\U_InputBoxSingleNumber.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.956,D:\Dp10Repo\项目代码\RTBasics\T01贸易生产计划\U_TradePlanList.dfm=D:\Dp10Repo\项目代码\RTBasics\T01贸易生产计划\U_TradePlanMulFtyList.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.424,=D:\Dp10RepoV1\项目代码\须上\A00通用窗体\U_InputBoxSingleString.pas</Transaction>
|
||||
<Transaction>1899-12-30 00:00:00.000.440,D:\Dp10RepoV1\项目代码\须上\T01贸易生产计划\U_InputBoxCard.dfm=D:\Dp10RepoV1\项目代码\须上\A00通用窗体\U_InputBoxSingleNumber.dfm</Transaction>
|
||||
<Transaction>2024-07-23 21:02:39.334,D:\RTFormwork\项目代码\RTBasicsV1\T01贸易生产计划\U_TradePlanSchedule1.pas=D:\RTFormwork\项目代码\RTBasicsV1\T01贸易生产计划\U_TradePlanSchedule.pas</Transaction>
|
||||
<Transaction>2024-07-23 21:02:39.334,D:\RTFormwork\项目代码\RTBasicsV1\T01贸易生产计划\U_TradePlanSchedule1.dfm=D:\RTFormwork\项目代码\RTBasicsV1\T01贸易生产计划\U_TradePlanSchedule.dfm</Transaction>
|
||||
</Transactions>
|
||||
<ProjectSortOrder AutoSort="0" SortType="0">
|
||||
<File Path="android-support-v4.dex.jar"/>
|
||||
|
|
@ -141,10 +143,10 @@
|
|||
<File Path="..\..\..\public10\design\U_BaseList.pas"/>
|
||||
<File Path="..\..\..\public10\design\U_BaseList.dfm"/>
|
||||
<File Path="..\..\..\public10\design\U_cxGridCustomCss.pas"/>
|
||||
<File Path="..\..\..\public10\design\U_globalVar.pas"/>
|
||||
<File Path="..\..\..\public10\design\U_WindowFormdesign.pas"/>
|
||||
<File Path="..\..\..\public10\design\U_cxGridCustomSet.pas"/>
|
||||
<File Path="..\..\..\public10\design\U_FormLayOutDesign.pas"/>
|
||||
<File Path="..\..\..\public10\design\U_globalVar.pas"/>
|
||||
<File Path="..\..\..\public10\design\U_WindowFormdesign.pas"/>
|
||||
<File Path="..\..\..\public10\ThreeFun"/>
|
||||
<File Path="..\..\..\public10\ThreeFun\Form"/>
|
||||
<File Path="..\..\..\public10\ThreeFun\Form\U_SysLogHelp.pas"/>
|
||||
|
|
@ -165,8 +167,6 @@
|
|||
<File Path="U_TradePlanMulFtyList.dfm"/>
|
||||
<File Path="U_TradePlanScheduleDetail.pas"/>
|
||||
<File Path="U_TradePlanScheduleDetail.dfm"/>
|
||||
<File Path="U_TradePlanSchedule.pas"/>
|
||||
<File Path="U_TradePlanSchedule.dfm"/>
|
||||
<File Path="U_TradeLabelSel.pas"/>
|
||||
<File Path="U_TradeLabelSel.dfm"/>
|
||||
<File Path="U_TradePlanProfit.pas"/>
|
||||
|
|
@ -183,5 +183,7 @@
|
|||
<File Path="U_TradeCardInStk.dfm"/>
|
||||
<File Path="U_TradePlanList.pas"/>
|
||||
<File Path="U_TradePlanList.dfm"/>
|
||||
<File Path="U_TradePlanSchedule1.pas"/>
|
||||
<File Path="U_TradePlanSchedule1.dfm"/>
|
||||
</ProjectSortOrder>
|
||||
</BorlandProject>
|
||||
|
|
|
|||
Binary file not shown.
|
|
@ -17,7 +17,7 @@ implementation
|
|||
uses
|
||||
U_DataLink, U_iniParam, U_TradePlanList, U_TradePlanProofList,
|
||||
U_TradePlanColorList, U_TradePlanMulFtyList, U_TradePlanSchedule,
|
||||
U_TradePlanProfit, U_TradePlanCard;
|
||||
U_TradePlanProfit, U_TradePlanCard, U_TradePlanSchedule1;
|
||||
|
||||
/////////////////////////////////////////////////////////////////
|
||||
// 功能说明:取Dll中得窗体 //
|
||||
|
|
@ -163,7 +163,7 @@ begin
|
|||
end;
|
||||
end;
|
||||
|
||||
211: //生产计划进度
|
||||
211: //计划单生产计划进度
|
||||
begin
|
||||
with TfrmTradePlanSchedule.Create(Application.MainForm, Title, trim(Parameters1), trim(Parameters2), trim(Parameters3), trim(Parameters4), trim(Parameters5), trim(Parameters10)) do //
|
||||
begin
|
||||
|
|
@ -175,6 +175,18 @@ begin
|
|||
end;
|
||||
end;
|
||||
|
||||
212: //坯布投坯进度
|
||||
begin
|
||||
with TfrmTradePlanSchedule1.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;
|
||||
|
||||
311: //订单利润查询
|
||||
begin
|
||||
with TfrmTradePlanProfit.Create(Application.MainForm, Title, trim(Parameters1), trim(Parameters2), trim(Parameters3), trim(Parameters4), trim(Parameters5), trim(Parameters10)) do //
|
||||
|
|
|
|||
|
|
@ -753,8 +753,8 @@ inherited frmTradePlanSchedule: TfrmTradePlanSchedule
|
|||
object CDS_1: TClientDataSet
|
||||
Aggregates = <>
|
||||
Params = <>
|
||||
Left = 472
|
||||
Top = 200
|
||||
Left = 533
|
||||
Top = 449
|
||||
end
|
||||
object RMGridReport1: TRMGridReport
|
||||
ThreadPrepareReport = True
|
||||
|
|
|
|||
850
项目代码/RTBasicsV1/T01贸易生产计划/U_TradePlanSchedule1.dfm
Normal file
850
项目代码/RTBasicsV1/T01贸易生产计划/U_TradePlanSchedule1.dfm
Normal file
|
|
@ -0,0 +1,850 @@
|
|||
inherited frmTradePlanSchedule1: TfrmTradePlanSchedule1
|
||||
Left = 274
|
||||
Top = 193
|
||||
Caption = #35746#21333#36827#24230
|
||||
ClientHeight = 910
|
||||
ClientWidth = 1894
|
||||
Font.Height = -16
|
||||
Position = poScreenCenter
|
||||
WindowState = wsMaximized
|
||||
ExplicitWidth = 1910
|
||||
ExplicitHeight = 949
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 21
|
||||
object ToolBar1: TToolBar [0]
|
||||
Tag = 1
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 1894
|
||||
Height = 30
|
||||
AutoSize = True
|
||||
ButtonHeight = 30
|
||||
ButtonWidth = 99
|
||||
Caption = 'ToolBar1'
|
||||
Color = clSkyBlue
|
||||
DisabledImages = DataLink_TradePlan.cxImageList_bar
|
||||
Images = DataLink_TradePlan.cxImageList_bar
|
||||
List = True
|
||||
ParentColor = False
|
||||
ShowCaptions = True
|
||||
TabOrder = 0
|
||||
ExplicitWidth = 1595
|
||||
object TBRafresh: TToolButton
|
||||
Left = 0
|
||||
Top = 0
|
||||
AutoSize = True
|
||||
Caption = #21047#26032
|
||||
ImageIndex = 1
|
||||
OnClick = TBRafreshClick
|
||||
end
|
||||
object ToolButton2: TToolButton
|
||||
Left = 71
|
||||
Top = 0
|
||||
AutoSize = True
|
||||
Caption = #36807#28388
|
||||
ImageIndex = 0
|
||||
OnClick = ToolButton2Click
|
||||
end
|
||||
object ToolButton1: TToolButton
|
||||
Left = 142
|
||||
Top = 0
|
||||
AutoSize = True
|
||||
Caption = #23548#20986
|
||||
ImageIndex = 20
|
||||
OnClick = ToolButton1Click
|
||||
end
|
||||
object ToolButton3: TToolButton
|
||||
Left = 213
|
||||
Top = 0
|
||||
AutoSize = True
|
||||
Caption = #25171#21360
|
||||
ImageIndex = 21
|
||||
OnClick = ToolButton3Click
|
||||
end
|
||||
object ToolButton5: TToolButton
|
||||
Left = 284
|
||||
Top = 0
|
||||
AutoSize = True
|
||||
Caption = #20445#23384#26684#24335
|
||||
ImageIndex = 16
|
||||
OnClick = ToolButton5Click
|
||||
end
|
||||
object TBClose: TToolButton
|
||||
Left = 387
|
||||
Top = 0
|
||||
AutoSize = True
|
||||
Caption = #20851#38381
|
||||
ImageIndex = 7
|
||||
OnClick = TBCloseClick
|
||||
end
|
||||
end
|
||||
object Panel1: TPanel [1]
|
||||
Left = 0
|
||||
Top = 30
|
||||
Width = 1894
|
||||
Height = 87
|
||||
Align = alTop
|
||||
BevelInner = bvRaised
|
||||
BevelOuter = bvLowered
|
||||
Color = clWhite
|
||||
ParentBackground = False
|
||||
TabOrder = 1
|
||||
object Label4: TLabel
|
||||
Left = 452
|
||||
Top = 50
|
||||
Width = 64
|
||||
Height = 21
|
||||
Caption = #25105#26041#21333#20301
|
||||
end
|
||||
object Label9: TLabel
|
||||
Left = 24
|
||||
Top = 50
|
||||
Width = 64
|
||||
Height = 21
|
||||
Caption = #37319#36141#21333#21495
|
||||
end
|
||||
object Label3: TLabel
|
||||
Left = 246
|
||||
Top = 50
|
||||
Width = 48
|
||||
Height = 21
|
||||
Caption = #20379#24212#21830
|
||||
end
|
||||
inline frmFrameDateSel1: TfrmFrameDateSel
|
||||
Left = 2
|
||||
Top = 2
|
||||
Width = 1890
|
||||
Height = 37
|
||||
Align = alTop
|
||||
Color = clWhite
|
||||
ParentBackground = False
|
||||
ParentColor = False
|
||||
TabOrder = 0
|
||||
ExplicitLeft = 2
|
||||
ExplicitTop = 2
|
||||
ExplicitWidth = 1591
|
||||
inherited BegDate: TcxDateEdit
|
||||
ExplicitHeight = 33
|
||||
end
|
||||
inherited EndDate: TcxDateEdit
|
||||
ExplicitHeight = 33
|
||||
end
|
||||
inherited cbbType: TcxComboBox
|
||||
ExplicitHeight = 33
|
||||
end
|
||||
end
|
||||
object BuyName: TcxTextEdit
|
||||
Tag = 2
|
||||
Left = 520
|
||||
Top = 44
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
Width = 150
|
||||
end
|
||||
object PurNo: TcxTextEdit
|
||||
Tag = 2
|
||||
Left = 92
|
||||
Top = 44
|
||||
ParentFont = False
|
||||
TabOrder = 2
|
||||
Width = 150
|
||||
end
|
||||
object SellName: TcxTextEdit
|
||||
Tag = 2
|
||||
Left = 298
|
||||
Top = 44
|
||||
ParentFont = False
|
||||
TabOrder = 3
|
||||
Width = 150
|
||||
end
|
||||
end
|
||||
object cxGrid1: TcxGrid [2]
|
||||
Left = 0
|
||||
Top = 117
|
||||
Width = 1894
|
||||
Height = 400
|
||||
Align = alTop
|
||||
BorderStyle = cxcbsNone
|
||||
TabOrder = 2
|
||||
ExplicitTop = 137
|
||||
ExplicitWidth = 1595
|
||||
object TV1: TcxGridDBTableView
|
||||
Navigator.Buttons.CustomButtons = <>
|
||||
ScrollbarAnnotations.CustomAnnotations = <>
|
||||
OnFocusedRecordChanged = TV1FocusedRecordChanged
|
||||
DataController.DataSource = DS_1
|
||||
DataController.Filter.AutoDataSetFilter = True
|
||||
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
|
||||
DataController.Summary.DefaultGroupSummaryItems = <
|
||||
item
|
||||
Format = '0'
|
||||
Position = spFooter
|
||||
end
|
||||
item
|
||||
Format = '0'
|
||||
Position = spFooter
|
||||
Column = v1PRTOrderQty
|
||||
end
|
||||
item
|
||||
Format = '0'
|
||||
Position = spFooter
|
||||
Column = v1PRTPrice
|
||||
end>
|
||||
DataController.Summary.FooterSummaryItems = <
|
||||
item
|
||||
Kind = skSum
|
||||
Column = v1PRTOrderQty
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
Column = cxGridDBColumn9
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
Column = TV1Column8
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
Column = TV1Column7
|
||||
end>
|
||||
DataController.Summary.SummaryGroups = <>
|
||||
OptionsBehavior.FocusCellOnTab = True
|
||||
OptionsBehavior.GoToNextCellOnEnter = True
|
||||
OptionsBehavior.FocusCellOnCycle = True
|
||||
OptionsCustomize.ColumnFiltering = False
|
||||
OptionsData.Deleting = False
|
||||
OptionsData.DeletingConfirmation = False
|
||||
OptionsView.Footer = True
|
||||
OptionsView.GroupByBox = False
|
||||
object TV1Column4: TcxGridDBColumn
|
||||
Caption = #19979#21333#26085#26399
|
||||
DataBinding.FieldName = 'PurDate'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 104
|
||||
end
|
||||
object TV1Column2: TcxGridDBColumn
|
||||
Caption = #37319#36141#21333#21495
|
||||
DataBinding.FieldName = 'PurNo'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 109
|
||||
end
|
||||
object TV1Column1: TcxGridDBColumn
|
||||
Caption = #20379#24212#21830
|
||||
DataBinding.FieldName = 'SellName'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 107
|
||||
end
|
||||
object TV1Column3: TcxGridDBColumn
|
||||
Caption = #20132#36135#26085#26399
|
||||
DataBinding.FieldName = 'DlyDate'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 106
|
||||
end
|
||||
object TV1Column5: TcxGridDBColumn
|
||||
Caption = #31867#22411
|
||||
DataBinding.FieldName = 'C_Degree'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 91
|
||||
end
|
||||
object VC_SCSCode: TcxGridDBColumn
|
||||
Caption = #20135#21697#32534#21495
|
||||
DataBinding.FieldName = 'C_Code'
|
||||
DataBinding.IsNullValueType = True
|
||||
PropertiesClassName = 'TcxButtonEditProperties'
|
||||
Properties.Buttons = <
|
||||
item
|
||||
Default = True
|
||||
Kind = bkEllipsis
|
||||
end>
|
||||
Properties.ReadOnly = False
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 92
|
||||
end
|
||||
object cxGridDBColumn2: TcxGridDBColumn
|
||||
Caption = #20013#25991#21697#21517
|
||||
DataBinding.FieldName = 'C_Name'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 93
|
||||
end
|
||||
object TV1Column12: TcxGridDBColumn
|
||||
Caption = #24067#31181
|
||||
DataBinding.FieldName = 'GC_Name'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 68
|
||||
end
|
||||
object TV1Column14: TcxGridDBColumn
|
||||
Caption = #21518#25972#29702#20013#25991
|
||||
DataBinding.FieldName = 'CraftName'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 99
|
||||
end
|
||||
object TV1Column13: TcxGridDBColumn
|
||||
Caption = #21152#24037#21035
|
||||
DataBinding.FieldName = 'CraftCode'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 87
|
||||
end
|
||||
object v1Column5: TcxGridDBColumn
|
||||
Caption = #35268#26684
|
||||
DataBinding.FieldName = 'C_Spec'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 60
|
||||
end
|
||||
object TV1Column6: TcxGridDBColumn
|
||||
Caption = #20811#37325
|
||||
DataBinding.FieldName = 'C_GramWeight'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 66
|
||||
end
|
||||
object TV1Column9: TcxGridDBColumn
|
||||
Caption = #38376#24133
|
||||
DataBinding.FieldName = 'C_Width'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 66
|
||||
end
|
||||
object cxGridDBColumn4: TcxGridDBColumn
|
||||
Caption = #25104#20998
|
||||
DataBinding.FieldName = 'C_Composition'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 70
|
||||
end
|
||||
object cxGridDBColumn5: TcxGridDBColumn
|
||||
Caption = #39068#33394
|
||||
DataBinding.FieldName = 'C_Color'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 70
|
||||
end
|
||||
object v1PRTOrderQty: TcxGridDBColumn
|
||||
Caption = #25968#37327
|
||||
DataBinding.FieldName = 'Qty'
|
||||
DataBinding.IsNullValueType = True
|
||||
PropertiesClassName = 'TcxTextEditProperties'
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 70
|
||||
end
|
||||
object v1OrderUnit: TcxGridDBColumn
|
||||
Caption = #21333#20301
|
||||
DataBinding.FieldName = 'QtyUnit'
|
||||
DataBinding.IsNullValueType = True
|
||||
PropertiesClassName = 'TcxComboBoxProperties'
|
||||
Properties.DropDownListStyle = lsEditFixedList
|
||||
Properties.Items.Strings = (
|
||||
'Kg'
|
||||
'M'
|
||||
'Y')
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 58
|
||||
end
|
||||
object v1PRTPrice: TcxGridDBColumn
|
||||
Caption = #21333#20215
|
||||
DataBinding.FieldName = 'Price'
|
||||
DataBinding.IsNullValueType = True
|
||||
PropertiesClassName = 'TcxTextEditProperties'
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Options.Sorting = False
|
||||
Width = 70
|
||||
end
|
||||
object cxGridDBColumn9: TcxGridDBColumn
|
||||
Caption = #37329#39069
|
||||
DataBinding.FieldName = 'Amount'
|
||||
DataBinding.IsNullValueType = True
|
||||
PropertiesClassName = 'TcxTextEditProperties'
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 84
|
||||
end
|
||||
object v1Column2: TcxGridDBColumn
|
||||
Caption = #22791#27880
|
||||
DataBinding.FieldName = 'SNote'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 92
|
||||
end
|
||||
object TV1Column8: TcxGridDBColumn
|
||||
Caption = #22238#20179#21305#25968
|
||||
DataBinding.FieldName = 'LJHCPiece'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 114
|
||||
end
|
||||
object TV1Column7: TcxGridDBColumn
|
||||
Caption = #22238#20179#25968#37327
|
||||
DataBinding.FieldName = 'LJHCQty'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 120
|
||||
end
|
||||
end
|
||||
object cxGridLevel1: TcxGridLevel
|
||||
GridView = TV1
|
||||
end
|
||||
end
|
||||
object Panel2: TPanel [3]
|
||||
Left = 0
|
||||
Top = 517
|
||||
Width = 1894
|
||||
Height = 393
|
||||
Align = alClient
|
||||
Caption = 'Panel2'
|
||||
TabOrder = 3
|
||||
ExplicitLeft = 8
|
||||
ExplicitTop = 536
|
||||
ExplicitWidth = 1595
|
||||
ExplicitHeight = 373
|
||||
object cxGrid2: TcxGrid
|
||||
Left = 1
|
||||
Top = 1
|
||||
Width = 608
|
||||
Height = 391
|
||||
Align = alLeft
|
||||
TabOrder = 0
|
||||
ExplicitHeight = 371
|
||||
object TV2: TcxGridDBTableView
|
||||
Navigator.Buttons.CustomButtons = <>
|
||||
ScrollbarAnnotations.CustomAnnotations = <>
|
||||
DataController.DataSource = DS_2
|
||||
DataController.Summary.DefaultGroupSummaryItems = <
|
||||
item
|
||||
Kind = skSum
|
||||
Position = spFooter
|
||||
end>
|
||||
DataController.Summary.FooterSummaryItems = <
|
||||
item
|
||||
Kind = skCount
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
Column = v2Column6
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
Column = v1Column15
|
||||
end>
|
||||
DataController.Summary.SummaryGroups = <>
|
||||
OptionsCustomize.ColumnFiltering = False
|
||||
OptionsView.Footer = True
|
||||
OptionsView.GroupByBox = False
|
||||
object TV2Column1: TcxGridDBColumn
|
||||
Caption = #22238#20179#26085#26399
|
||||
DataBinding.FieldName = 'IOTime'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Width = 115
|
||||
end
|
||||
object v1Column10: TcxGridDBColumn
|
||||
Caption = #25209#21495
|
||||
DataBinding.FieldName = 'BatchNo'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
VisibleForCustomization = False
|
||||
Width = 124
|
||||
end
|
||||
object v1Column15: TcxGridDBColumn
|
||||
Caption = #21305#25968
|
||||
DataBinding.FieldName = 'Piece'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 102
|
||||
end
|
||||
object v2Column6: TcxGridDBColumn
|
||||
Tag = 2
|
||||
Caption = #25968#37327
|
||||
DataBinding.FieldName = 'Qty'
|
||||
DataBinding.IsNullValueType = True
|
||||
PropertiesClassName = 'TcxTextEditProperties'
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 118
|
||||
end
|
||||
object v1Column3: TcxGridDBColumn
|
||||
Tag = 2
|
||||
Caption = #21333#20301
|
||||
DataBinding.FieldName = 'QtyUnit'
|
||||
DataBinding.IsNullValueType = True
|
||||
PropertiesClassName = 'TcxComboBoxProperties'
|
||||
Properties.DropDownListStyle = lsFixedList
|
||||
Properties.Items.Strings = (
|
||||
'Kg'
|
||||
'M'
|
||||
'Y')
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 87
|
||||
end
|
||||
end
|
||||
object cxGrid1Level1: TcxGridLevel
|
||||
GridView = TV2
|
||||
end
|
||||
end
|
||||
object cxGrid3: TcxGrid
|
||||
Left = 609
|
||||
Top = 1
|
||||
Width = 1284
|
||||
Height = 391
|
||||
Align = alClient
|
||||
TabOrder = 1
|
||||
ExplicitLeft = 615
|
||||
ExplicitTop = 6
|
||||
ExplicitHeight = 371
|
||||
object TV3: TcxGridDBTableView
|
||||
Navigator.Buttons.CustomButtons = <>
|
||||
ScrollbarAnnotations.CustomAnnotations = <>
|
||||
DataController.DataSource = DS_3
|
||||
DataController.Filter.AutoDataSetFilter = True
|
||||
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
|
||||
DataController.Summary.DefaultGroupSummaryItems = <
|
||||
item
|
||||
Kind = skSum
|
||||
Position = spFooter
|
||||
end>
|
||||
DataController.Summary.FooterSummaryItems = <
|
||||
item
|
||||
Kind = skCount
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
Column = cxGridDBColumn8
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
end
|
||||
item
|
||||
Kind = skSum
|
||||
Column = cxGridDBColumn7
|
||||
end>
|
||||
DataController.Summary.SummaryGroups = <>
|
||||
OptionsCustomize.ColumnFiltering = False
|
||||
OptionsView.Footer = True
|
||||
OptionsView.GroupByBox = False
|
||||
object cxGridDBColumn3: TcxGridDBColumn
|
||||
Caption = #26085#26399
|
||||
DataBinding.FieldName = 'IOTime'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 66
|
||||
end
|
||||
object cxGridDBColumn6: TcxGridDBColumn
|
||||
Caption = #32568#21495
|
||||
DataBinding.FieldName = 'FtyPCId'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
VisibleForCustomization = False
|
||||
Width = 66
|
||||
end
|
||||
object TV3Column1: TcxGridDBColumn
|
||||
Caption = #39068#33394
|
||||
DataBinding.FieldName = 'C_Color'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 66
|
||||
end
|
||||
object cxGridDBColumn7: TcxGridDBColumn
|
||||
Caption = #25237#22383#21305#25968
|
||||
DataBinding.FieldName = 'TPPiece'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 66
|
||||
end
|
||||
object cxGridDBColumn8: TcxGridDBColumn
|
||||
Tag = 2
|
||||
Caption = #25237#22383#25968#37327
|
||||
DataBinding.FieldName = 'TPQty'
|
||||
DataBinding.IsNullValueType = True
|
||||
PropertiesClassName = 'TcxTextEditProperties'
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 66
|
||||
end
|
||||
object TV3Column3: TcxGridDBColumn
|
||||
Caption = #21152#24037#21378
|
||||
DataBinding.FieldName = 'ToCoName'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 66
|
||||
end
|
||||
object TV3Column2: TcxGridDBColumn
|
||||
Caption = #22238#20179#37325#37327
|
||||
DataBinding.FieldName = 'WGQty'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 66
|
||||
end
|
||||
object TV3Column4: TcxGridDBColumn
|
||||
Caption = #22238#20179#21305#25968
|
||||
DataBinding.FieldName = 'WGPiece'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 66
|
||||
end
|
||||
object TV3Column5: TcxGridDBColumn
|
||||
Caption = #25439#32791'%'
|
||||
DataBinding.FieldName = 'sl'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 66
|
||||
end
|
||||
object TV3Column6: TcxGridDBColumn
|
||||
Caption = #22238#20179#24773#20917
|
||||
DataBinding.FieldName = 'StkCoName'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 66
|
||||
end
|
||||
object TV3Column7: TcxGridDBColumn
|
||||
Caption = #24211#23384#21305#25968
|
||||
DataBinding.FieldName = 'STKPiece'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 66
|
||||
end
|
||||
object TV3Column8: TcxGridDBColumn
|
||||
Caption = #24211#23384#25968#37327
|
||||
DataBinding.FieldName = 'STKQty'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 66
|
||||
end
|
||||
end
|
||||
object cxGridLevel2: TcxGridLevel
|
||||
GridView = TV3
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited ADOQueryBaseCmd: TADOQuery
|
||||
Connection = DataLink_TradePlan.ADOLink
|
||||
Left = 789
|
||||
Top = 369
|
||||
end
|
||||
inherited ADOQueryBaseTemp: TADOQuery
|
||||
Connection = DataLink_TradePlan.ADOLink
|
||||
Left = 861
|
||||
Top = 369
|
||||
end
|
||||
object ADOQueryTemp: TADOQuery
|
||||
Connection = DataLink_TradePlan.ADOLink
|
||||
LockType = ltReadOnly
|
||||
Parameters = <>
|
||||
Left = 789
|
||||
Top = 441
|
||||
end
|
||||
object ADOQueryCmd: TADOQuery
|
||||
Connection = DataLink_TradePlan.ADOLink
|
||||
Parameters = <>
|
||||
Left = 933
|
||||
Top = 369
|
||||
end
|
||||
object ADOQueryMain: TADOQuery
|
||||
Connection = DataLink_TradePlan.ADOLink
|
||||
LockType = ltReadOnly
|
||||
CommandTimeout = 600
|
||||
Parameters = <>
|
||||
Left = 1005
|
||||
Top = 369
|
||||
end
|
||||
object GPM_1: TcxGridPopupMenu
|
||||
Grid = cxGrid1
|
||||
PopupMenus = <>
|
||||
Left = 933
|
||||
Top = 441
|
||||
end
|
||||
object DS_1: TDataSource
|
||||
DataSet = CDS_1
|
||||
Left = 1077
|
||||
Top = 441
|
||||
end
|
||||
object CDS_1: TClientDataSet
|
||||
Aggregates = <>
|
||||
Params = <>
|
||||
Left = 861
|
||||
Top = 441
|
||||
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
|
||||
Dataset = RMDBDataSet1
|
||||
CompressLevel = rmzcFastest
|
||||
CompressThread = False
|
||||
LaterBuildEvents = True
|
||||
OnlyOwnerDataSet = False
|
||||
Left = 906
|
||||
Top = 650
|
||||
ReportData = {}
|
||||
end
|
||||
object RMDBDataSet1: TRMDBDataSet
|
||||
Visible = True
|
||||
DataSet = CDS_1
|
||||
Left = 803
|
||||
Top = 627
|
||||
end
|
||||
object RMXLSExport1: TRMXLSExport
|
||||
ShowAfterExport = True
|
||||
ExportPrecision = 1
|
||||
PagesOfSheet = 100
|
||||
ExportImages = True
|
||||
ExportFrames = True
|
||||
ExportImageFormat = ifBMP
|
||||
JPEGQuality = 0
|
||||
ScaleX = 1.000000000000000000
|
||||
ScaleY = 1.000000000000000000
|
||||
CompressFile = False
|
||||
Left = 1006
|
||||
Top = 653
|
||||
end
|
||||
object ADOQueryPrint: TADOQuery
|
||||
Connection = DataLink_TradePlan.ADOLink
|
||||
Parameters = <>
|
||||
Left = 1077
|
||||
Top = 369
|
||||
end
|
||||
object cxStyleRepository1: TcxStyleRepository
|
||||
Left = 1005
|
||||
Top = 441
|
||||
PixelsPerInch = 96
|
||||
object cxStyle1: TcxStyle
|
||||
AssignedValues = [svColor, svFont, svTextColor]
|
||||
Color = clBlack
|
||||
Font.Charset = ANSI_CHARSET
|
||||
Font.Color = clBlack
|
||||
Font.Height = -12
|
||||
Font.Name = #23435#20307
|
||||
Font.Style = [fsBold]
|
||||
TextColor = clBlack
|
||||
end
|
||||
end
|
||||
object CDS_2: TClientDataSet
|
||||
Aggregates = <>
|
||||
Params = <>
|
||||
Left = 788
|
||||
Top = 707
|
||||
end
|
||||
object GPM_2: TcxGridPopupMenu
|
||||
Grid = cxGrid2
|
||||
PopupMenus = <>
|
||||
Left = 860
|
||||
Top = 707
|
||||
end
|
||||
object DS_2: TDataSource
|
||||
DataSet = CDS_2
|
||||
Left = 1004
|
||||
Top = 707
|
||||
end
|
||||
object ADO_2: TADOQuery
|
||||
Connection = DataLink_TradePlan.ADOLink
|
||||
LockType = ltReadOnly
|
||||
CommandTimeout = 600
|
||||
Parameters = <>
|
||||
Left = 912
|
||||
Top = 713
|
||||
end
|
||||
object CDS_3: TClientDataSet
|
||||
Aggregates = <>
|
||||
Params = <>
|
||||
Left = 791
|
||||
Top = 785
|
||||
end
|
||||
object GPM_3: TcxGridPopupMenu
|
||||
Grid = cxGrid3
|
||||
PopupMenus = <>
|
||||
Left = 863
|
||||
Top = 785
|
||||
end
|
||||
object ADO_3: TADOQuery
|
||||
Connection = DataLink_TradePlan.ADOLink
|
||||
LockType = ltReadOnly
|
||||
CommandTimeout = 600
|
||||
Parameters = <>
|
||||
Left = 915
|
||||
Top = 791
|
||||
end
|
||||
object DS_3: TDataSource
|
||||
DataSet = CDS_3
|
||||
Left = 1007
|
||||
Top = 785
|
||||
end
|
||||
end
|
||||
321
项目代码/RTBasicsV1/T01贸易生产计划/U_TradePlanSchedule1.pas
Normal file
321
项目代码/RTBasicsV1/T01贸易生产计划/U_TradePlanSchedule1.pas
Normal file
|
|
@ -0,0 +1,321 @@
|
|||
unit U_TradePlanSchedule1;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs, cxGraphics, cxCustomData, cxStyles, cxTL, cxMaskEdit, DB, ADODB,
|
||||
cxInplaceContainer, cxDBTL, cxControls, cxTLData, ComCtrls, ToolWin, StdCtrls,
|
||||
cxFilter, cxData, cxDataStorage, cxEdit, cxDBData, DBClient,
|
||||
cxGridCustomTableView, cxGridTableView, cxGridDBTableView, ExtCtrls,
|
||||
cxSplitter, cxGridLevel, cxClasses, cxGridCustomView, cxGrid,
|
||||
cxGridCustomPopupMenu, cxGridPopupMenu, RM_Dataset, RM_System, RM_Common,
|
||||
RM_Class, RM_GridReport, IdBaseComponent, IdComponent, IdTCPConnection,
|
||||
IdTCPClient, IdFTP, ShellAPI, IniFiles, U_BaseList, cxLookAndFeels,
|
||||
cxLookAndFeelPainters, dxSkinsCore, dxSkinsDefaultPainters, dxSkinWXI,
|
||||
cxNavigator, dxDateRanges, dxScrollbarAnnotations, cxTextEdit,
|
||||
dxBarBuiltInMenu, Vcl.Menus, RM_e_Xls, cxPC, cxGridBandedTableView,
|
||||
cxGridDBBandedTableView, FrameDateSel, cxButtonEdit, cxDropDownEdit,
|
||||
cxContainer;
|
||||
|
||||
type
|
||||
TfrmTradePlanSchedule1 = class(TfrmBaseList)
|
||||
ToolBar1: TToolBar;
|
||||
TBRafresh: TToolButton;
|
||||
TBClose: TToolButton;
|
||||
ADOQueryTemp: TADOQuery;
|
||||
ADOQueryCmd: TADOQuery;
|
||||
Panel1: TPanel;
|
||||
ToolButton2: TToolButton;
|
||||
ADOQueryMain: TADOQuery;
|
||||
ToolButton1: TToolButton;
|
||||
GPM_1: TcxGridPopupMenu;
|
||||
DS_1: TDataSource;
|
||||
CDS_1: TClientDataSet;
|
||||
ToolButton3: TToolButton;
|
||||
RMGridReport1: TRMGridReport;
|
||||
RMDBDataSet1: TRMDBDataSet;
|
||||
RMXLSExport1: TRMXLSExport;
|
||||
ADOQueryPrint: TADOQuery;
|
||||
cxStyleRepository1: TcxStyleRepository;
|
||||
cxStyle1: TcxStyle;
|
||||
ToolButton5: TToolButton;
|
||||
frmFrameDateSel1: TfrmFrameDateSel;
|
||||
cxGrid1: TcxGrid;
|
||||
TV1: TcxGridDBTableView;
|
||||
TV1Column4: TcxGridDBColumn;
|
||||
TV1Column2: TcxGridDBColumn;
|
||||
TV1Column1: TcxGridDBColumn;
|
||||
TV1Column3: TcxGridDBColumn;
|
||||
TV1Column5: TcxGridDBColumn;
|
||||
VC_SCSCode: TcxGridDBColumn;
|
||||
cxGridDBColumn2: TcxGridDBColumn;
|
||||
TV1Column12: TcxGridDBColumn;
|
||||
TV1Column14: TcxGridDBColumn;
|
||||
TV1Column13: TcxGridDBColumn;
|
||||
v1Column5: TcxGridDBColumn;
|
||||
TV1Column6: TcxGridDBColumn;
|
||||
TV1Column9: TcxGridDBColumn;
|
||||
cxGridDBColumn4: TcxGridDBColumn;
|
||||
cxGridDBColumn5: TcxGridDBColumn;
|
||||
v1PRTOrderQty: TcxGridDBColumn;
|
||||
v1OrderUnit: TcxGridDBColumn;
|
||||
v1PRTPrice: TcxGridDBColumn;
|
||||
cxGridDBColumn9: TcxGridDBColumn;
|
||||
v1Column2: TcxGridDBColumn;
|
||||
TV1Column8: TcxGridDBColumn;
|
||||
TV1Column7: TcxGridDBColumn;
|
||||
cxGridLevel1: TcxGridLevel;
|
||||
Panel2: TPanel;
|
||||
cxGrid2: TcxGrid;
|
||||
TV2: TcxGridDBTableView;
|
||||
TV2Column1: TcxGridDBColumn;
|
||||
v1Column10: TcxGridDBColumn;
|
||||
v1Column15: TcxGridDBColumn;
|
||||
v2Column6: TcxGridDBColumn;
|
||||
v1Column3: TcxGridDBColumn;
|
||||
cxGrid1Level1: TcxGridLevel;
|
||||
cxGrid3: TcxGrid;
|
||||
TV3: TcxGridDBTableView;
|
||||
cxGridDBColumn3: TcxGridDBColumn;
|
||||
cxGridDBColumn6: TcxGridDBColumn;
|
||||
TV3Column1: TcxGridDBColumn;
|
||||
cxGridDBColumn7: TcxGridDBColumn;
|
||||
cxGridDBColumn8: TcxGridDBColumn;
|
||||
cxGridLevel2: TcxGridLevel;
|
||||
TV3Column2: TcxGridDBColumn;
|
||||
TV3Column3: TcxGridDBColumn;
|
||||
TV3Column4: TcxGridDBColumn;
|
||||
TV3Column5: TcxGridDBColumn;
|
||||
TV3Column6: TcxGridDBColumn;
|
||||
TV3Column7: TcxGridDBColumn;
|
||||
TV3Column8: TcxGridDBColumn;
|
||||
Label4: TLabel;
|
||||
Label9: TLabel;
|
||||
Label3: TLabel;
|
||||
BuyName: TcxTextEdit;
|
||||
PurNo: TcxTextEdit;
|
||||
SellName: TcxTextEdit;
|
||||
CDS_2: TClientDataSet;
|
||||
GPM_2: TcxGridPopupMenu;
|
||||
DS_2: TDataSource;
|
||||
ADO_2: TADOQuery;
|
||||
CDS_3: TClientDataSet;
|
||||
GPM_3: TcxGridPopupMenu;
|
||||
ADO_3: TADOQuery;
|
||||
DS_3: TDataSource;
|
||||
procedure FormDestroy(Sender: TObject);
|
||||
procedure FormClose(Sender: TObject; var Action: TCloseAction);
|
||||
procedure TBCloseClick(Sender: TObject);
|
||||
procedure FormShow(Sender: TObject);
|
||||
procedure TBRafreshClick(Sender: TObject);
|
||||
procedure ToolButton2Click(Sender: TObject);
|
||||
procedure P_OrderNo_YSK(Sender: TObject);
|
||||
procedure ToolButton1Click(Sender: TObject);
|
||||
procedure MPRTCodeNameChange(Sender: TObject);
|
||||
procedure FormCreate(Sender: TObject);
|
||||
procedure ToolButton3Click(Sender: TObject);
|
||||
procedure CustNameChange(Sender: TObject);
|
||||
procedure ConNoChange(Sender: TObject);
|
||||
procedure cxTabControl1Change(Sender: TObject);
|
||||
procedure TV1DblClick(Sender: TObject);
|
||||
procedure ToolButton5Click(Sender: TObject);
|
||||
procedure TV1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
|
||||
private
|
||||
{ Private declarations }
|
||||
|
||||
procedure InitGrid();
|
||||
public
|
||||
{ Public declarations }
|
||||
RKFlag, FCYID, FZKType, FBZType: string;
|
||||
fType: string;
|
||||
end;
|
||||
|
||||
var
|
||||
frmTradePlanSchedule1: TfrmTradePlanSchedule1;
|
||||
|
||||
implementation
|
||||
|
||||
uses
|
||||
U_DataLink, U_RTFun, U_ZDYHelp, U_TradePlanScheduleDetail;
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
procedure TfrmTradePlanSchedule1.InitGrid();
|
||||
var
|
||||
SqlStr: string;
|
||||
begin
|
||||
|
||||
SqlStr := ' select A.*,B.*';
|
||||
SqlStr := SqlStr + ',LJHCPiece= (select SUM(X.Piece) from BS_Cloth_IO X where X.FromPurSId = B.PurSId and X.IOType =''采购入库'' and STKName=''贸易布匹'')';
|
||||
SqlStr := SqlStr + ',LJHCQty= (select SUM(X.Qty) from BS_Cloth_IO X where X.FromPurSId = B.PurSId and X.IOType =''采购入库'' and STKName=''贸易布匹'')';
|
||||
SqlStr := SqlStr + ' from Pur_ClothPlan_Main A inner join Pur_ClothPlan_sub B on A.PurMId=B.PurMId ';
|
||||
SqlStr := SqlStr + 'where C_Degree=''坯布'' ';
|
||||
|
||||
InitCDSData(ADOQueryMain, CDS_1, Tv1, SqlStr, SGetFilters(Panel1, 1, 2), 'PurNo');
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.FormDestroy(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
frmTradePlanSchedule1 := nil;
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.ConNoChange(Sender: TObject);
|
||||
begin
|
||||
ToolButton2.Click;
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.cxTabControl1Change(Sender: TObject);
|
||||
begin
|
||||
|
||||
InitGrid();
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.CustNameChange(Sender: TObject);
|
||||
begin
|
||||
ToolButton2.Click;
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.FormClose(Sender: TObject; var Action: TCloseAction);
|
||||
begin
|
||||
inherited;
|
||||
Action := caFree;
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.TBCloseClick(Sender: TObject);
|
||||
begin
|
||||
|
||||
Close;
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.FormShow(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
readCxGrid(self.Caption + 'Tv1', Tv1, '进度统计查询');
|
||||
readCxGrid(self.Caption + 'Tv2', Tv2, '进度统计查询');
|
||||
readCxGrid(self.Caption + 'Tv3', Tv3, '进度统计查询');
|
||||
InitGrid();
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.TBRafreshClick(Sender: TObject);
|
||||
begin
|
||||
frmFrameDateSel1.begdate.SetFocus;
|
||||
InitGrid();
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.ToolButton2Click(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 TfrmTradePlanSchedule1.P_OrderNo_YSK(Sender: TObject);
|
||||
begin
|
||||
ToolButton2.Click;
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.ToolButton1Click(Sender: TObject);
|
||||
begin
|
||||
if ADOQueryMain.IsEmpty then
|
||||
Exit;
|
||||
TcxGridToExcel(self.Caption, cxgrid1);
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.MPRTCodeNameChange(Sender: TObject);
|
||||
begin
|
||||
ToolButton2.Click;
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.FormCreate(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
frmFrameDateSel1.Enddate.Date := SGetServerDate(ADOQueryTemp);
|
||||
frmFrameDateSel1.begdate.Date := frmFrameDateSel1.Enddate.Date - 60;
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.ToolButton3Click(Sender: TObject);
|
||||
var
|
||||
filepath: string;
|
||||
mBegdate, mEnddate: string;
|
||||
begin
|
||||
mBegdate := FormatDateTime('yyyy-MM-dd', frmFrameDateSel1.begdate.Date);
|
||||
mEnddate := FormatDateTime('yyyy-MM-dd', frmFrameDateSel1.enddate.Date);
|
||||
if CDS_1.IsEmpty then
|
||||
exit;
|
||||
|
||||
try
|
||||
|
||||
filepath := ExtractFilePath(Application.ExeName) + 'report\订单利润表.rmf';
|
||||
if not FileExists(Pchar(filepath)) then
|
||||
begin
|
||||
application.MessageBox(pchar('文件[' + filepath + ']不存在！'), '提示信息', MB_IConError);
|
||||
exit;
|
||||
end;
|
||||
|
||||
RMGridReport1.LoadFromFile(filepath);
|
||||
|
||||
RMGridReport1.ShowReport;
|
||||
finally
|
||||
|
||||
end;
|
||||
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.ToolButton5Click(Sender: TObject);
|
||||
begin
|
||||
|
||||
WriteCxGrid(self.Caption + 'Tv1', Tv1, '进度统计查询');
|
||||
WriteCxGrid(self.Caption + 'Tv2', Tv2, '进度统计查询');
|
||||
WriteCxGrid(self.Caption + 'Tv3', Tv3, '进度统计查询');
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.TV1DblClick(Sender: TObject);
|
||||
begin
|
||||
|
||||
try
|
||||
frmTradePlanScheduleDetail := TfrmTradePlanScheduleDetail.Create(Application);
|
||||
with frmTradePlanScheduleDetail do
|
||||
begin
|
||||
FMainId := self.CDS_1.FieldByName('MainId').AsString;
|
||||
FOrderNo := self.CDS_1.FieldByName('OrderNo').AsString;
|
||||
FMasterOrderNo := self.CDS_1.FieldByName('MasterOrderNo').AsString;
|
||||
if ShowModal = 1 then
|
||||
begin
|
||||
Self.InitGrid();
|
||||
end;
|
||||
end;
|
||||
finally
|
||||
frmTradePlanScheduleDetail.Free;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TfrmTradePlanSchedule1.TV1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
|
||||
var
|
||||
SqlStr: string;
|
||||
begin
|
||||
|
||||
SqlStr := ' select A.*';
|
||||
|
||||
SqlStr := SqlStr + ' from BS_Cloth_IO A ';
|
||||
SqlStr := SqlStr + 'where A.FromPurSId = ' + quotedstr(Trim(CDS_1.fieldbyname('PurSId').AsString));
|
||||
SqlStr := SqlStr + 'and A.IOType =''采购入库'' and STKName=''贸易布匹'' ';
|
||||
|
||||
InitCDSData(ADO_2, CDS_2, Tv2, SqlStr, '', '');
|
||||
|
||||
SqlStr := ' select A.IOTime,A.ToCoName,TPPiece=A.Piece,TPQty=A.Qty,WGPiece=B.Piece,WGQty=B.Qty,B.STKPiece,B.STKQty,B.FtyPCId,B.C_Color,B.StkCoName ';
|
||||
SqlStr := SqlStr + ' ,sl=cast(round((1-ISNULL(B.Qty, 0)/A.Qty)*100,2) as DECIMAL(18,2)) ';
|
||||
SqlStr := SqlStr + ' from BS_Cloth_IO A left join BS_Cloth_IO B on A.ToSubID=B.FromSubId AND B.IOType=''加工完成'' ';
|
||||
SqlStr := SqlStr + ' where A.IOType=''投产出库'' ';
|
||||
SqlStr := SqlStr + ' and A.FromPurSId = ' + quotedstr(Trim(CDS_1.fieldbyname('PurSId').AsString));
|
||||
|
||||
InitCDSData(ADO_3, CDS_3, Tv3, SqlStr, '', '');
|
||||
|
||||
end;
|
||||
|
||||
end.
|
||||
|
||||
Binary file not shown.
|
|
@ -3,9 +3,9 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
Top = 116
|
||||
Caption = #24067#21305#21152#24037#35745#21010
|
||||
ClientHeight = 701
|
||||
ClientWidth = 1284
|
||||
ClientWidth = 1575
|
||||
Font.Height = -16
|
||||
ExplicitWidth = 1300
|
||||
ExplicitWidth = 1591
|
||||
ExplicitHeight = 740
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 21
|
||||
|
|
@ -13,7 +13,7 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
Tag = 1
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 1284
|
||||
Width = 1575
|
||||
Height = 30
|
||||
AutoSize = True
|
||||
ButtonHeight = 30
|
||||
|
|
@ -26,6 +26,7 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
ParentColor = False
|
||||
ShowCaptions = True
|
||||
TabOrder = 0
|
||||
ExplicitWidth = 1284
|
||||
object TBRafresh: TToolButton
|
||||
Left = 0
|
||||
Top = 0
|
||||
|
|
@ -70,7 +71,7 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
object Panel1: TPanel [1]
|
||||
Left = 0
|
||||
Top = 30
|
||||
Width = 1284
|
||||
Width = 1575
|
||||
Height = 83
|
||||
Align = alTop
|
||||
BevelInner = bvRaised
|
||||
|
|
@ -78,6 +79,7 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
Color = clWhite
|
||||
ParentBackground = False
|
||||
TabOrder = 1
|
||||
ExplicitWidth = 1284
|
||||
object Label9: TLabel
|
||||
Left = 23
|
||||
Top = 50
|
||||
|
|
@ -134,11 +136,12 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
object cxGrid1: TcxGrid [2]
|
||||
Left = 0
|
||||
Top = 143
|
||||
Width = 1284
|
||||
Width = 1575
|
||||
Height = 289
|
||||
Align = alClient
|
||||
BorderStyle = cxcbsNone
|
||||
TabOrder = 2
|
||||
ExplicitWidth = 1284
|
||||
object TV1: TcxGridDBTableView
|
||||
Navigator.Buttons.CustomButtons = <>
|
||||
ScrollbarAnnotations.CustomAnnotations = <>
|
||||
|
|
@ -375,7 +378,7 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
Tag = 1
|
||||
Left = 0
|
||||
Top = 432
|
||||
Width = 1284
|
||||
Width = 1575
|
||||
Height = 30
|
||||
Align = alBottom
|
||||
AutoSize = True
|
||||
|
|
@ -389,6 +392,7 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
ParentColor = False
|
||||
ShowCaptions = True
|
||||
TabOrder = 3
|
||||
ExplicitWidth = 1284
|
||||
object ToolButton2: TToolButton
|
||||
Left = 0
|
||||
Top = 0
|
||||
|
|
@ -441,16 +445,17 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
object cxPageControl1: TcxPageControl [4]
|
||||
Left = 0
|
||||
Top = 462
|
||||
Width = 1284
|
||||
Width = 1575
|
||||
Height = 239
|
||||
Align = alBottom
|
||||
TabOrder = 4
|
||||
Properties.ActivePage = cxTabSheet4
|
||||
Properties.ActivePage = cxTabSheet2
|
||||
Properties.CustomButtons.Buttons = <>
|
||||
Properties.Style = 5
|
||||
OnChange = cxPageControl1Change
|
||||
ExplicitWidth = 1284
|
||||
ClientRectBottom = 239
|
||||
ClientRectRight = 1284
|
||||
ClientRectRight = 1575
|
||||
ClientRectTop = 32
|
||||
object cxTabSheet2: TcxTabSheet
|
||||
Caption = ' '#37197#24067#25968#25454' '
|
||||
|
|
@ -458,7 +463,7 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
object cxGrid2: TcxGrid
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 1284
|
||||
Width = 1575
|
||||
Height = 207
|
||||
Align = alClient
|
||||
TabOrder = 0
|
||||
|
|
@ -614,7 +619,7 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
object cxGrid3: TcxGrid
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 1284
|
||||
Width = 1575
|
||||
Height = 207
|
||||
Align = alClient
|
||||
TabOrder = 0
|
||||
|
|
@ -786,7 +791,7 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
object cxGrid4: TcxGrid
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 1284
|
||||
Width = 1575
|
||||
Height = 207
|
||||
Align = alClient
|
||||
TabOrder = 0
|
||||
|
|
@ -955,13 +960,15 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
object cxTabSheet4: TcxTabSheet
|
||||
Caption = #38754#26009#20986#24211
|
||||
ImageIndex = 3
|
||||
ExplicitWidth = 1284
|
||||
object cxGrid5: TcxGrid
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 1284
|
||||
Width = 1575
|
||||
Height = 207
|
||||
Align = alClient
|
||||
TabOrder = 0
|
||||
ExplicitWidth = 1284
|
||||
object TV5: TcxGridDBTableView
|
||||
Navigator.Buttons.CustomButtons = <>
|
||||
ScrollbarAnnotations.CustomAnnotations = <>
|
||||
|
|
@ -1142,7 +1149,7 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
object cxTabControl1: TcxTabControl [5]
|
||||
Left = 0
|
||||
Top = 113
|
||||
Width = 1284
|
||||
Width = 1575
|
||||
Height = 30
|
||||
Align = alTop
|
||||
TabOrder = 5
|
||||
|
|
@ -1155,6 +1162,7 @@ inherited frmClothScheduleList: TfrmClothScheduleList
|
|||
#24050#23436#25104
|
||||
#20840#37096)
|
||||
OnChange = cxTabControl1Change
|
||||
ExplicitWidth = 1284
|
||||
ClientRectRight = 0
|
||||
ClientRectTop = 0
|
||||
end
|
||||
|
|
|
|||
Loading…
Reference in New Issue
Block a user