bas_item_new.dfm

一个MRPII系统源代码版本

        item
          EditButtons = <>
          FieldName = 'CurrentFreezeInv'
          Footers = <>
          Title.Caption = #20923#32467#24211#23384#37327
          Width = 65
        end
        item
          EditButtons = <>
          FieldName = 'CurrentOnShipInv'
          Footers = <>
          Title.Caption = #22312#36816#24211#23384#37327
          Width = 65
        end
        item
          EditButtons = <>
          FieldName = 'CurrentWasterInv'
          Footers = <>
          Title.Caption = #24223#21697#24211#23384#37327
          Width = 68
        end
        item
          EditButtons = <>
          FieldName = 'opInv'
          Footers = <>
          Title.Caption = #22996#22806#26448#26009#24211#23384
          Width = 60
        end
        item
          EditButtons = <>
          FieldName = 'UomCode'
          Footers = <>
          Title.Caption = #35745#37327#21333#20301#20195#30721
          Visible = False
        end
        item
          EditButtons = <>
          FieldName = 'EmployeeCode'
          Footers = <>
          Title.Caption = #37319#36141#21592#20195#30721
          Visible = False
        end
        item
          EditButtons = <>
          FieldName = 'whCode'
          Footers = <>
          Title.Caption = #20179#24211#20195#30721
          Visible = False
        end
        item
          EditButtons = <>
          FieldName = 'Pla_EmployeeCode'
          Footers = <>
          Title.Caption = #35745#21010#21592#20195#30721
          Visible = False
        end
        item
          EditButtons = <>
          FieldName = 'DeptCode'
          Footers = <>
          Title.Caption = #37096#38376#20195#30721
          Visible = False
        end
        item
          EditButtons = <>
          FieldName = 'wh_EmployeeCode'
          Footers = <>
          Title.Caption = #20179#31649#21592#20195#30721
          Visible = False
        end
        item
          EditButtons = <>
          FieldName = 'AssetKmCode'
          Footers = <>
          Title.Caption = #36164#20135#31185#30446#20195#30721
        end
        item
          EditButtons = <>
          FieldName = 'KmName'
          Footers = <>
          Title.Caption = #36164#20135#31185#30446#21517#31216
          Width = 91
        end
        item
          EditButtons = <>
          FieldName = 'InSpecTEmployeeCode'
          Footers = <>
          Title.Caption = #36136#26816#21592#20195#30721
          Visible = False
        end
        item
          EditButtons = <>
          FieldName = 'InSpecTEmployeeName'
          Footers = <>
          Title.Caption = #36136#26816#21592#22995#21517
          Width = 70
        end
        item
          EditButtons = <>
          FieldName = 'ScrApType'
          Footers = <>
          KeyList.Strings = (
            '1'
            '2')
          PickList.Strings = (
            '1 '#38750#36880#27493#32791#23613
            '2 '#36880#27493#32791#23613)
          Title.Caption = #29289#26009#32791#23613#26041#24335
        end
        item
          EditButtons = <>
          FieldName = 'ISStockItem'
          Footers = <>
        end>
    end
    object tmp_grid: TDBGridEh
      Left = 488
      Top = 88
      Width = 232
      Height = 120
      DataSource = DataSource
      FooterColor = clWindow
      FooterFont.Charset = GB2312_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -12
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#25340#38899#21152#21152
      TabOrder = 1
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Visible = False
    end
  end
  inherited AdoQry_Tmp: TADOQuery
    Left = 245
    Top = 243
  end
  inherited ActionList: TActionList
    Left = 192
    Top = 160
    inherited Act_Look: TAction
      Enabled = True
      Visible = True
    end
    inherited Act_auto: TAction
      Caption = #33258#21160#33719#21462
      Hint = #33258#21160#33719#21462
      ShortCut = 0
    end
    inherited Action1: TAction
      ShortCut = 0
    end
    inherited Action3: TAction
      Hint = #26080#25928'/'#26377#25928'('#31354#26684')'
      ShortCut = 32
      OnExecute = Action3Execute
    end
  end
  inherited AdoQry_Main: TADOQuery
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=mdrcmrm;Persist Security Info=True;' +
      'User ID=mdrcmrm;Initial Catalog=Mrpii_kelong;Data Source=ExtDA' +
      'TASERVER'
    CursorType = ctStatic
    SQL.Strings = (
      'select * from Vw_Base_Item')
    Left = 336
    Top = 241
    object AdoQry_MainItemCode: TStringField
      FieldName = 'ItemCode'
      Origin = 'Vw_Base_Item'
      Size = 16
    end
    object kk: TStringField
      FieldName = 'ItemName'
      Origin = 'Vw_Base_Item'
      Size = 80
    end
    object AdoQry_MainMaterial: TStringField
      FieldName = 'Material'
      Origin = 'Vw_Base_Item'
      Size = 30
    end
    object AdoQry_MainItemshortName: TStringField
      FieldName = 'ItemshortName'
      Origin = 'Vw_Base_Item'
      Size = 40
    end
    object AdoQry_MainUomCode: TStringField
      FieldName = 'UomCode'
      Origin = 'Vw_Base_Item'
      Size = 4
    end
    object AdoQry_MainUomName: TStringField
      FieldName = 'UomName'
      Origin = 'Vw_Base_Item'
      Size = 10
    end
    object AdoQry_MainClassCode: TStringField
      FieldName = 'ClassCode'
      Origin = 'Vw_Base_Item'
      Size = 16
    end
    object AdoQry_MainClassName: TStringField
      FieldName = 'ClassName'
      Origin = 'Vw_Base_Item'
      Size = 60
    end
    object AdoQry_MainProductClass: TStringField
      FieldName = 'ProductClass'
      Origin = 'Vw_Base_Item'
      Size = 40
    end
    object AdoQry_MainQcClass: TStringField
      FieldName = 'QcClass'
      Origin = 'Vw_Base_Item'
      Size = 40
    end
    object AdoQry_MainUomCodeName: TStringField
      FieldName = 'UomCodeName'
      Origin = 'Vw_Base_Item'
      ReadOnly = True
      Size = 14
    end
    object AdoQry_MainCaiGouyuan: TStringField
      FieldName = 'CaiGouyuan'
      Origin = 'Vw_Base_Item'
      ReadOnly = True
      Size = 90
    end
    object AdoQry_MainwhCodeName: TStringField
      FieldName = 'whCodeName'
      Origin = 'Vw_Base_Item'
      ReadOnly = True
      Size = 44
    end
    object AdoQry_MainJiHuayuan: TStringField
      FieldName = 'JiHuayuan'
      Origin = 'Vw_Base_Item'
      ReadOnly = True
      Size = 90
    end
    object AdoQry_MainEmployeeCode: TStringField
      FieldName = 'EmployeeCode'
      Origin = 'Vw_Base_Item'
      Size = 30
    end
    object AdoQry_MainCaiGou: TStringField
      FieldName = 'CaiGou'
      Origin = 'Vw_Base_Item'
      Size = 60
    end
    object AdoQry_MainwhCode: TStringField
      FieldName = 'whCode'
      Origin = 'Vw_Base_Item'
      Size = 4
    end
    object AdoQry_MainwhName: TStringField
      FieldName = 'whName'
      Origin = 'Vw_Base_Item'
      Size = 40
    end
    object AdoQry_MainPla_EmployeeCode: TStringField
      FieldName = 'Pla_EmployeeCode'
      Origin = 'Vw_Base_Item'
      Size = 30
    end
    object AdoQry_MainJiHua: TStringField
      FieldName = 'JiHua'
      Origin = 'Vw_Base_Item'
      Size = 60
    end
    object AdoQry_Mainwh_EmployeeCode: TStringField
      FieldName = 'wh_EmployeeCode'
      Origin = 'Vw_Base_Item'
      Size = 30
    end
    object AdoQry_Mainwh_EmployeeName: TStringField
      FieldName = 'wh_EmployeeName'
      Origin = 'Vw_Base_Item'
      Size = 60
    end
    object AdoQry_MainItemType: TIntegerField
      FieldName = 'ItemType'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_Maindesignno: TStringField
      FieldName = 'designno'
      Origin = 'Vw_Base_Item'
      Size = 40
    end
    object AdoQry_MainItemUsable: TIntegerField
      FieldName = 'ItemUsable'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_Mainmaxqty: TFloatField
      FieldName = 'maxqty'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_Mainminqty: TFloatField
      FieldName = 'minqty'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_Mainlimitout: TIntegerField
      FieldName = 'limitout'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainLongPurchLT: TIntegerField
      FieldName = 'LongPurchLT'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainiScheck: TIntegerField
      FieldName = 'iScheck'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_Maingreateout: TIntegerField
      FieldName = 'greateout'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_Mainpurchldtime: TFloatField
      FieldName = 'purchldtime'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_Mainmnldtime: TFloatField
      FieldName = 'mnldtime'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainPrepareLT: TIntegerField
      FieldName = 'PrepareLT'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainrunLT: TIntegerField
      FieldName = 'runLT'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainQcLT: TIntegerField
      FieldName = 'QcLT'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainPmCode: TIntegerField
      FieldName = 'PmCode'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainPmBatch: TIntegerField
      FieldName = 'PmBatch'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_Mainonlydefaultwh: TIntegerField
      FieldName = 'onlydefaultwh'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainBarCode: TStringField
      FieldName = 'BarCode'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainItemCode2: TStringField
      FieldName = 'ItemCode2'
      Origin = 'Vw_Base_Item'
      Size = 16
    end
    object AdoQry_MaincanSale: TIntegerField
      FieldName = 'canSale'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainItemcreatetime: TDateTimeField
      FieldName = 'Itemcreatetime'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainItemmodifytime: TDateTimeField
      FieldName = 'Itemmodifytime'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainItemdisabletime: TDateTimeField
      FieldName = 'Itemdisabletime'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainCurrentOnHandInv: TFloatField
      FieldName = 'CurrentOnHandInv'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainCurrentOnCheckInv: TFloatField
      FieldName = 'CurrentOnCheckInv'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainCurrentFreezeInv: TFloatField
      FieldName = 'CurrentFreezeInv'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainCurrentOnShipInv: TFloatField
      FieldName = 'CurrentOnShipInv'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainCurrentWasterInv: TFloatField
      FieldName = 'CurrentWasterInv'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainremArk: TStringField
      FieldName = 'remArk'
      Origin = 'Vw_Base_Item'
      Size = 60
    end
    object AdoQry_MainDeptCode: TStringField
      FieldName = 'DeptCode'
      Origin = 'Vw_Base_Item'
      Size = 8
    end
    object AdoQry_MainDeptName: TStringField
      FieldName = 'DeptName'
      Origin = 'Vw_Base_Item'
      ReadOnly = True
      Size = 60
    end
    object AdoQry_MainBatchstrat: TIntegerField
      FieldName = 'Batchstrat'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainBatchCtrl: TIntegerField
      FieldName = 'BatchCtrl'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainCapacityhours: TFloatField
      FieldName = 'Capacityhours'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainAssetKmCode: TStringField
      FieldName = 'AssetKmCode'
      Size = 15
    end
    object AdoQry_MainItemClass1: TStringField
      FieldName = 'ItemClass1'
      Origin = 'Vw_Base_Item'
      Size = 40
    end
    object AdoQry_MainItemClass2: TStringField
      FieldName = 'ItemClass2'
      Origin = 'Vw_Base_Item'
      Size = 40
    end
    object AdoQry_MainItemClass3: TStringField
      FieldName = 'ItemClass3'
      Origin = 'Vw_Base_Item'
      Size = 40
    end
    object AdoQry_MainItemClass4: TStringField
      FieldName = 'ItemClass4'
      Origin = 'Vw_Base_Item'
      Size = 40
    end
    object AdoQry_MainItemClass5: TStringField
      FieldName = 'ItemClass5'
      Origin = 'Vw_Base_Item'
      Size = 40
    end
    object AdoQry_MainopInv: TFloatField
      FieldName = 'opInv'
      Origin = 'Vw_Base_Item'
    end
    object AdoQry_MainKmName: TStringField
      FieldName = 'KmName'
      Size = 40
    end
    object AdoQry_MainInSpecTEmployeeCode: TStringField
      FieldName = 'InSpecTEmployeeCode'
    end
    object AdoQry_MainInSpecTEmployeeName: TStringField
      FieldName = 'InSpecTEmployeeName'
    end
    object AdoQry_MainScrApType: TIntegerField
      FieldName = 'ScrApType'
    end
    object AdoQry_MainISStockItem: TIntegerField
      DisplayLabel = #26159#21542#24211#23384#20214
      FieldName = 'ISStockItem'
    end
  end
  inherited DataSource: TDataSource
    Left = 272
    Top = 137
  end
end