untrecievefdbill.~dfm

是分布式粮库程序,是采用Delphi实现的

          end
        end
        inherited BitBtnAll: TBitBtn
          Top = 232
        end
        inherited BitBtnOK: TBitBtn
          Top = 232
        end
        inherited BitBtnCancel1: TBitBtn
          Top = 232
        end
        inherited EdtInitWhr: TEdit
          Top = 224
          Text = ' INTYPE<>'#39#20869#31227#25910#20837#39
        end
      end
    end
    object DBEditR_new: TDBEdit
      Left = 621
      Top = 2
      Width = 55
      Height = 20
      DataField = 'R_NEW'
      DataSource = DataSource1
      Enabled = False
      TabOrder = 1
      Visible = False
    end
    object DBEditR_old: TDBEdit
      Left = 685
      Top = 2
      Width = 55
      Height = 20
      DataField = 'R_OLD'
      DataSource = DataSource1
      Enabled = False
      TabOrder = 2
      Visible = False
    end
    object DBEditR_misc: TDBEdit
      Left = 757
      Top = 2
      Width = 55
      Height = 20
      DataField = 'R_MISC'
      DataSource = DataSource1
      Enabled = False
      TabOrder = 3
      Visible = False
    end
    object DBEditR_torn: TDBEdit
      Left = 813
      Top = 2
      Width = 55
      Height = 20
      DataField = 'R_TORN'
      DataSource = DataSource1
      Enabled = False
      TabOrder = 4
      Visible = False
    end
    object DBEditR_knit: TDBEdit
      Left = 877
      Top = 3
      Width = 55
      Height = 20
      DataField = 'R_KNIT'
      DataSource = DataSource1
      Enabled = False
      TabOrder = 5
      Visible = False
    end
  end
  inherited Pnl2: TPanel
    Top = 355
    Width = 953
    Height = 178
    inherited DBGrid1: TDBGrid
      Width = 951
      Height = 176
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      Columns = <
        item
          Expanded = False
          FieldName = 'site_name'
          Width = 70
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'depot_name'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'name'
          Width = 44
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'IN_FOOD'
          Width = 61
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'IN_QUANTITY'
          Width = 55
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'INTYPE'
          Width = 36
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'IN_TIME'
          Width = 58
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PROD_AREA'
          Width = 62
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'REAP_YEAR'
          Width = 49
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'NEW'
          Width = 41
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'OLD'
          Width = 40
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MISC'
          Width = 37
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'TORN'
          Width = 34
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'KNIT'
          Width = 39
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FQ_MOISTURE'
          Width = 35
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FQ_IMPURITY'
          Width = 35
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FQ_ITEM1'
          Width = 51
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FQ_ITEM2'
          Width = 51
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FQ_ITEM3'
          Width = 51
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FQ_ITEM4'
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FQ_FAT'
          Width = 55
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FQ_ITEM5'
          Width = 74
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FQ_CLASS'
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ATTRIBUTE'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ATTACHMENT'
          Width = 51
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'SUPPLYER'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CLERK'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FROM_STATION'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FREIGHT_NUMBER'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'TO_STATION'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FREIGHT'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ARRIVAL_TIME'
          Width = 53
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MANAGER'
          Width = 52
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'NOTY_ITEM_ID'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'NOTY_FOOD'
          Width = 55
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'NOTY_QUANTITY'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'INSTACK_ID'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'UNIT_ID'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'SITE_ID'
          Width = 39
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DEPOT_ID'
          Width = 38
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FOODPOSITION_ID'
          Width = 39
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PRICE'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MEMO'
          Visible = True
        end>
    end
  end
  inherited PnlBottom: TPanel
    Top = 536
    Width = 953
  end
  object TblFood: TTable [7]
    Active = True
    DatabaseName = 'LYDB'
    TableName = 'dbo.ENT_FOOD_TYPE'
    Left = 336
  end
  object DataSourceFood: TDataSource [8]
    DataSet = TblFood
    Left = 368
  end
  inherited ImageList1: TImageList
    Left = 106
  end
  inherited MainMenu1: TMainMenu
    Left = 144
  end
  inherited DataSource1: TDataSource
    Left = 288
  end
  inherited QrySQL: TQuery
    Active = True
    DatabaseName = 'LYDB'
    SQL.Strings = (
      
        'select INSTACK_ID,CASE_ID,ADJUST_ID,NOTY_ITEM_ID,IN_FOOD,STORAGE' +
        ','
      '       R_NEW,R_OLD,R_MISC,R_TORN,R_KNIT,ATTACHMENT,ATTRIBUTE,'
      
        '       FQ_CLASS,FQ_MOISTURE,FQ_IMPURITY,FQ_FAT,FQ_ITEM1,FQ_ITEM2' +
        ',FQ_ITEM3,'
      
        '       FQ_ITEM4,FQ_ITEM5,REAP_YEAR,PROD_AREA,FROM_STATION,FREIGH' +
        'T_NUMBER,'
      
        '       TO_STATION,FREIGHT,ARRIVAL_TIME,NOTY_FOOD,NOTY_QUANTITY,I' +
        'N_TIME,'
      
        '       IN_QUANTITY,INTYPE,PRICE,NEW,OLD,MISC,TORN,KNIT,SUPPLYER,' +
        'CLERK,'
      
        '       MANAGER,adjustor,ENT_INSTACK.MEMO,ENT_INSTACK.COM_FLAG,SU' +
        'RPLUS,ENT_INSTACK.Unit_id,'
      
        '       ENT_INSTACK.site_id,ENT_INSTACK.depot_id,ENT_INSTACK.FOOD' +
        'POSITION_ID,'
      
        '       ent_fdposition_info.name,ent_depot_info.depot_name,ent_si' +
        'te.site_name,'
      '       ent_unit_info.unit_name'
      
        'from ent_instack,ent_fdposition_info,ent_depot_info,ent_site,ent' +
        '_unit_info'
      
        'where ( ent_instack.FOODPOSITION_ID*=ent_fdposition_info.FOODPOS' +
        'ITION_ID'
      '      and ent_instack.depot_id*=ent_fdposition_info.depot_id'
      '      and ent_instack.site_id*=ent_fdposition_info.site_id'
      '      and ent_instack.unit_id*=ent_fdposition_info.unit_id ) and'
      '      ( ent_instack.depot_id*=ent_depot_info.depot_id'
      '      and ent_instack.site_id*=ent_depot_info.site_id'
      '      and ent_instack.unit_id*=ent_depot_info.unit_id ) and'
      '      ( ent_instack.site_id*=ent_site.site_id'
      '      and ent_instack.unit_id*=ent_site.unit_id )'
      '      and ent_instack.unit_id*=ent_unit_info.unit_id'
      '      and INTYPE<>'#39#20869#31227#25910#20837#39
      
        'order by ent_instack.Unit_id,ent_instack.site_id,ent_instack.DEP' +
        'OT_ID,ent_instack.FOODPOSITION_ID,IN_FOOD'
      '')
    Left = 256
    object QrySQLINSTACK_ID: TStringField
      DisplayLabel = #25910#36135#20837#24211#32534#21495
      FieldName = 'INSTACK_ID'
      Origin = 'LYDB."dbo.ENT_INSTACK".INSTACK_ID'
      Size = 12
    end
    object QrySQLNOTY_ITEM_ID: TStringField
      DisplayLabel = #36890#30693#21333#32454#30446
      FieldName = 'NOTY_ITEM_ID'
      Origin = 'LYDB."dbo.ENT_INSTACK".NOTY_ITEM_ID'
      Size = 12
    end
    object QrySQLNOTY_FOOD: TStringField
      DisplayLabel = #36890#30693#21697#31181
      FieldName = 'NOTY_FOOD'
      Origin = 'LYDB."dbo.ENT_INSTACK".NOTY_FOOD'
      Size = 12
    end
    object QrySQLNOTY_QUANTITY: TFloatField
      DisplayLabel = #36890#30693#25968#37327
      FieldName = 'NOTY_QUANTITY'
      Origin = 'LYDB."dbo.ENT_INSTACK".NOTY_QUANTITY'
    end
    object QrySQLIN_FOOD: TStringField
      DisplayLabel = #23454#25910#21697#31181
      FieldName = 'IN_FOOD'
      Origin = 'LYDB."dbo.ENT_INSTACK".IN_FOOD'
      Size = 12