⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unttransferinstack.dfm

📁 是分布式粮库程序,是采用Delphi实现的
💻 DFM
📖 第 1 页 / 共 3 页
字号:
      FieldName = 'CASE_ID'
      Origin = 'LYDB."dbo.ENT_INSTACK".CASE_ID'
      Size = 12
    end
    object QrySQLFREIGHT_NUMBER: TStringField
      DisplayLabel = #36710#33337#21495
      FieldName = 'FREIGHT_NUMBER'
      Origin = 'LYDB."dbo.ENT_INSTACK".FREIGHT_NUMBER'
      Size = 12
    end
    object QrySQLFREIGHT: TFloatField
      DisplayLabel = #24212#20184#36153#29992
      FieldName = 'FREIGHT'
      Origin = 'LYDB."dbo.ENT_INSTACK".FREIGHT'
    end
    object QrySQLFROM_STATION: TStringField
      DisplayLabel = #21457#31449
      FieldName = 'FROM_STATION'
      Origin = 'LYDB.ENT_INSTACK.FROM_STATION'
    end
    object QrySQLTO_STATION: TStringField
      DisplayLabel = #21040#31449
      FieldName = 'TO_STATION'
      Origin = 'LYDB.ENT_INSTACK.TO_STATION'
      Size = 12
    end
    object QrySQLARRIVAL_TIME: TDateTimeField
      DisplayLabel = #21040#36798#26102#38388
      FieldName = 'ARRIVAL_TIME'
      Origin = 'LYDB.ENT_INSTACK.ARRIVAL_TIME'
      EditMask = '!9999/99/00;1;_'
    end
    object QrySQLIN_FOOD: TStringField
      DisplayLabel = #23454#25910#21697#31181
      FieldName = 'IN_FOOD'
      Origin = 'LYDB.ENT_INSTACK.IN_FOOD'
      Size = 12
    end
    object QrySQLIN_QUANTITY: TFloatField
      DisplayLabel = #20837#24211#25968#37327
      FieldName = 'IN_QUANTITY'
      Origin = 'LYDB."dbo.ENT_INSTACK".IN_QUANTITY'
    end
    object QrySQLIN_TIME: TDateTimeField
      DisplayLabel = #20837#24211#26102#38388
      FieldName = 'IN_TIME'
      Origin = 'LYDB.ENT_INSTACK.IN_TIME'
      OnSetText = QrySQLIN_TIMESetText
      EditMask = '!9999/99/99;1;_'
    end
    object QrySQLSTORAGE: TFloatField
      DisplayLabel = #24211#23384#37327
      FieldName = 'STORAGE'
      Origin = 'LYDB."dbo.ENT_INSTACK".STORAGE'
    end
    object QrySQLPRICE: TFloatField
      DisplayLabel = #21333#20215
      FieldName = 'PRICE'
      Origin = 'LYDB."dbo.ENT_INSTACK".PRICE'
    end
    object QrySQLNEW: TIntegerField
      DisplayLabel = #26032#34955
      FieldName = 'NEW'
      Origin = 'LYDB."dbo.ENT_INSTACK".NEW'
    end
    object QrySQLOLD: TIntegerField
      DisplayLabel = #26087#34955
      FieldName = 'OLD'
      Origin = 'LYDB."dbo.ENT_INSTACK".OLD'
    end
    object QrySQLMISC: TIntegerField
      DisplayLabel = #26434#34955
      FieldName = 'MISC'
      Origin = 'LYDB."dbo.ENT_INSTACK".MISC'
    end
    object QrySQLR_MISC: TIntegerField
      DisplayLabel = #22312#24211#26434#21253#35013
      FieldName = 'R_MISC'
      Origin = 'LYDB.ENT_INSTACK.R_MISC'
    end
    object QrySQLR_OLD: TIntegerField
      DisplayLabel = #22312#24211#26087#21253#35013
      FieldName = 'R_OLD'
      Origin = 'LYDB.ENT_INSTACK.R_OLD'
    end
    object QrySQLR_NEW: TIntegerField
      DisplayLabel = #22312#24211#26032#21253#35013
      FieldName = 'R_NEW'
      Origin = 'LYDB.ENT_INSTACK.R_NEW'
    end
    object QrySQLFQ_MOISTURE: TFloatField
      DisplayLabel = #27700#20221
      FieldName = 'FQ_MOISTURE'
      Origin = 'LYDB."dbo.ENT_INSTACK".FQ_MOISTURE'
    end
    object QrySQLFQ_IMPURITY: TFloatField
      DisplayLabel = #26434#36136
      FieldName = 'FQ_IMPURITY'
      Origin = 'LYDB."dbo.ENT_INSTACK".FQ_IMPURITY'
    end
    object QrySQLFQ_FAT: TFloatField
      DisplayLabel = #33026#32938#37240#20540
      FieldName = 'FQ_FAT'
      Origin = 'LYDB.ENT_INSTACK.FQ_FAT'
    end
    object QrySQLFQ_ITEM1: TFloatField
      DisplayLabel = #32431#31918#29575'/'#40644#31890#31859'/'#37240#20215
      FieldName = 'FQ_ITEM1'
      Origin = 'LYDB."dbo.ENT_INSTACK".FQ_ITEM1'
    end
    object QrySQLFQ_ITEM2: TFloatField
      DisplayLabel = #19981#23436#21892#31890
      FieldName = 'FQ_ITEM2'
      Origin = 'LYDB."dbo.ENT_INSTACK".FQ_ITEM2'
    end
    object QrySQLFQ_ITEM3: TFloatField
      DisplayLabel = #25972#31934#31859#31890
      FieldName = 'FQ_ITEM3'
      Origin = 'LYDB."dbo.ENT_INSTACK".FQ_ITEM3'
    end
    object QrySQLFQ_ITEM4: TFloatField
      DisplayLabel = #35895#22806#31961#31859
      FieldName = 'FQ_ITEM4'
      Origin = 'LYDB."dbo.ENT_INSTACK".FQ_ITEM4'
    end
    object QrySQLFQ_ITEM5: TFloatField
      DisplayLabel = #20986#31961#29575'/'#31291#35895#29575'/'#23481#37325'/'#39640#36807#27687#21270#20540
      FieldName = 'FQ_ITEM5'
      Origin = 'LYDB.ENT_INSTACK.FQ_ITEM5'
    end
    object QrySQLFQ_CLASS: TStringField
      DisplayLabel = #36136#37327#31561#32423
      FieldName = 'FQ_CLASS'
      Origin = 'LYDB."dbo.ENT_INSTACK".FQ_CLASS'
      Size = 12
    end
    object QrySQLATTRIBUTE: TStringField
      DisplayLabel = #20648#22791#24615#36136
      FieldName = 'ATTRIBUTE'
      Origin = 'LYDB."dbo.ENT_INSTACK".ATTRIBUTE'
      Size = 12
    end
    object QrySQLSUPPLYER: TStringField
      DisplayLabel = #21457#36135#21333#20301
      FieldName = 'SUPPLYER'
      Origin = 'LYDB."dbo.ENT_INSTACK".SUPPLYER'
      Size = 50
    end
    object QrySQLCLERK: TStringField
      DisplayLabel = #32463#21150#20154
      FieldName = 'CLERK'
      Origin = 'LYDB."dbo.ENT_INSTACK".CLERK'
      Size = 10
    end
    object QrySQLMANAGER: TStringField
      DisplayLabel = #20027#31649
      FieldName = 'MANAGER'
      Origin = 'LYDB."dbo.ENT_INSTACK".MANAGER'
      Size = 10
    end
    object QrySQLPROD_AREA: TStringField
      DisplayLabel = #20135#22320
      FieldName = 'PROD_AREA'
      Origin = 'LYDB.ENT_INSTACK.PROD_AREA'
      Size = 12
    end
    object QrySQLADJUST_ID: TStringField
      DisplayLabel = #35843#25972#32534#21495
      FieldName = 'ADJUST_ID'
      Origin = 'LYDB.ENT_INSTACK.ADJUST_ID'
      Size = 12
    end
    object QrySQLNOTY_ITEM_ID: TStringField
      DisplayLabel = #36890#30693#21333#32454#30446
      FieldName = 'NOTY_ITEM_ID'
      Origin = 'LYDB.ENT_INSTACK.NOTY_ITEM_ID'
      Size = 12
    end
    object QrySQLNOTY_FOOD: TStringField
      DisplayLabel = #36890#30693#21697#31181
      FieldName = 'NOTY_FOOD'
      Origin = 'LYDB.ENT_INSTACK.NOTY_FOOD'
      Size = 12
    end
    object QrySQLNOTY_QUANTITY: TFloatField
      DisplayLabel = #36890#30693#25968#37327
      FieldName = 'NOTY_QUANTITY'
      Origin = 'LYDB.ENT_INSTACK.NOTY_QUANTITY'
    end
    object QrySQLUNIT_ID: TIntegerField
      DisplayLabel = #20998#20844#21496#32534#21495
      FieldName = 'UNIT_ID'
      Origin = 'LYDB.ENT_INSTACK.UNIT_ID'
    end
    object QrySQLSITE_ID: TIntegerField
      DisplayLabel = #24211#28857
      FieldName = 'SITE_ID'
      Origin = 'LYDB.ENT_INSTACK.SITE_ID'
    end
    object QrySQLDEPOT_ID: TIntegerField
      DisplayLabel = #20179#24211
      FieldName = 'DEPOT_ID'
      Origin = 'LYDB.ENT_INSTACK.DEPOT_ID'
    end
    object QrySQLFOODPOSITION_ID: TIntegerField
      DisplayLabel = #36135#20301
      FieldName = 'FOODPOSITION_ID'
      Origin = 'LYDB.ENT_INSTACK.FOODPOSITION_ID'
    end
    object QrySQLATTACHMENT: TStringField
      DisplayLabel = #30452#31649#24615#36136
      FieldName = 'ATTACHMENT'
      Origin = 'LYDB.ENT_INSTACK.ATTACHMENT'
    end
    object QrySQLREAP_YEAR: TIntegerField
      DisplayLabel = #25910#33719#24180#20221
      FieldName = 'REAP_YEAR'
      Origin = 'LYDB.ENT_INSTACK.REAP_YEAR'
    end
    object QrySQLMEMO: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'MEMO'
      Origin = 'LYDB."dbo.ENT_INSTACK".MEMO'
      Size = 50
    end
    object QrySQLAdjustor: TStringField
      DisplayLabel = #35843#25972#21592
      FieldName = 'Adjustor'
      Origin = 'LYDB.ENT_INSTACK.Adjustor'
      Size = 12
    end
    object QrySQLCOM_FLAG: TIntegerField
      FieldName = 'COM_FLAG'
      Origin = 'LYDB.ENT_INSTACK.COM_FLAG'
    end
    object QrySQLINTYPE: TStringField
      DisplayLabel = #20837#24211#31867#22411
      FieldName = 'INTYPE'
      Origin = 'LYDB.ENT_INSTACK.INTYPE'
      Size = 12
    end
    object QrySQLTORN: TIntegerField
      DisplayLabel = #24223#34955
      FieldName = 'TORN'
      Origin = 'LYDB.ENT_INSTACK.TORN'
    end
    object QrySQLKNIT: TIntegerField
      DisplayLabel = #32534#32455#34955
      FieldName = 'KNIT'
      Origin = 'LYDB.ENT_INSTACK.KNIT'
    end
    object QrySQLR_TORN: TIntegerField
      DisplayLabel = #22312#24211#24223#34955
      FieldName = 'R_TORN'
      Origin = 'LYDB.ENT_INSTACK.R_TORN'
    end
    object QrySQLR_KNIT: TIntegerField
      DisplayLabel = #22312#24211#32534#32455#34955
      FieldName = 'R_KNIT'
      Origin = 'LYDB.ENT_INSTACK.R_KNIT'
    end
    object QrySQLSURPLUS: TFloatField
      DisplayLabel = #28322#20313
      FieldName = 'SURPLUS'
      Origin = 'LYDB.ENT_INSTACK.R_KNIT'
    end
  end
  inherited UpdateSQL1: TUpdateSQL
    ModifySQL.Strings = (
      'update ENT_INSTACK'
      'set'
      '  UNIT_ID = :UNIT_ID,'
      '  SITE_ID = :SITE_ID,'
      '  DEPOT_ID = :DEPOT_ID,'
      '  INSTACK_ID = :INSTACK_ID,'
      '  CASE_ID = :CASE_ID,'
      '  ADJUST_ID = :ADJUST_ID,'
      '  FOODPOSITION_ID = :FOODPOSITION_ID,'
      '  NOTY_ITEM_ID = :NOTY_ITEM_ID,'
      '  NOTY_FOOD = :NOTY_FOOD,'
      '  FROM_STATION = :FROM_STATION,'
      '  FREIGHT_NUMBER = :FREIGHT_NUMBER,'
      '  TO_STATION = :TO_STATION,'
      '  FREIGHT = :FREIGHT,'
      '  IN_TIME = :IN_TIME,'
      '  IN_QUANTITY = :IN_QUANTITY,'
      '  INTYPE = :INTYPE,'
      '  STORAGE = :STORAGE,'
      '  PRICE = :PRICE,'
      '  REAP_YEAR = :REAP_YEAR,'
      '  PROD_AREA = :PROD_AREA,'
      '  NEW = :NEW,'
      '  OLD = :OLD,'
      '  MISC = :MISC,'
      '  TORN = :TORN,'
      '  KNIT = :KNIT,'
      '  FQ_MOISTURE = :FQ_MOISTURE,'
      '  FQ_IMPURITY = :FQ_IMPURITY,'
      '  FQ_FAT = :FQ_FAT,'
      '  FQ_ITEM1 = :FQ_ITEM1,'
      '  FQ_ITEM2 = :FQ_ITEM2,'
      '  FQ_ITEM3 = :FQ_ITEM3,'
      '  FQ_ITEM5 = :FQ_ITEM5,'
      '  FQ_ITEM4 = :FQ_ITEM4,'
      '  FQ_CLASS = :FQ_CLASS,'
      '  ATTRIBUTE = :ATTRIBUTE,'
      '  MEMO = :MEMO,'
      '  COM_FLAG = :COM_FLAG,'
      '  NOTY_QUANTITY = :NOTY_QUANTITY,'
      '  IN_FOOD = :IN_FOOD,'
      '  SUPPLYER = :SUPPLYER,'
      '  ARRIVAL_TIME = :ARRIVAL_TIME,'
      '  CLERK = :CLERK,'
      '  MANAGER = :MANAGER,'
      '  Adjustor = :Adjustor,'
      '  ATTACHMENT = :ATTACHMENT,'
      '  R_NEW = :R_NEW,'
      '  R_OLD = :R_OLD,'
      '  R_MISC = :R_MISC,'
      '  R_TORN = :R_TORN,'
      '  R_KNIT = :R_KNIT,'
      '  SURPLUS = :SURPLUS'
      'where'
      '  UNIT_ID = :OLD_UNIT_ID and'
      '  INSTACK_ID = :OLD_INSTACK_ID')
    InsertSQL.Strings = (
      'insert into ENT_INSTACK'
      
        '  (UNIT_ID, SITE_ID, DEPOT_ID, INSTACK_ID, CASE_ID, ADJUST_ID, F' +
        'OODPOSITION_ID, '
      
        '   NOTY_ITEM_ID, NOTY_FOOD, FROM_STATION, FREIGHT_NUMBER, TO_STA' +
        'TION, FREIGHT, '
      
        '   IN_TIME, IN_QUANTITY, INTYPE, STORAGE, PRICE, REAP_YEAR, PROD' +
        '_AREA, NEW, OLD, '
      
        '   MISC, TORN, KNIT, FQ_MOISTURE, FQ_IMPURITY, FQ_FAT, FQ_ITEM1,' +
        ' FQ_ITEM2, FQ_ITEM3, FQ_ITEM5, '
      
        '   FQ_ITEM4, FQ_CLASS, ATTRIBUTE, MEMO, COM_FLAG, NOTY_QUANTITY,' +
        ' IN_FOOD, '
      
        '   SUPPLYER, ARRIVAL_TIME, CLERK, MANAGER, Adjustor, ATTACHMENT,' +
        ' R_NEW, '
      '   R_OLD, R_MISC, R_TORN, R_KNIT, SURPLUS)'
      'values'
      
        '  (:UNIT_ID, :SITE_ID, :DEPOT_ID, :INSTACK_ID, :CASE_ID, :ADJUST' +
        '_ID, :FOODPOSITION_ID, '
      
        '   :NOTY_ITEM_ID, :NOTY_FOOD, :FROM_STATION, :FREIGHT_NUMBER, :T' +
        'O_STATION, '
      
        '   :FREIGHT, :IN_TIME, :IN_QUANTITY, :INTYPE, :STORAGE, :PRICE, ' +
        ':REAP_YEAR, :PROD_AREA, '
      
        '   :NEW, :OLD, :MISC, :TORN, :KNIT, :FQ_MOISTURE, :FQ_IMPURITY, ' +
        ':FQ_FAT, :FQ_ITEM1, :FQ_ITEM2, '
      
        '   :FQ_ITEM3, :FQ_ITEM5, :FQ_ITEM4, :FQ_CLASS, :ATTRIBUTE, :MEMO' +
        ', :COM_FLAG, '
      
        '   :NOTY_QUANTITY, :IN_FOOD, :SUPPLYER, :ARRIVAL_TIME, :CLERK, :' +
        'MANAGER, '
      
        '   :Adjustor, :ATTACHMENT, :R_NEW, :R_OLD, :R_MISC, :R_TORN, :R_' +
        'KNIT, :SURPLUS)')
    DeleteSQL.Strings = (
      'delete from ENT_INSTACK'
      'where'
      '  UNIT_ID = :OLD_UNIT_ID and'
      '  INSTACK_ID = :OLD_INSTACK_ID')
    Left = 272
  end
  inherited FontDialog: TFontDialog
    Left = 120
  end
  object TblFood: TTable
    Active = True
    DatabaseName = 'LYDB'
    TableName = 'dbo.ENT_FOOD_TYPE'
    Left = 320
  end
  object DataSourceFood: TDataSource
    DataSet = TblFood
    Left = 350
  end
  object QryFoodStyle: TQuery
    DatabaseName = 'LYDB'
    Left = 248
    Top = 32
  end
  object DataSourcePosition: TDataSource
    DataSet = QryPosition
    Left = 561
  end
  object DataSourceSite: TDataSource
    DataSet = QrySite
    Left = 435
  end
  object DataSourceDepot: TDataSource
    DataSet = QryDepot
    Left = 500
  end
  object TblAttribute: TTable
    Active = True
    DatabaseName = 'LYDB'
    TableName = 'dbo.ENT_ATTRIBUTE'
    Left = 640
  end
  object DataSourceAttribute: TDataSource
    DataSet = TblAttribute
    Left = 672
  end
  object TblAtechment: TTable
    Active = True
    DatabaseName = 'LYDB'
    TableName = 'dbo.ENT_ATTACHMENT'
    Left = 720
  end
  object DataSourceAtechmet: TDataSource
    DataSet = TblAtechment
    Left = 752
  end
  object TblUnitInfo: TTable
    Active = True
    DatabaseName = 'LYDB'
    TableName = 'dbo.ENT_UNIT_INFO'
    Left = 104
    Top = 240
  end
  object DataSourceUnitInfo: TDataSource
    DataSet = TblUnitInfo
    Left = 136
    Top = 240
  end
  object QryPosition: TQuery
    Active = True
    DatabaseName = 'LYDB'
    SQL.Strings = (
      'select * from ent_fdposition_info')
    Left = 534
  end
  object QryDepot: TQuery
    Active = True
    DatabaseName = 'LYDB'
    SQL.Strings = (
      'select * from ent_depot_info')
    Left = 470
  end
  object QrySite: TQuery
    Active = True
    DatabaseName = 'LYDB'
    SQL.Strings = (
      'select * from ent_site')
    Left = 404
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -