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

Text File | 1998-04-04 | 36KB | 1,272 lines

object fm2800600KarticeOs: Tfm2800600KarticeOs
  Left = 259
  Top = 226
  Width = 800
  Height = 551
  HelpContext = 280060000
  VertScrollBar.Tracking = True
  Caption = 'fm2800600KarticeOs'
  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 = 792
    Height = 46
    Align = alTop
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    object bbIspis: TBitBtn
      Left = 5
      Top = 3
      Width = 87
      Height = 20
      Hint = 'Poziv prozora sa popisom izvje�taja'
      Caption = 'Iz&vje�taji'
      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 = 5
      Top = 23
      Width = 87
      Height = 20
      Hint = 'Prekid rada i izlaz iz prozora'
      Caption = 'I&zlaz'
      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 = 524
      Top = 1
      Width = 267
      Height = 44
      Align = alRight
      BevelOuter = bvNone
      TabOrder = 2
      object rgRedoslijedStavke: TRadioGroup
        Left = 139
        Top = 4
        Width = 120
        Height = 37
        Caption = 'Redoslijed stavaka po'
        Items.Strings = (
          'knji�enju')
        TabOrder = 0
        OnClick = rgRedoslijedStavkeClick
      end
      object rgRedoslijedGlava: TRadioGroup
        Left = 6
        Top = 3
        Width = 124
        Height = 37
        Caption = 'Redos. sredstava po'
        Columns = 2
        Items.Strings = (
          '�ifri'
          'nazivu')
        TabOrder = 1
        OnClick = rgRedoslijedGlavaClick
      end
    end
    object cbAutoPrometKartice: TCheckBox
      Left = 273
      Top = 25
      Width = 199
      Height = 17
      Caption = 'Automatski izra�un prometa kartice'
      State = cbChecked
      TabOrder = 3
    end
    object cbSamoKarticePromet: TCheckBox
      Left = 273
      Top = 7
      Width = 208
      Height = 17
      Caption = 'Prikaz samo kartica koje imaju promet'
      TabOrder = 4
      OnClick = cbSamoKarticePrometClick
    end
    object bbUlazOs: TBitBtn
      Left = 92
      Top = 3
      Width = 87
      Height = 20
      Hint = 'Poziv prozora sa primkama'
      Caption = 'Ulaz OS-a'
      TabOrder = 5
      OnClick = bbUlazOsClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333FFFFFFFFFFFFFFF000000000000000077777777777777770FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07FFFFFFFFFFFFFF70CCCCCCCCCCCCCC07777777777777777088CCCCCCCCC
        C8807FF7777777777FF700000000000000007777777777777777333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
    end
    object bbIzlazOs: TBitBtn
      Left = 92
      Top = 23
      Width = 87
      Height = 20
      Hint = 'Popis otpremnica'
      Caption = 'Izlaz OS-a'
      TabOrder = 6
      OnClick = bbIzlazOsClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00550B30555000
        0000557F57F557777777550B305508888880557F57F575555557550B30508888
        8805557F57F7FFFFFF75550B300000000055557F5777777777F5550300000000
        0055557F777F555F77F555007800000070555F77557F5F7757F5007888000077
        70557755557F775557F508888800777770557F555577555557F5088808077777
        70557FF5757F555557F5098988077777705577F7557F555557F5999888077777
        705577755575F55557550988888077770555775555575FFF7555088888888000
        55557F55555577775555088888880755555575F5555F77555555508888075555
        5555575FFF775555555555000755555555555577775555555555}
      NumGlyphs = 2
    end
    object bbRevalOs: TBitBtn
      Left = 180
      Top = 3
      Width = 87
      Height = 20
      Hint = 'Popis izdatnica'
      Caption = 'Revaloriza'
      TabOrder = 7
      OnClick = bbRevalOsClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333330000000
        00003333377777777777333330FFFFFFFFF03FF3F7FFFF33FFF7003000000FF0
        00F077F7777773F77737E00FBFBFB0FFFFF07773333FF7FF33F7E0FBFB00000F
        F0F077F333777773F737E0BFBFBFBFB0FFF077F3333FFFF733F7E0FBFB00000F
        F0F077F333777773F737E0BFBFBFBFB0FFF077F33FFFFFF733F7E0FB0000000F
        F0F077FF777777733737000FB0FFFFFFFFF07773F7F333333337333000FFFFFF
        FFF0333777F3FFF33FF7333330F000FF0000333337F777337777333330FFFFFF
        0FF0333337FFFFFF7F37333330CCCCCC0F033333377777777F73333330FFFFFF
        0033333337FFFFFF773333333000000003333333377777777333}
      NumGlyphs = 2
      Spacing = 2
    end
    object bbAmortOs: TBitBtn
      Left = 180
      Top = 23
      Width = 87
      Height = 20
      Hint = 'Popis me�usklad�nica'
      Caption = 'Amortizacija'
      TabOrder = 8
      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 = 792
    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 = 304
      Top = 3
      Width = 140
      Height = 22
      Hint = 'Upisivanjem pojedinih znakova �e se pretra�ivati podaci'
      TabOrder = 2
      OnChange = edTraziChange
    end
    object cbTrazi: TComboBox
      Left = 189
      Top = 3
      Width = 112
      Height = 22
      Style = csDropDownList
      ItemHeight = 14
      Items.Strings = (
        'naziv sredstva'
        '�ifru sredstva')
      TabOrder = 1
    end
  end
  object sb: TStatusBar
    Left = 0
    Top = 505
    Width = 792
    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 = 792
    Height = 432
    ActivePage = pageTabela
    Align = alClient
    TabOrder = 3
    object pageTabela: TTabSheet
      Hint = 'Tabelarni pregled podataka'
      Caption = 'T&abelarni prikaz'
      object Splitter1: TSplitter
        Left = 0
        Top = 0
        Width = 3
        Height = 220
        Cursor = crHSplit
      end
      object Splitter2: TSplitter
        Left = 0
        Top = 220
        Width = 784
        Height = 3
        Cursor = crVSplit
        Align = alBottom
      end
      object Splitter3: TSplitter
        Left = 362
        Top = 0
        Width = 3
        Height = 220
        Cursor = crHSplit
        Align = alRight
      end
      object grdStavke: TDBGrid
        Left = 0
        Top = 223
        Width = 784
        Height = 180
        Align = alBottom
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, 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 = 22
          end
          item
            FieldName = 'knjizenje'
            Title.Caption = 'Knji�enje'
            Width = 34
          end
          item
            FieldName = 'cfGodina'
            Title.Caption = 'Godina'
            Width = 37
          end
          item
            FieldName = 'cfDatum'
            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 = 123
          end
          item
            FieldName = 'cfBroj'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial CE'
            Font.Style = []
            Title.Caption = 'Broj'
            Width = 44
          end
          item
            Alignment = taRightJustify
            FieldName = 'ulaz'
            Title.Alignment = taRightJustify
            Title.Caption = 'Ulaz'
            Width = 53
          end
          item
            Alignment = taRightJustify
            FieldName = 'izlaz'
            Title.Alignment = taRightJustify
            Title.Caption = 'Izlaz'
            Width = 55
          end
          item
            Alignment = taRightJustify
            FieldName = 'cfNV'
            Title.Alignment = taRightJustify
            Title.Caption = 'Nabavna vrijednost'
            Width = 116
          end
          item
            Alignment = taRightJustify
            FieldName = 'cfIV'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial CE'
            Font.Style = []
            Title.Alignment = taRightJustify
            Title.Caption = 'Amortizacija'
            Width = 113
          end
          item
            FieldName = 'cfopisknj'
            Title.Caption = 'Opis'
            Width = 225
          end>
      end
      object Panel2: TPanel
        Left = 365
        Top = 0
        Width = 419
        Height = 220
        Align = alRight
        TabOrder = 1
        object Bevel3: TBevel
          Left = 7
          Top = 19
          Width = 405
          Height = 106
        end
        object Bevel2: TBevel
          Left = 12
          Top = 37
          Width = 196
          Height = 17
          Shape = bsFrame
          Style = bsRaised
        end
        object Bevel1: TBevel
          Left = 211
          Top = 37
          Width = 196
          Height = 17
          Shape = bsFrame
          Style = bsRaised
        end
        object Label2: TLabel
          Left = 211
          Top = 63
          Width = 95
          Height = 14
          Alignment = taCenter
          AutoSize = False
          Caption = 'Nabavna vrijedn.'
          Color = clGray
          ParentColor = False
        end
        object Label14: TLabel
          Left = 311
          Top = 63
          Width = 95
          Height = 14
          Alignment = taCenter
          AutoSize = False
          Caption = 'Amortizacija'
          Color = clGray
          ParentColor = False
        end
        object Label1: TLabel
          Left = 12
          Top = 63
          Width = 93
          Height = 14
          Alignment = taCenter
          AutoSize = False
          Caption = 'Ulaz'
          Color = clGray
          ParentColor = False
        end
        object Label3: TLabel
          Left = 110
          Top = 63
          Width = 95
          Height = 14
          Alignment = taCenter
          AutoSize = False
          Caption = 'Izlaz'
          Color = clGray
          ParentColor = False
        end
        object Label5: TLabel
          Left = 297
          Top = 38
          Width = 26
          Height = 14
          Caption = 'Iznos'
        end
        object Label6: TLabel
          Left = 95
          Top = 38
          Width = 37
          Height = 14
          Caption = 'Koli�ina'
        end
        object Label7: TLabel
          Left = 280
          Top = 102
          Width = 27
          Height = 14
          Caption = 'Saldo'
        end
        object Label8: TLabel
          Left = 73
          Top = 102
          Width = 30
          Height = 14
          Caption = 'Stanje'
        end
        object bbPrometKartice: TBitBtn
          Left = 13
          Top = 8
          Width = 113
          Height = 23
          Hint = 'Ru�no pokrenut izra�un prometa kartice'
          Caption = '&Promet kartice'
          ParentShowHint = False
          ShowHint = False
          TabOrder = 0
          OnClick = bbPrometKarticeClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
            73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
            0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
            0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
            0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
            0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
            0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
            0333337F777777737F333308888888880333337F333333337F33330888888888
            03333373FFFFFFFF733333700000000073333337777777773333}
          NumGlyphs = 2
        end
        object Panel3: TPanel
          Left = 1
          Top = 200
          Width = 417
          Height = 19
          Align = alBottom
          BevelOuter = bvNone
          TabOrder = 1
          object DBNavigator2: TDBNavigator
            Left = 234
            Top = 0
            Width = 183
            Height = 19
            VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh]
            Align = alRight
            Hints.Strings = (
              'Prvi red'
              'Prethodni red'
              'Sljede�i red'
              'Posljednji red'
              ''
              ''
              ''
              ''
              ''
              'Obnovi, osvje�i podatke sa diska')
            TabOrder = 0
          end
        end
        object lbDug: TStaticText
          Left = 212
          Top = 79
          Width = 96
          Height = 18
          Alignment = taRightJustify
          AutoSize = False
          BorderStyle = sbsSunken
          Caption = 'lbDug'
          TabOrder = 2
        end
        object lbPot: TStaticText
          Left = 310
          Top = 79
          Width = 96
          Height = 18
          Alignment = taRightJustify
          AutoSize = False
          BorderStyle = sbsSunken
          Caption = 'lbPot'
          TabOrder = 3
        end
        object lbIznosSaldo: TStaticText
          Left = 310
          Top = 100
          Width = 96
          Height = 18
          Alignment = taRightJustify
          AutoSize = False
          BorderStyle = sbsSunken
          Caption = 'lbIznosSaldo'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Arial CE'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 4
        end
        object lbUlaz: TStaticText
          Left = 12
          Top = 79
          Width = 96
          Height = 18
          Alignment = taRightJustify
          AutoSize = False
          BorderStyle = sbsSunken
          Caption = 'lbUlaz'
          TabOrder = 5
        end
        object lbIzlaz: TStaticText
          Left = 110
          Top = 79
          Width = 96
          Height = 18
          Alignment = taRightJustify
          AutoSize = False
          BorderStyle = sbsSunken
          Caption = 'lbIzlaz'
          TabOrder = 6
        end
        object lbKolicinaSaldo: TStaticText
          Left = 110
          Top = 100
          Width = 96
          Height = 18
          Alignment = taRightJustify
          AutoSize = False
          BorderStyle = sbsSunken
          Caption = 'lbKolicinaSaldo'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Arial CE'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 7
        end
      end
      object grdGlava: TDBGrid
        Left = 3
        Top = 0
        Width = 359
        Height = 220
        Align = alClient
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgCancelOnExit]
        TabOrder = 2
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Arial CE'
        TitleFont.Style = []
        Columns = <
          item
            FieldName = 'sifra'
            Title.Caption = '�ifra'
            Width = 62
          end
          item
            FieldName = 'naziv'
            Title.Caption = 'Naziv'
            Width = 243
          end
          item
            FieldName = 'datum_nabave'
            Title.Caption = 'Datum nabave'
            Width = 77
          end
          item
            FieldName = 'datum_isknj'
            Title.Caption = 'Datum isknji�enja'
            Width = 75
          end>
      end
    end
  end
  object ta1Os: TTable
    Tag = 3
    DatabaseName = 'c:\knjigovodstvo\data\praznepar'
    TableName = 'os'
    Left = 928
    Top = 503
    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
  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 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 ds2StavOs: TDataSource
    DataSet = ta2StavOs
    Left = 925
    Top = 368
  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 ta1Prekid: TTable
    Tag = 2
    DatabaseName = 'skupne'
    TableName = 'prekid.db'
    Left = 841
    Top = 560
    object ta1PrekidPrekidac: TStringField
      FieldName = 'Prekidac'
      Size = 40
    end
    object ta1PrekidSifra: TSmallintField
      FieldName = 'Sifra'
    end
    object ta1PrekidOpis_prekidaca: TStringField
      DisplayLabel = 'Opis prekida�a'
      FieldName = 'Opis_prekidaca'
      Size = 80
    end
    object ta1PrekidGrupa: TStringField
      FieldName = 'Grupa'
    end
    object ta1PrekidSkupina: TStringField
      FieldName = 'Skupina'
      Size = 10
    end
    object ta1PrekidcfVri_prekidVrijednost2: TStringField
      FieldName = 'cfVri_prekidVrijednost'
      Size = 30
      Calculated = True
    end
  end
  object ta1Vri_sif: TTable
    Tag = 2
    DatabaseName = 'Skupne'
    TableName = 'vri_sif.db'
    Left = 835
    Top = 492
    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 ta3Os: TTable
    Tag = 3
    DatabaseName = 'c:\knjigovodstvo\data\praznepar'
    TableName = 'os'
    Left = 990
    Top = 501
    object IntegerField1: TIntegerField
      FieldName = 'Sifra'
    end
    object StringField1: TStringField
      FieldName = 'Naziv'
      Size = 60
    end
    object IntegerField2: TIntegerField
      FieldName = 'Amort'
    end
    object IntegerField3: TIntegerField
      FieldName = 'Jedinica'
    end
    object BooleanField1: TBooleanField
      FieldName = 'Rucna_reva'
    end
    object BooleanField2: TBooleanField
      FieldName = 'Amort_dane'
    end
    object BooleanField3: TBooleanField
      FieldName = 'Amort_god'
    end
    object FloatField1: TFloatField
      FieldName = 'Amort_osnov'
    end
    object DateField1: TDateField
      FieldName = 'Datum_nabave'
    end
    object IntegerField4: TIntegerField
      FieldName = 'Dobavljac'
    end
    object DateField2: TDateField
      FieldName = 'Datum_isknj'
    end
    object StringField2: TStringField
      FieldName = 'cfAmort'
      Size = 60
      Calculated = True
    end
    object StringField3: TStringField
      FieldName = 'cfJedinica'
      Size = 60
      Calculated = True
    end
  end
  object ds1Os: TDataSource
    DataSet = ta1Os
    Left = 926
    Top = 562
  end
end