object frmJYDJ: TfrmJYDJ
  Left = 44
  Top = 9
  Width = 1286
  Height = 700
  Caption = #25104#21697#26816#39564
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnClick = FormClick
  OnClose = FormClose
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object cxGrid3: TcxGrid
    Left = 918
    Top = 143
    Width = 360
    Height = 526
    Align = alRight
    TabOrder = 0
    object Tv3: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      OnCellClick = Tv3CellClick
      DataController.DataSource = DataSource3
      DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <
        item
          Kind = skSum
        end
        item
          Kind = skSum
        end
        item
          Kind = skSum
          Column = v3Column4
        end
        item
          Kind = skCount
          Column = v3Column1
        end
        item
          Kind = skSum
          Column = cxGridDBColumn1
        end>
      DataController.Summary.SummaryGroups = <>
      OptionsCustomize.ColumnFiltering = False
      OptionsView.Footer = True
      OptionsView.GroupByBox = False
      Styles.Inactive = cxStyle4
      Styles.IncSearch = cxStyle4
      Styles.Selection = cxStyle4
      object v3Column1: TcxGridDBColumn
        Caption = #21367#21495
        DataBinding.FieldName = 'MJXH'
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Styles.Content = cxStyle4
        Styles.Footer = cxStyle4
        Styles.Header = cxStyle4
        Width = 57
      end
      object v3Column4: TcxGridDBColumn
        Caption = #27611#37325
        DataBinding.FieldName = 'MJMaoZ'
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Styles.Content = cxStyle3
        Styles.Footer = cxStyle3
        Styles.Header = cxStyle3
        Width = 84
      end
      object cxGridDBColumn1: TcxGridDBColumn
        Caption = #36192#36865
        DataBinding.FieldName = 'MJZS'
        HeaderAlignmentHorz = taCenter
        Options.Focusing = False
        Options.Sorting = False
        Styles.Content = cxStyle5
        Styles.Header = cxStyle5
        Width = 85
      end
    end
    object cxGridLevel2: TcxGridLevel
      GridView = Tv3
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 143
    Width = 495
    Height = 526
    Align = alLeft
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object Label4: TLabel
      Left = 393
      Top = 30
      Width = 93
      Height = 72
      Caption = 'KG'
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -64
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 19
      Top = 38
      Width = 114
      Height = 56
      Caption = #27611#37325
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -56
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label6: TLabel
      Left = 20
      Top = 144
      Width = 114
      Height = 56
      Caption = #36192#36865
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -56
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label7: TLabel
      Left = 393
      Top = 136
      Width = 93
      Height = 72
      Caption = 'KG'
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -64
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 16
      Top = 259
      Width = 114
      Height = 56
      Caption = #20221#25968
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -56
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object MJMaoZ: TEdit
      Left = 136
      Top = 13
      Width = 255
      Height = 105
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -96
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnKeyPress = MJMaoZKeyPress
    end
    object BTPrint: TButton
      Left = 73
      Top = 388
      Width = 165
      Height = 102
      Caption = #25171#21360
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -64
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      OnClick = BTPrintClick
      OnKeyPress = BTPrintKeyPress
    end
    object Button5: TButton
      Left = 288
      Top = 390
      Width = 171
      Height = 96
      Caption = #20462#25913
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -64
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 3
      OnClick = Button5Click
    end
    object MJZS: TEdit
      Left = 136
      Top = 120
      Width = 254
      Height = 105
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -96
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnKeyPress = MJZSKeyPress
    end
    object ComboBox1: TComboBox
      Left = 136
      Top = 228
      Width = 90
      Height = 117
      Style = csDropDownList
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -96
      Font.Name = 'Times New Roman'
      Font.Style = [fsBold]
      ItemHeight = 109
      ItemIndex = 1
      ParentFont = False
      TabOrder = 4
      Text = '2'
      Items.Strings = (
        '1'
        '2')
    end
  end
  object Panel7: TPanel
    Left = 495
    Top = 143
    Width = 423
    Height = 526
    Align = alClient
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 2
    object Panel1: TPanel
      Left = 2
      Top = 2
      Width = 419
      Height = 522
      Align = alClient
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 0
      object RMPreview1: TRMPreview
        Left = 2
        Top = 2
        Width = 415
        Height = 518
        Align = alClient
        BevelOuter = bvLowered
        Caption = 'Insert After'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = False
        TabOrder = 0
        Options.RulerUnit = rmutScreenPixels
        Options.RulerVisible = False
        Options.DrawBorder = False
        Options.BorderPen.Color = clGray
        Options.BorderPen.Style = psDash
      end
    end
  end
  object Panel5: TPanel
    Left = 0
    Top = 0
    Width = 1278
    Height = 143
    Align = alTop
    TabOrder = 3
    object ToolBar1: TToolBar
      Left = 1
      Top = 1
      Width = 1276
      Height = 30
      ButtonHeight = 30
      ButtonWidth = 107
      Caption = 'ToolBar1'
      Color = clSkyBlue
      EdgeInner = esNone
      EdgeOuter = esNone
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      Images = DataLink_CYZZ.ThreeImgList
      List = True
      ParentColor = False
      ParentFont = False
      ShowCaptions = True
      TabOrder = 0
      object ToolButton1: TToolButton
        Left = 0
        Top = 0
        AutoSize = True
        Caption = #21047#26032
        ImageIndex = 0
        OnClick = ToolButton1Click
      end
      object ToolButton2: TToolButton
        Left = 63
        Top = 0
        AutoSize = True
        Caption = #26631#31614#35774#32622
        ImageIndex = 38
        OnClick = ToolButton2Click
      end
      object ToolButton3: TToolButton
        Left = 150
        Top = 0
        Caption = #26816#39564#20449#24687#26597#35810
        ImageIndex = 22
        OnClick = ToolButton3Click
      end
      object TBClose: TToolButton
        Left = 257
        Top = 0
        AutoSize = True
        Caption = #20851#38381
        ImageIndex = 21
        OnClick = TBCloseClick
      end
    end
    object Panel6: TPanel
      Left = 1
      Top = 31
      Width = 1276
      Height = 111
      Align = alClient
      BevelInner = bvRaised
      BevelOuter = bvLowered
      Color = clSkyBlue
      TabOrder = 1
      object Label16: TLabel
        Left = 1029
        Top = 19
        Width = 42
        Height = 12
        Caption = 'Label16'
        Visible = False
      end
      object Label1: TLabel
        Left = 8
        Top = 14
        Width = 108
        Height = 35
        Caption = #35746#21333#21495
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -35
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label2: TLabel
        Left = 485
        Top = 14
        Width = 72
        Height = 35
        Caption = #39068#33394
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -35
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label3: TLabel
        Left = 8
        Top = 63
        Width = 91
        Height = 35
        Caption = #33457' '#22411
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -35
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label5: TLabel
        Left = 485
        Top = 63
        Width = 72
        Height = 35
        Caption = #32568#21495
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -35
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object BTEdit: TButton
        Left = 976
        Top = 14
        Width = 38
        Height = 25
        Caption = #20462#25913
        TabOrder = 0
        Visible = False
        OnClick = BTEditClick
      end
      object BTAdd: TButton
        Left = 1081
        Top = 13
        Width = 46
        Height = 25
        Caption = #26032#22686
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        Visible = False
        OnClick = BTAddClick
      end
      object OrderNo: TEdit
        Left = 113
        Top = 11
        Width = 365
        Height = 41
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -32
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
        OnDblClick = OrderNoDblClick
      end
      object Color: TEdit
        Left = 559
        Top = 11
        Width = 394
        Height = 41
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -32
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 3
        OnDblClick = ColorDblClick
        OnKeyPress = MJZSKeyPress
      end
      object HX: TEdit
        Left = 113
        Top = 60
        Width = 365
        Height = 41
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -32
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 4
        OnDblClick = HXDblClick
        OnKeyPress = MJZSKeyPress
      end
      object GangNo: TEdit
        Left = 558
        Top = 60
        Width = 57
        Height = 41
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -32
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 5
        Text = '1'
        OnKeyPress = MJZSKeyPress
      end
    end
  end
  object cxStyleRepository1: TcxStyleRepository
    Left = 608
    Top = 8
    object cxStyle1: TcxStyle
      AssignedValues = [svColor, svFont]
      Color = clBtnFace
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
    end
    object cxStyle2: TcxStyle
      AssignedValues = [svFont, svTextColor]
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -20
      Font.Name = #23435#20307
      Font.Pitch = fpFixed
      Font.Style = [fsBold]
      TextColor = clDefault
    end
  end
  object cxGridPopupMenu1: TcxGridPopupMenu
    PopupMenus = <>
    Left = 400
  end
  object DataSource1: TDataSource
    DataSet = Order_MJ
    Left = 672
  end
  object Order_MJ: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 560
    Top = 8
  end
  object ADOQueryMain: TADOQuery
    Connection = DataLink_CYZZ.ADOLink
    LockType = ltReadOnly
    Parameters = <>
    Left = 576
  end
  object ADOCmd: TADOQuery
    Connection = DataLink_CYZZ.ADOLink
    Parameters = <>
    Left = 536
  end
  object ADOTmp: TADOQuery
    Connection = DataLink_CYZZ.ADOLink
    LockType = ltReadOnly
    Parameters = <>
    Left = 576
  end
  object RMDB_Main: TRMDBDataSet
    Visible = True
    DataSet = ADOQueryPrint
    Left = 648
  end
  object RM2: TRMGridReport
    ThreadPrepareReport = True
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
    DefaultCollate = False
    ShowPrintDialog = False
    SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
    PreviewOptions.RulerUnit = rmutScreenPixels
    PreviewOptions.RulerVisible = False
    PreviewOptions.DrawBorder = False
    PreviewOptions.BorderPen.Color = clGray
    PreviewOptions.BorderPen.Style = psDash
    Dataset = RMDB_Main
    CompressLevel = rmzcFastest
    CompressThread = False
    LaterBuildEvents = True
    OnlyOwnerDataSet = False
    Left = 464
    ReportData = {}
  end
  object DataSource2: TDataSource
    DataSet = CDS_MJCD
    Left = 696
  end
  object CDS_MJCD: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 744
  end
  object DataSource3: TDataSource
    DataSet = CDS_MJID
    Left = 1000
    Top = 296
  end
  object CDS_MJID: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 1016
    Top = 312
  end
  object Timer1: TTimer
    Interval = 100
    Left = 944
    Top = 320
  end
  object ADOQueryPrint: TADOQuery
    Connection = DataLink_CYZZ.ADOLink
    LockType = ltReadOnly
    Parameters = <>
    Left = 720
  end
  object cxStyleRepository2: TcxStyleRepository
    Left = 312
    object cxStyle3: TcxStyle
      AssignedValues = [svColor, svFont, svTextColor]
      Color = clBtnFace
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      TextColor = clBlue
    end
  end
  object cxStyleRepository3: TcxStyleRepository
    Left = 344
    object cxStyle4: TcxStyle
      AssignedValues = [svColor, svFont, svTextColor]
      Color = clBtnFace
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      TextColor = clRed
    end
  end
  object cxStyleRepository4: TcxStyleRepository
    Left = 247
    Top = 2
    object cxStyle5: TcxStyle
      AssignedValues = [svColor, svFont, svTextColor]
      Color = clBtnFace
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      TextColor = clOlive
    end
  end
  object cxStyleRepository5: TcxStyleRepository
    Left = 280
    object cxStyle6: TcxStyle
      AssignedValues = [svFont]
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -29
      Font.Name = #23435#20307
      Font.Style = [fsBold]
    end
  end
  object cxGridPopupMenu2: TcxGridPopupMenu
    PopupMenus = <>
    Left = 616
    Top = 587
  end
  object ADOQueryMainDSC: TADOQuery
    Connection = DataLink_CYZZ.ADOLink
    LockType = ltReadOnly
    Parameters = <>
    SQL.Strings = (
      'select A.*,C.OrderNo,B.SWFBColor,B.SWFBHW,B.SWFBCodeName,'
      '       B.SWFBCode,B.SWFBKZ,B.WKMS,B.KZBig,B.KZSmal,'
      
        '       SCMQty=(select isnull(Sum(MJLen),0) from WFB_MJJY WM wher' +
        'e WM.APId=A.APId and len(WM.MJID)>8),'
      
        '       Case when A.OrderQtyM-(select isnull(Sum(MJLen),0) from W' +
        'FB_MJJY WM where WM.APId=A.APId )>0 '
      
        '                then A.OrderQtyM-(select isnull(Sum(MJLen),0) fr' +
        'om WFB_MJJY WM where WM.APId=A.APId ) else 0 end as WSCMQty'
      'from WFBOrder_Sub_AnPai A '
      'inner join WFBOrder_Sub B on A.SubId=B.SubId'
      'inner join WFBOrder_Main C on A.MainId=C.MainId'
      
        'where C.ChkStatus='#39#23457#26680#36890#36807#39' and RTrim(isnull(A.SCStatus,'#39#39'))<>'#39#24050#23436#25104#39 +
        ' '
      'and isnull(B.AnPaiChkStatus,'#39#39')='#39#23457#26680#36890#36807#39'  and A.SCXDFlag=1'
      '')
    Left = 840
    Top = 144
  end
  object ADOQueryLabel: TADOQuery
    Connection = DataLink_CYZZ.ADOLink
    LockType = ltReadOnly
    Parameters = <>
    SQL.Strings = (
      'select A.*,C.OrderNo,B.SWFBColor,B.SWFBHW,B.SWFBCodeName,'
      '       B.SWFBCode,B.SWFBKZ,B.WKMS,B.KZBig,B.KZSmal,'
      
        '       SCMQty=(select isnull(Sum(MJLen),0) from WFB_MJJY WM wher' +
        'e WM.APId=A.APId and len(WM.MJID)>8),'
      
        '       Case when A.OrderQtyM-(select isnull(Sum(MJLen),0) from W' +
        'FB_MJJY WM where WM.APId=A.APId )>0 '
      
        '                then A.OrderQtyM-(select isnull(Sum(MJLen),0) fr' +
        'om WFB_MJJY WM where WM.APId=A.APId ) else 0 end as WSCMQty'
      'from WFBOrder_Sub_AnPai A '
      'inner join WFBOrder_Sub B on A.SubId=B.SubId'
      'inner join WFBOrder_Main C on A.MainId=C.MainId'
      
        'where C.ChkStatus='#39#23457#26680#36890#36807#39' and RTrim(isnull(A.SCStatus,'#39#39'))<>'#39#24050#23436#25104#39 +
        ' '
      'and isnull(B.AnPaiChkStatus,'#39#39')='#39#23457#26680#36890#36807#39'  and A.SCXDFlag=1'
      '')
    Left = 827
    Top = 459
  end
  object RMGridReport1: TRMGridReport
    ThreadPrepareReport = True
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
    ModalPreview = False
    ShowProgress = False
    DefaultCollate = False
    ShowPrintDialog = False
    SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
    Preview = RMPreview1
    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 = 676
    Top = 450
    ReportData = {}
  end
end
