home *** CD-ROM | disk | FTP | other *** search
/ BUG 11 / BUGCD1998_02.ISO / aplic / trade / _setup.1 / main.exe / 0 / RCDATA / TDATAUFA3 / TDATAUFA3.txt
Text File  |  1998-01-05  |  78KB  |  3,274 lines

  1. object DataUfa3: TDataUfa3
  2.   Tag = 1
  3.   OnDestroy = DUvoznaFakturaDestroy
  4.   Left = 252
  5.   Top = 112
  6.   Height = 471
  7.   Width = 537
  8.   object sGlava: TDataSource
  9.     DataSet = tGlava
  10.     Left = 433
  11.     Top = 173
  12.   end
  13.   object sStavke: TDataSource
  14.     DataSet = tStavke
  15.     Left = 380
  16.     Top = 173
  17.   end
  18.   object sPartner: TDataSource
  19.     DataSet = tPartner
  20.     Left = 327
  21.     Top = 173
  22.   end
  23.   object sOrgJed: TDataSource
  24.     DataSet = tOrgJed
  25.     Left = 326
  26.     Top = 341
  27.   end
  28.   object sKonto: TDataSource
  29.     DataSet = tKonto
  30.     Left = 273
  31.     Top = 341
  32.   end
  33.   object sSkladist: TDataSource
  34.     DataSet = tSkladist
  35.     Left = 220
  36.     Top = 341
  37.   end
  38.   object sKonto2: TDataSource
  39.     DataSet = tKonto2
  40.     Left = 167
  41.     Top = 341
  42.   end
  43.   object sKonto3: TDataSource
  44.     DataSet = tKonto3
  45.     Left = 114
  46.     Top = 341
  47.   end
  48.   object sUsluge: TDataSource
  49.     DataSet = tUsluge
  50.     Left = 61
  51.     Top = 341
  52.   end
  53.   object sPart: TDataSource
  54.     DataSet = tPart
  55.     Left = 8
  56.     Top = 341
  57.   end
  58.   object sValuta: TDataSource
  59.     DataSet = DGlava.tValuta
  60.     Left = 485
  61.     Top = 299
  62.   end
  63.   object sPorez: TDataSource
  64.     DataSet = tPorez
  65.     Left = 432
  66.     Top = 299
  67.   end
  68.   object sKonto4: TDataSource
  69.     DataSet = tKonto4
  70.     Left = 379
  71.     Top = 299
  72.   end
  73.   object sSkladiste: TDataSource
  74.     DataSet = tSkladiste
  75.     Left = 326
  76.     Top = 299
  77.   end
  78.   object sBanka: TDataSource
  79.     DataSet = tBanka
  80.     Left = 273
  81.     Top = 299
  82.   end
  83.   object sValuta2: TDataSource
  84.     DataSet = tValuta2
  85.     Left = 220
  86.     Top = 299
  87.   end
  88.   object sZemlja: TDataSource
  89.     DataSet = tZemlja
  90.     Left = 167
  91.     Top = 299
  92.   end
  93.   object sPosta: TDataSource
  94.     DataSet = tPosta
  95.     Left = 114
  96.     Top = 299
  97.   end
  98.   object sCarina: TDataSource
  99.     DataSet = tCarina
  100.     Left = 61
  101.     Top = 299
  102.   end
  103.   object sArtikl: TDataSource
  104.     DataSet = tArtikl
  105.     Left = 8
  106.     Top = 299
  107.   end
  108.   object sBoje: TDataSource
  109.     DataSet = tBoje
  110.     Left = 485
  111.     Top = 257
  112.   end
  113.   object sMjere: TDataSource
  114.     DataSet = tMjere
  115.     Left = 432
  116.     Top = 257
  117.   end
  118.   object sArtikl2: TDataSource
  119.     DataSet = tArtikl2
  120.     Left = 379
  121.     Top = 257
  122.   end
  123.   object sBoje2: TDataSource
  124.     DataSet = tBoje2
  125.     Left = 326
  126.     Top = 257
  127.   end
  128.   object sRoba: TDataSource
  129.     DataSet = tRoba
  130.     Left = 273
  131.     Top = 257
  132.   end
  133.   object sBoja: TDataSource
  134.     DataSet = tBoja
  135.     Left = 220
  136.     Top = 257
  137.   end
  138.   object sJedinice: TDataSource
  139.     DataSet = tJedinice
  140.     Left = 167
  141.     Top = 257
  142.   end
  143.   object sAtomi: TDataSource
  144.     DataSet = tAtomi
  145.     Left = 114
  146.     Top = 257
  147.   end
  148.   object sImeRobe: TDataSource
  149.     DataSet = tImeRobe
  150.     Left = 61
  151.     Top = 257
  152.   end
  153.   object sImeBoje: TDataSource
  154.     DataSet = tImeBoje
  155.     Left = 8
  156.     Top = 257
  157.   end
  158.   object sPakung: TDataSource
  159.     DataSet = tPakung
  160.     Left = 485
  161.     Top = 215
  162.   end
  163.   object sPartner2: TDataSource
  164.     DataSet = tPartner2
  165.     Left = 432
  166.     Top = 215
  167.   end
  168.   object sPart2: TDataSource
  169.     DataSet = tPart2
  170.     Left = 379
  171.     Top = 215
  172.   end
  173.   object sKonto5: TDataSource
  174.     DataSet = tKonto5
  175.     Left = 326
  176.     Top = 215
  177.   end
  178.   object sPartner3: TDataSource
  179.     DataSet = tPartner3
  180.     Left = 273
  181.     Top = 215
  182.   end
  183.   object sPart3: TDataSource
  184.     DataSet = tPart3
  185.     Left = 220
  186.     Top = 215
  187.   end
  188.   object sOrgJed3: TDataSource
  189.     DataSet = tOrgJed3
  190.     Left = 167
  191.     Top = 215
  192.   end
  193.   object sCeneRobe: TDataSource
  194.     DataSet = tCeneRobe
  195.     Left = 114
  196.     Top = 215
  197.   end
  198.   object sUsluge2: TDataSource
  199.     DataSet = tUsluge2
  200.     Left = 61
  201.     Top = 215
  202.   end
  203.   object sZiro: TDataSource
  204.     DataSet = tZiro
  205.     Left = 8
  206.     Top = 215
  207.   end
  208.   object sNasZiro: TDataSource
  209.     DataSet = tNasZiro
  210.     Left = 485
  211.     Top = 173
  212.   end
  213.   object sCodes: TDataSource
  214.     DataSet = tCodes
  215.     Left = 8
  216.     Top = 5
  217.   end
  218.   object sxGlava: TDataSource
  219.     DataSet = xGlava
  220.     Left = 380
  221.     Top = 388
  222.   end
  223.   object xCarina2: TMyTable
  224.     DatabaseName = 'Global2'
  225.     IndexFieldNames = 'Code'
  226.     TableName = 'T_CARINE.DB'
  227.     AutoOpen = False
  228.     AutoFlush = False
  229.     FreeToModify = False
  230.     FreeToDelete = True
  231.     FreeToInsert = True
  232.     Left = 332
  233.     Top = 389
  234.     object xCarina2Code: TAutoIncField
  235.       FieldName = 'Code'
  236.     end
  237.     object xCarina2KontoCarine: TIntegerField
  238.       FieldName = 'KontoCarine'
  239.     end
  240.     object xCarina2Items: TIntegerField
  241.       FieldName = 'Items'
  242.     end
  243.   end
  244.   object tCarina: TMyTable
  245.     DatabaseName = 'Global'
  246.     IndexFieldNames = 'Code'
  247.     MasterFields = 'TarifaCarine'
  248.     MasterSource = sStavke
  249.     TableName = 'T_CARINE.DB'
  250.     AutoOpen = True
  251.     AutoFlush = True
  252.     FreeToModify = False
  253.     FreeToDelete = True
  254.     FreeToInsert = True
  255.     Left = 379
  256.     Top = 5
  257.     object tCarinaCode: TAutoIncField
  258.       FieldName = 'Code'
  259.     end
  260.     object tCarinaTarifa: TStringField
  261.       FieldName = 'Tarifa'
  262.       Size = 40
  263.     end
  264.     object tCarinaNaziv: TStringField
  265.       FieldName = 'Naziv'
  266.       Size = 60
  267.     end
  268.     object tCarinaKontoCarine: TIntegerField
  269.       FieldName = 'KontoCarine'
  270.     end
  271.     object tCarinaItems: TIntegerField
  272.       FieldName = 'Items'
  273.     end
  274.   end
  275.   object tCarine: TMyTable
  276.     DatabaseName = 'Global'
  277.     IndexFieldNames = 'Tarifa;Datum'
  278.     MasterFields = 'Code'
  279.     MasterSource = sCarina
  280.     TableName = 'S_CARINE.DB'
  281.     AutoOpen = True
  282.     AutoFlush = True
  283.     FreeToModify = False
  284.     FreeToDelete = True
  285.     FreeToInsert = True
  286.     Left = 222
  287.     Top = 5
  288.     object tCarineTarifa: TIntegerField
  289.       FieldName = 'Tarifa'
  290.     end
  291.     object tCarineDatum: TDateField
  292.       FieldName = 'Datum'
  293.     end
  294.     object tCarineStopaCarine: TFloatField
  295.       FieldName = 'StopaCarine'
  296.     end
  297.   end
  298.   object tPorezi: TMyTable
  299.     DatabaseName = 'Global'
  300.     IndexFieldNames = 'Tarifa;Datum'
  301.     MasterFields = 'Code'
  302.     MasterSource = sPorez
  303.     TableName = 'S_POREZA.DB'
  304.     AutoOpen = True
  305.     AutoFlush = True
  306.     FreeToModify = False
  307.     FreeToDelete = True
  308.     FreeToInsert = True
  309.     Left = 273
  310.     Top = 173
  311.     object tPoreziDatum: TDateField
  312.       FieldName = 'Datum'
  313.     end
  314.     object tPoreziTarifa: TIntegerField
  315.       FieldName = 'Tarifa'
  316.     end
  317.     object tPoreziStopaRoba: TFloatField
  318.       FieldName = 'StopaRoba'
  319.       Precision = 9
  320.     end
  321.     object tPoreziStopaRUC: TFloatField
  322.       FieldName = 'StopaRUC'
  323.       Precision = 9
  324.     end
  325.     object tPoreziStopaUsluga: TFloatField
  326.       FieldName = 'StopaUsluga'
  327.       Precision = 9
  328.     end
  329.     object tPoreziStopaOtpis: TFloatField
  330.       FieldName = 'StopaOtpis'
  331.       Precision = 9
  332.     end
  333.     object tPoreziStopaPotrosnja: TFloatField
  334.       FieldName = 'StopaPotrosnja'
  335.       Precision = 9
  336.     end
  337.     object tPoreziStopaDodVrijednost: TFloatField
  338.       FieldName = 'StopaDodVrijednost'
  339.       Precision = 9
  340.     end
  341.   end
  342.   object tPorez: TMyTable
  343.     DatabaseName = 'Global'
  344.     IndexFieldNames = 'Code'
  345.     MasterFields = 'TARIFAPOREZA'
  346.     MasterSource = sStavke
  347.     TableName = 'T_POREZA.DB'
  348.     AutoOpen = True
  349.     AutoFlush = True
  350.     FreeToModify = False
  351.     FreeToDelete = True
  352.     FreeToInsert = True
  353.     Left = 220
  354.     Top = 173
  355.     object tPorezCode: TAutoIncField
  356.       FieldName = 'Code'
  357.     end
  358.     object tPorezTarifa: TStringField
  359.       FieldName = 'Tarifa'
  360.       Size = 40
  361.     end
  362.     object tPorezNaziv: TStringField
  363.       FieldName = 'Naziv'
  364.       Size = 60
  365.     end
  366.     object tPorezKontoRoba: TIntegerField
  367.       FieldName = 'KontoRoba'
  368.     end
  369.     object tPorezKontoRUC: TIntegerField
  370.       FieldName = 'KontoRUC'
  371.     end
  372.     object tPorezKontoUsluga: TIntegerField
  373.       FieldName = 'KontoUsluga'
  374.     end
  375.     object tPorezKontoPotrosnja: TIntegerField
  376.       FieldName = 'KontoPotrosnja'
  377.     end
  378.     object tPorezKontoDodVrijednost: TIntegerField
  379.       FieldName = 'KontoDodVrijednost'
  380.     end
  381.     object tPorezItems: TIntegerField
  382.       FieldName = 'Items'
  383.     end
  384.   end
  385.   object tOrgJed: TMyTable
  386.     DatabaseName = 'Global'
  387.     IndexFieldNames = 'PARTNER;CODE'
  388.     MasterFields = 'DOBAVLJAC;ORGJEDDOB'
  389.     MasterSource = sGlava
  390.     TableName = 'ORG_JED.DB'
  391.     AutoOpen = True
  392.     AutoFlush = True
  393.     FreeToModify = False
  394.     FreeToDelete = True
  395.     FreeToInsert = True
  396.     Left = 167
  397.     Top = 173
  398.   end
  399.   object tSkladist: TMyTable
  400.     DatabaseName = 'Lokal'
  401.     IndexFieldNames = 'MJESTO;VRSTATER;CODE'
  402.     MasterFields = 'MJESTO;VRSTA;SKLADISTE'
  403.     MasterSource = sStavke
  404.     TableName = 'SKLADIST.DB'
  405.     AutoOpen = True
  406.     AutoFlush = True
  407.     FreeToModify = False
  408.     FreeToDelete = True
  409.     FreeToInsert = True
  410.     Left = 114
  411.     Top = 173
  412.     object tSkladistVrstaTer: TSmallintField
  413.       FieldName = 'VrstaTer'
  414.     end
  415.     object tSkladistVlasnik: TIntegerField
  416.       FieldName = 'Vlasnik'
  417.       Visible = False
  418.     end
  419.     object tSkladistMjesto: TStringField
  420.       FieldName = 'Mjesto'
  421.       Size = 1
  422.     end
  423.     object tSkladistLokacija: TIntegerField
  424.       FieldName = 'Lokacija'
  425.     end
  426.     object tSkladistCode: TAutoIncField
  427.       FieldName = 'Code'
  428.     end
  429.     object tSkladistSifra: TStringField
  430.       FieldName = 'Sifra'
  431.       Size = 40
  432.     end
  433.     object tSkladistNaziv: TStringField
  434.       FieldName = 'Naziv'
  435.       Size = 80
  436.     end
  437.     object tSkladistPartner: TIntegerField
  438.       FieldName = 'Partner'
  439.     end
  440.     object tSkladistOrgJed: TIntegerField
  441.       FieldName = 'OrgJed'
  442.     end
  443.     object tSkladistDrzava: TIntegerField
  444.       FieldName = 'Drzava'
  445.     end
  446.     object tSkladistKnjiga: TIntegerField
  447.       FieldName = 'Knjiga'
  448.     end
  449.     object tSkladistValuta: TIntegerField
  450.       FieldName = 'Valuta'
  451.     end
  452.     object tSkladistKontoRobe: TIntegerField
  453.       FieldName = 'KontoRobe'
  454.     end
  455.     object tSkladistKontoRUC: TIntegerField
  456.       FieldName = 'KontoRUC'
  457.     end
  458.     object tSkladistKontoTrgRoba: TIntegerField
  459.       FieldName = 'KontoTrgRoba'
  460.     end
  461.     object tSkladistKontoTroskaNabave: TIntegerField
  462.       FieldName = 'KontoTroskaNabave'
  463.     end
  464.     object tSkladistKontoKalkPorez: TIntegerField
  465.       FieldName = 'KontoKalkPorez'
  466.     end
  467.     object tSkladistItems: TIntegerField
  468.       FieldName = 'Items'
  469.     end
  470.   end
  471.   object tSkladiste: TMyTable
  472.     DatabaseName = 'Lokal'
  473.     IndexFieldNames = 'MJESTO;PARTNER;CODE'
  474.     MasterFields = 'ZEM2;JA;SKLADISTE'
  475.     MasterSource = sGlava
  476.     TableName = 'SKLADIST.DB'
  477.     AutoOpen = True
  478.     AutoFlush = True
  479.     FreeToModify = False
  480.     FreeToDelete = True
  481.     FreeToInsert = True
  482.     Left = 61
  483.     Top = 173
  484.     object tSkladisteNaziv: TStringField
  485.       FieldName = 'Naziv'
  486.       Visible = False
  487.       Size = 80
  488.     end
  489.     object tSkladisteVlasnik: TIntegerField
  490.       FieldName = 'Vlasnik'
  491.       Visible = False
  492.     end
  493.     object tSkladisteVrstaTer: TSmallintField
  494.       FieldName = 'VrstaTer'
  495.       Visible = False
  496.     end
  497.     object tSkladisteMjesto: TStringField
  498.       FieldName = 'Mjesto'
  499.       Size = 1
  500.     end
  501.     object tSkladisteLokacija: TIntegerField
  502.       FieldName = 'Lokacija'
  503.     end
  504.     object tSkladisteCode: TAutoIncField
  505.       FieldName = 'Code'
  506.     end
  507.     object tSkladisteSifra: TStringField
  508.       FieldName = 'Sifra'
  509.       Size = 40
  510.     end
  511.     object tSkladistePartner: TIntegerField
  512.       FieldName = 'Partner'
  513.     end
  514.     object tSkladisteOrgJed: TIntegerField
  515.       FieldName = 'OrgJed'
  516.     end
  517.     object tSkladisteDrzava: TIntegerField
  518.       FieldName = 'Drzava'
  519.     end
  520.     object tSkladisteKontoRobe: TIntegerField
  521.       FieldName = 'KontoRobe'
  522.     end
  523.     object tSkladisteKontoRUC: TIntegerField
  524.       FieldName = 'KontoRUC'
  525.     end
  526.     object tSkladisteKontoTrgRoba: TIntegerField
  527.       FieldName = 'KontoTrgRoba'
  528.     end
  529.     object tSkladisteKontoKalkPorez: TIntegerField
  530.       FieldName = 'KontoKalkPorez'
  531.     end
  532.     object tSkladisteKontoTroskaNabave: TIntegerField
  533.       FieldName = 'KontoTroskaNabave'
  534.     end
  535.     object tSkladisteItems: TIntegerField
  536.       FieldName = 'Items'
  537.     end
  538.   end
  539.   object tKonto: TMyTable
  540.     DatabaseName = 'Global'
  541.     IndexFieldNames = 'CODE'
  542.     MasterFields = 'KONTO'
  543.     MasterSource = sGlava
  544.     TableName = 'KONTA.DB'
  545.     AutoOpen = True
  546.     AutoFlush = True
  547.     FreeToModify = False
  548.     FreeToDelete = True
  549.     FreeToInsert = True
  550.     Left = 8
  551.     Top = 173
  552.   end
  553.   object tKonto2: TMyTable
  554.     DatabaseName = 'Global'
  555.     IndexFieldNames = 'CODE'
  556.     MasterFields = 'KONTO'
  557.     MasterSource = sStavke
  558.     TableName = 'KONTA.DB'
  559.     AutoOpen = True
  560.     AutoFlush = True
  561.     FreeToModify = False
  562.     FreeToDelete = True
  563.     FreeToInsert = True
  564.     Left = 485
  565.     Top = 131
  566.   end
  567.   object tKonto3: TMyTable
  568.     DatabaseName = 'Global'
  569.     IndexFieldNames = 'CODE'
  570.     MasterFields = 'KONTOD'
  571.     MasterSource = sStavke
  572.     TableName = 'KONTA.DB'
  573.     AutoOpen = True
  574.     AutoFlush = True
  575.     FreeToModify = False
  576.     FreeToDelete = True
  577.     FreeToInsert = True
  578.     Left = 432
  579.     Top = 131
  580.   end
  581.   object tKonto4: TMyTable
  582.     DatabaseName = 'Global'
  583.     IndexFieldNames = 'CODE'
  584.     MasterFields = 'KONTOTROSKA'
  585.     MasterSource = sGlava
  586.     TableName = 'KONTA.DB'
  587.     AutoOpen = True
  588.     AutoFlush = True
  589.     FreeToModify = False
  590.     FreeToDelete = True
  591.     FreeToInsert = True
  592.     Left = 379
  593.     Top = 131
  594.   end
  595.   object tBanka: TMyTable
  596.     DatabaseName = 'Global'
  597.     IndexFieldNames = 'PARTNER'
  598.     MasterFields = 'BANKA'
  599.     MasterSource = sGlava
  600.     TableName = 'BANKE.DB'
  601.     AutoOpen = True
  602.     AutoFlush = True
  603.     FreeToModify = False
  604.     FreeToDelete = True
  605.     FreeToInsert = True
  606.     Left = 326
  607.     Top = 131
  608.     object tBankaSifra: TStringField
  609.       FieldName = 'Sifra'
  610.       Size = 40
  611.     end
  612.     object tBankaPartner: TIntegerField
  613.       FieldName = 'Partner'
  614.     end
  615.     object tBankaZiroRnDeviznaDoznaka: TIntegerField
  616.       FieldName = 'ZiroRnDeviznaDoznaka'
  617.     end
  618.     object tBankaPozivD: TSmallintField
  619.       FieldName = 'PozivD'
  620.     end
  621.     object tBankaModelD: TStringField
  622.       FieldName = 'ModelD'
  623.       Size = 30
  624.     end
  625.   end
  626.   object tZemlja: TMyTable
  627.     DatabaseName = 'Global'
  628.     IndexFieldNames = 'Code'
  629.     MasterFields = 'ZEMLJA'
  630.     MasterSource = sGlava
  631.     TableName = 'ZEMLJA.DB'
  632.     AutoOpen = True
  633.     AutoFlush = True
  634.     FreeToModify = False
  635.     FreeToDelete = True
  636.     FreeToInsert = True
  637.     Left = 220
  638.     Top = 131
  639.     object tZemljaCode: TAutoIncField
  640.       FieldName = 'Code'
  641.     end
  642.     object tZemljaSifra: TStringField
  643.       FieldName = 'Sifra'
  644.       Size = 50
  645.     end
  646.     object tZemljaGovor: TIntegerField
  647.       FieldName = 'Govor'
  648.     end
  649.   end
  650.   object tPosta: TMyTable
  651.     DatabaseName = 'Global'
  652.     IndexFieldNames = 'Code'
  653.     MasterFields = 'Posta'
  654.     MasterSource = sPart
  655.     TableName = 'POSTA.DB'
  656.     AutoOpen = True
  657.     AutoFlush = True
  658.     FreeToModify = False
  659.     FreeToDelete = True
  660.     FreeToInsert = True
  661.     Left = 167
  662.     Top = 131
  663.     object tPostaCode: TAutoIncField
  664.       FieldName = 'Code'
  665.     end
  666.     object tPostaSifra: TStringField
  667.       FieldName = 'Sifra'
  668.       Size = 40
  669.     end
  670.     object tPostaBroj: TIntegerField
  671.       FieldName = 'Broj'
  672.     end
  673.     object tPostaZemlja: TIntegerField
  674.       FieldName = 'Zemlja'
  675.     end
  676.   end
  677.   object tTecaj: TMyTable
  678.     DatabaseName = 'Global'
  679.     IndexFieldNames = 'U_Valutu;Iz_Valute;NaDan'
  680.     TableName = 'TECAJ.DB'
  681.     AutoOpen = True
  682.     AutoFlush = True
  683.     FreeToModify = True
  684.     FreeToDelete = True
  685.     FreeToInsert = True
  686.     Left = 114
  687.     Top = 131
  688.     object tTecajU_Valutu: TIntegerField
  689.       FieldName = 'U_Valutu'
  690.     end
  691.     object tTecajIz_Valute: TIntegerField
  692.       FieldName = 'Iz_Valute'
  693.     end
  694.     object tTecajNaDan: TDateField
  695.       FieldName = 'NaDan'
  696.     end
  697.     object tTecajZaStotinu: TBooleanField
  698.       FieldName = 'ZaStotinu'
  699.     end
  700.     object tTecajDobijamo: TFloatField
  701.       FieldName = 'Dobijamo'
  702.     end
  703.   end
  704.   object tKonto5: TMyTable
  705.     DatabaseName = 'Global'
  706.     IndexFieldNames = 'CODE'
  707.     MasterFields = 'KONTOTROSKAD'
  708.     MasterSource = sGlava
  709.     TableName = 'KONTA.DB'
  710.     AutoOpen = True
  711.     AutoFlush = True
  712.     FreeToModify = False
  713.     FreeToDelete = True
  714.     FreeToInsert = True
  715.     Left = 61
  716.     Top = 131
  717.   end
  718.   object tValuta3: TMyTable
  719.     DatabaseName = 'Global'
  720.     IndexFieldNames = 'Code'
  721.     MasterFields = 'VALUTA2'
  722.     MasterSource = sGlava
  723.     TableName = 'VALUTA.DB'
  724.     AutoOpen = True
  725.     AutoFlush = True
  726.     FreeToModify = False
  727.     FreeToDelete = True
  728.     FreeToInsert = True
  729.     Left = 8
  730.     Top = 131
  731.   end
  732.   object tOrgJed3: TMyTable
  733.     DatabaseName = 'Global'
  734.     IndexFieldNames = 'PARTNER;CODE'
  735.     MasterFields = 'PARTNER;ORGJED'
  736.     MasterSource = sStavke
  737.     TableName = 'ORG_JED.DB'
  738.     AutoOpen = True
  739.     AutoFlush = True
  740.     FreeToModify = False
  741.     FreeToDelete = True
  742.     FreeToInsert = True
  743.     Left = 485
  744.     Top = 89
  745.   end
  746.   object tImeRobe: TMyTable
  747.     DatabaseName = 'Global'
  748.     IndexFieldNames = 'Roba;Govor'
  749.     MasterFields = 'Code;Govor'
  750.     MasterSource = sRoba
  751.     TableName = 'IME_ROBE.DB'
  752.     AutoOpen = True
  753.     AutoFlush = True
  754.     FreeToModify = False
  755.     FreeToDelete = True
  756.     FreeToInsert = True
  757.     Left = 432
  758.     Top = 89
  759.     object tImeRobeRoba: TIntegerField
  760.       FieldName = 'Roba'
  761.     end
  762.     object tImeRobeGovor: TIntegerField
  763.       FieldName = 'Govor'
  764.     end
  765.     object tImeRobeNaziv: TStringField
  766.       FieldName = 'Naziv'
  767.       OnGetText = tImeRobeNazivGetText
  768.       Size = 60
  769.     end
  770.   end
  771.   object tArtikl2: TMyTable
  772.     BeforePost = SifArtD_BP
  773.     DatabaseName = 'Global'
  774.     IndexFieldNames = 'PARTNER;CODE'
  775.     MasterFields = 'JA;Code'
  776.     MasterSource = sRoba
  777.     TableName = 'SIF_ROBE.DB'
  778.     AutoOpen = True
  779.     AutoFlush = True
  780.     FreeToModify = False
  781.     FreeToDelete = True
  782.     FreeToInsert = True
  783.     Left = 379
  784.     Top = 89
  785.     object tArtikl2Partner: TIntegerField
  786.       FieldName = 'Partner'
  787.     end
  788.     object tArtikl2Sifra: TStringField
  789.       FieldName = 'Sifra'
  790.       Size = 40
  791.     end
  792.     object tArtikl2Code: TIntegerField
  793.       FieldName = 'Code'
  794.     end
  795.     object tArtikl2Naziv: TStringField
  796.       FieldName = 'Naziv'
  797.       Size = 60
  798.     end
  799.     object tArtikl2Proizvodi: TIntegerField
  800.       FieldName = 'Proizvodi'
  801.     end
  802.     object tArtikl2Otkup: TStringField
  803.       FieldName = 'Otkup'
  804.       Size = 1
  805.     end
  806.     object tArtikl2Items: TIntegerField
  807.       FieldName = 'Items'
  808.     end
  809.   end
  810.   object tRoba: TMyTable
  811.     AutoCalcFields = False
  812.     OnCalcFields = tRobaCalcFields
  813.     DatabaseName = 'Global'
  814.     IndexFieldNames = 'Code'
  815.     MasterFields = 'Code'
  816.     MasterSource = sArtikl
  817.     TableName = 'ROBA.DB'
  818.     AutoOpen = True
  819.     AutoFlush = True
  820.     FreeToModify = False
  821.     FreeToDelete = True
  822.     FreeToInsert = True
  823.     Left = 326
  824.     Top = 89
  825.     object tRobaCode: TAutoIncField
  826.       FieldName = 'Code'
  827.     end
  828.     object tRobaProizvodi: TIntegerField
  829.       FieldName = 'Proizvodi'
  830.     end
  831.     object tRobaNaziv: TStringField
  832.       FieldName = 'Naziv'
  833.       Size = 60
  834.     end
  835.     object tRobaTarifaPoreza: TIntegerField
  836.       FieldName = 'TarifaPoreza'
  837.     end
  838.     object tRobaTarifaCarine: TIntegerField
  839.       FieldName = 'TarifaCarine'
  840.     end
  841.     object tRobaVrsta: TIntegerField
  842.       FieldName = 'Vrsta'
  843.     end
  844.     object tRobaJedMj: TIntegerField
  845.       FieldName = 'JedMj'
  846.     end
  847.     object tRobaPakiranje: TIntegerField
  848.       FieldName = 'Pakiranje'
  849.     end
  850.     object tRobaBarKod: TStringField
  851.       FieldName = 'BarKod'
  852.       Size = 13
  853.     end
  854.     object tRobaTezina: TFloatField
  855.       FieldName = 'Tezina'
  856.       Precision = 9
  857.     end
  858.     object tRobaBezbojno: TBooleanField
  859.       FieldName = 'Bezbojno'
  860.     end
  861.     object tRobaJa: TIntegerField
  862.       FieldName = 'Ja'
  863.       Visible = False
  864.       Calculated = True
  865.     end
  866.     object tRobaGovor: TIntegerField
  867.       FieldName = 'Govor'
  868.       Calculated = True
  869.     end
  870.     object tRobaItems: TIntegerField
  871.       FieldName = 'Items'
  872.     end
  873.   end
  874.   object tArtikl: TMyTable
  875.     BeforePost = SifArt_BP
  876.     DatabaseName = 'Global'
  877.     IndexFieldNames = 'PARTNER;CODE'
  878.     MasterFields = 'JA;ARTIKL'
  879.     MasterSource = sStavke
  880.     TableName = 'SIF_ROBE.DB'
  881.     AutoOpen = True
  882.     AutoFlush = True
  883.     FreeToModify = False
  884.     FreeToDelete = True
  885.     FreeToInsert = True
  886.     Left = 273
  887.     Top = 89
  888.     object tArtiklPartner: TIntegerField
  889.       FieldName = 'Partner'
  890.     end
  891.     object tArtiklSifra: TStringField
  892.       FieldName = 'Sifra'
  893.       Size = 40
  894.     end
  895.     object tArtiklCode: TIntegerField
  896.       FieldName = 'Code'
  897.     end
  898.     object tArtiklNaziv: TStringField
  899.       FieldName = 'Naziv'
  900.       Size = 60
  901.     end
  902.     object tArtiklProizvodi: TIntegerField
  903.       FieldName = 'Proizvodi'
  904.     end
  905.     object tArtiklItems: TIntegerField
  906.       FieldName = 'Items'
  907.     end
  908.   end
  909.   object tImeBoje: TMyTable
  910.     DatabaseName = 'Global'
  911.     IndexFieldNames = 'Boja;Govor'
  912.     MasterFields = 'Code;Govor'
  913.     MasterSource = sBoja
  914.     TableName = 'IME_BOJA.DB'
  915.     AutoOpen = True
  916.     AutoFlush = True
  917.     FreeToModify = False
  918.     FreeToDelete = True
  919.     FreeToInsert = True
  920.     Left = 220
  921.     Top = 89
  922.     object tImeBojeBoja: TIntegerField
  923.       FieldName = 'Boja'
  924.     end
  925.     object tImeBojeGovor: TIntegerField
  926.       FieldName = 'Govor'
  927.     end
  928.     object tImeBojeNaziv: TStringField
  929.       FieldName = 'Naziv'
  930.       OnGetText = tImeBojeNazivGetText
  931.       Size = 60
  932.     end
  933.   end
  934.   object tBoje2: TMyTable
  935.     BeforePost = SifBojeD_BP
  936.     DatabaseName = 'Global'
  937.     IndexFieldNames = 'PARTNER;PROIZVODI;CODE'
  938.     MasterFields = 'Ja;Proizvodi;Code'
  939.     MasterSource = sBoja
  940.     TableName = 'SIF_BOJA.DB'
  941.     AutoOpen = True
  942.     AutoFlush = True
  943.     FreeToModify = False
  944.     FreeToDelete = True
  945.     FreeToInsert = True
  946.     Left = 167
  947.     Top = 89
  948.     object tBoje2Partner: TIntegerField
  949.       FieldName = 'Partner'
  950.     end
  951.     object tBoje2Proizvodi: TIntegerField
  952.       FieldName = 'Proizvodi'
  953.     end
  954.     object tBoje2Sifra: TStringField
  955.       FieldName = 'Sifra'
  956.       Size = 40
  957.     end
  958.     object tBoje2Code: TIntegerField
  959.       FieldName = 'Code'
  960.     end
  961.     object tBoje2Naziv: TStringField
  962.       FieldName = 'Naziv'
  963.       Size = 60
  964.     end
  965.     object tBoje2Items: TIntegerField
  966.       FieldName = 'Items'
  967.     end
  968.   end
  969.   object tBoja: TMyTable
  970.     AutoCalcFields = False
  971.     OnCalcFields = tBojaCalcFields
  972.     DatabaseName = 'Global'
  973.     IndexFieldNames = 'Code'
  974.     MasterFields = 'Code'
  975.     MasterSource = sBoje
  976.     TableName = 'BOJE.DB'
  977.     AutoOpen = True
  978.     AutoFlush = True
  979.     FreeToModify = False
  980.     FreeToDelete = True
  981.     FreeToInsert = True
  982.     Left = 114
  983.     Top = 89
  984.     object tBojaCode: TAutoIncField
  985.       FieldName = 'Code'
  986.     end
  987.     object tBojaProizvodi: TIntegerField
  988.       FieldName = 'Proizvodi'
  989.     end
  990.     object tBojaNaziv: TStringField
  991.       FieldName = 'Naziv'
  992.       Size = 60
  993.     end
  994.     object tBojaGovor: TIntegerField
  995.       FieldName = 'Govor'
  996.       Calculated = True
  997.     end
  998.     object tBojaJa: TIntegerField
  999.       FieldName = 'Ja'
  1000.       Calculated = True
  1001.     end
  1002.     object tBojaItems: TIntegerField
  1003.       FieldName = 'Items'
  1004.     end
  1005.   end
  1006.   object tBoje: TMyTable
  1007.     BeforePost = SifBoje_BP
  1008.     DatabaseName = 'Global'
  1009.     IndexFieldNames = 'PARTNER;PROIZVODI;CODE'
  1010.     MasterFields = 'JA;PROIZVODI;BOJA'
  1011.     MasterSource = sStavke
  1012.     TableName = 'SIF_BOJA.DB'
  1013.     AutoOpen = True
  1014.     AutoFlush = True
  1015.     FreeToModify = False
  1016.     FreeToDelete = True
  1017.     FreeToInsert = True
  1018.     Left = 61
  1019.     Top = 89
  1020.     object tBojePartner: TIntegerField
  1021.       FieldName = 'Partner'
  1022.     end
  1023.     object tBojeProizvodi: TIntegerField
  1024.       FieldName = 'Proizvodi'
  1025.     end
  1026.     object tBojeSifra: TStringField
  1027.       FieldName = 'Sifra'
  1028.       Size = 40
  1029.     end
  1030.     object tBojeCode: TIntegerField
  1031.       FieldName = 'Code'
  1032.     end
  1033.     object tBojeNaziv: TStringField
  1034.       FieldName = 'Naziv'
  1035.       Size = 60
  1036.     end
  1037.     object tBojeItems: TIntegerField
  1038.       FieldName = 'Items'
  1039.     end
  1040.   end
  1041.   object tMjere: TMyTable
  1042.     DatabaseName = 'Global'
  1043.     IndexFieldNames = 'Jedinica;Govor'
  1044.     MasterFields = 'Code;Govor'
  1045.     MasterSource = sJedinice
  1046.     TableName = 'MJERE.DB'
  1047.     AutoOpen = True
  1048.     AutoFlush = True
  1049.     FreeToModify = False
  1050.     FreeToDelete = True
  1051.     FreeToInsert = True
  1052.     Left = 8
  1053.     Top = 89
  1054.     object tMjereJedinica: TIntegerField
  1055.       FieldName = 'Jedinica'
  1056.     end
  1057.     object tMjereGovor: TIntegerField
  1058.       FieldName = 'Govor'
  1059.     end
  1060.     object tMjereNaziv: TStringField
  1061.       FieldName = 'Naziv'
  1062.       Size = 60
  1063.     end
  1064.   end
  1065.   object tJedinice: TMyTable
  1066.     AutoCalcFields = False
  1067.     OnCalcFields = tJediniceCalcFields
  1068.     DatabaseName = 'Global'
  1069.     IndexFieldNames = 'CODE'
  1070.     MasterFields = 'JEDMJ'
  1071.     MasterSource = sRoba
  1072.     TableName = 'JEDINICE.DB'
  1073.     AutoOpen = True
  1074.     AutoFlush = True
  1075.     FreeToModify = False
  1076.     FreeToDelete = True
  1077.     FreeToInsert = True
  1078.     Left = 485
  1079.     Top = 47
  1080.     object tJediniceCode: TAutoIncField
  1081.       FieldName = 'Code'
  1082.     end
  1083.     object tJediniceSifra: TStringField
  1084.       FieldName = 'Sifra'
  1085.       Size = 40
  1086.     end
  1087.     object tJediniceGovor: TIntegerField
  1088.       FieldName = 'Govor'
  1089.       Calculated = True
  1090.     end
  1091.   end
  1092.   object tAtomi: TMyTable
  1093.     DatabaseName = 'Global'
  1094.     IndexFieldNames = 'PAKUNG;KOLICINA'
  1095.     MasterFields = 'PAKUNG;ATOM'
  1096.     MasterSource = sStavke
  1097.     TableName = 'ATOMI.DB'
  1098.     AutoOpen = True
  1099.     AutoFlush = True
  1100.     FreeToModify = False
  1101.     FreeToDelete = True
  1102.     FreeToInsert = True
  1103.     Left = 432
  1104.     Top = 47
  1105.     object tAtomiPakung: TIntegerField
  1106.       FieldName = 'Pakung'
  1107.     end
  1108.     object tAtomiKolicina: TFloatField
  1109.       FieldName = 'Kolicina'
  1110.       Precision = 9
  1111.     end
  1112.   end
  1113.   object tPakung: TMyTable
  1114.     DatabaseName = 'Global'
  1115.     IndexFieldNames = 'Jedinica;Code'
  1116.     MasterFields = 'JedMj;Pakiranje'
  1117.     MasterSource = sRoba
  1118.     TableName = 'PAKUNG.DB'
  1119.     AutoOpen = True
  1120.     AutoFlush = True
  1121.     FreeToModify = False
  1122.     FreeToDelete = True
  1123.     FreeToInsert = True
  1124.     Left = 379
  1125.     Top = 47
  1126.     object tPakungCode: TAutoIncField
  1127.       FieldName = 'Code'
  1128.     end
  1129.     object tPakungJedinica: TIntegerField
  1130.       FieldName = 'Jedinica'
  1131.     end
  1132.     object tPakungSifra: TStringField
  1133.       FieldName = 'Sifra'
  1134.       Size = 40
  1135.     end
  1136.     object tPakungMinKolicina: TFloatField
  1137.       FieldName = 'MinKolicina'
  1138.       Precision = 9
  1139.     end
  1140.     object tPakungImaAtoma: TBooleanField
  1141.       FieldName = 'ImaAtoma'
  1142.     end
  1143.     object tPakungCijene: TFloatField
  1144.       FieldName = 'Cijene'
  1145.       Precision = 9
  1146.     end
  1147.   end
  1148.   object tCeneRobe: TMyTable
  1149.     DatabaseName = 'Lokal'
  1150.     IndexFieldNames = 'Roba;Boja;MinKol;Valuta'
  1151.     TableName = 'CENEROBE.DB'
  1152.     AutoOpen = True
  1153.     AutoFlush = True
  1154.     FreeToModify = True
  1155.     FreeToDelete = True
  1156.     FreeToInsert = True
  1157.     Left = 326
  1158.     Top = 47
  1159.     object tCeneRobeRoba: TIntegerField
  1160.       FieldName = 'Roba'
  1161.     end
  1162.     object tCeneRobeBoja: TIntegerField
  1163.       FieldName = 'Boja'
  1164.     end
  1165.     object tCeneRobeMinKol: TFloatField
  1166.       FieldName = 'MinKol'
  1167.       Precision = 9
  1168.     end
  1169.     object tCeneRobeValuta: TIntegerField
  1170.       FieldName = 'Valuta'
  1171.     end
  1172.     object tCeneRobeCijena: TFloatField
  1173.       FieldName = 'Cijena'
  1174.       Precision = 9
  1175.     end
  1176.     object tCeneRobeRabat: TFloatField
  1177.       FieldName = 'Rabat'
  1178.       Precision = 9
  1179.     end
  1180.     object tCeneRobeRabatI: TFloatField
  1181.       FieldName = 'RabatI'
  1182.       Precision = 9
  1183.     end
  1184.     object tCeneRobeRabat2: TFloatField
  1185.       FieldName = 'Rabat2'
  1186.       Precision = 9
  1187.     end
  1188.     object tCeneRobeRabat2I: TFloatField
  1189.       FieldName = 'Rabat2I'
  1190.       Precision = 9
  1191.     end
  1192.     object tCeneRobeVPC: TFloatField
  1193.       FieldName = 'VPC'
  1194.       Precision = 9
  1195.     end
  1196.   end
  1197.   object tPart3: TMyTable
  1198.     DatabaseName = 'Global'
  1199.     IndexFieldNames = 'Code'
  1200.     MasterFields = 'Partner'
  1201.     MasterSource = sPartner3
  1202.     TableName = 'PARTNER.DB'
  1203.     AutoOpen = True
  1204.     AutoFlush = True
  1205.     FreeToModify = False
  1206.     FreeToDelete = True
  1207.     FreeToInsert = True
  1208.     Left = 273
  1209.     Top = 47
  1210.   end
  1211.   object tPart2: TMyTable
  1212.     DatabaseName = 'Global'
  1213.     IndexFieldNames = 'Code'
  1214.     MasterFields = 'Partner'
  1215.     MasterSource = sPartner2
  1216.     TableName = 'PARTNER.DB'
  1217.     AutoOpen = True
  1218.     AutoFlush = True
  1219.     FreeToModify = False
  1220.     FreeToDelete = True
  1221.     FreeToInsert = True
  1222.     Left = 220
  1223.     Top = 47
  1224.   end
  1225.   object tPart: TMyTable
  1226.     DatabaseName = 'Global'
  1227.     IndexFieldNames = 'Code'
  1228.     MasterFields = 'Partner'
  1229.     MasterSource = sPartner
  1230.     TableName = 'PARTNER.DB'
  1231.     AutoOpen = True
  1232.     AutoFlush = True
  1233.     FreeToModify = False
  1234.     FreeToDelete = True
  1235.     FreeToInsert = True
  1236.     Left = 167
  1237.     Top = 47
  1238.     object tPartRabat2Kolicina: TBooleanField
  1239.       FieldName = 'Rabat2Kolicina'
  1240.       Visible = False
  1241.     end
  1242.     object tPartRabat2: TBooleanField
  1243.       FieldName = 'Rabat2'
  1244.       Visible = False
  1245.     end
  1246.     object tPartCode: TAutoIncField
  1247.       FieldName = 'Code'
  1248.     end
  1249.     object tPartZemlja: TIntegerField
  1250.       FieldName = 'Zemlja'
  1251.     end
  1252.     object tPartBanka: TIntegerField
  1253.       FieldName = 'Banka'
  1254.     end
  1255.     object tPartValuta: TIntegerField
  1256.       FieldName = 'Valuta'
  1257.     end
  1258.     object tPartNaziv: TStringField
  1259.       FieldName = 'Naziv'
  1260.       Size = 80
  1261.     end
  1262.     object tPartMjesto: TStringField
  1263.       FieldName = 'Mjesto'
  1264.       Size = 40
  1265.     end
  1266.     object tPartUlicaBroj: TStringField
  1267.       FieldName = 'UlicaBroj'
  1268.       Size = 60
  1269.     end
  1270.     object tPartPosta: TIntegerField
  1271.       FieldName = 'Posta'
  1272.     end
  1273.     object tPartMaticni: TStringField
  1274.       FieldName = 'Maticni'
  1275.       Size = 30
  1276.     end
  1277.     object tPartSifra: TStringField
  1278.       FieldName = 'Sifra'
  1279.       Size = 40
  1280.     end
  1281.     object tPartZiroRN: TIntegerField
  1282.       FieldName = 'ZiroRN'
  1283.     end
  1284.     object tPartItems: TIntegerField
  1285.       FieldName = 'Items'
  1286.     end
  1287.   end
  1288.   object tPartner3: TMyTable
  1289.     DatabaseName = 'Lokal'
  1290.     IndexFieldNames = 'DOBAVLJAC;DRZAVA;PARTNER'
  1291.     MasterFields = 'DOB;ZEM2;PREVOZNIK'
  1292.     MasterSource = sGlava
  1293.     TableName = 'SIF_PART.DB'
  1294.     AutoOpen = True
  1295.     AutoFlush = True
  1296.     FreeToModify = False
  1297.     FreeToDelete = True
  1298.     FreeToInsert = True
  1299.     Left = 114
  1300.     Top = 47
  1301.   end
  1302.   object tPartner2: TMyTable
  1303.     DatabaseName = 'Lokal'
  1304.     IndexFieldNames = 'DOBAVLJAC;DRZAVA;PARTNER'
  1305.     MasterFields = 'DOB;ZEM2;SPEDICIJA'
  1306.     MasterSource = sGlava
  1307.     TableName = 'SIF_PART.DB'
  1308.     AutoOpen = True
  1309.     AutoFlush = True
  1310.     FreeToModify = False
  1311.     FreeToDelete = True
  1312.     FreeToInsert = True
  1313.     Left = 61
  1314.     Top = 47
  1315.   end
  1316.   object tPartner: TMyTable
  1317.     DatabaseName = 'Lokal'
  1318.     IndexFieldNames = 'DOBAVLJAC;DRZAVA;PARTNER'
  1319.     MasterFields = 'DOB;ZEM;DOBAVLJAC'
  1320.     MasterSource = sGlava
  1321.     TableName = 'SIF_PART.DB'
  1322.     AutoOpen = True
  1323.     AutoFlush = True
  1324.     FreeToModify = False
  1325.     FreeToDelete = True
  1326.     FreeToInsert = True
  1327.     Left = 8
  1328.     Top = 47
  1329.     object tPartnerUgovRabat: TFloatField
  1330.       FieldName = 'UgovRabat'
  1331.       Precision = 9
  1332.     end
  1333.     object tPartnerDobavljac: TStringField
  1334.       FieldName = 'Dobavljac'
  1335.       Size = 1
  1336.     end
  1337.     object tPartnerRokPlacanja: TSmallintField
  1338.       FieldName = 'RokPlacanja'
  1339.       Visible = False
  1340.     end
  1341.     object tPartnerVeceKolicine: TBooleanField
  1342.       FieldName = 'VeceKolicine'
  1343.       Visible = False
  1344.     end
  1345.     object tPartnerSifra: TStringField
  1346.       FieldName = 'Sifra'
  1347.       Size = 40
  1348.     end
  1349.     object tPartnerDrzava: TStringField
  1350.       FieldName = 'Drzava'
  1351.       Size = 1
  1352.     end
  1353.     object tPartnerPartner: TIntegerField
  1354.       FieldName = 'Partner'
  1355.     end
  1356.     object tPartnerGovor: TIntegerField
  1357.       FieldName = 'Govor'
  1358.     end
  1359.     object tPartnerItems: TIntegerField
  1360.       FieldName = 'Items'
  1361.     end
  1362.   end
  1363.   object tZiro: TMyTable
  1364.     DatabaseName = 'Global'
  1365.     IndexFieldNames = 'PARTNER;CODE'
  1366.     MasterFields = 'BANKA;ZIRORN'
  1367.     MasterSource = sGlava
  1368.     TableName = 'ZIREKI.DB'
  1369.     AutoOpen = True
  1370.     AutoFlush = True
  1371.     FreeToModify = False
  1372.     FreeToDelete = True
  1373.     FreeToInsert = True
  1374.     Left = 485
  1375.     Top = 5
  1376.   end
  1377.   object tNasZiro: TMyTable
  1378.     DatabaseName = 'Global'
  1379.     IndexFieldNames = 'PARTNER;CODE'
  1380.     MasterFields = 'JA;NASZIRORN'
  1381.     MasterSource = sGlava
  1382.     TableName = 'ZIREKI.DB'
  1383.     AutoOpen = True
  1384.     AutoFlush = True
  1385.     FreeToModify = False
  1386.     FreeToDelete = True
  1387.     FreeToInsert = True
  1388.     Left = 432
  1389.     Top = 5
  1390.   end
  1391.   object xUsluge3: TMyTable
  1392.     DatabaseName = 'Global2'
  1393.     IndexFieldNames = 'Code'
  1394.     TableName = 'USLUGA.DB'
  1395.     AutoOpen = False
  1396.     AutoFlush = False
  1397.     FreeToModify = False
  1398.     FreeToDelete = True
  1399.     FreeToInsert = True
  1400.     Left = 279
  1401.     Top = 389
  1402.     object xUsluge3Partner: TIntegerField
  1403.       FieldName = 'Partner'
  1404.     end
  1405.     object xUsluge3Vrsta: TSmallintField
  1406.       FieldName = 'Vrsta'
  1407.     end
  1408.     object xUsluge3Sifra: TStringField
  1409.       FieldName = 'Sifra'
  1410.       Size = 40
  1411.     end
  1412.     object xUsluge3Code: TIntegerField
  1413.       FieldName = 'Code'
  1414.     end
  1415.     object xUsluge3Naziv: TStringField
  1416.       FieldName = 'Naziv'
  1417.       Size = 60
  1418.     end
  1419.     object xUsluge3Opis: TStringField
  1420.       FieldName = 'Opis'
  1421.       Size = 80
  1422.     end
  1423.     object xUsluge3Cijena: TFloatField
  1424.       FieldName = 'Cijena'
  1425.     end
  1426.   end
  1427.   object tUsluge2: TMyTable
  1428.     DatabaseName = 'Global'
  1429.     IndexFieldNames = 'Code'
  1430.     MasterFields = 'Code'
  1431.     MasterSource = sUsluge
  1432.     TableName = 'USLUGE.DB'
  1433.     AutoOpen = True
  1434.     AutoFlush = True
  1435.     FreeToModify = False
  1436.     FreeToDelete = True
  1437.     FreeToInsert = True
  1438.     Left = 326
  1439.     Top = 5
  1440.     object tUsluge2Code: TAutoIncField
  1441.       FieldName = 'Code'
  1442.     end
  1443.     object tUsluge2Vrsta: TSmallintField
  1444.       FieldName = 'Vrsta'
  1445.     end
  1446.     object tUsluge2Sifra: TStringField
  1447.       FieldName = 'Sifra'
  1448.       Size = 40
  1449.     end
  1450.     object tUsluge2Naziv: TStringField
  1451.       FieldName = 'Naziv'
  1452.       Size = 60
  1453.     end
  1454.     object tUsluge2KontoT: TIntegerField
  1455.       FieldName = 'KontoT'
  1456.     end
  1457.     object tUsluge2KontoP: TIntegerField
  1458.       FieldName = 'KontoP'
  1459.     end
  1460.     object tUsluge2JedMj: TIntegerField
  1461.       FieldName = 'JedMj'
  1462.     end
  1463.     object tUsluge2TarifaPoreza: TIntegerField
  1464.       FieldName = 'TarifaPoreza'
  1465.     end
  1466.   end
  1467.   object tUsluge: TMyTable
  1468.     DatabaseName = 'Global'
  1469.     IndexFieldNames = 'PARTNER;VRSTA;CODE'
  1470.     MasterFields = 'DOBAVLJAC;VRSTA;ARTIKL'
  1471.     MasterSource = sStavke
  1472.     TableName = 'USLUGA.DB'
  1473.     AutoOpen = True
  1474.     AutoFlush = True
  1475.     FreeToModify = False
  1476.     FreeToDelete = True
  1477.     FreeToInsert = True
  1478.     Left = 273
  1479.     Top = 5
  1480.     object tUslugePartner: TIntegerField
  1481.       FieldName = 'Partner'
  1482.     end
  1483.     object tUslugeVrsta: TSmallintField
  1484.       FieldName = 'Vrsta'
  1485.     end
  1486.     object tUslugeSifra: TStringField
  1487.       FieldName = 'Sifra'
  1488.       Size = 40
  1489.     end
  1490.     object tUslugeCode: TIntegerField
  1491.       FieldName = 'Code'
  1492.     end
  1493.     object tUslugeNaziv: TStringField
  1494.       FieldName = 'Naziv'
  1495.       Size = 60
  1496.     end
  1497.     object tUslugeOpis: TStringField
  1498.       FieldName = 'Opis'
  1499.       Size = 80
  1500.     end
  1501.     object tUslugeCijena: TFloatField
  1502.       FieldName = 'Cijena'
  1503.     end
  1504.   end
  1505.   object xSkladiste2: TMyTable
  1506.     DatabaseName = 'Lokal2'
  1507.     IndexFieldNames = 'Code'
  1508.     TableName = 'SKLADIST.DB'
  1509.     AutoOpen = False
  1510.     AutoFlush = False
  1511.     FreeToModify = False
  1512.     FreeToDelete = True
  1513.     FreeToInsert = True
  1514.     Left = 224
  1515.     Top = 389
  1516.     object xSkladiste2Code: TAutoIncField
  1517.       FieldName = 'Code'
  1518.     end
  1519.     object xSkladiste2OrgJed: TIntegerField
  1520.       FieldName = 'OrgJed'
  1521.     end
  1522.     object xSkladiste2Knjiga: TIntegerField
  1523.       FieldName = 'Knjiga'
  1524.     end
  1525.     object xSkladiste2KontoRobe: TIntegerField
  1526.       FieldName = 'KontoRobe'
  1527.     end
  1528.     object xSkladiste2KontoNVPRobe: TIntegerField
  1529.       FieldName = 'KontoNVPRobe'
  1530.     end
  1531.     object xSkladiste2KontoPPRobe: TIntegerField
  1532.       FieldName = 'KontoPPRobe'
  1533.     end
  1534.     object xSkladiste2KontoRUC: TIntegerField
  1535.       FieldName = 'KontoRUC'
  1536.     end
  1537.     object xSkladiste2KontoManjak: TIntegerField
  1538.       FieldName = 'KontoManjak'
  1539.     end
  1540.     object xSkladiste2KontoTroskaProdaje: TIntegerField
  1541.       FieldName = 'KontoTroskaProdaje'
  1542.     end
  1543.     object xSkladiste2KontoKvar: TIntegerField
  1544.       FieldName = 'KontoKvar'
  1545.     end
  1546.     object xSkladiste2KontoTrgRoba: TIntegerField
  1547.       FieldName = 'KontoTrgRoba'
  1548.     end
  1549.     object xSkladiste2KontoKalkPorez: TIntegerField
  1550.       FieldName = 'KontoKalkPorez'
  1551.     end
  1552.     object xSkladiste2KontoTroskaNabave: TIntegerField
  1553.       FieldName = 'KontoTroskaNabave'
  1554.     end
  1555.     object xSkladiste2KontoRabata: TIntegerField
  1556.       FieldName = 'KontoRabata'
  1557.     end
  1558.     object xSkladiste2Items: TIntegerField
  1559.       FieldName = 'Items'
  1560.     end
  1561.   end
  1562.   object xGlava: TMyTable
  1563.     DatabaseName = 'Lokal2'
  1564.     IndexFieldNames = 'Code'
  1565.     TableName = 'UFU.DB'
  1566.     AutoOpen = False
  1567.     AutoFlush = False
  1568.     FreeToModify = False
  1569.     FreeToDelete = True
  1570.     FreeToInsert = True
  1571.     Left = 432
  1572.     Top = 388
  1573.     object xGlavaBrojUFE: TIntegerField
  1574.       FieldName = 'BrojUFE'
  1575.     end
  1576.     object xGlavaCode: TIntegerField
  1577.       FieldName = 'Code'
  1578.     end
  1579.     object xGlavaKnjizeno: TStringField
  1580.       FieldName = 'Knjizeno'
  1581.       Size = 1
  1582.     end
  1583.     object xGlavaDatumKnj: TDateField
  1584.       FieldName = 'DatumKnj'
  1585.     end
  1586.     object xGlavaImaOtpis: TBooleanField
  1587.       FieldName = 'ImaOtpis'
  1588.     end
  1589.     object xGlavaNaIsto: TBooleanField
  1590.       FieldName = 'NaIsto'
  1591.     end
  1592.     object xGlavaSvrha: TStringField
  1593.       FieldName = 'Svrha'
  1594.       Size = 60
  1595.     end
  1596.     object xGlavaSkladiste: TIntegerField
  1597.       FieldName = 'Skladiste'
  1598.     end
  1599.     object xGlavaOrgJed: TIntegerField
  1600.       FieldName = 'OrgJed'
  1601.     end
  1602.     object xGlavaVrstaTer: TSmallintField
  1603.       FieldName = 'VrstaTer'
  1604.     end
  1605.     object xGlavaNemaUsluge: TBooleanField
  1606.       FieldName = 'NemaUsluge'
  1607.     end
  1608.     object xGlavaDatumDok: TDateField
  1609.       FieldName = 'DatumDok'
  1610.     end
  1611.     object xGlavaDatumCarine: TDateField
  1612.       FieldName = 'DatumCarine'
  1613.     end
  1614.     object xGlavaDobavljac: TIntegerField
  1615.       FieldName = 'Dobavljac'
  1616.     end
  1617.     object xGlavaOrgJedDob: TIntegerField
  1618.       FieldName = 'OrgJedDob'
  1619.     end
  1620.     object xGlavaSifreDobavljaca: TBooleanField
  1621.       FieldName = 'SifreDobavljaca'
  1622.     end
  1623.     object xGlavaRacunBr: TStringField
  1624.       FieldName = 'RacunBr'
  1625.       Size = 50
  1626.     end
  1627.     object xGlavaOtpremnicaBr: TStringField
  1628.       FieldName = 'OtpremnicaBr'
  1629.       Size = 50
  1630.     end
  1631.     object xGlavaZakljucakBr: TStringField
  1632.       FieldName = 'ZakljucakBr'
  1633.       Size = 30
  1634.     end
  1635.     object xGlavaDatumZaklj: TDateField
  1636.       FieldName = 'DatumZaklj'
  1637.     end
  1638.     object xGlavaUCDbr: TStringField
  1639.       FieldName = 'UCDbr'
  1640.     end
  1641.     object xGlavaDatumUCD: TDateField
  1642.       FieldName = 'DatumUCD'
  1643.     end
  1644.     object xGlavaNarudzbaBr: TStringField
  1645.       FieldName = 'NarudzbaBr'
  1646.       Size = 50
  1647.     end
  1648.     object xGlavaPredracunBr: TStringField
  1649.       FieldName = 'PredracunBr'
  1650.       Size = 50
  1651.     end
  1652.     object xGlavaDatumDVO: TDateField
  1653.       FieldName = 'DatumDVO'
  1654.     end
  1655.     object xGlavaRokPlacanja: TSmallintField
  1656.       FieldName = 'RokPlacanja'
  1657.     end
  1658.     object xGlavaValuta2: TIntegerField
  1659.       FieldName = 'Valuta2'
  1660.     end
  1661.     object xGlavaDatumValute: TDateField
  1662.       FieldName = 'DatumValute'
  1663.     end
  1664.     object xGlavaTecajDev: TFloatField
  1665.       FieldName = 'TecajDev'
  1666.     end
  1667.     object xGlavaZa100: TBooleanField
  1668.       FieldName = 'Za100'
  1669.     end
  1670.     object xGlavaTecaj: TFloatField
  1671.       FieldName = 'Tecaj'
  1672.     end
  1673.     object xGlavaNasZiroRn: TIntegerField
  1674.       FieldName = 'NasZiroRn'
  1675.     end
  1676.     object xGlavaZiroRn: TIntegerField
  1677.       FieldName = 'ZiroRn'
  1678.     end
  1679.     object xGlavaPoziv: TSmallintField
  1680.       FieldName = 'Poziv'
  1681.     end
  1682.     object xGlavaModel: TStringField
  1683.       FieldName = 'Model'
  1684.       Size = 30
  1685.     end
  1686.     object xGlavaPlacanje: TSmallintField
  1687.       FieldName = 'Placanje'
  1688.     end
  1689.     object xGlavaZemlja: TIntegerField
  1690.       FieldName = 'Zemlja'
  1691.     end
  1692.     object xGlavaBanka: TIntegerField
  1693.       FieldName = 'Banka'
  1694.     end
  1695.     object xGlavaSpedicija: TIntegerField
  1696.       FieldName = 'Spedicija'
  1697.     end
  1698.     object xGlavaPrevoznik: TIntegerField
  1699.       FieldName = 'Prevoznik'
  1700.     end
  1701.     object xGlavaIznos: TFloatField
  1702.       FieldName = 'Iznos'
  1703.     end
  1704.     object xGlavaRazlika: TFloatField
  1705.       FieldName = 'Razlika'
  1706.     end
  1707.     object xGlavaIznosKn: TFloatField
  1708.       FieldName = 'IznosKn'
  1709.     end
  1710.     object xGlavaRazlikaKn: TFloatField
  1711.       FieldName = 'RazlikaKn'
  1712.     end
  1713.     object xGlavaSconto: TFloatField
  1714.       FieldName = 'Sconto'
  1715.     end
  1716.     object xGlavaIznos2: TFloatField
  1717.       FieldName = 'Iznos2'
  1718.     end
  1719.     object xGlavaIznosKn2: TFloatField
  1720.       FieldName = 'IznosKn2'
  1721.     end
  1722.     object xGlavaIznosKn3: TFloatField
  1723.       FieldName = 'IznosKn3'
  1724.     end
  1725.     object xGlavaVrijednost: TFloatField
  1726.       FieldName = 'Vrijednost'
  1727.     end
  1728.     object xGlavaKonto: TIntegerField
  1729.       FieldName = 'Konto'
  1730.     end
  1731.     object xGlavaIspisVirmana: TBooleanField
  1732.       FieldName = 'IspisVirmana'
  1733.     end
  1734.     object xGlavaTrosakDirekt: TBooleanField
  1735.       FieldName = 'TrosakDirekt'
  1736.     end
  1737.     object xGlavaKontoTroska: TIntegerField
  1738.       FieldName = 'KontoTroska'
  1739.     end
  1740.     object xGlavaKontoTroskaD: TIntegerField
  1741.       FieldName = 'KontoTroskaD'
  1742.     end
  1743.     object xGlavaStopaTroska: TFloatField
  1744.       FieldName = 'StopaTroska'
  1745.     end
  1746.     object xGlavaVozarinaP: TFloatField
  1747.       FieldName = 'VozarinaP'
  1748.     end
  1749.     object xGlavaVozarina: TFloatField
  1750.       FieldName = 'Vozarina'
  1751.     end
  1752.     object xGlavaTrosakNaRobu: TFloatField
  1753.       FieldName = 'TrosakNaRobu'
  1754.     end
  1755.     object xGlavaTrosakNaRobi: TFloatField
  1756.       FieldName = 'TrosakNaRobi'
  1757.     end
  1758.     object xGlavaTroskaOstaje: TFloatField
  1759.       FieldName = 'TroskaOstaje'
  1760.     end
  1761.     object xGlavaCarinskaOsn: TFloatField
  1762.       FieldName = 'CarinskaOsn'
  1763.     end
  1764.     object xGlavaCarinaP: TFloatField
  1765.       FieldName = 'CarinaP'
  1766.     end
  1767.     object xGlavaCarina: TFloatField
  1768.       FieldName = 'Carina'
  1769.     end
  1770.     object xGlavaUzeoCarinu: TFloatField
  1771.       FieldName = 'UzeoCarinu'
  1772.     end
  1773.     object xGlavaOstajeCarina: TFloatField
  1774.       FieldName = 'OstajeCarina'
  1775.     end
  1776.     object xGlavaCarinaTarBr: TBooleanField
  1777.       FieldName = 'CarinaTarBr'
  1778.     end
  1779.     object xGlavaCarinaMod: TBooleanField
  1780.       FieldName = 'CarinaMod'
  1781.     end
  1782.     object xGlavaPodesiFV: TBooleanField
  1783.       FieldName = 'PodesiFV'
  1784.     end
  1785.     object xGlavaPodesiVPC: TBooleanField
  1786.       FieldName = 'PodesiVPC'
  1787.     end
  1788.     object xGlavaPodesiMPC: TBooleanField
  1789.       FieldName = 'PodesiMPC'
  1790.     end
  1791.     object xGlavaFCO: TFloatField
  1792.       FieldName = 'FCO'
  1793.     end
  1794.     object xGlavaSpediterP: TFloatField
  1795.       FieldName = 'SpediterP'
  1796.     end
  1797.     object xGlavaSpediter: TFloatField
  1798.       FieldName = 'Spediter'
  1799.     end
  1800.     object xGlavaTransportP: TFloatField
  1801.       FieldName = 'TransportP'
  1802.     end
  1803.     object xGlavaTransport: TFloatField
  1804.       FieldName = 'Transport'
  1805.     end
  1806.     object xGlavaBanciDIF: TBooleanField
  1807.       FieldName = 'BanciDIF'
  1808.     end
  1809.     object xGlavaBanciP: TFloatField
  1810.       FieldName = 'BanciP'
  1811.     end
  1812.     object xGlavaBanci: TFloatField
  1813.       FieldName = 'Banci'
  1814.     end
  1815.     object xGlavaUvozCO: TBooleanField
  1816.       FieldName = 'UvozCO'
  1817.     end
  1818.     object xGlavaUvozP: TFloatField
  1819.       FieldName = 'UvozP'
  1820.     end
  1821.     object xGlavaUvoz: TFloatField
  1822.       FieldName = 'Uvoz'
  1823.     end
  1824.     object xGlavaSanitarP: TFloatField
  1825.       FieldName = 'SanitarP'
  1826.     end
  1827.     object xGlavaSanitar: TFloatField
  1828.       FieldName = 'Sanitar'
  1829.     end
  1830.     object xGlavaSluzbaP: TFloatField
  1831.       FieldName = 'SluzbaP'
  1832.     end
  1833.     object xGlavaSluzba: TFloatField
  1834.       FieldName = 'Sluzba'
  1835.     end
  1836.     object xGlavaOstaliTroskoviP: TFloatField
  1837.       FieldName = 'OstaliTroskoviP'
  1838.     end
  1839.     object xGlavaOstaliTroskovi: TFloatField
  1840.       FieldName = 'OstaliTroskovi'
  1841.     end
  1842.     object xGlavaOstaliTroskovi2: TFloatField
  1843.       FieldName = 'OstaliTroskovi2'
  1844.     end
  1845.     object xGlavaOstalo: TFloatField
  1846.       FieldName = 'Ostalo'
  1847.     end
  1848.     object xGlavaOstaloNaKonto: TFloatField
  1849.       FieldName = 'OstaloNaKonto'
  1850.     end
  1851.     object xGlavaOstaloNaRobu: TFloatField
  1852.       FieldName = 'OstaloNaRobu'
  1853.     end
  1854.     object xGlavaOstaloNaRobi: TFloatField
  1855.       FieldName = 'OstaloNaRobi'
  1856.     end
  1857.     object xGlavaOstaloOstaje: TFloatField
  1858.       FieldName = 'OstaloOstaje'
  1859.     end
  1860.     object xGlavaTrosakMod: TBooleanField
  1861.       FieldName = 'TrosakMod'
  1862.     end
  1863.     object xGlavaRabatIznos: TBooleanField
  1864.       FieldName = 'RabatIznos'
  1865.     end
  1866.     object xGlavaImaRabat2: TBooleanField
  1867.       FieldName = 'ImaRabat2'
  1868.     end
  1869.     object xGlavaRabat2Kolicina: TBooleanField
  1870.       FieldName = 'Rabat2Kolicina'
  1871.     end
  1872.     object xGlavaVeceKolicine: TBooleanField
  1873.       FieldName = 'VeceKolicine'
  1874.     end
  1875.     object xGlavaIstiRabat: TBooleanField
  1876.       FieldName = 'IstiRabat'
  1877.     end
  1878.     object xGlavaRabat1: TFloatField
  1879.       FieldName = 'Rabat1'
  1880.     end
  1881.     object xGlavaRabat2: TFloatField
  1882.       FieldName = 'Rabat2'
  1883.     end
  1884.     object xGlavaRabatI: TFloatField
  1885.       FieldName = 'RabatI'
  1886.     end
  1887.     object xGlavaUzeoRabat: TFloatField
  1888.       FieldName = 'UzeoRabat'
  1889.     end
  1890.     object xGlavaOstajeRabat: TFloatField
  1891.       FieldName = 'OstajeRabat'
  1892.     end
  1893.     object xGlavaRabatMod: TBooleanField
  1894.       FieldName = 'RabatMod'
  1895.     end
  1896.     object xGlavaMarzaIznos: TBooleanField
  1897.       FieldName = 'MarzaIznos'
  1898.     end
  1899.     object xGlavaIstaMarza: TBooleanField
  1900.       FieldName = 'IstaMarza'
  1901.     end
  1902.     object xGlavaUzmiRabat: TBooleanField
  1903.       FieldName = 'UzmiRabat'
  1904.     end
  1905.     object xGlavaMarza: TFloatField
  1906.       FieldName = 'Marza'
  1907.     end
  1908.     object xGlavaMarzaI: TFloatField
  1909.       FieldName = 'MarzaI'
  1910.     end
  1911.     object xGlavaUzeoMarzu: TFloatField
  1912.       FieldName = 'UzeoMarzu'
  1913.     end
  1914.     object xGlavaOstajeMarza: TFloatField
  1915.       FieldName = 'OstajeMarza'
  1916.     end
  1917.     object xGlavaMarzaMod: TBooleanField
  1918.       FieldName = 'MarzaMod'
  1919.     end
  1920.     object xGlavaVrijednostKn: TFloatField
  1921.       FieldName = 'VrijednostKn'
  1922.     end
  1923.     object xGlavaPorezV: TFloatField
  1924.       FieldName = 'PorezV'
  1925.     end
  1926.     object xGlavaPorez1V: TFloatField
  1927.       FieldName = 'Porez1V'
  1928.     end
  1929.     object xGlavaPorez2V: TFloatField
  1930.       FieldName = 'Porez2V'
  1931.     end
  1932.     object xGlavaPorez3V: TFloatField
  1933.       FieldName = 'Porez3V'
  1934.     end
  1935.     object xGlavaPorezi: TFloatField
  1936.       FieldName = 'Porezi'
  1937.     end
  1938.     object xGlavaSkladVrijednost: TFloatField
  1939.       FieldName = 'SkladVrijednost'
  1940.     end
  1941.     object xGlavaVPVrijednost: TFloatField
  1942.       FieldName = 'VPVrijednost'
  1943.     end
  1944.     object xGlavaMPVrijednost: TFloatField
  1945.       FieldName = 'MPVrijednost'
  1946.     end
  1947.     object xGlavaPretporez: TFloatField
  1948.       FieldName = 'Pretporez'
  1949.     end
  1950.     object xGlavaPremaPDVu: TBooleanField
  1951.       FieldName = 'PremaPDVu'
  1952.     end
  1953.   end
  1954.   object xStavke: TMyTable
  1955.     AutoCalcFields = False
  1956.     DatabaseName = 'Lokal2'
  1957.     IndexFieldNames = 'BROJUFE;STAVKA'
  1958.     MasterFields = 'Code'
  1959.     MasterSource = sxGlava
  1960.     TableName = 'UFUS.DB'
  1961.     AutoOpen = False
  1962.     AutoFlush = False
  1963.     FreeToModify = False
  1964.     FreeToDelete = True
  1965.     FreeToInsert = True
  1966.     Left = 488
  1967.     Top = 388
  1968.     object xStavkeBrojUFE: TIntegerField
  1969.       FieldName = 'BrojUFE'
  1970.     end
  1971.     object xStavkeStavka: TSmallintField
  1972.       FieldName = 'Stavka'
  1973.     end
  1974.     object xStavkeVrsta: TSmallintField
  1975.       FieldName = 'Vrsta'
  1976.     end
  1977.     object xStavkeSkladiste: TIntegerField
  1978.       FieldName = 'Skladiste'
  1979.     end
  1980.     object xStavkeOrgJed: TIntegerField
  1981.       FieldName = 'OrgJed'
  1982.     end
  1983.     object xStavkeOpis: TStringField
  1984.       FieldName = 'Opis'
  1985.       Size = 40
  1986.     end
  1987.     object xStavkeKonto: TIntegerField
  1988.       FieldName = 'Konto'
  1989.     end
  1990.     object xStavkeKontoD: TIntegerField
  1991.       FieldName = 'KontoD'
  1992.     end
  1993.     object xStavkeArtikl: TIntegerField
  1994.       FieldName = 'Artikl'
  1995.     end
  1996.     object xStavkeBoja: TIntegerField
  1997.       FieldName = 'Boja'
  1998.     end
  1999.     object xStavkeAtom: TFloatField
  2000.       FieldName = 'Atom'
  2001.     end
  2002.     object xStavkeProizvodi: TIntegerField
  2003.       FieldName = 'Proizvodi'
  2004.     end
  2005.     object xStavkePakung: TIntegerField
  2006.       FieldName = 'Pakung'
  2007.     end
  2008.     object xStavkeMinKol: TFloatField
  2009.       FieldName = 'MinKol'
  2010.     end
  2011.     object xStavkeJedMj: TIntegerField
  2012.       FieldName = 'JedMj'
  2013.     end
  2014.     object xStavkeKolicina: TFloatField
  2015.       FieldName = 'Kolicina'
  2016.     end
  2017.     object xStavkeOtpis: TFloatField
  2018.       FieldName = 'Otpis'
  2019.     end
  2020.     object xStavkeCijenaX: TFloatField
  2021.       FieldName = 'CijenaX'
  2022.     end
  2023.     object xStavkeXKol: TFloatField
  2024.       FieldName = 'XKol'
  2025.     end
  2026.     object xStavkeCijena: TFloatField
  2027.       FieldName = 'Cijena'
  2028.     end
  2029.     object xStavkeTecaj: TFloatField
  2030.       FieldName = 'Tecaj'
  2031.     end
  2032.     object xStavkeCijenaKn: TFloatField
  2033.       FieldName = 'CijenaKn'
  2034.     end
  2035.     object xStavkeVrijednost: TFloatField
  2036.       FieldName = 'Vrijednost'
  2037.     end
  2038.     object xStavkeRabat: TFloatField
  2039.       FieldName = 'Rabat'
  2040.     end
  2041.     object xStavkeRabatI: TFloatField
  2042.       FieldName = 'RabatI'
  2043.     end
  2044.     object xStavkeRabat2: TFloatField
  2045.       FieldName = 'Rabat2'
  2046.     end
  2047.     object xStavkeRabat2I: TFloatField
  2048.       FieldName = 'Rabat2I'
  2049.     end
  2050.     object xStavkeRabatV: TFloatField
  2051.       FieldName = 'RabatV'
  2052.     end
  2053.     object xStavkeFaktCijena: TFloatField
  2054.       FieldName = 'FaktCijena'
  2055.     end
  2056.     object xStavkeFaktCijenaKn: TFloatField
  2057.       FieldName = 'FaktCijenaKn'
  2058.     end
  2059.     object xStavkeFaktVrijednost: TFloatField
  2060.       FieldName = 'FaktVrijednost'
  2061.     end
  2062.     object xStavkeFaktVrijednostKn: TFloatField
  2063.       FieldName = 'FaktVrijednostKn'
  2064.     end
  2065.     object xStavkeTransport: TFloatField
  2066.       FieldName = 'Transport'
  2067.     end
  2068.     object xStavkeTransportI: TFloatField
  2069.       FieldName = 'TransportI'
  2070.     end
  2071.     object xStavkeTransportV: TFloatField
  2072.       FieldName = 'TransportV'
  2073.     end
  2074.     object xStavkeCarinskaOsn: TFloatField
  2075.       FieldName = 'CarinskaOsn'
  2076.     end
  2077.     object xStavkeTarifaCarine: TIntegerField
  2078.       FieldName = 'TarifaCarine'
  2079.     end
  2080.     object xStavkeCarina: TFloatField
  2081.       FieldName = 'Carina'
  2082.     end
  2083.     object xStavkeCarinaI: TFloatField
  2084.       FieldName = 'CarinaI'
  2085.     end
  2086.     object xStavkeCarinaV: TFloatField
  2087.       FieldName = 'CarinaV'
  2088.     end
  2089.     object xStavkeFCO: TFloatField
  2090.       FieldName = 'FCO'
  2091.     end
  2092.     object xStavkeOstaliTr: TFloatField
  2093.       FieldName = 'OstaliTr'
  2094.     end
  2095.     object xStavkeOstaliTrI: TFloatField
  2096.       FieldName = 'OstaliTrI'
  2097.     end
  2098.     object xStavkeOstaliTrV: TFloatField
  2099.       FieldName = 'OstaliTrV'
  2100.     end
  2101.     object xStavkeSkladCijena: TFloatField
  2102.       FieldName = 'SkladCijena'
  2103.     end
  2104.     object xStavkeSkladVrijednost: TFloatField
  2105.       FieldName = 'SkladVrijednost'
  2106.     end
  2107.     object xStavkeXRabat: TFloatField
  2108.       FieldName = 'XRabat'
  2109.     end
  2110.     object xStavkeXRabatI: TFloatField
  2111.       FieldName = 'XRabatI'
  2112.     end
  2113.     object xStavkeXRabat2: TFloatField
  2114.       FieldName = 'XRabat2'
  2115.     end
  2116.     object xStavkeXRabat2I: TFloatField
  2117.       FieldName = 'XRabat2I'
  2118.     end
  2119.     object xStavkeVPC: TFloatField
  2120.       FieldName = 'VPC'
  2121.     end
  2122.     object xStavkeMarza: TFloatField
  2123.       FieldName = 'Marza'
  2124.     end
  2125.     object xStavkeMarzaI: TFloatField
  2126.       FieldName = 'MarzaI'
  2127.     end
  2128.     object xStavkeRUC: TFloatField
  2129.       FieldName = 'RUC'
  2130.     end
  2131.     object xStavkeRUCV: TFloatField
  2132.       FieldName = 'RUCV'
  2133.     end
  2134.     object xStavkeVPCijena: TFloatField
  2135.       FieldName = 'VPCijena'
  2136.     end
  2137.     object xStavkeVPVrijednost: TFloatField
  2138.       FieldName = 'VPVrijednost'
  2139.     end
  2140.     object xStavkeTarifaPoreza: TIntegerField
  2141.       FieldName = 'TarifaPoreza'
  2142.     end
  2143.     object xStavkePorezP: TFloatField
  2144.       FieldName = 'PorezP'
  2145.     end
  2146.     object xStavkePorez1P: TFloatField
  2147.       FieldName = 'Porez1P'
  2148.     end
  2149.     object xStavkePorez2P: TFloatField
  2150.       FieldName = 'Porez2P'
  2151.     end
  2152.     object xStavkePorez3P: TFloatField
  2153.       FieldName = 'Porez3P'
  2154.     end
  2155.     object xStavkePorezV: TFloatField
  2156.       FieldName = 'PorezV'
  2157.     end
  2158.     object xStavkePorez1V: TFloatField
  2159.       FieldName = 'Porez1V'
  2160.     end
  2161.     object xStavkePorez2V: TFloatField
  2162.       FieldName = 'Porez2V'
  2163.     end
  2164.     object xStavkePorez3V: TFloatField
  2165.       FieldName = 'Porez3V'
  2166.     end
  2167.     object xStavkeMPCijena: TFloatField
  2168.       FieldName = 'MPCijena'
  2169.     end
  2170.     object xStavkeMPVrijednost: TFloatField
  2171.       FieldName = 'MPVrijednost'
  2172.     end
  2173.   end
  2174.   object tCodes: TMyTable
  2175.     DatabaseName = 'Lokal'
  2176.     IndexFieldNames = 'Code'
  2177.     MasterFields = 'Code'
  2178.     MasterSource = sGlava
  2179.     TableName = 'CODES.DB'
  2180.     AutoOpen = True
  2181.     AutoFlush = True
  2182.     FreeToModify = True
  2183.     FreeToDelete = True
  2184.     FreeToInsert = True
  2185.     Left = 167
  2186.     Top = 5
  2187.     object tCodesCode: TAutoIncField
  2188.       FieldName = 'Code'
  2189.     end
  2190.     object tCodesKnjizeno: TStringField
  2191.       FieldName = 'Knjizeno'
  2192.       Size = 1
  2193.     end
  2194.     object tCodesVrsta: TSmallintField
  2195.       FieldName = 'Vrsta'
  2196.     end
  2197.     object tCodesBroj: TIntegerField
  2198.       FieldName = 'Broj'
  2199.     end
  2200.   end
  2201.   object tStavke: TMyTable
  2202.     AfterPost = tStavkeAfterPost
  2203.     BeforeDelete = tStavkeBeforeDelete
  2204.     AfterDelete = tStavkeAfterDelete
  2205.     OnCalcFields = tStavkeCalcFields
  2206.     OnNewRecord = tStavkeNewRecord
  2207.     DatabaseName = 'Lokal'
  2208.     IndexFieldNames = 'BROJUFE;STAVKA'
  2209.     MasterFields = 'Code'
  2210.     MasterSource = sGlava
  2211.     TableName = 'UFUS.DB'
  2212.     OnNewLastRecord = tStavkeNewLastRecord
  2213.     AutoOpen = True
  2214.     AutoFlush = True
  2215.     FreeToModify = False
  2216.     FreeToDelete = True
  2217.     FreeToInsert = True
  2218.     Left = 114
  2219.     Top = 5
  2220.     object tStavkeStavka: TSmallintField
  2221.       DisplayWidth = 6
  2222.       FieldName = 'Stavka'
  2223.     end
  2224.     object tStavkeVrsta: TSmallintField
  2225.       DisplayWidth = 5
  2226.       FieldName = 'Vrsta'
  2227.       Visible = False
  2228.     end
  2229.     object tStavkeOpis: TStringField
  2230.       DisplayWidth = 18
  2231.       FieldName = 'Opis'
  2232.       Size = 40
  2233.     end
  2234.     object tStavkeKolicina: TFloatField
  2235.       DisplayLabel = 'Koli∩┐╜ina'
  2236.       DisplayWidth = 7
  2237.       FieldName = 'Kolicina'
  2238.       Precision = 9
  2239.     end
  2240.     object tStavkeCijena: TFloatField
  2241.       Tag = 4
  2242.       DisplayWidth = 14
  2243.       FieldName = 'Cijena'
  2244.       Visible = False
  2245.       OnChange = tStavkeCijenaChange
  2246.       Precision = 9
  2247.     end
  2248.     object tStavkeVrijednost: TFloatField
  2249.       Tag = -3
  2250.       FieldName = 'Vrijednost'
  2251.       Visible = False
  2252.       Precision = 9
  2253.     end
  2254.     object tStavkeRabat: TFloatField
  2255.       FieldName = 'Rabat'
  2256.       Visible = False
  2257.       Precision = 9
  2258.     end
  2259.     object tStavkeRabatI: TFloatField
  2260.       Tag = 4
  2261.       FieldName = 'RabatI'
  2262.       Visible = False
  2263.       Precision = 9
  2264.     end
  2265.     object tStavkeRabat2: TFloatField
  2266.       FieldName = 'Rabat2'
  2267.       Visible = False
  2268.       Precision = 9
  2269.     end
  2270.     object tStavkeRabat2I: TFloatField
  2271.       Tag = 4
  2272.       FieldName = 'Rabat2I'
  2273.       Visible = False
  2274.       Precision = 9
  2275.     end
  2276.     object tStavkeFaktCijena: TFloatField
  2277.       Tag = 4
  2278.       DisplayLabel = 'Fakt. cijena'
  2279.       DisplayWidth = 12
  2280.       FieldName = 'FaktCijena'
  2281.       Precision = 9
  2282.     end
  2283.     object tStavkeFaktCijenaKn: TFloatField
  2284.       Tag = -2
  2285.       FieldName = 'FaktCijenaKn'
  2286.       Visible = False
  2287.       Precision = 9
  2288.     end
  2289.     object tStavkeFaktVrijednost: TFloatField
  2290.       Tag = -3
  2291.       DisplayLabel = 'Fakt. Vrijednost'
  2292.       DisplayWidth = 17
  2293.       FieldName = 'FaktVrijednost'
  2294.       Precision = 9
  2295.     end
  2296.     object tStavkeFaktVrijednostKn: TFloatField
  2297.       Tag = -1
  2298.       FieldName = 'FaktVrijednostKn'
  2299.       Visible = False
  2300.       Precision = 9
  2301.     end
  2302.     object tStavkeTransport: TFloatField
  2303.       FieldName = 'Transport'
  2304.       Visible = False
  2305.       Precision = 9
  2306.     end
  2307.     object tStavkeTransportI: TFloatField
  2308.       Tag = 2
  2309.       FieldName = 'TransportI'
  2310.       Visible = False
  2311.       Precision = 9
  2312.     end
  2313.     object tStavkeTransportV: TFloatField
  2314.       Tag = -1
  2315.       FieldName = 'TransportV'
  2316.       Visible = False
  2317.       Precision = 9
  2318.     end
  2319.     object tStavkeCarinskaOsn: TFloatField
  2320.       Tag = 2
  2321.       FieldName = 'CarinskaOsn'
  2322.       Visible = False
  2323.       Precision = 9
  2324.     end
  2325.     object tStavkeCarina: TFloatField
  2326.       FieldName = 'Carina'
  2327.       Visible = False
  2328.       Precision = 9
  2329.     end
  2330.     object tStavkeCarinaV: TFloatField
  2331.       Tag = -1
  2332.       FieldName = 'CarinaV'
  2333.       Visible = False
  2334.       Precision = 9
  2335.     end
  2336.     object tStavkeFCO: TFloatField
  2337.       Tag = 2
  2338.       FieldName = 'FCO'
  2339.       Visible = False
  2340.       Precision = 9
  2341.     end
  2342.     object tStavkeOstaliTr: TFloatField
  2343.       FieldName = 'OstaliTr'
  2344.       Visible = False
  2345.       Precision = 9
  2346.     end
  2347.     object tStavkeOstaliTrI: TFloatField
  2348.       Tag = 2
  2349.       FieldName = 'OstaliTrI'
  2350.       Visible = False
  2351.       Precision = 9
  2352.     end
  2353.     object tStavkeOstaliTrV: TFloatField
  2354.       Tag = -1
  2355.       FieldName = 'OstaliTrV'
  2356.       Visible = False
  2357.       Precision = 9
  2358.     end
  2359.     object tStavkeSkladCijena: TFloatField
  2360.       Tag = 2
  2361.       FieldName = 'SkladCijena'
  2362.       Visible = False
  2363.       Precision = 9
  2364.     end
  2365.     object tStavkeSkladVrijednost: TFloatField
  2366.       Tag = -1
  2367.       FieldName = 'SkladVrijednost'
  2368.       Visible = False
  2369.       Precision = 9
  2370.     end
  2371.     object tStavkeXRabat: TFloatField
  2372.       FieldName = 'XRabat'
  2373.       Visible = False
  2374.       Precision = 9
  2375.     end
  2376.     object tStavkeXRabatI: TFloatField
  2377.       Tag = 2
  2378.       FieldName = 'XRabatI'
  2379.       Visible = False
  2380.       Precision = 9
  2381.     end
  2382.     object tStavkeXRabat2: TFloatField
  2383.       FieldName = 'XRabat2'
  2384.       Visible = False
  2385.       Precision = 9
  2386.     end
  2387.     object tStavkeXRabat2I: TFloatField
  2388.       Tag = 2
  2389.       FieldName = 'XRabat2I'
  2390.       Visible = False
  2391.       Precision = 9
  2392.     end
  2393.     object tStavkeMarza: TFloatField
  2394.       FieldName = 'Marza'
  2395.       Visible = False
  2396.       Precision = 9
  2397.     end
  2398.     object tStavkeMarzaI: TFloatField
  2399.       Tag = 2
  2400.       FieldName = 'MarzaI'
  2401.       Visible = False
  2402.       Precision = 9
  2403.     end
  2404.     object tStavkeRUC: TFloatField
  2405.       Tag = -2
  2406.       FieldName = 'RUC'
  2407.       Visible = False
  2408.       Precision = 9
  2409.     end
  2410.     object tStavkeVPCijena: TFloatField
  2411.       Tag = 2
  2412.       FieldName = 'VPCijena'
  2413.       Visible = False
  2414.       Precision = 9
  2415.     end
  2416.     object tStavkeVPVrijednost: TFloatField
  2417.       Tag = -1
  2418.       FieldName = 'VPVrijednost'
  2419.       Visible = False
  2420.       Precision = 9
  2421.     end
  2422.     object tStavkeMPCijena: TFloatField
  2423.       Tag = 2
  2424.       FieldName = 'MPCijena'
  2425.       Visible = False
  2426.       Precision = 9
  2427.     end
  2428.     object tStavkeMPVrijednost: TFloatField
  2429.       Tag = -1
  2430.       FieldName = 'MPVrijednost'
  2431.       Visible = False
  2432.       Precision = 9
  2433.     end
  2434.     object tStavkeAtom: TFloatField
  2435.       Alignment = taCenter
  2436.       FieldName = 'Atom'
  2437.       Visible = False
  2438.       Precision = 9
  2439.     end
  2440.     object tStavkeMinKol: TFloatField
  2441.       Alignment = taLeftJustify
  2442.       FieldName = 'MinKol'
  2443.       Visible = False
  2444.       OnGetText = tStavkeMinKolGetText
  2445.       Precision = 9
  2446.     end
  2447.     object tStavkeRabatV: TFloatField
  2448.       Tag = -3
  2449.       FieldName = 'RabatV'
  2450.       Visible = False
  2451.       Precision = 9
  2452.     end
  2453.     object tStavkeRUCV: TFloatField
  2454.       Tag = -1
  2455.       FieldName = 'RUCV'
  2456.       Visible = False
  2457.       Precision = 9
  2458.     end
  2459.     object tStavkeCijenaKn: TFloatField
  2460.       Tag = 2
  2461.       FieldName = 'CijenaKn'
  2462.       Visible = False
  2463.       Precision = 9
  2464.     end
  2465.     object tStavkeCijenaX: TFloatField
  2466.       Tag = 4
  2467.       FieldName = 'CijenaX'
  2468.       Visible = False
  2469.       Precision = 9
  2470.     end
  2471.     object tStavkeXKol: TFloatField
  2472.       FieldName = 'XKol'
  2473.       Visible = False
  2474.       Precision = 9
  2475.     end
  2476.     object tStavkeCarinaI: TFloatField
  2477.       FieldName = 'CarinaI'
  2478.       Visible = False
  2479.       Precision = 9
  2480.     end
  2481.     object tStavkePorezP: TFloatField
  2482.       FieldName = 'PorezP'
  2483.       Visible = False
  2484.       OnGetText = GetPercentText
  2485.       Precision = 9
  2486.     end
  2487.     object tStavkePorez1P: TFloatField
  2488.       FieldName = 'Porez1P'
  2489.       Visible = False
  2490.       OnGetText = GetPercentText
  2491.       Precision = 9
  2492.     end
  2493.     object tStavkePorez2P: TFloatField
  2494.       FieldName = 'Porez2P'
  2495.       Visible = False
  2496.       OnGetText = GetPercentText
  2497.       Precision = 9
  2498.     end
  2499.     object tStavkePorez3P: TFloatField
  2500.       FieldName = 'Porez3P'
  2501.       Visible = False
  2502.       OnGetText = GetPercentText
  2503.       Precision = 9
  2504.     end
  2505.     object tStavkePorezV: TFloatField
  2506.       Tag = -1
  2507.       FieldName = 'PorezV'
  2508.       Visible = False
  2509.       Precision = 9
  2510.     end
  2511.     object tStavkePorez1V: TFloatField
  2512.       Tag = -1
  2513.       FieldName = 'Porez1V'
  2514.       Visible = False
  2515.       Precision = 9
  2516.     end
  2517.     object tStavkePorez2V: TFloatField
  2518.       Tag = -1
  2519.       FieldName = 'Porez2V'
  2520.       Visible = False
  2521.       Precision = 9
  2522.     end
  2523.     object tStavkePorez3V: TFloatField
  2524.       Tag = -1
  2525.       FieldName = 'Porez3V'
  2526.       Visible = False
  2527.       Precision = 9
  2528.     end
  2529.     object tStavkeTecaj: TFloatField
  2530.       FieldName = 'Tecaj'
  2531.       Visible = False
  2532.       Precision = 9
  2533.     end
  2534.     object tStavkeMjesto: TStringField
  2535.       FieldName = 'Mjesto'
  2536.       Visible = False
  2537.       Size = 1
  2538.       Calculated = True
  2539.     end
  2540.     object tStavkeBrojUFE: TIntegerField
  2541.       FieldName = 'BrojUFE'
  2542.       Visible = False
  2543.     end
  2544.     object tStavkeSkladiste: TIntegerField
  2545.       FieldName = 'Skladiste'
  2546.       Visible = False
  2547.     end
  2548.     object tStavkeOrgJed: TIntegerField
  2549.       FieldName = 'OrgJed'
  2550.       Visible = False
  2551.     end
  2552.     object tStavkeArtikl: TIntegerField
  2553.       FieldName = 'Artikl'
  2554.       Visible = False
  2555.     end
  2556.     object tStavkeBoja: TIntegerField
  2557.       FieldName = 'Boja'
  2558.       Visible = False
  2559.     end
  2560.     object tStavkeJedMj: TIntegerField
  2561.       FieldName = 'JedMj'
  2562.       Visible = False
  2563.     end
  2564.     object tStavkeTarifaCarine: TIntegerField
  2565.       FieldName = 'TarifaCarine'
  2566.       Visible = False
  2567.     end
  2568.     object tStavkeTarifaPoreza: TIntegerField
  2569.       FieldName = 'TarifaPoreza'
  2570.       Visible = False
  2571.     end
  2572.     object tStavkeKonto: TIntegerField
  2573.       FieldName = 'Konto'
  2574.       Visible = False
  2575.     end
  2576.     object tStavkeKontoD: TIntegerField
  2577.       FieldName = 'KontoD'
  2578.       Visible = False
  2579.     end
  2580.     object tStavkePartner: TIntegerField
  2581.       FieldName = 'Partner'
  2582.       Visible = False
  2583.       Calculated = True
  2584.     end
  2585.     object tStavkeJa: TIntegerField
  2586.       FieldName = 'Ja'
  2587.       Visible = False
  2588.       Calculated = True
  2589.     end
  2590.     object tStavkeDobavljac: TIntegerField
  2591.       FieldName = 'Dobavljac'
  2592.       Visible = False
  2593.       Calculated = True
  2594.     end
  2595.     object tStavkeProizvodi: TIntegerField
  2596.       FieldName = 'Proizvodi'
  2597.       Visible = False
  2598.     end
  2599.     object tStavkePakung: TIntegerField
  2600.       FieldName = 'Pakung'
  2601.       Visible = False
  2602.     end
  2603.     object tStavkeVPC: TFloatField
  2604.       Tag = 2
  2605.       FieldName = 'VPC'
  2606.       Visible = False
  2607.     end
  2608.     object tStavkeOtpis: TFloatField
  2609.       FieldName = 'Otpis'
  2610.       Visible = False
  2611.     end
  2612.     object tStavkeRoba: TStringField
  2613.       FieldName = 'Roba'
  2614.       Visible = False
  2615.       Size = 1
  2616.     end
  2617.   end
  2618.   object tGlava: TMyTable
  2619.     BeforePost = tGlavaBeforePost
  2620.     AfterPost = tGlavaAfterPost
  2621.     BeforeDelete = tGlavaBeforeDelete
  2622.     OnCalcFields = tGlavaCalcFields
  2623.     OnNewRecord = tGlavaNewRecord
  2624.     DatabaseName = 'Lokal'
  2625.     IndexFieldNames = 'BROJUFE'
  2626.     TableName = 'UFU.DB'
  2627.     OnNewLastRecord = tGlavaNewLastRecord
  2628.     AutoOpen = True
  2629.     AutoFlush = True
  2630.     FreeToModify = False
  2631.     FreeToDelete = True
  2632.     FreeToInsert = True
  2633.     Left = 61
  2634.     Top = 5
  2635.     object tGlavaCode: TIntegerField
  2636.       FieldName = 'Code'
  2637.       Visible = False
  2638.     end
  2639.     object tGlavaKnjizeno: TStringField
  2640.       DisplayLabel = 'K'
  2641.       FieldName = 'Knjizeno'
  2642.       Size = 1
  2643.     end
  2644.     object tGlavaBrojUFE: TIntegerField
  2645.       DisplayLabel = 'UFA broj'
  2646.       DisplayWidth = 8
  2647.       FieldName = 'BrojUFE'
  2648.     end
  2649.     object tGlavaDatumKnj: TDateField
  2650.       FieldName = 'DatumKnj'
  2651.       Visible = False
  2652.     end
  2653.     object tGlavaSifreDobavljaca: TBooleanField
  2654.       FieldName = 'SifreDobavljaca'
  2655.       Visible = False
  2656.     end
  2657.     object tGlavaDatumDok: TDateField
  2658.       DisplayLabel = 'Datum dok.'
  2659.       DisplayWidth = 9
  2660.       FieldName = 'DatumDok'
  2661.     end
  2662.     object tGlavaRacunBr: TStringField
  2663.       DisplayLabel = 'Ra∩┐╜un broj'
  2664.       DisplayWidth = 17
  2665.       FieldName = 'RacunBr'
  2666.       Size = 50
  2667.     end
  2668.     object tGlavaOtpremnicaBr: TStringField
  2669.       FieldName = 'OtpremnicaBr'
  2670.       Visible = False
  2671.       Size = 50
  2672.     end
  2673.     object tGlavaDatumDVO: TDateField
  2674.       DisplayLabel = 'Datum DVO'
  2675.       DisplayWidth = 11
  2676.       FieldName = 'DatumDVO'
  2677.     end
  2678.     object tGlavaRokPlacanja: TSmallintField
  2679.       DisplayLabel = 'RP'
  2680.       DisplayWidth = 2
  2681.       FieldName = 'RokPlacanja'
  2682.     end
  2683.     object tGlavaDatumValute: TDateField
  2684.       DisplayLabel = 'Datum valute'
  2685.       DisplayWidth = 11
  2686.       FieldName = 'DatumValute'
  2687.     end
  2688.     object tGlavaNarudzbaBr: TStringField
  2689.       FieldName = 'NarudzbaBr'
  2690.       Visible = False
  2691.       Size = 50
  2692.     end
  2693.     object tGlavaPredracunBr: TStringField
  2694.       FieldName = 'PredracunBr'
  2695.       Visible = False
  2696.       Size = 50
  2697.     end
  2698.     object tGlavaIznos: TFloatField
  2699.       DisplayLabel = 'Iznos fakture'
  2700.       DisplayWidth = 16
  2701.       FieldName = 'Iznos'
  2702.       Visible = False
  2703.       OnChange = NovaRazlika
  2704.       Precision = 9
  2705.     end
  2706.     object tGlavaVrijednost: TFloatField
  2707.       DisplayLabel = 'Knji∩┐╜eni iznos fakture'
  2708.       DisplayWidth = 19
  2709.       FieldName = 'Vrijednost'
  2710.       Visible = False
  2711.       OnChange = NovaRazlika
  2712.       Precision = 9
  2713.     end
  2714.     object tGlavaIznosDev: TFloatField
  2715.       DisplayLabel = 'Knji∩┐╜eni iznos'
  2716.       DisplayWidth = 19
  2717.       FieldName = 'IznosDev'
  2718.       OnGetText = tGlavaIznosDevGetText
  2719.       Precision = 9
  2720.       Calculated = True
  2721.     end
  2722.     object tGlavaIznosKn: TFloatField
  2723.       FieldName = 'IznosKn'
  2724.       Visible = False
  2725.       OnChange = NovaRazlikaKn
  2726.       Precision = 9
  2727.     end
  2728.     object tGlavaIznosKn2: TFloatField
  2729.       FieldName = 'IznosKn2'
  2730.       Visible = False
  2731.       Precision = 9
  2732.     end
  2733.     object tGlavaPoziv: TSmallintField
  2734.       FieldName = 'Poziv'
  2735.       Visible = False
  2736.     end
  2737.     object tGlavaModel: TStringField
  2738.       FieldName = 'Model'
  2739.       Visible = False
  2740.       Size = 30
  2741.     end
  2742.     object tGlavaRazlika: TFloatField
  2743.       DisplayLabel = '... preostaje'
  2744.       DisplayWidth = 12
  2745.       FieldName = 'Razlika'
  2746.       Precision = 9
  2747.     end
  2748.     object tGlavaIspisVirmana: TBooleanField
  2749.       FieldName = 'IspisVirmana'
  2750.       Visible = False
  2751.     end
  2752.     object tGlavaTrosakMod: TBooleanField
  2753.       FieldName = 'TrosakMod'
  2754.       Visible = False
  2755.     end
  2756.     object tGlavaRabatIznos: TBooleanField
  2757.       FieldName = 'RabatIznos'
  2758.       Visible = False
  2759.     end
  2760.     object tGlavaImaRabat2: TBooleanField
  2761.       FieldName = 'ImaRabat2'
  2762.       Visible = False
  2763.     end
  2764.     object tGlavaRabat2Kolicina: TBooleanField
  2765.       FieldName = 'Rabat2Kolicina'
  2766.       Visible = False
  2767.     end
  2768.     object tGlavaVeceKolicine: TBooleanField
  2769.       FieldName = 'VeceKolicine'
  2770.       Visible = False
  2771.     end
  2772.     object tGlavaIstiRabat: TBooleanField
  2773.       FieldName = 'IstiRabat'
  2774.       Visible = False
  2775.     end
  2776.     object tGlavaRabat1: TFloatField
  2777.       FieldName = 'Rabat1'
  2778.       Visible = False
  2779.       Precision = 9
  2780.     end
  2781.     object tGlavaRabat2: TFloatField
  2782.       FieldName = 'Rabat2'
  2783.       Visible = False
  2784.       Precision = 9
  2785.     end
  2786.     object tGlavaRabatI: TFloatField
  2787.       FieldName = 'RabatI'
  2788.       Visible = False
  2789.       OnChange = tGlavaUzeoRabatChange
  2790.       Precision = 9
  2791.     end
  2792.     object tGlavaUzeoRabat: TFloatField
  2793.       FieldName = 'UzeoRabat'
  2794.       Visible = False
  2795.       OnChange = tGlavaUzeoRabatChange
  2796.       Precision = 9
  2797.     end
  2798.     object tGlavaOstajeRabat: TFloatField
  2799.       FieldName = 'OstajeRabat'
  2800.       Visible = False
  2801.       Precision = 9
  2802.     end
  2803.     object tGlavaRabatMod: TBooleanField
  2804.       FieldName = 'RabatMod'
  2805.       Visible = False
  2806.     end
  2807.     object tGlavaMarzaIznos: TBooleanField
  2808.       FieldName = 'MarzaIznos'
  2809.       Visible = False
  2810.     end
  2811.     object tGlavaIstaMarza: TBooleanField
  2812.       FieldName = 'IstaMarza'
  2813.       Visible = False
  2814.     end
  2815.     object tGlavaUzmiRabat: TBooleanField
  2816.       FieldName = 'UzmiRabat'
  2817.       Visible = False
  2818.     end
  2819.     object tGlavaMarza: TFloatField
  2820.       FieldName = 'Marza'
  2821.       Visible = False
  2822.       Precision = 9
  2823.     end
  2824.     object tGlavaMarzaI: TFloatField
  2825.       FieldName = 'MarzaI'
  2826.       Visible = False
  2827.       OnChange = tGlavaUzeoMarzuChange
  2828.       Precision = 9
  2829.     end
  2830.     object tGlavaUzeoMarzu: TFloatField
  2831.       FieldName = 'UzeoMarzu'
  2832.       Visible = False
  2833.       OnChange = tGlavaUzeoMarzuChange
  2834.       Precision = 9
  2835.     end
  2836.     object tGlavaOstajeMarza: TFloatField
  2837.       FieldName = 'OstajeMarza'
  2838.       Visible = False
  2839.       Precision = 9
  2840.     end
  2841.     object tGlavaMarzaMod: TBooleanField
  2842.       FieldName = 'MarzaMod'
  2843.       Visible = False
  2844.     end
  2845.     object tGlavaNaIsto: TBooleanField
  2846.       FieldName = 'NaIsto'
  2847.       Visible = False
  2848.     end
  2849.     object tGlavaVrstaTer: TSmallintField
  2850.       Alignment = taLeftJustify
  2851.       FieldName = 'VrstaTer'
  2852.       Visible = False
  2853.     end
  2854.     object tGlavaNemaUsluge: TBooleanField
  2855.       FieldName = 'NemaUsluge'
  2856.       Visible = False
  2857.     end
  2858.     object tGlavaZakljucakBr: TStringField
  2859.       FieldName = 'ZakljucakBr'
  2860.       Visible = False
  2861.       Size = 30
  2862.     end
  2863.     object tGlavaDatumZaklj: TDateField
  2864.       FieldName = 'DatumZaklj'
  2865.       Visible = False
  2866.     end
  2867.     object tGlavaUCDbr: TStringField
  2868.       FieldName = 'UCDbr'
  2869.       Visible = False
  2870.     end
  2871.     object tGlavaDatumUCD: TDateField
  2872.       FieldName = 'DatumUCD'
  2873.       Visible = False
  2874.     end
  2875.     object tGlavaTecajDev: TFloatField
  2876.       FieldName = 'TecajDev'
  2877.       Visible = False
  2878.       Precision = 9
  2879.     end
  2880.     object tGlavaTecaj: TFloatField
  2881.       FieldName = 'Tecaj'
  2882.       Visible = False
  2883.       Precision = 9
  2884.     end
  2885.     object tGlavaZa100: TBooleanField
  2886.       FieldName = 'Za100'
  2887.       Visible = False
  2888.     end
  2889.     object tGlavaPlacanje: TSmallintField
  2890.       FieldName = 'Placanje'
  2891.       Visible = False
  2892.     end
  2893.     object tGlavaStopaTroska: TFloatField
  2894.       FieldName = 'StopaTroska'
  2895.       Visible = False
  2896.       OnChange = KolikoNaKonto
  2897.       Precision = 9
  2898.     end
  2899.     object tGlavaTrosakDirekt: TBooleanField
  2900.       FieldName = 'TrosakDirekt'
  2901.       Visible = False
  2902.       OnChange = KolikoNaKonto
  2903.     end
  2904.     object tGlavaVozarinaP: TFloatField
  2905.       FieldName = 'VozarinaP'
  2906.       Visible = False
  2907.       Precision = 9
  2908.     end
  2909.     object tGlavaVozarina: TFloatField
  2910.       FieldName = 'Vozarina'
  2911.       Visible = False
  2912.       Precision = 9
  2913.     end
  2914.     object tGlavaSpediterP: TFloatField
  2915.       FieldName = 'SpediterP'
  2916.       Visible = False
  2917.       Precision = 9
  2918.     end
  2919.     object tGlavaSpediter: TFloatField
  2920.       FieldName = 'Spediter'
  2921.       Visible = False
  2922.       Precision = 9
  2923.     end
  2924.     object tGlavaTransportP: TFloatField
  2925.       FieldName = 'TransportP'
  2926.       Visible = False
  2927.       Precision = 9
  2928.     end
  2929.     object tGlavaTransport: TFloatField
  2930.       FieldName = 'Transport'
  2931.       Visible = False
  2932.       Precision = 9
  2933.     end
  2934.     object tGlavaBanciP: TFloatField
  2935.       FieldName = 'BanciP'
  2936.       Visible = False
  2937.       Precision = 9
  2938.     end
  2939.     object tGlavaBanci: TFloatField
  2940.       FieldName = 'Banci'
  2941.       Visible = False
  2942.       Precision = 9
  2943.     end
  2944.     object tGlavaUvozCO: TBooleanField
  2945.       FieldName = 'UvozCO'
  2946.       Visible = False
  2947.     end
  2948.     object tGlavaUvozP: TFloatField
  2949.       FieldName = 'UvozP'
  2950.       Visible = False
  2951.       Precision = 9
  2952.     end
  2953.     object tGlavaUvoz: TFloatField
  2954.       FieldName = 'Uvoz'
  2955.       Visible = False
  2956.       Precision = 9
  2957.     end
  2958.     object tGlavaSanitarP: TFloatField
  2959.       FieldName = 'SanitarP'
  2960.       Visible = False
  2961.       Precision = 9
  2962.     end
  2963.     object tGlavaSanitar: TFloatField
  2964.       FieldName = 'Sanitar'
  2965.       Visible = False
  2966.       Precision = 9
  2967.     end
  2968.     object tGlavaSluzbaP: TFloatField
  2969.       FieldName = 'SluzbaP'
  2970.       Visible = False
  2971.       Precision = 9
  2972.     end
  2973.     object tGlavaSluzba: TFloatField
  2974.       FieldName = 'Sluzba'
  2975.       Visible = False
  2976.       Precision = 9
  2977.     end
  2978.     object tGlavaOstaliTroskoviP: TFloatField
  2979.       FieldName = 'OstaliTroskoviP'
  2980.       Visible = False
  2981.       Precision = 9
  2982.     end
  2983.     object tGlavaOstaliTroskovi: TFloatField
  2984.       FieldName = 'OstaliTroskovi'
  2985.       Visible = False
  2986.       Precision = 9
  2987.     end
  2988.     object tGlavaTrosakNaRobu: TFloatField
  2989.       FieldName = 'TrosakNaRobu'
  2990.       Visible = False
  2991.       OnChange = KolikoTransportaOstaje
  2992.       Precision = 9
  2993.     end
  2994.     object tGlavaTrosakNaRobi: TFloatField
  2995.       FieldName = 'TrosakNaRobi'
  2996.       Visible = False
  2997.       OnChange = KolikoTransportaOstaje
  2998.       Precision = 9
  2999.     end
  3000.     object tGlavaTroskaOstaje: TFloatField
  3001.       FieldName = 'TroskaOstaje'
  3002.       Visible = False
  3003.       Precision = 9
  3004.     end
  3005.     object tGlavaOstalo: TFloatField
  3006.       FieldName = 'Ostalo'
  3007.       Visible = False
  3008.       OnChange = KolikoNaKonto
  3009.       Precision = 9
  3010.     end
  3011.     object tGlavaOstaloNaKonto: TFloatField
  3012.       FieldName = 'OstaloNaKonto'
  3013.       Visible = False
  3014.       Precision = 9
  3015.     end
  3016.     object tGlavaOstaloNaRobu: TFloatField
  3017.       FieldName = 'OstaloNaRobu'
  3018.       Visible = False
  3019.       OnChange = KolikoOstalogOstaje
  3020.       Precision = 9
  3021.     end
  3022.     object tGlavaOstaloNaRobi: TFloatField
  3023.       FieldName = 'OstaloNaRobi'
  3024.       Visible = False
  3025.       OnChange = KolikoOstalogOstaje
  3026.       Precision = 9
  3027.     end
  3028.     object tGlavaOstaloOstaje: TFloatField
  3029.       FieldName = 'OstaloOstaje'
  3030.       Visible = False
  3031.       Precision = 9
  3032.     end
  3033.     object tGlavaSvrha: TStringField
  3034.       FieldName = 'Svrha'
  3035.       Visible = False
  3036.       Size = 60
  3037.     end
  3038.     object tGlavaCarinskaOsn: TFloatField
  3039.       FieldName = 'CarinskaOsn'
  3040.       Visible = False
  3041.       Precision = 9
  3042.     end
  3043.     object tGlavaCarinaP: TFloatField
  3044.       FieldName = 'CarinaP'
  3045.       Visible = False
  3046.       Precision = 9
  3047.     end
  3048.     object tGlavaCarina: TFloatField
  3049.       FieldName = 'Carina'
  3050.       Visible = False
  3051.       OnChange = NoviOstatakCarine
  3052.       Precision = 9
  3053.     end
  3054.     object tGlavaFCO: TFloatField
  3055.       FieldName = 'FCO'
  3056.       Visible = False
  3057.       Precision = 9
  3058.     end
  3059.     object tGlavaBanciDIF: TBooleanField
  3060.       FieldName = 'BanciDIF'
  3061.       Visible = False
  3062.     end
  3063.     object tGlavaUzeoCarinu: TFloatField
  3064.       FieldName = 'UzeoCarinu'
  3065.       Visible = False
  3066.       OnChange = NoviOstatakCarine
  3067.       Precision = 9
  3068.     end
  3069.     object tGlavaOstajeCarina: TFloatField
  3070.       FieldName = 'OstajeCarina'
  3071.       Visible = False
  3072.       Precision = 9
  3073.     end
  3074.     object tGlavaCarinaTarBr: TBooleanField
  3075.       FieldName = 'CarinaTarBr'
  3076.       Visible = False
  3077.     end
  3078.     object tGlavaCarinaMod: TBooleanField
  3079.       FieldName = 'CarinaMod'
  3080.       Visible = False
  3081.     end
  3082.     object tGlavaPodesiFV: TBooleanField
  3083.       FieldName = 'PodesiFV'
  3084.       Visible = False
  3085.     end
  3086.     object tGlavaPodesiVPC: TBooleanField
  3087.       FieldName = 'PodesiVPC'
  3088.       Visible = False
  3089.     end
  3090.     object tGlavaDatumCarine: TDateField
  3091.       FieldName = 'DatumCarine'
  3092.       Visible = False
  3093.     end
  3094.     object tGlavaSconto: TFloatField
  3095.       FieldName = 'Sconto'
  3096.       Visible = False
  3097.       Precision = 9
  3098.     end
  3099.     object tGlavaIznos2: TFloatField
  3100.       FieldName = 'Iznos2'
  3101.       Visible = False
  3102.       Precision = 9
  3103.     end
  3104.     object tGlavaVrijednostKn: TFloatField
  3105.       FieldName = 'VrijednostKn'
  3106.       Visible = False
  3107.       OnChange = NovaRazlikaKn
  3108.       Precision = 9
  3109.     end
  3110.     object tGlavaPorezV: TFloatField
  3111.       FieldName = 'PorezV'
  3112.       Visible = False
  3113.       Precision = 9
  3114.     end
  3115.     object tGlavaPorez1V: TFloatField
  3116.       FieldName = 'Porez1V'
  3117.       Visible = False
  3118.       Precision = 9
  3119.     end
  3120.     object tGlavaPorez2V: TFloatField
  3121.       FieldName = 'Porez2V'
  3122.       Visible = False
  3123.       Precision = 9
  3124.     end
  3125.     object tGlavaPorez3V: TFloatField
  3126.       FieldName = 'Porez3V'
  3127.       Visible = False
  3128.       Precision = 9
  3129.     end
  3130.     object tGlavaSkladVrijednost: TFloatField
  3131.       FieldName = 'SkladVrijednost'
  3132.       Visible = False
  3133.       Precision = 9
  3134.     end
  3135.     object tGlavaVPVrijednost: TFloatField
  3136.       FieldName = 'VPVrijednost'
  3137.       Visible = False
  3138.       Precision = 9
  3139.     end
  3140.     object tGlavaMPVrijednost: TFloatField
  3141.       FieldName = 'MPVrijednost'
  3142.       Visible = False
  3143.       Precision = 9
  3144.     end
  3145.     object tGlavaZem2: TStringField
  3146.       FieldName = 'Zem2'
  3147.       Visible = False
  3148.       OnGetText = tGlavaZem2GetText
  3149.       Size = 1
  3150.       Calculated = True
  3151.     end
  3152.     object tGlavaDob: TStringField
  3153.       FieldName = 'Dob'
  3154.       Visible = False
  3155.       OnGetText = tGlavaDobGetText
  3156.       Size = 1
  3157.       Calculated = True
  3158.     end
  3159.     object tGlavaZem: TStringField
  3160.       FieldName = 'Zem'
  3161.       Visible = False
  3162.       OnGetText = tGlavaZemGetText
  3163.       Size = 1
  3164.       Calculated = True
  3165.     end
  3166.     object tGlavaJa: TIntegerField
  3167.       FieldName = 'Ja'
  3168.       Visible = False
  3169.       Calculated = True
  3170.     end
  3171.     object tGlavaOstaliTroskovi2: TFloatField
  3172.       FieldName = 'OstaliTroskovi2'
  3173.       Visible = False
  3174.       Precision = 9
  3175.     end
  3176.     object tGlavaRazlikaKn: TFloatField
  3177.       FieldName = 'RazlikaKn'
  3178.       Visible = False
  3179.       Precision = 9
  3180.     end
  3181.     object tGlavaIznosKn3: TFloatField
  3182.       FieldName = 'IznosKn3'
  3183.       Visible = False
  3184.       Precision = 9
  3185.     end
  3186.     object tGlavaPodesiMPC: TBooleanField
  3187.       FieldName = 'PodesiMPC'
  3188.       Visible = False
  3189.     end
  3190.     object tGlavaSkladiste: TIntegerField
  3191.       FieldName = 'Skladiste'
  3192.       Visible = False
  3193.     end
  3194.     object tGlavaDobavljac: TIntegerField
  3195.       FieldName = 'Dobavljac'
  3196.       Visible = False
  3197.     end
  3198.     object tGlavaValuta2: TIntegerField
  3199.       FieldName = 'Valuta2'
  3200.       Visible = False
  3201.     end
  3202.     object tGlavaNasZiroRn: TIntegerField
  3203.       FieldName = 'NasZiroRn'
  3204.       Visible = False
  3205.     end
  3206.     object tGlavaZiroRn: TIntegerField
  3207.       FieldName = 'ZiroRn'
  3208.       Visible = False
  3209.     end
  3210.     object tGlavaZemlja: TIntegerField
  3211.       FieldName = 'Zemlja'
  3212.       Visible = False
  3213.     end
  3214.     object tGlavaBanka: TIntegerField
  3215.       FieldName = 'Banka'
  3216.       Visible = False
  3217.     end
  3218.     object tGlavaSpedicija: TIntegerField
  3219.       FieldName = 'Spedicija'
  3220.       Visible = False
  3221.     end
  3222.     object tGlavaPrevoznik: TIntegerField
  3223.       FieldName = 'Prevoznik'
  3224.       Visible = False
  3225.     end
  3226.     object tGlavaKonto: TIntegerField
  3227.       FieldName = 'Konto'
  3228.       Visible = False
  3229.     end
  3230.     object tGlavaKontoTroska: TIntegerField
  3231.       FieldName = 'KontoTroska'
  3232.       Visible = False
  3233.     end
  3234.     object tGlavaKontoTroskaD: TIntegerField
  3235.       FieldName = 'KontoTroskaD'
  3236.       Visible = False
  3237.     end
  3238.     object tGlavaOrgJed: TIntegerField
  3239.       FieldName = 'OrgJed'
  3240.       Visible = False
  3241.     end
  3242.     object tGlavaOrgJedDob: TIntegerField
  3243.       FieldName = 'OrgJedDob'
  3244.       Visible = False
  3245.     end
  3246.     object tGlavaPorezi: TFloatField
  3247.       FieldName = 'Porezi'
  3248.       Visible = False
  3249.     end
  3250.     object tGlavaImaOtpis: TBooleanField
  3251.       FieldName = 'ImaOtpis'
  3252.       Visible = False
  3253.     end
  3254.     object tGlavaPretporez: TFloatField
  3255.       FieldName = 'Pretporez'
  3256.       Visible = False
  3257.     end
  3258.   end
  3259.   object tValuta2: TMyTable
  3260.     DatabaseName = 'Global'
  3261.     IndexFieldNames = 'CODE'
  3262.     MasterFields = 'VALUTA2'
  3263.     MasterSource = sGlava
  3264.     TableName = 'VALUTA.DB'
  3265.     AutoOpen = True
  3266.     AutoFlush = True
  3267.     FreeToModify = False
  3268.     FreeToDelete = True
  3269.     FreeToInsert = True
  3270.     Left = 273
  3271.     Top = 131
  3272.   end
  3273. end
  3274.