home *** CD-ROM | disk | FTP | other *** search
/ BUG 14 / BUGCD1998_05.ISO / aplic / ipos / _setup.1 / Knjigovodstvo.exe / 0 / RCDATA / TFM2200700TEMDOB / TFM2200700TEMDOB.txt
Text File  |  1998-04-04  |  26KB  |  945 lines

  1. object fm2200700TemDob: Tfm2200700TemDob
  2.   Left = 141
  3.   Top = 158
  4.   Width = 786
  5.   Height = 461
  6.   HelpContext = 210070000
  7.   VertScrollBar.Tracking = True
  8.   Caption = 'fm2200700TemDob'
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'Arial CE'
  13.   Font.Style = []
  14.   FormStyle = fsMDIChild
  15.   Position = poDefaultPosOnly
  16.   Visible = True
  17.   OnActivate = FormActivate
  18.   OnClose = FormClose
  19.   OnCreate = FormCreate
  20.   OnShow = FormShow
  21.   PixelsPerInch = 96
  22.   TextHeight = 14
  23.   object paTipke: TPanel
  24.     Left = 0
  25.     Top = 27
  26.     Width = 778
  27.     Height = 46
  28.     Align = alTop
  29.     ParentShowHint = False
  30.     ShowHint = True
  31.     TabOrder = 0
  32.     object bbIspis: TBitBtn
  33.       Left = 6
  34.       Top = 20
  35.       Width = 70
  36.       Height = 20
  37.       Hint = 'Poziv prozora sa popisom izvje∩┐╜taja'
  38.       Caption = 'Iz&vje∩┐╜taji'
  39.       TabOrder = 0
  40.       OnClick = bbIspisClick
  41.       Glyph.Data = {
  42.         76010000424D7601000000000000760000002800000020000000100000000100
  43.         04000000000000010000120B0000120B00001000000000000000000000000000
  44.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  45.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
  46.         0003377777777777777308888888888888807F33333333333337088888888888
  47.         88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
  48.         8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
  49.         8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
  50.         03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
  51.         03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
  52.         33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
  53.         33333337FFFF7733333333300000033333333337777773333333}
  54.       NumGlyphs = 2
  55.       Spacing = 2
  56.     end
  57.     object bbIzlaz: TBitBtn
  58.       Left = 154
  59.       Top = 20
  60.       Width = 70
  61.       Height = 20
  62.       Hint = 'Prekid rada i izlaz iz prozora'
  63.       Caption = 'I&zlaz'
  64.       TabOrder = 1
  65.       OnClick = bbIzlazClick
  66.       Glyph.Data = {
  67.         76010000424D7601000000000000760000002800000020000000100000000100
  68.         04000000000000010000120B0000120B00001000000000000000000000000000
  69.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  70.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
  71.         03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
  72.         0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
  73.         0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
  74.         0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
  75.         0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
  76.         0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
  77.         0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
  78.         0333337F777FFFFF7F3333000000000003333377777777777333}
  79.       NumGlyphs = 2
  80.       Spacing = 2
  81.     end
  82.     object Panel1: TPanel
  83.       Left = 543
  84.       Top = 1
  85.       Width = 234
  86.       Height = 44
  87.       Align = alRight
  88.       BevelOuter = bvNone
  89.       TabOrder = 2
  90.       object rgRedoslijed: TRadioGroup
  91.         Left = 75
  92.         Top = 4
  93.         Width = 151
  94.         Height = 37
  95.         Caption = 'Redoslijed po'
  96.         Columns = 2
  97.         Items.Strings = (
  98.           'knji∩┐╜enju'
  99.           'temeljnici')
  100.         TabOrder = 0
  101.         OnClick = rgRedoslijedClick
  102.       end
  103.     end
  104.     object bbBrisanje: TBitBtn
  105.       Left = 80
  106.       Top = 20
  107.       Width = 70
  108.       Height = 20
  109.       Hint = 'Brisanje teku∩┐╜eg reda u tabeli'
  110.       Caption = '&Brisanje'
  111.       TabOrder = 3
  112.       OnClick = bbBrisanjeClick
  113.       Glyph.Data = {
  114.         76010000424D7601000000000000760000002800000020000000100000000100
  115.         04000000000000010000120B0000120B00001000000000000000000000000000
  116.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  117.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
  118.         555557777F777555F55500000000555055557777777755F75555005500055055
  119.         555577F5777F57555555005550055555555577FF577F5FF55555500550050055
  120.         5555577FF77577FF555555005050110555555577F757777FF555555505099910
  121.         555555FF75777777FF555005550999910555577F5F77777775F5500505509990
  122.         3055577F75F77777575F55005055090B030555775755777575755555555550B0
  123.         B03055555F555757575755550555550B0B335555755555757555555555555550
  124.         BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
  125.         50BB555555555555575F555555555555550B5555555555555575}
  126.       NumGlyphs = 2
  127.       Spacing = 2
  128.     end
  129.     object bbPrijenos: TBitBtn
  130.       Left = 229
  131.       Top = 20
  132.       Width = 123
  133.       Height = 20
  134.       Hint = 'Prijenos temeljnica u glavnu knjigu'
  135.       Caption = 'Prijenos temeljnica'
  136.       TabOrder = 4
  137.       OnClick = bbPrijenosClick
  138.       Glyph.Data = {
  139.         76010000424D7601000000000000760000002800000020000000100000000100
  140.         04000000000000010000130B0000130B00001000000000000000000000000000
  141.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  142.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
  143.         333333333333337FF3333333333333903333333333333377FF33333333333399
  144.         03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
  145.         99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
  146.         99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
  147.         03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
  148.         33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
  149.         33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
  150.         3333777777333333333333333333333333333333333333333333}
  151.       NumGlyphs = 2
  152.       Spacing = 2
  153.     end
  154.   end
  155.   object Panel4: TPanel
  156.     Left = 0
  157.     Top = 0
  158.     Width = 778
  159.     Height = 27
  160.     Align = alTop
  161.     ParentShowHint = False
  162.     ShowHint = True
  163.     TabOrder = 1
  164.     object Label4: TLabel
  165.       Left = 157
  166.       Top = 7
  167.       Width = 27
  168.       Height = 14
  169.       Caption = '&Tra∩┐╜i:'
  170.       FocusControl = edTrazi
  171.     end
  172.     object DBNavigator1: TDBNavigator
  173.       Left = 1
  174.       Top = 1
  175.       Width = 139
  176.       Height = 25
  177.       VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh]
  178.       Align = alLeft
  179.       Hints.Strings = (
  180.         'Prvi red'
  181.         'Prethodni red'
  182.         'Sljede∩┐╜i red'
  183.         'Posljednji red'
  184.         ''
  185.         ''
  186.         ''
  187.         ''
  188.         ''
  189.         'Obnovi, osvje∩┐╜i podatke sa diska')
  190.       TabOrder = 0
  191.     end
  192.     object edTrazi: TEdit
  193.       Left = 332
  194.       Top = 3
  195.       Width = 140
  196.       Height = 22
  197.       Hint = 'Upisivanjem pojedinih znakova ∩┐╜e se pretra∩┐╜ivati podaci'
  198.       TabOrder = 2
  199.       OnChange = edTraziChange
  200.     end
  201.     object cbTrazi: TComboBox
  202.       Left = 188
  203.       Top = 3
  204.       Width = 141
  205.       Height = 22
  206.       Style = csDropDownList
  207.       ItemHeight = 14
  208.       Items.Strings = (
  209.         'knji∩┐╜enje'
  210.         'temeljnicu')
  211.       TabOrder = 1
  212.     end
  213.   end
  214.   object sb: TStatusBar
  215.     Left = 0
  216.     Top = 415
  217.     Width = 778
  218.     Height = 19
  219.     Font.Charset = DEFAULT_CHARSET
  220.     Font.Color = clBlack
  221.     Font.Height = -11
  222.     Font.Name = 'Arial CE'
  223.     Font.Style = [fsBold]
  224.     Panels = <
  225.       item
  226.         Text = 'Status'
  227.         Width = 100
  228.       end
  229.       item
  230.         Width = 100
  231.       end>
  232.     ParentFont = False
  233.     SimplePanel = False
  234.   end
  235.   object PageControl: TPageControl
  236.     Left = 0
  237.     Top = 73
  238.     Width = 778
  239.     Height = 342
  240.     ActivePage = pageTabela
  241.     Align = alClient
  242.     TabOrder = 3
  243.     object pageTabela: TTabSheet
  244.       Hint = 'Tabelarni pregled podataka'
  245.       Caption = 'T&abelarni prikaz'
  246.       object grdStavke: TDBGrid
  247.         Left = 0
  248.         Top = 0
  249.         Width = 770
  250.         Height = 313
  251.         Align = alClient
  252.         Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit]
  253.         ReadOnly = True
  254.         TabOrder = 0
  255.         TitleFont.Charset = DEFAULT_CHARSET
  256.         TitleFont.Color = clWindowText
  257.         TitleFont.Height = -11
  258.         TitleFont.Name = 'Arial CE'
  259.         TitleFont.Style = []
  260.         Columns = <
  261.           item
  262.             FieldName = 'BrojTemeljnice'
  263.             Title.Caption = 'Temeljnica'
  264.             Width = 23
  265.           end
  266.           item
  267.             FieldName = 'knjizenje'
  268.             Title.Caption = 'Knji∩┐╜enje'
  269.             Width = 29
  270.           end
  271.           item
  272.             FieldName = 'redbr'
  273.             Title.Caption = 'Red.br.'
  274.             Width = 37
  275.           end
  276.           item
  277.             FieldName = 'cfKontaNaziv'
  278.             Font.Charset = DEFAULT_CHARSET
  279.             Font.Color = clBlack
  280.             Font.Height = -11
  281.             Font.Name = 'Arial CE'
  282.             Font.Style = []
  283.             Title.Caption = 'Konto'
  284.             Width = 233
  285.           end
  286.           item
  287.             FieldName = 'duguje'
  288.             Font.Charset = DEFAULT_CHARSET
  289.             Font.Color = clBlack
  290.             Font.Height = -11
  291.             Font.Name = 'Arial CE'
  292.             Font.Style = []
  293.             Title.Caption = 'Duguje'
  294.             Width = 88
  295.           end
  296.           item
  297.             FieldName = 'potrazuje'
  298.             Font.Charset = DEFAULT_CHARSET
  299.             Font.Color = clBlack
  300.             Font.Height = -11
  301.             Font.Name = 'Arial CE'
  302.             Font.Style = []
  303.             Title.Caption = 'Potra∩┐╜uje'
  304.             Width = 92
  305.           end
  306.           item
  307.             FieldName = 'cfJediniceNaziv'
  308.             Title.Caption = 'Jedinica'
  309.             Width = 191
  310.           end>
  311.       end
  312.     end
  313.   end
  314.   object ta3DneDob: TTable
  315.     Tag = 4
  316.     DatabaseName = '\knjigovodstvo\data\praznegod'
  317.     TableName = 'dnedob'
  318.     Left = 930
  319.     Top = 244
  320.     object IntegerField19: TIntegerField
  321.       FieldName = 'Knjizenje'
  322.     end
  323.     object SmallintField22: TSmallintField
  324.       FieldName = 'Dokument'
  325.     end
  326.     object SmallintField23: TSmallintField
  327.       FieldName = 'Godina'
  328.     end
  329.     object IntegerField20: TIntegerField
  330.       FieldName = 'Broj'
  331.     end
  332.     object ta3DneDobBrojOdDob: TStringField
  333.       FieldName = 'BrojOdDob'
  334.       Size = 15
  335.     end
  336.     object DateField5: TDateField
  337.       FieldName = 'Datum'
  338.       EditMask = '00/00/0000'
  339.     end
  340.     object IntegerField21: TIntegerField
  341.       FieldName = 'Partner'
  342.     end
  343.     object StringField25: TStringField
  344.       FieldName = 'OpisKnj'
  345.       Size = 80
  346.     end
  347.     object FloatField8: TFloatField
  348.       FieldName = 'Iznos'
  349.       DisplayFormat = ',0.00;;-'
  350.       EditFormat = '0.00'
  351.     end
  352.     object DateField6: TDateField
  353.       FieldName = 'DatumDosp'
  354.       EditMask = '00/00/0000'
  355.     end
  356.     object StringField26: TStringField
  357.       FieldName = 'Zatvaranje'
  358.       Size = 30
  359.     end
  360.     object SmallintField24: TSmallintField
  361.       FieldName = 'RasknjizenRacun'
  362.     end
  363.     object SmallintField25: TSmallintField
  364.       FieldName = 'GodinaRacuna'
  365.     end
  366.     object IntegerField22: TIntegerField
  367.       FieldName = 'BrojRacuna'
  368.     end
  369.     object SmallintField26: TSmallintField
  370.       FieldName = 'NacinPlacanja'
  371.     end
  372.     object IntegerField23: TIntegerField
  373.       FieldName = 'BrojIzvoda'
  374.     end
  375.     object IntegerField24: TIntegerField
  376.       FieldName = 'BrojStorniranogKnjizenja'
  377.     end
  378.     object SmallintField27: TSmallintField
  379.       FieldName = 'DokumTem'
  380.     end
  381.     object SmallintField28: TSmallintField
  382.       FieldName = 'BrojTemeljnice'
  383.     end
  384.     object ta3DneDobPorez: TFloatField
  385.       FieldName = 'Porez'
  386.       DisplayFormat = ',0.00;;-'
  387.       EditFormat = '0.00'
  388.     end
  389.     object ta3DneDobTip_ura: TIntegerField
  390.       FieldName = 'Tip_ura'
  391.     end
  392.     object ta3DneDobTip_ura_unos: TIntegerField
  393.       FieldName = 'Tip_ura_unos'
  394.     end
  395.     object StringField27: TStringField
  396.       FieldName = 'cfPartneriNaziv'
  397.       Size = 60
  398.       Calculated = True
  399.     end
  400.     object StringField28: TStringField
  401.       FieldName = 'cfStorniraniDokument'
  402.       Size = 60
  403.       Calculated = True
  404.     end
  405.     object StringField29: TStringField
  406.       FieldName = 'cfStorniran'
  407.       Size = 60
  408.       Calculated = True
  409.     end
  410.     object StringField30: TStringField
  411.       DisplayWidth = 10
  412.       FieldName = 'cfBrojIzvoda'
  413.       Size = 60
  414.       Calculated = True
  415.     end
  416.     object StringField31: TStringField
  417.       FieldName = 'cfBrojTemeljnice'
  418.       Size = 4
  419.       Calculated = True
  420.     end
  421.     object StringField32: TStringField
  422.       FieldName = 'cfDokument'
  423.       Calculated = True
  424.     end
  425.     object StringField33: TStringField
  426.       Alignment = taRightJustify
  427.       FieldName = 'cfZatvoren'
  428.       Calculated = True
  429.     end
  430.   end
  431.   object ta1TemDob: TTable
  432.     Tag = 4
  433.     DatabaseName = 'praznegod'
  434.     TableName = 'temdob'
  435.     Left = 731
  436.     Top = 150
  437.     object AutoIncField1: TAutoIncField
  438.       FieldName = 'Record'
  439.     end
  440.     object SmallintField10: TSmallintField
  441.       FieldName = 'DokumTem'
  442.     end
  443.     object SmallintField11: TSmallintField
  444.       FieldName = 'BrojTemeljnice'
  445.     end
  446.     object IntegerField7: TIntegerField
  447.       FieldName = 'Knjizenje'
  448.     end
  449.     object SmallintField12: TSmallintField
  450.       FieldName = 'Redbr'
  451.     end
  452.     object StringField17: TStringField
  453.       FieldName = 'Konto'
  454.       Size = 10
  455.     end
  456.     object FloatField2: TFloatField
  457.       FieldName = 'Duguje'
  458.       DisplayFormat = ',0.00;;-'
  459.       EditFormat = '0.00'
  460.     end
  461.     object FloatField3: TFloatField
  462.       FieldName = 'Potrazuje'
  463.       DisplayFormat = ',0.00;;-'
  464.       EditFormat = '0.00'
  465.     end
  466.     object IntegerField8: TIntegerField
  467.       FieldName = 'Jedinica'
  468.     end
  469.     object StringField18: TStringField
  470.       FieldName = 'cfKontaNaziv'
  471.       Size = 100
  472.       Calculated = True
  473.     end
  474.     object StringField19: TStringField
  475.       FieldName = 'cfJediniceNaziv'
  476.       Size = 60
  477.       Calculated = True
  478.     end
  479.   end
  480.   object ds1TemDob: TDataSource
  481.     DataSet = ta1TemDob
  482.     Left = 792
  483.     Top = 150
  484.   end
  485.   object ta2TemDob: TTable
  486.     Tag = 4
  487.     DatabaseName = 'praznegod'
  488.     TableName = 'temdob'
  489.     Left = 729
  490.     Top = 206
  491.     object AutoIncField3: TAutoIncField
  492.       FieldName = 'Record'
  493.     end
  494.     object SmallintField36: TSmallintField
  495.       FieldName = 'DokumTem'
  496.     end
  497.     object SmallintField37: TSmallintField
  498.       FieldName = 'BrojTemeljnice'
  499.     end
  500.     object IntegerField31: TIntegerField
  501.       FieldName = 'Knjizenje'
  502.     end
  503.     object SmallintField38: TSmallintField
  504.       FieldName = 'Redbr'
  505.     end
  506.     object StringField43: TStringField
  507.       FieldName = 'Konto'
  508.       Size = 10
  509.     end
  510.     object FloatField10: TFloatField
  511.       FieldName = 'Duguje'
  512.       DisplayFormat = ',0.00;;-'
  513.       EditFormat = '0.00'
  514.     end
  515.     object FloatField11: TFloatField
  516.       FieldName = 'Potrazuje'
  517.       DisplayFormat = ',0.00;;-'
  518.       EditFormat = '0.00'
  519.     end
  520.     object IntegerField32: TIntegerField
  521.       FieldName = 'Jedinica'
  522.     end
  523.     object StringField44: TStringField
  524.       FieldName = 'cfKontaNaziv'
  525.       Size = 100
  526.       Calculated = True
  527.     end
  528.     object StringField45: TStringField
  529.       FieldName = 'cfJediniceNaziv'
  530.       Size = 60
  531.       Calculated = True
  532.     end
  533.   end
  534.   object ds2TemDob: TDataSource
  535.     DataSet = ta2TemDob
  536.     Left = 792
  537.     Top = 206
  538.   end
  539.   object ta3TemDob: TTable
  540.     Tag = 4
  541.     DatabaseName = 'praznegod'
  542.     TableName = 'temdob'
  543.     Left = 727
  544.     Top = 264
  545.     object AutoIncField4: TAutoIncField
  546.       FieldName = 'Record'
  547.     end
  548.     object SmallintField39: TSmallintField
  549.       FieldName = 'DokumTem'
  550.     end
  551.     object SmallintField40: TSmallintField
  552.       FieldName = 'BrojTemeljnice'
  553.     end
  554.     object IntegerField33: TIntegerField
  555.       FieldName = 'Knjizenje'
  556.     end
  557.     object SmallintField41: TSmallintField
  558.       FieldName = 'Redbr'
  559.     end
  560.     object StringField46: TStringField
  561.       FieldName = 'Konto'
  562.       Size = 10
  563.     end
  564.     object FloatField12: TFloatField
  565.       FieldName = 'Duguje'
  566.       DisplayFormat = ',0.00;;-'
  567.       EditFormat = '0.00'
  568.     end
  569.     object FloatField13: TFloatField
  570.       FieldName = 'Potrazuje'
  571.       DisplayFormat = ',0.00;;-'
  572.       EditFormat = '0.00'
  573.     end
  574.     object IntegerField34: TIntegerField
  575.       FieldName = 'Jedinica'
  576.     end
  577.     object StringField47: TStringField
  578.       FieldName = 'cfKontaNaziv'
  579.       Size = 100
  580.       Calculated = True
  581.     end
  582.     object StringField48: TStringField
  583.       FieldName = 'cfJediniceNaziv'
  584.       Size = 60
  585.       Calculated = True
  586.     end
  587.   end
  588.   object ta1Vri_sif: TTable
  589.     Tag = 2
  590.     DatabaseName = 'Skupne'
  591.     TableName = 'vri_sif.db'
  592.     Left = 729
  593.     Top = 406
  594.     object ta1Vri_sifSifrarnik: TStringField
  595.       DisplayLabel = '∩┐╜ifrarnik'
  596.       FieldName = 'Sifrarnik'
  597.       Size = 30
  598.     end
  599.     object ta1Vri_sifSifra: TSmallintField
  600.       DisplayLabel = '∩┐╜ifra'
  601.       FieldName = 'Sifra'
  602.     end
  603.     object ta1Vri_sifNaziv: TStringField
  604.       FieldName = 'Naziv'
  605.       Size = 50
  606.     end
  607.     object ta1Vri_sifSkr_naziv: TStringField
  608.       DisplayLabel = 'Skra∩┐╜eni naziv'
  609.       FieldName = 'Skr_naziv'
  610.       Size = 4
  611.     end
  612.     object ta1Vri_sifTip: TSmallintField
  613.       FieldName = 'Tip'
  614.     end
  615.     object ta1Vri_sifKonto: TStringField
  616.       FieldName = 'Konto'
  617.       Size = 10
  618.     end
  619.     object ta1Vri_sifTekst: TBlobField
  620.       FieldName = 'Tekst'
  621.       BlobType = ftFmtMemo
  622.     end
  623.     object ta1Vri_sifZasticen: TBooleanField
  624.       FieldName = 'Zasticen'
  625.     end
  626.     object ta1Vri_sifcfTip: TStringField
  627.       DisplayLabel = 'Tip dokumenta'
  628.       FieldName = 'cfTip'
  629.       Calculated = True
  630.     end
  631.   end
  632.   object ta3Vri_sif: TTable
  633.     Tag = 2
  634.     DatabaseName = 'Skupne'
  635.     TableName = 'vri_sif.db'
  636.     Left = 735
  637.     Top = 522
  638.     object ta3Vri_sifSifrarnik: TStringField
  639.       DisplayLabel = '∩┐╜ifrarnik'
  640.       FieldName = 'Sifrarnik'
  641.       Size = 30
  642.     end
  643.     object ta3Vri_sifSifra: TSmallintField
  644.       DisplayLabel = '∩┐╜ifra'
  645.       FieldName = 'Sifra'
  646.     end
  647.     object ta3Vri_sifNaziv: TStringField
  648.       FieldName = 'Naziv'
  649.       Size = 50
  650.     end
  651.     object ta3Vri_sifSkr_naziv: TStringField
  652.       DisplayLabel = 'Skra∩┐╜eni naziv'
  653.       FieldName = 'Skr_naziv'
  654.       Size = 4
  655.     end
  656.     object ta3Vri_sifTip: TSmallintField
  657.       FieldName = 'Tip'
  658.     end
  659.     object ta3Vri_sifKonto: TStringField
  660.       FieldName = 'Konto'
  661.       Size = 10
  662.     end
  663.     object ta3Vri_sifTekst: TBlobField
  664.       FieldName = 'Tekst'
  665.       BlobType = ftFmtMemo
  666.     end
  667.     object ta3Vri_sifZasticen: TBooleanField
  668.       FieldName = 'Zasticen'
  669.     end
  670.     object ta3Vri_sifcfTip: TStringField
  671.       DisplayLabel = 'Tip dokumenta'
  672.       FieldName = 'cfTip'
  673.       Calculated = True
  674.     end
  675.   end
  676.   object ta1Konta: TTable
  677.     Tag = 2
  678.     DatabaseName = 'skupne'
  679.     TableName = 'konta.db'
  680.     Left = 1027
  681.     Top = 570
  682.     object ta1KontaSintetika_analitika: TStringField
  683.       FieldName = 'Sintetika_analitika'
  684.       Size = 1
  685.     end
  686.     object ta1KontaKonto: TStringField
  687.       FieldName = 'Konto'
  688.       Size = 10
  689.     end
  690.     object ta1KontaNaziv: TStringField
  691.       DisplayWidth = 100
  692.       FieldName = 'Naziv'
  693.       Size = 100
  694.     end
  695.     object ta1KontaPrihod_trosak: TSmallintField
  696.       FieldName = 'Prihod_trosak'
  697.     end
  698.     object ta1KontacfKonto: TStringField
  699.       DisplayWidth = 120
  700.       FieldName = 'cfKonto'
  701.       Size = 120
  702.       Calculated = True
  703.     end
  704.     object ta1Kontacfsintetika_analitika: TStringField
  705.       FieldName = 'cfsintetika_analitika'
  706.       Calculated = True
  707.     end
  708.     object ta1Kontacfprihod_trosak: TStringField
  709.       FieldName = 'cfprihod_trosak'
  710.       Calculated = True
  711.     end
  712.     object ta1KontaPsDuguje: TFloatField
  713.       FieldName = 'PsDuguje'
  714.     end
  715.     object ta1KontaPsPotrazuje: TFloatField
  716.       FieldName = 'PsPotrazuje'
  717.     end
  718.     object ta1KontaPrDuguje: TFloatField
  719.       FieldName = 'PrDuguje'
  720.     end
  721.     object ta1KontaPrPotrazuje: TFloatField
  722.       FieldName = 'PrPotrazuje'
  723.     end
  724.     object ta1KontaSaDuguje: TFloatField
  725.       FieldName = 'SaDuguje'
  726.     end
  727.     object ta1KontaSaPotrazuje: TFloatField
  728.       FieldName = 'SaPotrazuje'
  729.     end
  730.   end
  731.   object ta1Partneri: TTable
  732.     Tag = 2
  733.     DatabaseName = 'c:\knjigovodstvo\data\skupne'
  734.     TableName = 'partneri'
  735.     TableType = ttParadox
  736.     Left = 1024
  737.     Top = 455
  738.     object ta1PartneriSifra: TIntegerField
  739.       DisplayLabel = '∩┐╜ifra partnera'
  740.       FieldName = 'Sifra'
  741.     end
  742.     object ta1PartneriNaziv: TStringField
  743.       FieldName = 'Naziv'
  744.       Size = 60
  745.     end
  746.     object ta1PartneriPtt: TStringField
  747.       DisplayLabel = 'Po∩┐╜tanski broj'
  748.       FieldName = 'Ptt'
  749.       Size = 5
  750.     end
  751.     object ta1PartneriMjesto: TStringField
  752.       FieldName = 'Mjesto'
  753.       Size = 40
  754.     end
  755.     object ta1PartneriUlica: TStringField
  756.       FieldName = 'Ulica'
  757.       Size = 60
  758.     end
  759.     object ta1PartneriZemlja: TSmallintField
  760.       FieldName = 'Zemlja'
  761.     end
  762.     object ta1PartneriDjelatnost: TSmallintField
  763.       FieldName = 'Djelatnost'
  764.     end
  765.     object ta1PartneriBanka: TIntegerField
  766.       FieldName = 'Banka'
  767.     end
  768.     object ta1PartneriTelefon: TStringField
  769.       DisplayLabel = 'Telefoni i faxovi'
  770.       FieldName = 'Telefon'
  771.       Size = 50
  772.     end
  773.     object ta1PartneriOpcina: TSmallintField
  774.       DisplayLabel = 'Op∩┐╜ina'
  775.       FieldName = 'Opcina'
  776.     end
  777.     object ta1PartneriMaticni_broj: TStringField
  778.       DisplayLabel = 'Mati∩┐╜ni broj ili JMBG'
  779.       FieldName = 'Maticni_broj'
  780.       Size = 15
  781.     end
  782.     object ta1PartneriZiro_racun1: TStringField
  783.       DisplayLabel = '∩┐╜iro-ra∩┐╜un 1'
  784.       FieldName = 'Ziro_racun1'
  785.       Size = 50
  786.     end
  787.     object ta1PartneriZiro_racun2: TStringField
  788.       DisplayLabel = '∩┐╜iro-ra∩┐╜un 2'
  789.       FieldName = 'Ziro_racun2'
  790.       Size = 50
  791.     end
  792.     object ta1PartneriRabat: TFloatField
  793.       DisplayLabel = 'Rabat u veleprodaji'
  794.       FieldName = 'Rabat'
  795.       DisplayFormat = '.0000'#39' %'#39
  796.       EditFormat = '.0000'
  797.     end
  798.     object ta1PartneriPorezni_obveznik: TSmallintField
  799.       DisplayLabel = 'Porezni obveznik prema PDV-u'
  800.       FieldName = 'Porezni_obveznik'
  801.     end
  802.     object ta1PartnericfPorezni_obveznik: TStringField
  803.       FieldName = 'cfPorezni_obveznik'
  804.       Calculated = True
  805.     end
  806.     object ta1PartneriMemo: TBlobField
  807.       FieldName = 'Memo'
  808.       BlobType = ftFmtMemo
  809.     end
  810.     object ta1PartneriFilter: TStringField
  811.       FieldName = 'Filter'
  812.       Size = 60
  813.     end
  814.     object ta1PartneriSifra_djelat: TStringField
  815.       FieldName = 'Sifra_djelat'
  816.       Size = 10
  817.     end
  818.     object ta1PartneriNaziv_djelat: TStringField
  819.       FieldName = 'Naziv_djelat'
  820.       Size = 100
  821.     end
  822.   end
  823.   object ta1Jedinice: TTable
  824.     Tag = 3
  825.     DatabaseName = 'praznepar'
  826.     TableName = 'jedinice'
  827.     Left = 957
  828.     Top = 538
  829.     object ta1JediniceSifra: TIntegerField
  830.       FieldName = 'Sifra'
  831.     end
  832.     object ta1JediniceTip: TSmallintField
  833.       FieldName = 'Tip'
  834.     end
  835.     object ta1JediniceNaziv: TStringField
  836.       FieldName = 'Naziv'
  837.       Size = 40
  838.     end
  839.     object ta1JediniceAdresa: TStringField
  840.       FieldName = 'Adresa'
  841.       Size = 60
  842.     end
  843.     object ta1JediniceKonto: TStringField
  844.       FieldName = 'Konto'
  845.       Size = 10
  846.     end
  847.     object ta1JedinicecfTip: TStringField
  848.       FieldName = 'cfTip'
  849.       Calculated = True
  850.     end
  851.   end
  852.   object ta3Partneri: TTable
  853.     Tag = 2
  854.     DatabaseName = 'c:\knjigovodstvo\data\skupne'
  855.     TableName = 'partneri'
  856.     TableType = ttParadox
  857.     Left = 1076
  858.     Top = 453
  859.     object IntegerField1: TIntegerField
  860.       DisplayLabel = '∩┐╜ifra partnera'
  861.       FieldName = 'Sifra'
  862.     end
  863.     object StringField1: TStringField
  864.       FieldName = 'Naziv'
  865.       Size = 60
  866.     end
  867.     object StringField2: TStringField
  868.       DisplayLabel = 'Po∩┐╜tanski broj'
  869.       FieldName = 'Ptt'
  870.       Size = 5
  871.     end
  872.     object StringField3: TStringField
  873.       FieldName = 'Mjesto'
  874.       Size = 40
  875.     end
  876.     object StringField4: TStringField
  877.       FieldName = 'Ulica'
  878.       Size = 60
  879.     end
  880.     object SmallintField1: TSmallintField
  881.       FieldName = 'Zemlja'
  882.     end
  883.     object SmallintField2: TSmallintField
  884.       FieldName = 'Djelatnost'
  885.     end
  886.     object IntegerField2: TIntegerField
  887.       FieldName = 'Banka'
  888.     end
  889.     object StringField5: TStringField
  890.       DisplayLabel = 'Telefoni i faxovi'
  891.       FieldName = 'Telefon'
  892.       Size = 50
  893.     end
  894.     object SmallintField3: TSmallintField
  895.       DisplayLabel = 'Op∩┐╜ina'
  896.       FieldName = 'Opcina'
  897.     end
  898.     object StringField6: TStringField
  899.       DisplayLabel = 'Mati∩┐╜ni broj ili JMBG'
  900.       FieldName = 'Maticni_broj'
  901.       Size = 15
  902.     end
  903.     object StringField7: TStringField
  904.       DisplayLabel = '∩┐╜iro-ra∩┐╜un 1'
  905.       FieldName = 'Ziro_racun1'
  906.       Size = 50
  907.     end
  908.     object StringField8: TStringField
  909.       DisplayLabel = '∩┐╜iro-ra∩┐╜un 2'
  910.       FieldName = 'Ziro_racun2'
  911.       Size = 50
  912.     end
  913.     object FloatField1: TFloatField
  914.       DisplayLabel = 'Rabat u veleprodaji'
  915.       FieldName = 'Rabat'
  916.       DisplayFormat = '.0000'#39' %'#39
  917.       EditFormat = '.0000'
  918.     end
  919.     object SmallintField4: TSmallintField
  920.       DisplayLabel = 'Porezni obveznik prema PDV-u'
  921.       FieldName = 'Porezni_obveznik'
  922.     end
  923.     object StringField9: TStringField
  924.       FieldName = 'cfPorezni_obveznik'
  925.       Calculated = True
  926.     end
  927.     object BlobField1: TBlobField
  928.       FieldName = 'Memo'
  929.       BlobType = ftFmtMemo
  930.     end
  931.     object StringField10: TStringField
  932.       FieldName = 'Filter'
  933.       Size = 60
  934.     end
  935.     object StringField11: TStringField
  936.       FieldName = 'Sifra_djelat'
  937.       Size = 10
  938.     end
  939.     object StringField12: TStringField
  940.       FieldName = 'Naziv_djelat'
  941.       Size = 100
  942.     end
  943.   end
  944. end
  945.