udmpublish.dfm

一个功能较全的图书进销存软件,功能还算完备

      DisplayWidth = 20
      FieldName = 'ZAITI'
      FixedChar = True
      Size = 50
    end
    object BCDField5: TBCDField
      DisplayLabel = #36827#20215
      DisplayWidth = 10
      FieldName = 'IN_PRICE'
      Precision = 18
      Size = 2
    end
    object BCDField6: TBCDField
      DisplayLabel = #26631#20215
      DisplayWidth = 10
      FieldName = 'SHOW_PRICE'
      Precision = 18
      Size = 2
    end
    object StringField20: TStringField
      DisplayLabel = #24065#31181
      DisplayWidth = 10
      FieldName = 'MONEY_TYPE'
      FixedChar = True
      Size = 50
    end
    object IntegerField5: TIntegerField
      DisplayLabel = #39029#25968
      FieldName = 'PAGES'
    end
    object IntegerField6: TIntegerField
      DisplayLabel = #39302#34255#25968#37327
      FieldName = 'STORE_QUANTITY'
    end
    object StringField21: TStringField
      DisplayLabel = #39302#34255#20449#24687
      DisplayWidth = 20
      FieldName = 'STORE_INFO'
      Size = 255
    end
    object IntegerField7: TIntegerField
      DisplayLabel = #39044#35686#25968#37327
      FieldName = 'ALERT_QUANTITY'
    end
    object IntegerField8: TIntegerField
      DisplayLabel = #20379#24212#21830#32534#21495
      FieldName = 'SUPPLIER_ID'
    end
    object StringField22: TStringField
      DisplayLabel = #25805#20316#20154#21592
      FieldName = 'OPERATOR'
    end
    object StringField23: TStringField
      DisplayLabel = #25805#20316#26102#38388
      FieldName = 'OPERATE_DATE'
      FixedChar = True
      Size = 10
    end
    object StringField24: TStringField
      DisplayLabel = #26377#25928#24615
      FieldName = 'STATUS'
      FixedChar = True
      Size = 1
    end
  end
  object adsrpt_jx: TADODataSet
    Connection = ADOConnection1
    CursorType = ctStatic
    CommandText = 'select * from Publish_rpt_jx'
    Parameters = <>
    Left = 176
    Top = 16
  end
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=;Persist Security Info=True;User ID' +
      '=sa;Initial Catalog=PublishBook;Data Source=(local)'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 40
    Top = 16
  end
  object adsChTemp: TADODataSet
    Connection = ADOConnection1
    CursorType = ctStatic
    CommandText = 'select * from publish_storage_out where STATUS='#39'1'#39
    Parameters = <>
    Left = 176
    Top = 80
    object adsChTempOPERATE_ORDER: TStringField
      DisplayLabel = #25805#20316#27969#27700#21495
      DisplayWidth = 13
      FieldName = 'OPERATE_ORDER'
    end
    object adsChTempBOOK_BARCODE: TStringField
      DisplayLabel = #26465#24418#30721
      DisplayWidth = 20
      FieldName = 'BOOK_BARCODE'
      Size = 50
    end
    object adsChTempCN_NAME: TStringField
      DisplayLabel = #20070#31821#21517#31216
      DisplayWidth = 20
      FieldName = 'CN_NAME'
      Size = 255
    end
    object adsChTempTYPE: TStringField
      DisplayLabel = #26381#21153#31867#22411
      DisplayWidth = 20
      FieldName = 'TYPE'
      FixedChar = True
      Size = 50
    end
    object adsChTempMEMBER_ID: TIntegerField
      DisplayLabel = #20250#21592#24207#21495
      FieldName = 'MEMBER_ID'
    end
    object adsChTempCUSTOMER_NAME: TStringField
      DisplayLabel = #39038#23458#21517#31216
      DisplayWidth = 20
      FieldName = 'CUSTOMER_NAME'
      Size = 100
    end
    object adsChTempSHOW_PRICE: TBCDField
      DisplayLabel = #26631#20215
      DisplayWidth = 10
      FieldName = 'SHOW_PRICE'
      Precision = 18
      Size = 2
    end
    object adsChTempDISCOUNT: TBCDField
      DisplayLabel = #25240#25187
      FieldName = 'DISCOUNT'
      Precision = 3
      Size = 1
    end
    object adsChTempPRICE: TBCDField
      DisplayLabel = #21806#20215
      DisplayWidth = 10
      FieldName = 'PRICE'
      Precision = 18
      Size = 2
    end
    object adsChTempQUANTITY: TIntegerField
      DisplayLabel = #25968#37327
      DisplayWidth = 8
      FieldName = 'QUANTITY'
    end
    object adsChTempMONEY: TBCDField
      DisplayLabel = #37329#39069
      DisplayWidth = 10
      FieldName = 'MONEY'
      Precision = 18
      Size = 2
    end
    object adsChTempOPERATE_DATE: TStringField
      DisplayLabel = #25805#20316#26102#38388
      DisplayWidth = 10
      FieldName = 'OPERATE_DATE'
      FixedChar = True
      Size = 19
    end
    object adsChTempOPERATOR: TStringField
      DisplayLabel = #25805#20316#20154#21592
      FieldName = 'OPERATOR'
    end
    object adsChTempHANDLER: TStringField
      DisplayLabel = #32463#21150#20154
      DisplayWidth = 20
      FieldName = 'HANDLER'
      Size = 100
    end
    object adsChTempNOTE: TStringField
      DisplayLabel = #22791#27880
      DisplayWidth = 20
      FieldName = 'NOTE'
      Size = 255
    end
    object adsChTempIsSale: TStringField
      DisplayLabel = #20986#21806'/'#36864#36135
      FieldName = 'IsSale'
      FixedChar = True
      Size = 10
    end
    object adsChTempSTATUS: TStringField
      DisplayLabel = #29366#24577
      FieldName = 'STATUS'
      FixedChar = True
      Size = 1
    end
  end
  object adtDict: TADOTable
    Connection = ADOConnection1
    TableName = 'dict'
    Left = 32
    Top = 208
    object adtDictCLASS: TStringField
      DisplayLabel = #31867#21035
      FieldName = 'CLASS'
    end
    object adtDictVALUE: TStringField
      DisplayLabel = #23646#24615
      DisplayWidth = 20
      FieldName = 'VALUE'
      Size = 50
    end
    object adtDictPARENT: TStringField
      DisplayLabel = #29238#31867
      DisplayWidth = 20
      FieldName = 'PARENT'
      Size = 50
    end
    object adtDictSTATUS: TStringField
      DisplayLabel = #29366#24577
      FieldName = 'STATUS'
      FixedChar = True
      Size = 1
    end
  end
  object adtProvider: TADOTable
    Connection = ADOConnection1
    TableName = 'PROVIDER'
    Left = 104
    Top = 208
    object adtProviderSUPPLIER_ID: TStringField
      DisplayLabel = #32534#21495
      FieldName = 'SUPPLIER_ID'
    end
    object adtProviderNAME: TStringField
      DisplayLabel = #21517#31216
      DisplayWidth = 40
      FieldName = 'NAME'
      Size = 255
    end
    object adtProviderSHORTNAME: TStringField
      DisplayLabel = #31616#31216
      FieldName = 'SHORTNAME'
    end
    object adtProviderADDRESS: TStringField
      DisplayLabel = #22320#22336
      DisplayWidth = 40
      FieldName = 'ADDRESS'
      Size = 255
    end
    object adtProviderCITY: TStringField
      DisplayLabel = #22478#24066
      FieldName = 'CITY'
    end
    object adtProviderLINKMAN: TStringField
      DisplayLabel = #32852#31995#20154
      FieldName = 'LINKMAN'
    end
    object adtProviderTEL: TStringField
      DisplayLabel = #30005#35805
      DisplayWidth = 20
      FieldName = 'TEL'
      Size = 50
    end
    object adtProviderFAX: TStringField
      DisplayLabel = #20256#30495
      FieldName = 'FAX'
    end
    object adtProviderPOST: TStringField
      DisplayLabel = #37038#32534
      FieldName = 'POST'
      FixedChar = True
      Size = 6
    end
    object adtProviderSTATUS: TStringField
      DisplayLabel = #29366#24577
      FieldName = 'STATUS'
      FixedChar = True
      Size = 1
    end
  end
  object adtMemInfo: TADOTable
    Connection = ADOConnection1
    TableName = 'MEMBER_INFO'
    Left = 184
    Top = 208
    object adtMemInfoENTERPRISE_NAME: TStringField
      DisplayLabel = #20250#21592#21517#31216
      FieldName = 'ENTERPRISE_NAME'
      Size = 255
    end
    object adtMemInfoPINYIN_NAME: TStringField
      DisplayLabel = #25340#38899#21517#31216
      FieldName = 'PINYIN_NAME'
    end
    object adtMemInfoADDRESS: TStringField
      DisplayLabel = #22320#22336
      FieldName = 'ADDRESS'
      Size = 255
    end
    object adtMemInfoPOST: TStringField
      DisplayLabel = #37038#32534
      FieldName = 'POST'
      FixedChar = True
      Size = 6
    end
    object adtMemInfoTEL: TStringField
      DisplayLabel = #30005#35805
      FieldName = 'TEL'
      Size = 50
    end
    object adtMemInfoFAX: TStringField
      DisplayLabel = #20256#30495
      FieldName = 'FAX'
    end
    object adtMemInfoEMAIL: TStringField
      DisplayLabel = 'E-MAIL'
      FieldName = 'EMAIL'
      Size = 100
    end
    object adtMemInfoURL: TStringField
      DisplayLabel = #32593#22336
      FieldName = 'URL'
      Size = 255
    end
    object adtMemInfoDISCOUNT: TBCDField
      DisplayLabel = #25240#25187
      FieldName = 'DISCOUNT'
      Precision = 4
      Size = 1
    end
    object adtMemInfoSTATUS: TStringField
      DisplayLabel = #29366#24577
      FieldName = 'STATUS'
      FixedChar = True
      Size = 1
    end
  end
end