BUG 11/BUGCD1998_02.ISO/aplic/trade/_setup.1/main.exe/0/RCDATA/TSIFARNIKSKLADISTA/TSIFARNIKSKLADISTA.txt

Text File | 1998-01-05 | 49KB | 2,070 lines

object SifarnikSkladista: TSifarnikSkladista
  Tag = 1
  Left = 155
  Top = 102
  ActiveControl = gTable
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = '�ifarnik skladi�ta'
  ClientHeight = 453
  ClientWidth = 632
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  Position = poScreenCenter
  OnClose = FormClose
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel4: TBevel
    Left = 4
    Top = 62
    Width = 389
    Height = 115
    Shape = bsFrame
  end
  object Bevel3: TBevel
    Left = 4
    Top = 2
    Width = 389
    Height = 43
    Shape = bsFrame
  end
  object Bevel1: TBevel
    Left = 4
    Top = 222
    Width = 389
    Height = 229
    Shape = bsFrame
    Style = bsRaised
  end
  object Label1: TLabel
    Left = 12
    Top = 6
    Width = 27
    Height = 13
    Caption = '�ifra'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label3: TLabel
    Left = 16
    Top = 92
    Width = 40
    Height = 13
    Alignment = taRightJustify
    Caption = 'Org. jed.'
  end
  object PartnerLabel2: TLabel
    Left = 22
    Top = 70
    Width = 34
    Height = 13
    Alignment = taRightJustify
    Caption = 'Vlasnik'
  end
  object PartnerLabel1: TLabel
    Left = 12
    Top = 110
    Width = 53
    Height = 13
    Caption = 'Lokacija:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label6: TLabel
    Left = 144
    Top = 6
    Width = 27
    Height = 13
    Caption = 'Naziv'
    FocusControl = EditNaziv
  end
  object Label11: TLabel
    Left = 68
    Top = 230
    Width = 26
    Height = 13
    Alignment = taRightJustify
    Caption = 'Roba'
    FocusControl = nKontoRobe
  end
  object Label12: TLabel
    Left = 8
    Top = 330
    Width = 86
    Height = 13
    Alignment = taRightJustify
    Caption = 'Nab.vr. prod. robe'
    FocusControl = nKontoNVPRobe
  end
  object Label13: TLabel
    Left = 11
    Top = 370
    Width = 83
    Height = 13
    Alignment = taRightJustify
    Caption = 'Prihodi od prod. r.'
    FocusControl = nKontoPP
  end
  object Label14: TLabel
    Left = 24
    Top = 270
    Width = 71
    Height = 13
    Alignment = taRightJustify
    Caption = 'Razlika u cijeni'
    FocusControl = nKontoRUC
  end
  object Label15: TLabel
    Left = 60
    Top = 410
    Width = 35
    Height = 13
    Alignment = taRightJustify
    Caption = 'Manjak'
    FocusControl = nKontoManjak
  end
  object Label16: TLabel
    Left = 16
    Top = 390
    Width = 79
    Height = 13
    Alignment = taRightJustify
    Caption = 'Tro�kovi prodaje'
    FocusControl = nKontoTP
  end
  object Label17: TLabel
    Left = 42
    Top = 430
    Width = 53
    Height = 13
    Alignment = taRightJustify
    Caption = 'Kvar (otpis)'
    FocusControl = nKontoKvar
  end
  object Bevel2: TBevel
    Left = 400
    Top = 416
    Width = 225
    Height = 34
  end
  object Label7: TLabel
    Left = 11
    Top = 156
    Width = 31
    Height = 13
    Alignment = taRightJustify
    Caption = 'Zemlja'
  end
  object Label10: TLabel
    Left = 202
    Top = 156
    Width = 30
    Height = 13
    Alignment = taRightJustify
    Caption = 'Valuta'
    FocusControl = nValuta
  end
  object Label4: TLabel
    Left = 15
    Top = 250
    Width = 80
    Height = 13
    Alignment = taRightJustify
    Caption = 'Tro�kovi nabave'
  end
  object DBText8: TMyDBText
    Left = 72
    Top = 110
    Width = 317
    Height = 15
    DataField = 'Naziv'
    DataSource = sPartner
  end
  object DBText9: TMyDBText
    Left = 136
    Top = 124
    Width = 253
    Height = 15
    DataField = 'Mjesto'
    DataSource = sPartner
  end
  object DBText10: TMyDBText
    Left = 136
    Top = 138
    Width = 253
    Height = 13
    DataField = 'UlicaBroj'
    DataSource = sPartner
  end
  object Label2: TLabel
    Left = 8
    Top = 226
    Width = 43
    Height = 13
    Alignment = taCenter
    Caption = 'KONTA'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label8: TLabel
    Left = 37
    Top = 350
    Width = 58
    Height = 13
    Alignment = taRightJustify
    Caption = 'Rabat (dani)'
    FocusControl = nKontoManjak
  end
  object Label18: TLabel
    Left = 17
    Top = 288
    Width = 76
    Height = 13
    Alignment = taRightJustify
    Caption = 'Trgova�ka roba'
    FocusControl = nKontoTrgRoba
  end
  object Label19: TLabel
    Left = 9
    Top = 308
    Width = 84
    Height = 13
    Alignment = taRightJustify
    Caption = 'Ukalkulirani porez'
    FocusControl = nKontoKalkPorez
  end
  object VrstaSkladista: TDBVar
    Left = 596
    Top = 14
    Width = 21
    Height = 21
    TabStop = False
    AutoSize = False
    DataField = 'VrstaTer'
    DataSource = sSkladist
    Enabled = False
    TabOrder = 37
    OnChange = VrstaSkladistaChange
  end
  object eKontoRobe: TDBLookupField
    Left = 100
    Top = 226
    Width = 93
    Height = 21
    DataField = 'KONTOROBE'
    DataSource = sSkladist
    LookupSource = sKonta1
    LookupDisplay = 'KONTO'
    LookupField = 'CODE'
    TabOrder = 14
    DisplayName = 'Konto robe'
    OnF2Press = eKontoRobeF2Press
  end
  object eKontoTN: TDBLookupField
    Left = 100
    Top = 246
    Width = 93
    Height = 21
    DataField = 'KONTOTROSKANABAVE'
    DataSource = sSkladist
    LookupSource = sKonta10
    LookupDisplay = 'KONTO'
    LookupField = 'CODE'
    TabOrder = 16
    DisplayName = 'Konto tro�kova nabave'
    OnF2Press = eKontoRobeF2Press
  end
  object eKontoRUC: TDBLookupField
    Left = 100
    Top = 266
    Width = 93
    Height = 21
    DataField = 'KONTORUC'
    DataSource = sSkladist
    LookupSource = sKonta4
    LookupDisplay = 'KONTO'
    LookupField = 'CODE'
    TabOrder = 18
    DisplayName = 'Konto RUC'
    OnF2Press = eKontoRobeF2Press
  end
  object eKontoTrgRoba: TDBLookupField
    Left = 100
    Top = 286
    Width = 93
    Height = 21
    DataField = 'KONTOTRGROBA'
    DataSource = sSkladist
    LookupSource = sKonta8
    LookupDisplay = 'KONTO'
    LookupField = 'CODE'
    TabOrder = 20
    DisplayName = 'Konto prim. dotacije'
    OnF2Press = eKontoRobeF2Press
  end
  object eKontoKalkPorez: TDBLookupField
    Left = 100
    Top = 306
    Width = 93
    Height = 21
    DataField = 'KONTOKALKPOREZ'
    DataSource = sSkladist
    LookupSource = sKonta9
    LookupDisplay = 'KONTO'
    LookupField = 'CODE'
    TabOrder = 22
    DisplayName = 'Konto dane dotacije'
    OnF2Press = eKontoRobeF2Press
  end
  object eKontoNVPRobe: TDBLookupField
    Left = 100
    Top = 326
    Width = 93
    Height = 21
    DataField = 'KONTONVPROBE'
    DataSource = sSkladist
    LookupSource = sKonta2
    LookupDisplay = 'KONTO'
    LookupField = 'CODE'
    TabOrder = 24
    DisplayName = 'Konto NV prod. robe'
    OnF2Press = eKontoRobeF2Press
  end
  object eKontoRabat: TDBLookupField
    Left = 100
    Top = 346
    Width = 93
    Height = 21
    DataField = 'KONTORABATA'
    DataSource = sSkladist
    LookupSource = sKonta11
    LookupDisplay = 'KONTO'
    LookupField = 'CODE'
    TabOrder = 26
    DisplayName = 'Konto rabata'
    OnF2Press = eKontoRobeF2Press
  end
  object eKontoPP: TDBLookupField
    Left = 100
    Top = 366
    Width = 93
    Height = 21
    DataField = 'KONTOPPROBE'
    DataSource = sSkladist
    LookupSource = sKonta3
    LookupDisplay = 'KONTO'
    LookupField = 'CODE'
    TabOrder = 28
    DisplayName = 'Konto prihoda prodane robe'
    OnF2Press = eKontoRobeF2Press
  end
  object eKontoTP: TDBLookupField
    Left = 100
    Top = 386
    Width = 93
    Height = 21
    DataField = 'KONTOTROSKAPRODAJE'
    DataSource = sSkladist
    LookupSource = sKonta6
    LookupDisplay = 'KONTO'
    LookupField = 'CODE'
    TabOrder = 30
    DisplayName = 'Konto tro�kova prodaje'
    OnF2Press = eKontoRobeF2Press
  end
  object eKontoManjak: TDBLookupField
    Left = 100
    Top = 406
    Width = 93
    Height = 21
    DataField = 'KONTOMANJAK'
    DataSource = sSkladist
    LookupSource = sKonta5
    LookupDisplay = 'KONTO'
    LookupField = 'CODE'
    TabOrder = 32
    DisplayName = 'Konto manjak'
    OnF2Press = eKontoRobeF2Press
  end
  object eKontoKvar: TDBLookupField
    Left = 100
    Top = 426
    Width = 93
    Height = 21
    DataField = 'KONTOKVAR'
    DataSource = sSkladist
    LookupSource = sKonta7
    LookupDisplay = 'KONTO'
    LookupField = 'CODE'
    TabOrder = 34
    DisplayName = 'Konto kvar'
    OnF2Press = eKontoRobeF2Press
  end
  object nKontoRobe: TDBName
    Tag = 55
    Left = 192
    Top = 226
    Width = 193
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Ctl3D = True
    DataField = 'Naziv'
    DataSource = sKonta1
    ParentCtl3D = False
    TabOrder = 15
  end
  object nKontoTN: TDBName
    Tag = 55
    Left = 192
    Top = 246
    Width = 193
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Ctl3D = True
    DataField = 'Naziv'
    DataSource = sKonta10
    ParentCtl3D = False
    TabOrder = 17
  end
  object nKontoRUC: TDBName
    Tag = 55
    Left = 192
    Top = 266
    Width = 193
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Ctl3D = True
    DataField = 'Naziv'
    DataSource = sKonta4
    ParentCtl3D = False
    TabOrder = 19
  end
  object nKontoTrgRoba: TDBName
    Tag = 55
    Left = 192
    Top = 286
    Width = 193
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Ctl3D = True
    DataField = 'Naziv'
    DataSource = sKonta8
    ParentCtl3D = False
    TabOrder = 21
  end
  object nKontoKalkPorez: TDBName
    Tag = 55
    Left = 192
    Top = 306
    Width = 193
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Ctl3D = True
    DataField = 'Naziv'
    DataSource = sKonta9
    ParentCtl3D = False
    TabOrder = 23
  end
  object nKontoNVPRobe: TDBName
    Tag = 55
    Left = 192
    Top = 326
    Width = 193
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Ctl3D = True
    DataField = 'Naziv'
    DataSource = sKonta2
    ParentCtl3D = False
    TabOrder = 25
  end
  object nKontoRabat: TDBName
    Tag = 55
    Left = 192
    Top = 346
    Width = 193
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Ctl3D = True
    DataField = 'Naziv'
    DataSource = sKonta11
    ParentCtl3D = False
    TabOrder = 27
  end
  object nKontoPP: TDBName
    Tag = 55
    Left = 192
    Top = 366
    Width = 193
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Ctl3D = True
    DataField = 'Naziv'
    DataSource = sKonta3
    ParentCtl3D = False
    TabOrder = 29
  end
  object nKontoTP: TDBName
    Tag = 55
    Left = 192
    Top = 386
    Width = 193
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Ctl3D = True
    DataField = 'Naziv'
    DataSource = sKonta6
    ParentCtl3D = False
    TabOrder = 31
  end
  object nKontoManjak: TDBName
    Tag = 55
    Left = 192
    Top = 406
    Width = 193
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Ctl3D = True
    DataField = 'Naziv'
    DataSource = sKonta5
    ParentCtl3D = False
    TabOrder = 33
  end
  object nKontoKvar: TDBName
    Tag = 55
    Left = 192
    Top = 426
    Width = 193
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Ctl3D = True
    DataField = 'Naziv'
    DataSource = sKonta7
    ParentCtl3D = False
    TabOrder = 35
  end
  object nOrgJed: TDBName
    Tag = 55
    Left = 184
    Top = 88
    Width = 201
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Ctl3D = True
    DataField = 'Naziv'
    DataSource = sOrgJed
    ParentCtl3D = False
    TabOrder = 8
  end
  object IzlazButton: TBitBtn
    Left = 552
    Top = 420
    Width = 69
    Height = 25
    Cancel = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    OnClick = IzlazButtonClick
    Glyph.Data = {
      76020000424D7602000000000000760000002800000040000000100000000100
      0400000000000002000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333333333333333333333333333333333333333C33333
      333333333333333333333333338F33333333333333333333333333333C0C3333
      3333333333333333333333333888F333333333333333333333333333C0F0C333
      33333333333333333333333388388F3333333333333FF3333333333C0FFF0C33
      33333333330033333333333888F388F33333333333883FF3333333CCC0FFF0C3
      333333333309003333333383388F388F33333333338F883FF3333CCCCC0FFF0C
      3333333333099900333338333388F388F3333FFFFF8F33883FF34CCCCCC0FFF0
      C33300000009999900338F3333388F388F33888888833333883FC4CCCCCC0FFF
      0C33099999999999990088F333F388F388F38FFFFFFF33333F883C4CC0CCC0FF
      F0C30000000999990033388F3833F88F38838888888F333F883333C4CCC0CC0F
      0C3333333309990033333388F338F38888333333338F3F883333333C4C00CCC0
      3333333333090033333333388F883338F3333333338F883333333333C4CCCCCC
      33333333330033333333333388F333F83333333333883333333333333C4CCCC3
      333333333333333333333333388F388333333333333333333333333333C4C333
      3333333333333333333333333388833333333333333333333333333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
  end
  object gTable: TMyDBGrid
    Left = 396
    Top = 4
    Width = 233
    Height = 311
    FindByName = False
    DataSource = sSkladist
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete]
    ParentFont = False
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object eSifra: TDBKeyField
    Left = 12
    Top = 20
    Width = 125
    Height = 20
    AutoSize = False
    DataField = 'SIFRA'
    DataSource = sSkladist
    TabOrder = 3
    DisplayName = '�ifra skladi�ta'
  end
  object EditNaziv: TDBVar
    Left = 144
    Top = 20
    Width = 241
    Height = 20
    AutoSize = False
    DataField = 'Naziv'
    DataSource = sSkladist
    TabOrder = 4
  end
  object eOrgJed: TDBLookupField
    Left = 64
    Top = 88
    Width = 121
    Height = 21
    DataField = 'ORGJED'
    DataSource = sSkladist
    LookupSource = sOrgJed
    LookupDisplay = 'SIFRA'
    LookupField = 'CODE'
    TabOrder = 7
    DisplayName = '�ifra organizacijske jedinice'
    OnF2Press = eOrgJedF2Press
  end
  object eSifPart: TDBJustLookup
    Left = 12
    Top = 126
    Width = 121
    Height = 21
    DataField = 'PARTNER'
    DataSource = sSkladist
    LookupSource = sSifPart
    LookupDisplay = 'SIFRA'
    LookupField = 'PARTNER'
    TabOrder = 9
    DisplayName = '�ifra partnera'
    OnExitChanged = tSkladistPartnerChange
    OnF2Press = eSifPartF2Press
  end
  object eDrzava: TDBLookupField
    Left = 48
    Top = 152
    Width = 145
    Height = 21
    DataField = 'DRZAVA'
    DataSource = sSkladist
    LookupSource = sDrzave
    LookupDisplay = 'SIFRA'
    LookupField = 'CODE'
    TabOrder = 10
    DisplayName = '�ifra dr�ave'
    OnExitChanged = tSkladistVlasnikChange
    OnF2Press = eDrzavaF2Press
  end
  object nValuta: TDBName
    Tag = 55
    Left = 292
    Top = 152
    Width = 97
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Ctl3D = True
    DataField = 'Naziv'
    DataSource = sValute
    ParentCtl3D = False
    TabOrder = 12
  end
  object eValuta: TDBLookupField
    Left = 236
    Top = 152
    Width = 57
    Height = 21
    DataField = 'VALUTA'
    DataSource = sSkladist
    LookupSource = sValute
    LookupDisplay = 'SIFRA'
    LookupField = 'CODE'
    TabOrder = 11
    DisplayName = '�ifra valute'
    OnF2Press = eValutaF2Press
  end
  object ZapisiButton: TBitBtn
    Left = 404
    Top = 420
    Width = 117
    Height = 25
    Caption = 'Skladi�te'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnClick = ZapisiButtonClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
      333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
      0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
      07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
      07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
      0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
      33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
      B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
      3BB33773333773333773B333333B3333333B7333333733333337}
    NumGlyphs = 2
  end
  object xVlasnik: TDBChecker
    Left = 20
    Top = 46
    Width = 361
    Height = 15
    Alignment = taLeftJustify
    Caption =
      'Roba koja se nalazi na ovome skladi�tu vlasni�tvo je na�eg poduz' +
      'e�a ?'
    Ctl3D = True
    DataField = 'Moje'
    DataSource = sSkladist
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 5
    ValueChecked = 'True'
    ValueUnchecked = 'False'
    OnChange = xVlasnikChange
    OnClick = tSkladistMojeChange
  end
  object ePoduzece: TEdit
    Left = 64
    Top = 66
    Width = 321
    Height = 21
    TabStop = False
    AutoSize = False
    Color = clBtnFace
    Enabled = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
  end
  object Book1: TNotebook
    Left = 396
    Top = 320
    Width = 233
    Height = 95
    TabOrder = 36
    object TPage
      Tag = 1
      Left = 0
      Top = 0
      Caption = 'Na�a roba'
      object Book3: TNotebook
        Left = 0
        Top = 0
        Width = 233
        Height = 91
        PageIndex = 1
        TabOrder = 0
        object TPage
          Tag = 1
          Left = 0
          Top = 0
          Caption = 'Proizvodnja'
          object Bevel9: TBevel
            Left = 0
            Top = 0
            Width = 233
            Height = 89
            Shape = bsFrame
            Style = bsRaised
          end
          object Label26: TLabel
            Left = 4
            Top = 4
            Width = 101
            Height = 13
            Caption = 'Skladi�te veleprodaje'
          end
          object DBText4: TMyDBText
            Left = 112
            Top = 4
            Width = 117
            Height = 37
            DataField = 'Naziv'
            DataSource = sSklad2
            WordWrap = True
          end
          object Label25: TLabel
            Left = 4
            Top = 46
            Width = 103
            Height = 13
            Caption = 'Skladi�te maloprodaje'
          end
          object DBText5: TMyDBText
            Left = 112
            Top = 44
            Width = 109
            Height = 37
            DataField = 'Naziv'
            DataSource = sSklad3
            WordWrap = True
          end
          object DBJustLookup2: TDBJustLookup
            Left = 4
            Top = 20
            Width = 105
            Height = 21
            DataField = 'VP_SKLAD'
            DataSource = sSkladist
            LookupSource = sSklad2
            LookupDisplay = 'SIFRA'
            LookupField = 'CODE'
            TabOrder = 0
            DisplayName = 'Prelazno skladi�te veleprodaje'
          end
          object DBJustLookup3: TDBJustLookup
            Left = 4
            Top = 60
            Width = 105
            Height = 21
            DataField = 'MP_SKLAD'
            DataSource = sSkladist
            LookupSource = sSklad3
            LookupDisplay = 'SIFRA'
            LookupField = 'CODE'
            TabOrder = 1
            DisplayName = 'Prelazno skladi�te u maloprodaji'
          end
        end
        object TPage
          Tag = 1
          Left = 0
          Top = 0
          Caption = 'Veleprodaja'
          object Bevel11: TBevel
            Left = 0
            Top = 0
            Width = 233
            Height = 89
            Shape = bsFrame
            Style = bsRaised
          end
          object Label23: TLabel
            Left = 4
            Top = 44
            Width = 103
            Height = 13
            Caption = 'Skladi�te maloprodaje'
          end
          object DBText3: TMyDBText
            Left = 112
            Top = 44
            Width = 117
            Height = 37
            DataField = 'Naziv'
            DataSource = sSklad3
            WordWrap = True
          end
          object Label24: TLabel
            Left = 4
            Top = 4
            Width = 100
            Height = 13
            Caption = 'Trgova�ka knjiga VP'
          end
          object DBText6: TMyDBText
            Left = 112
            Top = 4
            Width = 117
            Height = 37
            DataField = 'Naziv'
            DataSource = sKnjige
            WordWrap = True
          end
          object DBJustLookup1: TDBJustLookup
            Left = 4
            Top = 60
            Width = 105
            Height = 21
            DataField = 'MP_SKLAD'
            DataSource = sSkladist
            LookupSource = sSklad3
            LookupDisplay = 'SIFRA'
            LookupField = 'CODE'
            TabOrder = 1
            DisplayName = 'Prelazno skladi�te maloprodaje'
          end
          object eKnjiga: TDBJustLookup
            Left = 4
            Top = 20
            Width = 105
            Height = 21
            DataField = 'KNJIGA'
            DataSource = sSkladist
            LookupSource = sKnjige
            LookupDisplay = 'SIFRA'
            LookupField = 'CODE'
            TabOrder = 0
            DisplayName = '�ifra trgova�ke knjige veleprodaje'
            OnF2Press = eKnjigaF2Press
          end
        end
        object TPage
          Tag = 1
          Left = 0
          Top = 0
          Caption = 'Maloprodaja'
          object Bevel10: TBevel
            Left = 0
            Top = 0
            Width = 233
            Height = 89
            Shape = bsFrame
            Style = bsRaised
          end
          object Label9: TLabel
            Left = 4
            Top = 4
            Width = 102
            Height = 13
            Caption = 'Trgova�ka knjiga MP'
          end
          object DBText7: TMyDBText
            Left = 112
            Top = 4
            Width = 117
            Height = 37
            DataField = 'Naziv'
            DataSource = sKnjige
            WordWrap = True
          end
          object Label31: TLabel
            Left = 4
            Top = 44
            Width = 101
            Height = 13
            Caption = 'Skladi�te veleprodaje'
          end
          object DBText15: TMyDBText
            Left = 112
            Top = 44
            Width = 117
            Height = 37
            DataField = 'Naziv'
            DataSource = sSklad2
            WordWrap = True
          end
          object DBLookupField1: TDBJustLookup
            Left = 4
            Top = 20
            Width = 105
            Height = 21
            DataField = 'KNJIGA'
            DataSource = sSkladist
            LookupSource = sKnjige
            LookupDisplay = 'SIFRA'
            LookupField = 'CODE'
            TabOrder = 0
            DisplayName = '�ifra trgova�ke knjige maloprodaje'
            OnF2Press = eKnjigaF2Press
          end
          object DBJustLookup8: TDBJustLookup
            Left = 4
            Top = 60
            Width = 105
            Height = 21
            DataField = 'VP_SKLAD'
            DataSource = sSkladist
            LookupSource = sSklad2
            LookupDisplay = 'SIFRA'
            LookupField = 'CODE'
            TabOrder = 1
            DisplayName = 'Prelazno skladi�te veleprodaje'
          end
        end
        object TPage
          Tag = 1
          Left = 0
          Top = 0
          Caption = 'Materijal'
          object Bevel13: TBevel
            Left = 0
            Top = 2
            Width = 233
            Height = 85
            Shape = bsFrame
            Style = bsRaised
          end
          object Label27: TLabel
            Left = 4
            Top = 44
            Width = 100
            Height = 13
            Caption = 'Skladi�te proizvodnje'
          end
          object DBText11: TMyDBText
            Left = 116
            Top = 44
            Width = 113
            Height = 37
            DataField = 'Naziv'
            DataSource = sSklad4
            WordWrap = True
          end
          object Label28: TLabel
            Left = 4
            Top = 4
            Width = 109
            Height = 13
            Caption = 'Knjiga nabave rep.mat.'
          end
          object DBText12: TMyDBText
            Left = 116
            Top = 4
            Width = 113
            Height = 37
            DataField = 'Naziv'
            DataSource = sKnjige
            WordWrap = True
          end
          object DBJustLookup4: TDBJustLookup
            Left = 4
            Top = 60
            Width = 105
            Height = 21
            DataField = 'MP_SKLAD'
            DataSource = sSkladist
            LookupSource = sSklad4
            LookupDisplay = 'SIFRA'
            LookupField = 'CODE'
            TabOrder = 1
            DisplayName = 'Prelazno skladi�te proizvodnje'
          end
          object DBJustLookup5: TDBJustLookup
            Left = 4
            Top = 20
            Width = 105
            Height = 21
            DataField = 'KNJIGA'
            DataSource = sSkladist
            LookupSource = sKnjige
            LookupDisplay = 'SIFRA'
            LookupField = 'CODE'
            TabOrder = 0
            DisplayName = 'Knjiga nabave i uporabe materijala'
            OnF2Press = eKnjigaF2Press
          end
        end
        object TPage
          Tag = 1
          Left = 0
          Top = 0
          Caption = 'Oprema'
          object Bevel5: TBevel
            Left = 0
            Top = 20
            Width = 233
            Height = 49
            Shape = bsFrame
            Style = bsRaised
          end
          object Label29: TLabel
            Left = 4
            Top = 24
            Width = 106
            Height = 13
            Caption = 'Knjiga opreme i osn.sr.'
          end
          object DBText13: TMyDBText
            Left = 116
            Top = 24
            Width = 113
            Height = 37
            DataField = 'Naziv'
            DataSource = sKnjige
            WordWrap = True
          end
          object DBJustLookup6: TDBJustLookup
            Left = 4
            Top = 40
            Width = 105
            Height = 21
            DataField = 'KNJIGA'
            DataSource = sSkladist
            LookupSource = sKnjige
            LookupDisplay = 'SIFRA'
            LookupField = 'CODE'
            TabOrder = 0
            DisplayName = 'Knjiga opreme i osn. sredstava'
            OnF2Press = eKnjigaF2Press
          end
        end
        object TPage
          Tag = 1
          Left = 0
          Top = 0
          Caption = 'Sitni inventar'
          object Bevel6: TBevel
            Left = 0
            Top = 20
            Width = 233
            Height = 49
            Shape = bsFrame
            Style = bsRaised
          end
          object Label30: TLabel
            Left = 4
            Top = 24
            Width = 107
            Height = 13
            Caption = 'Knjiga sitnog inventara'
          end
          object DBText14: TMyDBText
            Left = 116
            Top = 24
            Width = 113
            Height = 37
            DataField = 'Naziv'
            DataSource = sKnjige
            WordWrap = True
          end
          object DBJustLookup7: TDBJustLookup
            Left = 4
            Top = 40
            Width = 105
            Height = 21
            DataField = 'KNJIGA'
            DataSource = sSkladist
            LookupSource = sKnjige
            LookupDisplay = 'SIFRA'
            LookupField = 'CODE'
            TabOrder = 0
            DisplayName = 'Knjiga sitnog inventara'
            OnF2Press = eKnjigaF2Press
          end
        end
      end
    end
    object TPage
      Tag = 1
      Left = 0
      Top = 0
      Caption = 'Njihova roba'
      object Book2: TNotebook
        Left = 0
        Top = 0
        Width = 233
        Height = 91
        TabOrder = 0
        object TPage
          Tag = 1
          Left = 0
          Top = 0
          Caption = 'Razlika u cijeni'
          object Bevel7: TBevel
            Left = 4
            Top = 6
            Width = 225
            Height = 83
            Shape = bsFrame
          end
          object Label5: TLabel
            Left = 8
            Top = 12
            Width = 56
            Height = 13
            Caption = 'Veleprodaje'
          end
          object Label20: TLabel
            Left = 8
            Top = 50
            Width = 58
            Height = 13
            Caption = 'Maloprodaje'
          end
          object Label21: TLabel
            Left = 76
            Top = 2
            Width = 104
            Height = 13
            Alignment = taCenter
            Caption = 'Prelazna skladi�ta'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object DBText1: TMyDBText
            Left = 116
            Top = 14
            Width = 109
            Height = 35
            DataField = 'Naziv'
            DataSource = sSklad2
            WordWrap = True
          end
          object DBText2: TMyDBText
            Left = 116
            Top = 50
            Width = 109
            Height = 37
            DataField = 'Naziv'
            DataSource = sSklad3
            WordWrap = True
          end
          object Veleprodaja: TDBJustLookup
            Left = 8
            Top = 26
            Width = 105
            Height = 21
            DataField = 'VP_SKLAD'
            DataSource = sSkladist
            LookupSource = sSklad2
            LookupDisplay = 'SIFRA'
            LookupField = 'CODE'
            TabOrder = 0
            DisplayName = 'Prelazno skladi�te u veleprodaji'
          end
          object Maloprodaja: TDBJustLookup
            Left = 8
            Top = 64
            Width = 105
            Height = 21
            DataField = 'MP_SKLAD'
            DataSource = sSkladist
            LookupSource = sSklad3
            LookupDisplay = 'SIFRA'
            LookupField = 'CODE'
            TabOrder = 1
            DisplayName = 'Prelazno skladi�te u maloprodaji'
          end
        end
        object TPage
          Tag = 1
          Left = 0
          Top = 0
          Caption = 'Provizija'
          object Bevel8: TBevel
            Left = 132
            Top = 22
            Width = 93
            Height = 47
            Shape = bsFrame
          end
          object Label22: TLabel
            Left = 136
            Top = 26
            Width = 69
            Height = 13
            Alignment = taCenter
            Caption = 'Stopa provizije'
          end
          object DBRadioGroup2: TMyDBRadioGroup
            Left = 4
            Top = 4
            Width = 125
            Height = 83
            Caption = 'Osnovica za proviziju'
            DataField = 'Osnovica'
            DataSource = sSkladist
            Items.Strings = (
              'Cijena bez rabata'
              'Cijena s 1. rabatom'
              'Cijena s 2. rabatom'
              'Cijena s oba rabata')
            TabOrder = 0
            Values.Strings = (
              '1'
              '2'
              '3'
              '4')
          end
          object DBEdit1: TDBVar
            Left = 144
            Top = 42
            Width = 69
            Height = 21
            AutoSize = False
            DataField = 'Provizija'
            DataSource = sSkladist
            TabOrder = 1
          end
        end
      end
    end
  end
  object Book: TNotebook
    Left = 4
    Top = 178
    Width = 389
    Height = 43
    TabOrder = 13
    object TPage
      Tag = 1
      Left = 0
      Top = 0
      Caption = 'Na�a roba'
      object rVrsta: TMyDBRadioGroup
        Left = 0
        Top = -1
        Width = 389
        Height = 42
        Caption = 'Vrsta tere�enja skladi�ta'
        Columns = 3
        DataField = 'VrstaTer'
        DataSource = sSkladist
        Items.Strings = (
          'Proizvodnja'
          'Veleprodaja'
          'Maloprodaja'
          'Materijal'
          'Oprema'
          'Sitni inventar')
        TabOrder = 0
        Values.Strings = (
          '6'
          '1'
          '2'
          '3'
          '4'
          '5')
        OnChange = rVrstaChange
        OnClick = rVrstaChange
        OnEnter = rVrstaEnter
        OnExit = rVrstaExit
      end
    end
    object TPage
      Tag = 1
      Left = 0
      Top = 0
      Caption = 'Njihova roba'
      object Zarada: TMyDBRadioGroup
        Left = 0
        Top = 4
        Width = 389
        Height = 35
        Caption = 'Zarada na prodaji robe izra�ava se u obliku'
        Columns = 2
        DataField = 'Zarada'
        DataSource = sSkladist
        Items.Strings = (
          'Razlike u cijeni (rabat, mar�a)'
          'Provizije od dobavlja�a (vlasnika)')
        TabOrder = 0
        Values.Strings = (
          '1'
          '2')
        OnChange = ZaradaChange
        OnClick = ZaradaChange
      end
    end
  end
  object sSkladist: TDataSource
    DataSet = tSkladist
    Left = 448
    Top = 28
  end
  object sKonta1: TDataSource
    DataSet = tKonta1
    Left = 456
    Top = 86
  end
  object sKonta2: TDataSource
    DataSet = tKonta2
    Left = 456
    Top = 114
  end
  object sKonta3: TDataSource
    DataSet = tKonta3
    Left = 456
    Top = 142
  end
  object sKonta4: TDataSource
    DataSet = tKonta4
    Left = 456
    Top = 170
  end
  object sKonta5: TDataSource
    DataSet = tKonta5
    Left = 456
    Top = 198
  end
  object sKonta6: TDataSource
    DataSet = tKonta6
    Left = 528
    Top = 86
  end
  object sKonta7: TDataSource
    DataSet = tKonta7
    Left = 528
    Top = 114
  end
  object sKonta8: TDataSource
    DataSet = tKonta8
    Left = 528
    Top = 142
  end
  object sKonta9: TDataSource
    DataSet = tKonta9
    Left = 528
    Top = 170
  end
  object sKonta10: TDataSource
    DataSet = tKonta10
    Left = 528
    Top = 198
  end
  object sOrgJed: TDataSource
    DataSet = tOrgJed
    Left = 136
    Top = 86
  end
  object sSifPart: TDataSource
    DataSet = tSifPart
    Left = 72
    Top = 122
  end
  object sDrzave: TDataSource
    DataSet = tDrzave
    Left = 146
    Top = 148
  end
  object sValute: TDataSource
    DataSet = tValute
    Left = 356
    Top = 150
  end
  object sSklad4: TDataSource
    DataSet = tSklad4
    Left = 590
    Top = 238
  end
  object sKnjige: TDataSource
    DataSet = tKnjige
    Left = 590
    Top = 266
  end
  object sPartner: TDataSource
    DataSet = tPartner
    Left = 264
    Top = 118
  end
  object sSklad2: TDataSource
    DataSet = tSklad2
    Left = 590
    Top = 182
  end
  object sSklad3: TDataSource
    DataSet = tSklad3
    Left = 590
    Top = 210
  end
  object sKonta11: TDataSource
    DataSet = tKonta11
    Left = 528
    Top = 226
  end
  object tKonta1: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'CODE'
    MasterFields = 'KONTOROBE'
    MasterSource = sSkladist
    TableName = 'KONTA.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 428
    Top = 86
  end
  object tKonta2: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'CODE'
    MasterFields = 'KONTONVPROBE'
    MasterSource = sSkladist
    TableName = 'KONTA.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 428
    Top = 114
  end
  object tKonta3: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'CODE'
    MasterFields = 'KONTOPPROBE'
    MasterSource = sSkladist
    TableName = 'KONTA.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 428
    Top = 142
  end
  object tKonta4: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'CODE'
    MasterFields = 'KONTORUC'
    MasterSource = sSkladist
    TableName = 'KONTA.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 428
    Top = 170
  end
  object tKonta5: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'CODE'
    MasterFields = 'KONTOMANJAK'
    MasterSource = sSkladist
    TableName = 'KONTA.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 428
    Top = 198
  end
  object tKonta6: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'CODE'
    MasterFields = 'KONTOTROSKAPRODAJE'
    MasterSource = sSkladist
    TableName = 'KONTA.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 500
    Top = 86
  end
  object tKonta7: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'CODE'
    MasterFields = 'KONTOKVAR'
    MasterSource = sSkladist
    TableName = 'KONTA.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 500
    Top = 114
  end
  object tKonta8: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'CODE'
    MasterFields = 'KONTOTRGROBA'
    MasterSource = sSkladist
    TableName = 'KONTA.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 500
    Top = 142
  end
  object tKonta9: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'CODE'
    MasterFields = 'KONTOKALKPOREZ'
    MasterSource = sSkladist
    TableName = 'KONTA.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 500
    Top = 170
  end
  object tKonta10: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'CODE'
    MasterFields = 'KONTOTROSKANABAVE'
    MasterSource = sSkladist
    TableName = 'KONTA.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 500
    Top = 198
  end
  object tKonta11: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'CODE'
    MasterFields = 'KONTORABATA'
    MasterSource = sSkladist
    TableName = 'KONTA.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 500
    Top = 226
  end
  object tSklad4: TMyTable
    DatabaseName = 'Lokal'
    IndexFieldNames = 'MJESTO;CODE'
    MasterFields = 'MJESTO3;MP_SKLAD'
    MasterSource = sSkladist
    TableName = 'SKLADIST.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 562
    Top = 238
  end
  object tSklad3: TMyTable
    DatabaseName = 'Lokal'
    IndexFieldNames = 'MJESTO;VRSTATER;CODE'
    MasterFields = 'MJESTO2;MPS;MP_SKLAD'
    MasterSource = sSkladist
    TableName = 'SKLADIST.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 562
    Top = 210
  end
  object tSklad2: TMyTable
    DatabaseName = 'Lokal'
    IndexFieldNames = 'MJESTO;VRSTATER;CODE'
    MasterFields = 'MJESTO2;VPS;VP_SKLAD'
    MasterSource = sSkladist
    TableName = 'SKLADIST.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 562
    Top = 182
  end
  object tDrzave: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'CODE'
    MasterFields = 'DRZAVA'
    MasterSource = sSkladist
    TableName = 'ZEMLJA.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 118
    Top = 148
  end
  object tValute: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'CODE'
    MasterFields = 'VALUTA'
    MasterSource = sSkladist
    TableName = 'VALUTA.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 328
    Top = 150
  end
  object tKnjige: TMyTable
    DatabaseName = 'Lokal'
    IndexFieldNames = 'VRSTA;CODE'
    MasterFields = 'VRSTATER;KNJIGA'
    MasterSource = sSkladist
    TableName = 'KNJIGE.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 562
    Top = 266
  end
  object tOrgJed: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'PARTNER;CODE'
    MasterFields = 'PODUZECE;ORGJED'
    MasterSource = sSkladist
    TableName = 'ORG_JED.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 108
    Top = 86
    object tOrgJedCode: TAutoIncField
      FieldName = 'Code'
    end
    object tOrgJedPartner: TIntegerField
      FieldName = 'Partner'
    end
    object tOrgJedSifra: TStringField
      FieldName = 'Sifra'
      Size = 40
    end
    object tOrgJedNaziv: TStringField
      FieldName = 'Naziv'
      Size = 60
    end
  end
  object tPartner: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'Code'
    MasterFields = 'Partner'
    MasterSource = sSifPart
    TableName = 'PARTNER.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 236
    Top = 118
    object tPartnerCode: TAutoIncField
      FieldName = 'Code'
    end
    object tPartnerSifra: TStringField
      FieldName = 'Sifra'
      Size = 40
    end
    object tPartnerNaziv: TStringField
      FieldName = 'Naziv'
      Size = 80
    end
    object tPartnerMjesto: TStringField
      FieldName = 'Mjesto'
      Size = 40
    end
    object tPartnerUlicaBroj: TStringField
      FieldName = 'UlicaBroj'
      Size = 60
    end
    object tPartnerPosta: TIntegerField
      FieldName = 'Posta'
    end
    object tPartnerZemlja: TIntegerField
      FieldName = 'Zemlja'
    end
    object tPartnerJezik: TIntegerField
      FieldName = 'Jezik'
    end
    object tPartnerValuta: TIntegerField
      FieldName = 'Valuta'
    end
    object tPartnerItems: TIntegerField
      FieldName = 'Items'
      Visible = False
    end
  end
  object tSifPart: TMyTable
    DatabaseName = 'Lokal'
    IndexFieldNames = 'DOBAVLJAC;PARTNER'
    MasterFields = 'DOB;PARTNER'
    MasterSource = sSkladist
    TableName = 'SIF_PART.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 44
    Top = 122
    object tSifPartSifra: TStringField
      FieldName = 'Sifra'
      Size = 40
    end
    object tSifPartDobavljac: TStringField
      FieldName = 'Dobavljac'
      Size = 1
    end
    object tSifPartDrzava: TStringField
      FieldName = 'Drzava'
      Size = 1
    end
    object tSifPartPartner: TIntegerField
      FieldName = 'Partner'
    end
    object tSifPartGovor: TIntegerField
      FieldName = 'Govor'
    end
    object tSifPartItems: TIntegerField
      FieldName = 'Items'
      Visible = False
    end
  end
  object tSkladist: TMyTable
    OnCalcFields = tSkladistCalcFields
    OnNewRecord = tSkladistNewRecord
    DatabaseName = 'Lokal'
    IndexFieldNames = 'SIFRA'
    TableName = 'SKLADIST.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 420
    Top = 28
    object tSkladistPoduzece: TIntegerField
      FieldName = 'Poduzece'
      Visible = False
      Calculated = True
    end
    object tSkladistDob: TStringField
      FieldName = 'Dob'
      Visible = False
      Size = 1
      Calculated = True
    end
    object tSkladistVPS: TSmallintField
      FieldName = 'VPS'
      Visible = False
      Calculated = True
    end
    object tSkladistMPS: TSmallintField
      FieldName = 'MPS'
      Visible = False
      Calculated = True
    end
    object tSkladistMjesto2: TStringField
      FieldName = 'Mjesto2'
      Visible = False
      Size = 1
      Calculated = True
    end
    object tSkladistMjesto3: TStringField
      FieldName = 'Mjesto3'
      Visible = False
      Size = 1
      Calculated = True
    end
    object tSkladistCode: TAutoIncField
      FieldName = 'Code'
      Visible = False
    end
    object tSkladistSifra: TStringField
      DisplayLabel = '�ifra skladi�ta'
      DisplayWidth = 15
      FieldName = 'Sifra'
      Size = 40
    end
    object tSkladistNaziv: TStringField
      DisplayLabel = 'Naziv skladi�ta'
      DisplayWidth = 17
      FieldName = 'Naziv'
      Size = 80
    end
    object tSkladistMoje: TBooleanField
      FieldName = 'Moje'
      Visible = False
    end
    object tSkladistPartner: TIntegerField
      FieldName = 'Partner'
      Visible = False
    end
    object tSkladistLokacija: TIntegerField
      FieldName = 'Lokacija'
      Visible = False
    end
    object tSkladistVlasnik: TIntegerField
      FieldName = 'Vlasnik'
      Visible = False
    end
    object tSkladistOrgJed: TIntegerField
      FieldName = 'OrgJed'
      Visible = False
    end
    object tSkladistDrzava: TIntegerField
      FieldName = 'Drzava'
      Visible = False
    end
    object tSkladistMjesto: TStringField
      FieldName = 'Mjesto'
      Visible = False
      Size = 1
    end
    object tSkladistVrstaTer: TSmallintField
      FieldName = 'VrstaTer'
      Visible = False
    end
    object tSkladistZarada: TSmallintField
      FieldName = 'Zarada'
      Visible = False
    end
    object tSkladistVP_Sklad: TIntegerField
      FieldName = 'VP_Sklad'
      Visible = False
    end
    object tSkladistMP_Sklad: TIntegerField
      FieldName = 'MP_Sklad'
      Visible = False
    end
    object tSkladistOsnovica: TSmallintField
      FieldName = 'Osnovica'
      Visible = False
    end
    object tSkladistProvizija: TFloatField
      FieldName = 'Provizija'
      Visible = False
      Precision = 9
    end
    object tSkladistKnjiga: TIntegerField
      FieldName = 'Knjiga'
      Visible = False
    end
    object tSkladistValuta: TIntegerField
      FieldName = 'Valuta'
      Visible = False
    end
    object tSkladistKontoRobe: TIntegerField
      FieldName = 'KontoRobe'
      Visible = False
    end
    object tSkladistKontoNVPRobe: TIntegerField
      FieldName = 'KontoNVPRobe'
      Visible = False
    end
    object tSkladistKontoPPRobe: TIntegerField
      FieldName = 'KontoPPRobe'
      Visible = False
    end
    object tSkladistKontoRUC: TIntegerField
      FieldName = 'KontoRUC'
      Visible = False
    end
    object tSkladistKontoManjak: TIntegerField
      FieldName = 'KontoManjak'
      Visible = False
    end
    object tSkladistKontoTroskaProdaje: TIntegerField
      FieldName = 'KontoTroskaProdaje'
      Visible = False
    end
    object tSkladistKontoKvar: TIntegerField
      FieldName = 'KontoKvar'
      Visible = False
    end
    object tSkladistKontoTrgRoba: TIntegerField
      FieldName = 'KontoTrgRoba'
      Visible = False
    end
    object tSkladistKontoKalkPorez: TIntegerField
      FieldName = 'KontoKalkPorez'
      Visible = False
    end
    object tSkladistKontoTroskaNabave: TIntegerField
      FieldName = 'KontoTroskaNabave'
      Visible = False
    end
    object tSkladistKontoRabata: TIntegerField
      FieldName = 'KontoRabata'
      Visible = False
    end
    object tSkladistItems: TIntegerField
      FieldName = 'Items'
      Visible = False
    end
  end
end