BUG 14/BUGCD1998_05.ISO/aplic/ipos/_setup.1/Knjigovodstvo.exe/0/RCDATA/TFM2800700DNEVNIKOS/TFM2800700DNEVNIKOS.txt

Text File | 1998-04-04 | 34KB | 1,176 lines

object fm2800700DnevnikOs: Tfm2800700DnevnikOs
  Left = 236
  Top = 207
  Width = 796
  Height = 547
  HelpContext = 280070000
  VertScrollBar.Tracking = True
  Caption = 'fm2800700DnevnikOs'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial CE'
  Font.Style = []
  FormStyle = fsMDIChild
  Position = poDefaultPosOnly
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object paTipke: TPanel
    Left = 0
    Top = 27
    Width = 788
    Height = 46
    Align = alTop
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    object bbIspis: TBitBtn
      Left = 74
      Top = 24
      Width = 70
      Height = 20
      Hint = 'Poziv prozora sa popisom izvje�taja'
      Caption = 'Iz&vje�taji'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = bbIspisClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        0003377777777777777308888888888888807F33333333333337088888888888
        88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
        8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
        8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
        33333337FFFF7733333333300000033333333337777773333333}
      NumGlyphs = 2
      Spacing = 2
    end
    object bbIzlaz: TBitBtn
      Left = 3
      Top = 3
      Width = 70
      Height = 20
      Hint = 'Prekid rada i izlaz iz prozora'
      Caption = 'I&zlaz'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = bbIzlazClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
        0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
        0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
        0333337F777FFFFF7F3333000000000003333377777777777333}
      NumGlyphs = 2
      Spacing = 2
    end
    object Panel1: TPanel
      Left = 553
      Top = 1
      Width = 234
      Height = 44
      Align = alRight
      BevelOuter = bvNone
      TabOrder = 2
      object rgRedoslijed: TRadioGroup
        Left = 75
        Top = 4
        Width = 151
        Height = 37
        Caption = 'Redoslijed dokumenata po'
        Columns = 2
        Items.Strings = (
          'knji�enju'
          'datumu')
        TabOrder = 0
        OnClick = rgRedoslijedClick
      end
    end
    object bbKartice: TBitBtn
      Left = 74
      Top = 3
      Width = 70
      Height = 20
      Hint = 'Karitce artikala | Poziv prozora sa prikazom kartica artikala'
      Caption = '&Kartice'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      OnClick = bbKarticeClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        55555555FFFFFFFF5555555000000005555555577777777FF555550999999900
        55555575555555775F55509999999901055557F55555557F75F5001111111101
        105577FFFFFFFF7FF75F00000000000011057777777777775F755070FFFFFF0F
        01105777F555557F75F75500FFFFFF0FF0105577F555FF7F57575550FF700008
        8F0055575FF7777555775555000888888F005555777FFFFFFF77555550000000
        0F055555577777777F7F555550FFFFFF0F05555557F5FFF57F7F555550F000FF
        0005555557F777557775555550FFFFFF0555555557F555FF7F55555550FF7000
        05555555575FF777755555555500055555555555557775555555}
      NumGlyphs = 2
      Spacing = 2
    end
    object bbUlazOs: TBitBtn
      Left = 146
      Top = 3
      Width = 87
      Height = 20
      Caption = 'Ulaz OS-a'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      OnClick = bbUlazOsClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333FFFFFFFFFFFFFFF000000000000000077777777777777770FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07FFFFFFFFFFFFFF70CCCCCCCCCCCCCC07777777777777777088CCCCCCCCC
        C8807FF7777777777FF700000000000000007777777777777777333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
    end
    object bbIzlazOs: TBitBtn
      Left = 146
      Top = 24
      Width = 87
      Height = 20
      Caption = 'Izlaz OS-a'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
      OnClick = bbIzlazOsClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00550B30555000
        0000557F57F557777777550B305508888880557F57F575555557550B30508888
        8805557F57F7FFFFFF75550B300000000055557F5777777777F5550300000000
        0055557F777F555F77F555007800000070555F77557F5F7757F5007888000077
        70557755557F775557F508888800777770557F555577555557F5088808077777
        70557FF5757F555557F5098988077777705577F7557F555557F5999888077777
        705577755575F55557550988888077770555775555575FFF7555088888888000
        55557F55555577775555088888880755555575F5555F77555555508888075555
        5555575FFF775555555555000755555555555577775555555555}
      NumGlyphs = 2
    end
    object bbRevalOs: TBitBtn
      Left = 234
      Top = 3
      Width = 87
      Height = 20
      Caption = 'Revaloriza'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 6
      OnClick = bbRevalOsClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333330000000
        00003333377777777777333330FFFFFFFFF03FF3F7FFFF33FFF7003000000FF0
        00F077F7777773F77737E00FBFBFB0FFFFF07773333FF7FF33F7E0FBFB00000F
        F0F077F333777773F737E0BFBFBFBFB0FFF077F3333FFFF733F7E0FBFB00000F
        F0F077F333777773F737E0BFBFBFBFB0FFF077F33FFFFFF733F7E0FB0000000F
        F0F077FF777777733737000FB0FFFFFFFFF07773F7F333333337333000FFFFFF
        FFF0333777F3FFF33FF7333330F000FF0000333337F777337777333330FFFFFF
        0FF0333337FFFFFF7F37333330CCCCCC0F033333377777777F73333330FFFFFF
        0033333337FFFFFF773333333000000003333333377777777333}
      NumGlyphs = 2
      Spacing = 1
    end
    object bbAmortOs: TBitBtn
      Left = 234
      Top = 24
      Width = 87
      Height = 20
      Caption = 'Amortizacija'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 7
      OnClick = bbAmortOsClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
        305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
        005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
        B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
        B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
        B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
        B0557777FF577777F7F500000E055550805577777F7555575755500000555555
        05555777775555557F5555000555555505555577755555557555}
      NumGlyphs = 2
    end
  end
  object Panel4: TPanel
    Left = 0
    Top = 0
    Width = 788
    Height = 27
    Align = alTop
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    object Label4: TLabel
      Left = 157
      Top = 7
      Width = 27
      Height = 14
      Caption = '&Tra�i:'
      FocusControl = edTrazi
    end
    object DBNavigator1: TDBNavigator
      Left = 1
      Top = 1
      Width = 139
      Height = 25
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh]
      Align = alLeft
      Hints.Strings = (
        'Prvi red'
        'Prethodni red'
        'Sljede�i red'
        'Posljednji red'
        ''
        ''
        ''
        ''
        ''
        'Obnovi, osvje�i podatke sa diska')
      TabOrder = 0
    end
    object edTrazi: TEdit
      Left = 332
      Top = 3
      Width = 140
      Height = 22
      Hint = 'Upisivanjem pojedinih znakova �e se pretra�ivati podaci'
      TabOrder = 2
      OnChange = edTraziChange
    end
    object cbTrazi: TComboBox
      Left = 188
      Top = 3
      Width = 141
      Height = 22
      Style = csDropDownList
      ItemHeight = 14
      Items.Strings = (
        'knji�enje'
        'datum knji�enja'
        'dokument;broj')
      TabOrder = 1
    end
  end
  object sb: TStatusBar
    Left = 0
    Top = 501
    Width = 788
    Height = 19
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial CE'
    Font.Style = [fsBold]
    Panels = <
      item
        Text = 'Status'
        Width = 100
      end
      item
        Width = 100
      end>
    ParentFont = False
    SimplePanel = False
  end
  object PageControl: TPageControl
    Left = 0
    Top = 73
    Width = 788
    Height = 428
    ActivePage = pageTabela
    Align = alClient
    TabOrder = 3
    object pageTabela: TTabSheet
      Hint = 'Tabelarni pregled podataka'
      Caption = 'T&abelarni prikaz'
      object Splitter1: TSplitter
        Left = 540
        Top = 0
        Width = 3
        Height = 200
        Cursor = crHSplit
        Align = alRight
      end
      object Splitter2: TSplitter
        Left = 0
        Top = 200
        Width = 780
        Height = 3
        Cursor = crVSplit
        Align = alBottom
      end
      object grdGlava: TDBGrid
        Left = 0
        Top = 0
        Width = 540
        Height = 200
        Align = alClient
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit]
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Arial CE'
        TitleFont.Style = []
        Columns = <
          item
            FieldName = 'cfStorniran'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clRed
            Font.Height = -11
            Font.Name = 'Arial CE'
            Font.Style = []
            Title.Caption = 'Storniran'
            Width = 24
          end
          item
            FieldName = 'brojTemeljnice'
            Title.Caption = 'Temeljnica'
            Width = 30
          end
          item
            FieldName = 'knjizenje'
            Title.Caption = 'Knji�enje'
            Width = 29
          end
          item
            FieldName = 'godina'
            Title.Caption = 'Godina'
            Width = 37
          end
          item
            FieldName = 'datum'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial CE'
            Font.Style = []
            Title.Caption = 'Datum'
            Width = 62
          end
          item
            FieldName = 'cfDokument'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial CE'
            Font.Style = []
            Title.Caption = 'Dokument'
            Width = 181
          end
          item
            FieldName = 'broj'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial CE'
            Font.Style = []
            Title.Caption = 'Broj'
            Width = 44
          end
          item
            FieldName = 'opisknj'
            Title.Caption = 'Opis'
            Width = 214
          end>
      end
      object Panel2: TPanel
        Left = 543
        Top = 0
        Width = 237
        Height = 200
        Align = alRight
        TabOrder = 1
        object Bevel4: TBevel
          Left = 9
          Top = 14
          Width = 216
          Height = 78
        end
        object Label1: TLabel
          Left = 16
          Top = 29
          Width = 99
          Height = 14
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'Nabavna vrijedn.'
          Color = clGray
          ParentColor = False
        end
        object Label3: TLabel
          Left = 120
          Top = 30
          Width = 99
          Height = 14
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'Amortizacija'
          Color = clGray
          ParentColor = False
        end
        object Label2: TLabel
          Left = 81
          Top = 70
          Width = 30
          Height = 14
          Caption = 'Saldo:'
        end
        object bbPrometDnevnika: TBitBtn
          Left = 15
          Top = 3
          Width = 113
          Height = 21
          Hint = 'Izra�un prometa cijelog dnevnika'
          Caption = 'Promet dnevnika'
          ParentShowHint = False
          ShowHint = False
          TabOrder = 0
          OnClick = bbPrometDnevnikaClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
            73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
            0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
            0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
            0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
            0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
            0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
            0333337F777777737F333308888888880333337F333333337F33330888888888
            03333373FFFFFFFF733333700000000073333337777777773333}
          NumGlyphs = 2
        end
        object lbDug: TStaticText
          Left = 16
          Top = 47
          Width = 99
          Height = 18
          Alignment = taRightJustify
          AutoSize = False
          BorderStyle = sbsSunken
          Caption = 'lbDug'
          TabOrder = 1
        end
        object lbPot: TStaticText
          Left = 120
          Top = 47
          Width = 99
          Height = 18
          Alignment = taRightJustify
          AutoSize = False
          BorderStyle = sbsSunken
          Caption = 'lbPot'
          TabOrder = 2
        end
        object lbSaldo: TStaticText
          Left = 120
          Top = 70
          Width = 99
          Height = 18
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'lbSaldo'
          TabOrder = 3
        end
        object DBNavigator2: TDBNavigator
          Left = 1
          Top = 178
          Width = 235
          Height = 21
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh]
          Align = alBottom
          Hints.Strings = (
            'Prvi red'
            'Prethodni red'
            'Sljede�i red'
            'Posljednji red'
            ''
            ''
            ''
            ''
            ''
            'Obnovi, osvje�i podatke sa diska')
          TabOrder = 4
        end
      end
      object grdStavke: TDBGrid
        Left = 0
        Top = 203
        Width = 780
        Height = 196
        Align = alBottom
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        ReadOnly = True
        TabOrder = 2
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Arial CE'
        TitleFont.Style = []
        Columns = <
          item
            FieldName = 'redbr'
            Title.Caption = 'Rbr'
            Width = 30
          end
          item
            FieldName = 'cfSifra'
            Title.Caption = 'Osnovno sredstvo'
            Width = 203
          end
          item
            Alignment = taRightJustify
            FieldName = 'Ulaz'
            Title.Alignment = taRightJustify
            Width = 77
          end
          item
            Alignment = taRightJustify
            FieldName = 'Izlaz'
            Title.Alignment = taRightJustify
            Width = 78
          end
          item
            FieldName = 'cfNV'
            Title.Alignment = taRightJustify
            Title.Caption = 'Nabavna vrijednost'
            Width = 128
          end
          item
            Alignment = taRightJustify
            FieldName = 'cfIV'
            Title.Alignment = taRightJustify
            Title.Caption = 'Amortizacija'
            Width = 135
          end>
      end
    end
  end
  object ta1DneOs: TTable
    Tag = 4
    DatabaseName = 'c:\knjigovodstvo\data\praznegod'
    TableName = 'dneOs'
    Left = 999
    Top = 309
    object ta1DneOsKnjizenje: TIntegerField
      FieldName = 'Knjizenje'
    end
    object ta1DneOsDokument: TSmallintField
      FieldName = 'Dokument'
    end
    object ta1DneOsGodina: TSmallintField
      FieldName = 'Godina'
    end
    object ta1DneOsBroj: TIntegerField
      FieldName = 'Broj'
    end
    object ta1DneOsDatum: TDateField
      FieldName = 'Datum'
    end
    object ta1DneOsOpisknj: TStringField
      FieldName = 'Opisknj'
      Size = 80
    end
    object ta1DneOsKnjStornirano: TIntegerField
      FieldName = 'KnjStornirano'
    end
    object ta1DneOsDokumTem: TSmallintField
      FieldName = 'DokumTem'
    end
    object ta1DneOsBrojTemeljnice: TSmallintField
      FieldName = 'BrojTemeljnice'
    end
    object ta1DneOscfStorniran: TStringField
      FieldName = 'cfStorniran'
      Calculated = True
    end
    object ta1DneOscfDokument: TStringField
      FieldName = 'cfDokument'
      Size = 100
      Calculated = True
    end
  end
  object ds1DneOs: TDataSource
    DataSet = ta1DneOs
    Left = 1057
    Top = 310
  end
  object ta2DneOs: TTable
    Tag = 4
    DatabaseName = 'c:\knjigovodstvo\data\praznegod'
    TableName = 'dneOs'
    Left = 993
    Top = 367
    object ta2DneOsKnjizenje: TIntegerField
      FieldName = 'Knjizenje'
    end
    object ta2DneOsDokument: TSmallintField
      FieldName = 'Dokument'
    end
    object ta2DneOsGodina: TSmallintField
      FieldName = 'Godina'
    end
    object ta2DneOsBroj: TIntegerField
      FieldName = 'Broj'
    end
    object ta2DneOsDatum: TDateField
      FieldName = 'Datum'
    end
    object ta2DneOsOpisknj: TStringField
      FieldName = 'Opisknj'
      Size = 80
    end
    object ta2DneOsKnjStornirano: TIntegerField
      FieldName = 'KnjStornirano'
    end
    object ta2DneOsDokumTem: TSmallintField
      FieldName = 'DokumTem'
    end
    object ta2DneOsBrojTemeljnice: TSmallintField
      FieldName = 'BrojTemeljnice'
    end
    object ta2DneOscfStorniran: TStringField
      FieldName = 'cfStorniran'
      Calculated = True
    end
    object ta2DneOscfDokument: TStringField
      FieldName = 'cfDokument'
      Size = 100
      Calculated = True
    end
  end
  object ta3DneOs: TTable
    Tag = 4
    DatabaseName = 'c:\knjigovodstvo\data\praznegod'
    TableName = 'dneOs'
    Left = 993
    Top = 425
    object ta3DneOsKnjizenje: TIntegerField
      FieldName = 'Knjizenje'
    end
    object ta3DneOsDokument: TSmallintField
      FieldName = 'Dokument'
    end
    object ta3DneOsGodina: TSmallintField
      FieldName = 'Godina'
    end
    object ta3DneOsBroj: TIntegerField
      FieldName = 'Broj'
    end
    object ta3DneOsDatum: TDateField
      FieldName = 'Datum'
    end
    object ta3DneOsOpisknj: TStringField
      FieldName = 'Opisknj'
      Size = 80
    end
    object ta3DneOsKnjStornirano: TIntegerField
      FieldName = 'KnjStornirano'
    end
    object ta3DneOsDokumTem: TSmallintField
      FieldName = 'DokumTem'
    end
    object ta3DneOsBrojTemeljnice: TSmallintField
      FieldName = 'BrojTemeljnice'
    end
    object ta3DneOscfStorniran: TStringField
      FieldName = 'cfStorniran'
      Calculated = True
    end
    object ta3DneOscfDokument: TStringField
      FieldName = 'cfDokument'
      Size = 100
      Calculated = True
    end
  end
  object ta1StavOs: TTable
    Tag = 4
    DatabaseName = 'c:\knjigovodstvo\data\praznegod'
    TableName = 'stavOs'
    Left = 875
    Top = 311
    object ta1StavOsRecord: TAutoIncField
      FieldName = 'Record'
    end
    object ta1StavOsKnjizenje: TIntegerField
      FieldName = 'Knjizenje'
    end
    object ta1StavOsRedbr: TSmallintField
      FieldName = 'Redbr'
    end
    object ta1StavOsSifra: TIntegerField
      FieldName = 'Sifra'
    end
    object ta1StavOsUlaz: TFloatField
      FieldName = 'Ulaz'
      DisplayFormat = ',0.000##'
      EditFormat = '0.000##'
    end
    object ta1StavOsIzlaz: TFloatField
      FieldName = 'Izlaz'
      DisplayFormat = ',0.000###;;-'
      EditFormat = '0.000##'
    end
    object ta1StavOsNvDug: TFloatField
      FieldName = 'NvDug'
      DisplayFormat = ',0.00####;;-'
      EditFormat = '0.00####'
    end
    object ta1StavOsNvPot: TFloatField
      FieldName = 'NvPot'
      DisplayFormat = ',0.00####;;-'
      EditFormat = '0.00####'
    end
    object ta1StavOsIvDug: TFloatField
      FieldName = 'IvDug'
      DisplayFormat = ',0.00####;;-'
      EditFormat = '0.00####'
    end
    object ta1StavOsIvPot: TFloatField
      FieldName = 'IvPot'
      DisplayFormat = ',0.00####;;-'
      EditFormat = '0.00####'
    end
    object ta1StavOscfSifra: TStringField
      FieldName = 'cfSifra'
      Size = 80
      Calculated = True
    end
    object ta1StavOscfNv: TCurrencyField
      FieldName = 'cfNv'
      DisplayFormat = ',0.00'
      Calculated = True
    end
    object ta1StavOscfIV: TCurrencyField
      FieldName = 'cfIV'
      DisplayFormat = ',0.00'
      Calculated = True
    end
    object ta1StavOscfStorniran: TStringField
      FieldName = 'cfStorniran'
      Calculated = True
    end
    object ta1StavOscfGodina: TIntegerField
      FieldName = 'cfGodina'
      Calculated = True
    end
    object ta1StavOscfDatum: TDateTimeField
      FieldName = 'cfDatum'
      Calculated = True
    end
    object ta1StavOscfDokument: TStringField
      FieldName = 'cfDokument'
      Size = 100
      Calculated = True
    end
    object ta1StavOscfBroj: TIntegerField
      FieldName = 'cfBroj'
      Calculated = True
    end
    object ta1StavOscfOpisknj: TStringField
      FieldName = 'cfOpisknj'
      Size = 100
      Calculated = True
    end
  end
  object ds1StavOs: TDataSource
    DataSet = ta1StavOs
    Left = 929
    Top = 312
  end
  object ta2StavOs: TTable
    Tag = 4
    DatabaseName = 'c:\knjigovodstvo\data\praznegod'
    TableName = 'stavOs'
    Left = 873
    Top = 367
    object ta2StavOsRecord: TAutoIncField
      FieldName = 'Record'
    end
    object ta2StavOsKnjizenje: TIntegerField
      FieldName = 'Knjizenje'
    end
    object ta2StavOsRedbr: TSmallintField
      FieldName = 'Redbr'
    end
    object ta2StavOsSifra: TIntegerField
      FieldName = 'Sifra'
    end
    object ta2StavOsUlaz: TFloatField
      FieldName = 'Ulaz'
      DisplayFormat = ',0.000##'
      EditFormat = '0.000##'
    end
    object ta2StavOsIzlaz: TFloatField
      FieldName = 'Izlaz'
      DisplayFormat = ',0.000###;;-'
      EditFormat = '0.000##'
    end
    object ta2StavOsNvDug: TFloatField
      FieldName = 'NvDug'
      DisplayFormat = ',0.00####;;-'
      EditFormat = '0.00####'
    end
    object ta2StavOsNvPot: TFloatField
      FieldName = 'NvPot'
      DisplayFormat = ',0.00####;;-'
      EditFormat = '0.00####'
    end
    object ta2StavOsIvDug: TFloatField
      FieldName = 'IvDug'
      DisplayFormat = ',0.00####;;-'
      EditFormat = '0.00####'
    end
    object ta2StavOsIvPot: TFloatField
      FieldName = 'IvPot'
      DisplayFormat = ',0.00####;;-'
      EditFormat = '0.00####'
    end
    object ta2StavOscfSifra: TStringField
      FieldName = 'cfSifra'
      Size = 80
      Calculated = True
    end
    object ta2StavOscfNv: TCurrencyField
      FieldName = 'cfNv'
      DisplayFormat = ',0.00'
      Calculated = True
    end
    object ta2StavOscfIV: TCurrencyField
      FieldName = 'cfIV'
      DisplayFormat = ',0.00'
      Calculated = True
    end
    object ta2StavOscfStorniran: TStringField
      FieldName = 'cfStorniran'
      Calculated = True
    end
    object ta2StavOscfGodina: TIntegerField
      FieldName = 'cfGodina'
      Calculated = True
    end
    object ta2StavOscfDatum: TDateTimeField
      FieldName = 'cfDatum'
      Calculated = True
    end
    object ta2StavOscfDokument: TStringField
      FieldName = 'cfDokument'
      Size = 100
      Calculated = True
    end
    object ta2StavOscfBroj: TIntegerField
      FieldName = 'cfBroj'
      Calculated = True
    end
    object ta2StavOscfOpisknj: TStringField
      FieldName = 'cfOpisknj'
      Size = 100
      Calculated = True
    end
  end
  object ta3StavOs: TTable
    Tag = 4
    DatabaseName = 'c:\knjigovodstvo\data\praznegod'
    TableName = 'stavOs'
    Left = 873
    Top = 423
    object ta3StavOsRecord: TAutoIncField
      FieldName = 'Record'
    end
    object ta3StavOsKnjizenje: TIntegerField
      FieldName = 'Knjizenje'
    end
    object ta3StavOsRedbr: TSmallintField
      FieldName = 'Redbr'
    end
    object ta3StavOsSifra: TIntegerField
      FieldName = 'Sifra'
    end
    object ta3StavOsUlaz: TFloatField
      FieldName = 'Ulaz'
      DisplayFormat = ',0.000##'
      EditFormat = '0.000##'
    end
    object ta3StavOsIzlaz: TFloatField
      FieldName = 'Izlaz'
      DisplayFormat = ',0.000###;;-'
      EditFormat = '0.000##'
    end
    object ta3StavOsNvDug: TFloatField
      FieldName = 'NvDug'
      DisplayFormat = ',0.00####;;-'
      EditFormat = '0.00####'
    end
    object ta3StavOsNvPot: TFloatField
      FieldName = 'NvPot'
      DisplayFormat = ',0.00####;;-'
      EditFormat = '0.00####'
    end
    object ta3StavOsIvDug: TFloatField
      FieldName = 'IvDug'
      DisplayFormat = ',0.00####;;-'
      EditFormat = '0.00####'
    end
    object ta3StavOsIvPot: TFloatField
      FieldName = 'IvPot'
      DisplayFormat = ',0.00####;;-'
      EditFormat = '0.00####'
    end
    object ta3StavOscfSifra: TStringField
      FieldName = 'cfSifra'
      Size = 80
      Calculated = True
    end
    object ta3StavOscfNv: TCurrencyField
      FieldName = 'cfNv'
      DisplayFormat = ',0.00'
      Calculated = True
    end
    object ta3StavOscfIV: TCurrencyField
      FieldName = 'cfIV'
      DisplayFormat = ',0.00'
      Calculated = True
    end
    object ta3StavOscfStorniran: TStringField
      FieldName = 'cfStorniran'
      Calculated = True
    end
    object ta3StavOscfGodina: TIntegerField
      FieldName = 'cfGodina'
      Calculated = True
    end
    object ta3StavOscfDatum: TDateTimeField
      FieldName = 'cfDatum'
      Calculated = True
    end
    object ta3StavOscfDokument: TStringField
      FieldName = 'cfDokument'
      Size = 100
      Calculated = True
    end
    object ta3StavOscfBroj: TIntegerField
      FieldName = 'cfBroj'
      Calculated = True
    end
    object ta3StavOscfOpisknj: TStringField
      FieldName = 'cfOpisknj'
      Size = 100
      Calculated = True
    end
  end
  object ta1Jedinice: TTable
    Tag = 3
    DatabaseName = 'praznepar'
    TableName = 'jedinice'
    Left = 859
    Top = 684
    object ta1JediniceSifra: TIntegerField
      FieldName = 'Sifra'
    end
    object ta1JediniceTip: TSmallintField
      FieldName = 'Tip'
    end
    object ta1JediniceNaziv: TStringField
      FieldName = 'Naziv'
      Size = 40
    end
    object ta1JediniceAdresa: TStringField
      FieldName = 'Adresa'
      Size = 60
    end
    object ta1JediniceKonto: TStringField
      FieldName = 'Konto'
      Size = 10
    end
    object ta1JedinicecfTip: TStringField
      FieldName = 'cfTip'
      Calculated = True
    end
  end
  object ta1Vri_sif: TTable
    Tag = 2
    DatabaseName = 'Skupne'
    TableName = 'vri_sif.db'
    Left = 745
    Top = 556
    object ta1Vri_sifSifrarnik: TStringField
      DisplayLabel = '�ifrarnik'
      FieldName = 'Sifrarnik'
      Size = 30
    end
    object ta1Vri_sifSifra: TSmallintField
      DisplayLabel = '�ifra'
      FieldName = 'Sifra'
    end
    object ta1Vri_sifNaziv: TStringField
      FieldName = 'Naziv'
      Size = 50
    end
    object ta1Vri_sifSkr_naziv: TStringField
      DisplayLabel = 'Skra�eni naziv'
      FieldName = 'Skr_naziv'
      Size = 4
    end
    object ta1Vri_sifTip: TSmallintField
      FieldName = 'Tip'
    end
    object ta1Vri_sifKonto: TStringField
      FieldName = 'Konto'
      Size = 10
    end
    object ta1Vri_sifTekst: TBlobField
      FieldName = 'Tekst'
      BlobType = ftFmtMemo
    end
    object ta1Vri_sifZasticen: TBooleanField
      FieldName = 'Zasticen'
    end
    object ta1Vri_sifcfTip: TStringField
      DisplayLabel = 'Tip dokumenta'
      FieldName = 'cfTip'
      Calculated = True
    end
  end
  object ta3Vri_sif: TTable
    Tag = 2
    DatabaseName = 'Skupne'
    TableName = 'vri_sif.db'
    Left = 857
    Top = 552
    object ta3Vri_sifSifrarnik: TStringField
      DisplayLabel = '�ifrarnik'
      FieldName = 'Sifrarnik'
      Size = 30
    end
    object ta3Vri_sifSifra: TSmallintField
      DisplayLabel = '�ifra'
      FieldName = 'Sifra'
    end
    object ta3Vri_sifNaziv: TStringField
      FieldName = 'Naziv'
      Size = 50
    end
    object ta3Vri_sifSkr_naziv: TStringField
      DisplayLabel = 'Skra�eni naziv'
      FieldName = 'Skr_naziv'
      Size = 4
    end
    object ta3Vri_sifTip: TSmallintField
      FieldName = 'Tip'
    end
    object ta3Vri_sifKonto: TStringField
      FieldName = 'Konto'
      Size = 10
    end
    object ta3Vri_sifTekst: TBlobField
      FieldName = 'Tekst'
      BlobType = ftFmtMemo
    end
    object ta3Vri_sifZasticen: TBooleanField
      FieldName = 'Zasticen'
    end
    object ta3Vri_sifcfTip: TStringField
      DisplayLabel = 'Tip dokumenta'
      FieldName = 'cfTip'
      Calculated = True
    end
  end
  object ta1Os: TTable
    Tag = 3
    DatabaseName = 'c:\knjigovodstvo\data\praznepar'
    TableName = 'os'
    Left = 970
    Top = 617
    object ta1OsSifra: TIntegerField
      FieldName = 'Sifra'
    end
    object ta1OsNaziv: TStringField
      FieldName = 'Naziv'
      Size = 60
    end
    object ta1OsAmort: TIntegerField
      FieldName = 'Amort'
    end
    object ta1OsJedinica: TIntegerField
      FieldName = 'Jedinica'
    end
    object ta1OsRucna_reva: TBooleanField
      FieldName = 'Rucna_reva'
    end
    object ta1OsAmort_dane: TBooleanField
      FieldName = 'Amort_dane'
    end
    object ta1OsAmort_god: TBooleanField
      FieldName = 'Amort_god'
    end
    object ta1OsAmort_osnov: TFloatField
      FieldName = 'Amort_osnov'
    end
    object ta1OsDatum_nabave: TDateField
      FieldName = 'Datum_nabave'
    end
    object ta1OsDobavljac: TIntegerField
      FieldName = 'Dobavljac'
    end
    object ta1OsDatum_isknj: TDateField
      FieldName = 'Datum_isknj'
    end
    object ta1OscfAmort: TStringField
      FieldName = 'cfAmort'
      Size = 60
      Calculated = True
    end
    object ta1OscfJedinica: TStringField
      FieldName = 'cfJedinica'
      Size = 60
      Calculated = True
    end
  end
end