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

  1. object DataUfa2: TDataUfa2
  2.   Tag = 1
  3.   OnDestroy = DUlaznaFakturaKomisijaDestroy
  4.   Left = 214
  5.   Top = 156
  6.   Height = 304
  7.   Width = 541
  8.   object sValuta: TDataSource
  9.     DataSet = DGlava.tValuta
  10.     Left = 220
  11.     Top = 93
  12.   end
  13.   object sGlava: TDataSource
  14.     DataSet = tGlava
  15.     Left = 432
  16.     Top = 9
  17.   end
  18.   object sStavke: TDataSource
  19.     DataSet = tStavke
  20.     Left = 167
  21.     Top = 93
  22.   end
  23.   object sPartner: TDataSource
  24.     DataSet = tPartner
  25.     Left = 485
  26.     Top = 51
  27.   end
  28.   object sOrgJed: TDataSource
  29.     DataSet = tOrgJed
  30.     Left = 326
  31.     Top = 51
  32.   end
  33.   object sKonto: TDataSource
  34.     DataSet = tKonto
  35.     Left = 114
  36.     Top = 51
  37.   end
  38.   object sKonto2: TDataSource
  39.     DataSet = tKonto2
  40.     Left = 167
  41.     Top = 51
  42.   end
  43.   object sPart: TDataSource
  44.     DataSet = tPart
  45.     Left = 432
  46.     Top = 51
  47.   end
  48.   object sKonto3: TDataSource
  49.     DataSet = tKonto3
  50.     Left = 220
  51.     Top = 51
  52.   end
  53.   object sSkladiste: TDataSource
  54.     DataSet = tSkladist
  55.     Left = 114
  56.     Top = 93
  57.   end
  58.   object sMjere: TDataSource
  59.     DataSet = tMjere
  60.     Left = 273
  61.     Top = 51
  62.   end
  63.   object sJedinice: TDataSource
  64.     DataSet = tJedinice
  65.     Left = 61
  66.     Top = 51
  67.   end
  68.   object sPorez: TDataSource
  69.     DataSet = tPorez
  70.     Left = 8
  71.     Top = 93
  72.   end
  73.   object sArtikl: TDataSource
  74.     DataSet = tArtikl
  75.     Left = 8
  76.     Top = 9
  77.   end
  78.   object sBoje: TDataSource
  79.     DataSet = tBoje
  80.     Left = 220
  81.     Top = 9
  82.   end
  83.   object sArtikl2: TDataSource
  84.     DataSet = tArtikl2
  85.     Left = 61
  86.     Top = 9
  87.   end
  88.   object sBoje2: TDataSource
  89.     DataSet = tBoje2
  90.     Left = 273
  91.     Top = 9
  92.   end
  93.   object sRoba: TDataSource
  94.     DataSet = tRoba
  95.     Left = 61
  96.     Top = 93
  97.   end
  98.   object sBoja: TDataSource
  99.     DataSet = tBoja
  100.     Left = 167
  101.     Top = 9
  102.   end
  103.   object sAtomi: TDataSource
  104.     DataSet = tAtomi
  105.     Left = 114
  106.     Top = 9
  107.   end
  108.   object sPakung: TDataSource
  109.     DataSet = tPakung
  110.     Left = 379
  111.     Top = 51
  112.   end
  113.   object sCeneRobe: TDataSource
  114.     DataSet = tCeneRobe
  115.     Left = 326
  116.     Top = 9
  117.   end
  118.   object sImeRobe: TDataSource
  119.     DataSet = tImeRobe
  120.     Left = 8
  121.     Top = 51
  122.   end
  123.   object sImeBoje: TDataSource
  124.     DataSet = tImeBoje
  125.     Left = 485
  126.     Top = 9
  127.   end
  128.   object sCodes: TDataSource
  129.     DataSet = tCodes
  130.     Left = 379
  131.     Top = 9
  132.   end
  133.   object sxGlava: TDataSource
  134.     DataSet = xGlava
  135.     Left = 172
  136.     Top = 224
  137.   end
  138.   object tKonto: TMyTable
  139.     DatabaseName = 'Global'
  140.     IndexFieldNames = 'CODE'
  141.     MasterFields = 'KONTO'
  142.     MasterSource = sGlava
  143.     TableName = 'KONTA.DB'
  144.     AutoOpen = True
  145.     AutoFlush = True
  146.     FreeToModify = False
  147.     FreeToDelete = True
  148.     FreeToInsert = True
  149.     Left = 379
  150.     Top = 135
  151.   end
  152.   object tKonto2: TMyTable
  153.     DatabaseName = 'Global'
  154.     IndexFieldNames = 'CODE'
  155.     MasterFields = 'KONTOTROSKAD'
  156.     MasterSource = sGlava
  157.     TableName = 'KONTA.DB'
  158.     AutoOpen = True
  159.     AutoFlush = True
  160.     FreeToModify = False
  161.     FreeToDelete = True
  162.     FreeToInsert = True
  163.     Left = 432
  164.     Top = 135
  165.   end
  166.   object tKonto3: TMyTable
  167.     DatabaseName = 'Global'
  168.     IndexFieldNames = 'CODE'
  169.     MasterFields = 'KONTOTROSKA'
  170.     MasterSource = sGlava
  171.     TableName = 'KONTA.DB'
  172.     AutoOpen = True
  173.     AutoFlush = True
  174.     FreeToModify = False
  175.     FreeToDelete = True
  176.     FreeToInsert = True
  177.     Left = 485
  178.     Top = 135
  179.   end
  180.   object tSkladist: TMyTable
  181.     DatabaseName = 'Lokal'
  182.     IndexFieldNames = 'MJESTO;VRSTATER;LOKACIJA;CODE'
  183.     MasterFields = 'ZEM;VRSTA;JA;SKLADISTE'
  184.     MasterSource = sGlava
  185.     TableName = 'SKLADIST.DB'
  186.     AutoOpen = True
  187.     AutoFlush = True
  188.     FreeToModify = False
  189.     FreeToDelete = True
  190.     FreeToInsert = True
  191.     Left = 485
  192.     Top = 177
  193.     object tSkladistCode: TAutoIncField
  194.       FieldName = 'Code'
  195.     end
  196.     object tSkladistSifra: TStringField
  197.       FieldName = 'Sifra'
  198.       Size = 40
  199.     end
  200.     object tSkladistNaziv: TStringField
  201.       FieldName = 'Naziv'
  202.       Size = 80
  203.     end
  204.     object tSkladistMoje: TBooleanField
  205.       FieldName = 'Moje'
  206.     end
  207.     object tSkladistPartner: TIntegerField
  208.       FieldName = 'Partner'
  209.     end
  210.     object tSkladistLokacija: TIntegerField
  211.       FieldName = 'Lokacija'
  212.     end
  213.     object tSkladistVlasnik: TIntegerField
  214.       FieldName = 'Vlasnik'
  215.     end
  216.     object tSkladistOrgJed: TIntegerField
  217.       FieldName = 'OrgJed'
  218.     end
  219.     object tSkladistDrzava: TIntegerField
  220.       FieldName = 'Drzava'
  221.     end
  222.     object tSkladistMjesto: TStringField
  223.       FieldName = 'Mjesto'
  224.       Size = 1
  225.     end
  226.     object tSkladistVrstaTer: TSmallintField
  227.       FieldName = 'VrstaTer'
  228.     end
  229.     object tSkladistZarada: TSmallintField
  230.       FieldName = 'Zarada'
  231.     end
  232.     object tSkladistVP_Sklad: TIntegerField
  233.       FieldName = 'VP_Sklad'
  234.     end
  235.     object tSkladistMP_Sklad: TIntegerField
  236.       FieldName = 'MP_Sklad'
  237.     end
  238.     object tSkladistOsnovica: TSmallintField
  239.       FieldName = 'Osnovica'
  240.     end
  241.     object tSkladistProvizija: TFloatField
  242.       FieldName = 'Provizija'
  243.     end
  244.     object tSkladistKnjiga: TIntegerField
  245.       FieldName = 'Knjiga'
  246.     end
  247.     object tSkladistValuta: TIntegerField
  248.       FieldName = 'Valuta'
  249.     end
  250.     object tSkladistKontoRobe: TIntegerField
  251.       FieldName = 'KontoRobe'
  252.     end
  253.     object tSkladistKontoNVPRobe: TIntegerField
  254.       FieldName = 'KontoNVPRobe'
  255.     end
  256.     object tSkladistKontoPPRobe: TIntegerField
  257.       FieldName = 'KontoPPRobe'
  258.     end
  259.     object tSkladistKontoRUC: TIntegerField
  260.       FieldName = 'KontoRUC'
  261.     end
  262.     object tSkladistKontoManjak: TIntegerField
  263.       FieldName = 'KontoManjak'
  264.     end
  265.     object tSkladistKontoTroskaProdaje: TIntegerField
  266.       FieldName = 'KontoTroskaProdaje'
  267.     end
  268.     object tSkladistKontoKvar: TIntegerField
  269.       FieldName = 'KontoKvar'
  270.     end
  271.     object tSkladistKontoTrgRoba: TIntegerField
  272.       FieldName = 'KontoTrgRoba'
  273.     end
  274.     object tSkladistKontoKalkPorez: TIntegerField
  275.       FieldName = 'KontoKalkPorez'
  276.     end
  277.     object tSkladistKontoTroskaNabave: TIntegerField
  278.       FieldName = 'KontoTroskaNabave'
  279.     end
  280.     object tSkladistKontoRabata: TIntegerField
  281.       FieldName = 'KontoRabata'
  282.     end
  283.     object tSkladistItems: TIntegerField
  284.       FieldName = 'Items'
  285.     end
  286.   end
  287.   object tPorezi: TMyTable
  288.     DatabaseName = 'Global'
  289.     IndexFieldNames = 'Tarifa;Datum'
  290.     MasterFields = 'Code'
  291.     MasterSource = sPorez
  292.     TableName = 'S_POREZA.DB'
  293.     AutoOpen = True
  294.     AutoFlush = True
  295.     FreeToModify = False
  296.     FreeToDelete = True
  297.     FreeToInsert = True
  298.     Left = 326
  299.     Top = 177
  300.     object tPoreziTarifa: TIntegerField
  301.       FieldName = 'Tarifa'
  302.     end
  303.     object tPoreziDatum: TDateField
  304.       FieldName = 'Datum'
  305.     end
  306.     object tPoreziStopaRoba: TFloatField
  307.       FieldName = 'StopaRoba'
  308.     end
  309.     object tPoreziStopaRUC: TFloatField
  310.       FieldName = 'StopaRUC'
  311.     end
  312.     object tPoreziStopaUsluga: TFloatField
  313.       FieldName = 'StopaUsluga'
  314.     end
  315.     object tPoreziStopaOtpis: TFloatField
  316.       FieldName = 'StopaOtpis'
  317.     end
  318.     object tPoreziStopaPotrosnja: TFloatField
  319.       FieldName = 'StopaPotrosnja'
  320.     end
  321.     object tPoreziStopaDodVrijednost: TFloatField
  322.       FieldName = 'StopaDodVrijednost'
  323.     end
  324.   end
  325.   object tPorez: TMyTable
  326.     DatabaseName = 'Global'
  327.     IndexFieldNames = 'Code'
  328.     MasterFields = 'TARIFAPOREZA'
  329.     MasterSource = sStavke
  330.     TableName = 'T_POREZA.DB'
  331.     AutoOpen = True
  332.     AutoFlush = True
  333.     FreeToModify = False
  334.     FreeToDelete = True
  335.     FreeToInsert = True
  336.     Left = 273
  337.     Top = 177
  338.     object tPorezCode: TAutoIncField
  339.       FieldName = 'Code'
  340.     end
  341.     object tPorezTarifa: TStringField
  342.       FieldName = 'Tarifa'
  343.       Size = 40
  344.     end
  345.     object tPorezNaziv: TStringField
  346.       FieldName = 'Naziv'
  347.       Size = 60
  348.     end
  349.     object tPorezKontoRoba: TIntegerField
  350.       FieldName = 'KontoRoba'
  351.     end
  352.     object tPorezKontoRUC: TIntegerField
  353.       FieldName = 'KontoRUC'
  354.     end
  355.     object tPorezKontoUsluga: TIntegerField
  356.       FieldName = 'KontoUsluga'
  357.     end
  358.     object tPorezKontoOtpis: TIntegerField
  359.       FieldName = 'KontoOtpis'
  360.     end
  361.     object tPorezKontoPotrosnja: TIntegerField
  362.       FieldName = 'KontoPotrosnja'
  363.     end
  364.     object tPorezKontoDodVrijednost: TIntegerField
  365.       FieldName = 'KontoDodVrijednost'
  366.     end
  367.     object tPorezItems: TIntegerField
  368.       FieldName = 'Items'
  369.     end
  370.   end
  371.   object tPakung: TMyTable
  372.     DatabaseName = 'Global'
  373.     IndexFieldNames = 'Jedinica;Code'
  374.     MasterFields = 'JedMj;Pakiranje'
  375.     MasterSource = sRoba
  376.     TableName = 'PAKUNG.DB'
  377.     AutoOpen = True
  378.     AutoFlush = True
  379.     FreeToModify = False
  380.     FreeToDelete = True
  381.     FreeToInsert = True
  382.     Left = 114
  383.     Top = 177
  384.     object tPakungCode: TAutoIncField
  385.       FieldName = 'Code'
  386.     end
  387.     object tPakungJedinica: TIntegerField
  388.       FieldName = 'Jedinica'
  389.     end
  390.     object tPakungSifra: TStringField
  391.       FieldName = 'Sifra'
  392.       Size = 40
  393.     end
  394.     object tPakungMinKolicina: TFloatField
  395.       FieldName = 'MinKolicina'
  396.       Precision = 9
  397.     end
  398.     object tPakungImaAtoma: TBooleanField
  399.       FieldName = 'ImaAtoma'
  400.     end
  401.     object tPakungCijene: TFloatField
  402.       FieldName = 'Cijene'
  403.       Precision = 9
  404.     end
  405.   end
  406.   object tImeRobe: TMyTable
  407.     DatabaseName = 'Global'
  408.     IndexFieldNames = 'Roba;Govor'
  409.     MasterFields = 'Code;Govor'
  410.     MasterSource = sRoba
  411.     TableName = 'IME_ROBE.DB'
  412.     AutoOpen = True
  413.     AutoFlush = True
  414.     FreeToModify = False
  415.     FreeToDelete = True
  416.     FreeToInsert = True
  417.     Left = 273
  418.     Top = 135
  419.     object tImeRobeRoba: TIntegerField
  420.       FieldName = 'Roba'
  421.     end
  422.     object tImeRobeGovor: TIntegerField
  423.       FieldName = 'Govor'
  424.     end
  425.     object tImeRobeNaziv: TStringField
  426.       FieldName = 'Naziv'
  427.       OnGetText = tImeRobeNazivGetText
  428.       Size = 60
  429.     end
  430.   end
  431.   object tArtikl2: TMyTable
  432.     BeforePost = SifArtD_BP
  433.     DatabaseName = 'Global'
  434.     IndexFieldNames = 'PARTNER;CODE'
  435.     MasterFields = 'JA;Code'
  436.     MasterSource = sRoba
  437.     TableName = 'SIF_ROBE.DB'
  438.     AutoOpen = True
  439.     AutoFlush = True
  440.     FreeToModify = False
  441.     FreeToDelete = True
  442.     FreeToInsert = True
  443.     Left = 326
  444.     Top = 93
  445.     object tArtikl2Partner: TIntegerField
  446.       FieldName = 'Partner'
  447.     end
  448.     object tArtikl2Sifra: TStringField
  449.       FieldName = 'Sifra'
  450.       Size = 40
  451.     end
  452.     object tArtikl2Code: TIntegerField
  453.       FieldName = 'Code'
  454.     end
  455.     object tArtikl2Naziv: TStringField
  456.       FieldName = 'Naziv'
  457.       Size = 60
  458.     end
  459.     object tArtikl2Proizvodi: TIntegerField
  460.       FieldName = 'Proizvodi'
  461.     end
  462.     object tArtikl2Grupa: TIntegerField
  463.       FieldName = 'Grupa'
  464.     end
  465.     object tArtikl2PodGrupa: TIntegerField
  466.       FieldName = 'PodGrupa'
  467.     end
  468.     object tArtikl2Amortizacija: TIntegerField
  469.       FieldName = 'Amortizacija'
  470.     end
  471.     object tArtikl2Revalorizacija: TIntegerField
  472.       FieldName = 'Revalorizacija'
  473.     end
  474.     object tArtikl2Otkup: TStringField
  475.       FieldName = 'Otkup'
  476.       Size = 1
  477.     end
  478.     object tArtikl2Items: TIntegerField
  479.       FieldName = 'Items'
  480.     end
  481.   end
  482.   object tRoba: TMyTable
  483.     AutoCalcFields = False
  484.     OnCalcFields = tRobaCalcFields
  485.     DatabaseName = 'Global'
  486.     IndexFieldNames = 'Code'
  487.     MasterFields = 'Code'
  488.     MasterSource = sArtikl
  489.     TableName = 'ROBA.DB'
  490.     AutoOpen = True
  491.     AutoFlush = True
  492.     FreeToModify = False
  493.     FreeToDelete = True
  494.     FreeToInsert = True
  495.     Left = 432
  496.     Top = 177
  497.     object tRobaCode: TAutoIncField
  498.       FieldName = 'Code'
  499.     end
  500.     object tRobaProizvodi: TIntegerField
  501.       FieldName = 'Proizvodi'
  502.     end
  503.     object tRobaNaziv: TStringField
  504.       FieldName = 'Naziv'
  505.       Size = 60
  506.     end
  507.     object tRobaTarifaPoreza: TIntegerField
  508.       FieldName = 'TarifaPoreza'
  509.     end
  510.     object tRobaTarifaCarine: TIntegerField
  511.       FieldName = 'TarifaCarine'
  512.     end
  513.     object tRobaVrsta: TIntegerField
  514.       FieldName = 'Vrsta'
  515.     end
  516.     object tRobaJedMj: TIntegerField
  517.       FieldName = 'JedMj'
  518.     end
  519.     object tRobaPakiranje: TIntegerField
  520.       FieldName = 'Pakiranje'
  521.     end
  522.     object tRobaBarKod: TStringField
  523.       FieldName = 'BarKod'
  524.       Size = 13
  525.     end
  526.     object tRobaTezina: TFloatField
  527.       FieldName = 'Tezina'
  528.       Precision = 9
  529.     end
  530.     object tRobaBezbojno: TBooleanField
  531.       FieldName = 'Bezbojno'
  532.     end
  533.     object tRobaJa: TIntegerField
  534.       FieldName = 'Ja'
  535.       Visible = False
  536.       Calculated = True
  537.     end
  538.     object tRobaGovor: TIntegerField
  539.       FieldName = 'Govor'
  540.       Calculated = True
  541.     end
  542.     object tRobaItems: TIntegerField
  543.       FieldName = 'Items'
  544.     end
  545.   end
  546.   object tArtikl: TMyTable
  547.     BeforePost = SifArt_BP
  548.     DatabaseName = 'Global'
  549.     IndexFieldNames = 'PARTNER;CODE'
  550.     MasterFields = 'JA;ARTIKL'
  551.     MasterSource = sStavke
  552.     TableName = 'SIF_ROBE.DB'
  553.     AutoOpen = True
  554.     AutoFlush = True
  555.     FreeToModify = False
  556.     FreeToDelete = True
  557.     FreeToInsert = True
  558.     Left = 273
  559.     Top = 93
  560.     object tArtiklPartner: TIntegerField
  561.       FieldName = 'Partner'
  562.     end
  563.     object tArtiklSifra: TStringField
  564.       FieldName = 'Sifra'
  565.       Size = 40
  566.     end
  567.     object tArtiklCode: TIntegerField
  568.       FieldName = 'Code'
  569.     end
  570.     object tArtiklNaziv: TStringField
  571.       FieldName = 'Naziv'
  572.       Size = 60
  573.     end
  574.     object tArtiklProizvodi: TIntegerField
  575.       FieldName = 'Proizvodi'
  576.     end
  577.     object tArtiklItems: TIntegerField
  578.       FieldName = 'Items'
  579.     end
  580.   end
  581.   object tImeBoje: TMyTable
  582.     DatabaseName = 'Global'
  583.     IndexFieldNames = 'Boja;Govor'
  584.     MasterFields = 'Code;Govor'
  585.     MasterSource = sBoja
  586.     TableName = 'IME_BOJA.DB'
  587.     AutoOpen = True
  588.     AutoFlush = True
  589.     FreeToModify = False
  590.     FreeToDelete = True
  591.     FreeToInsert = True
  592.     Left = 220
  593.     Top = 135
  594.     object tImeBojeBoja: TIntegerField
  595.       FieldName = 'Boja'
  596.     end
  597.     object tImeBojeGovor: TIntegerField
  598.       FieldName = 'Govor'
  599.     end
  600.     object tImeBojeNaziv: TStringField
  601.       FieldName = 'Naziv'
  602.       OnGetText = tImeBojeNazivGetText
  603.       Size = 60
  604.     end
  605.   end
  606.   object tBoje2: TMyTable
  607.     BeforePost = SifBojeD_BP
  608.     DatabaseName = 'Global'
  609.     IndexFieldNames = 'PARTNER;PROIZVODI;CODE'
  610.     MasterFields = 'Ja;Proizvodi;Code'
  611.     MasterSource = sBoja
  612.     TableName = 'SIF_BOJA.DB'
  613.     AutoOpen = True
  614.     AutoFlush = True
  615.     FreeToModify = False
  616.     FreeToDelete = True
  617.     FreeToInsert = True
  618.     Left = 8
  619.     Top = 135
  620.     object tBoje2Partner: TIntegerField
  621.       FieldName = 'Partner'
  622.     end
  623.     object tBoje2Proizvodi: TIntegerField
  624.       FieldName = 'Proizvodi'
  625.     end
  626.     object tBoje2Sifra: TStringField
  627.       FieldName = 'Sifra'
  628.       Size = 40
  629.     end
  630.     object tBoje2Code: TIntegerField
  631.       FieldName = 'Code'
  632.     end
  633.     object tBoje2Naziv: TStringField
  634.       FieldName = 'Naziv'
  635.       Size = 60
  636.     end
  637.     object tBoje2Items: TIntegerField
  638.       FieldName = 'Items'
  639.     end
  640.   end
  641.   object tBoja: TMyTable
  642.     AutoCalcFields = False
  643.     OnCalcFields = tBojaCalcFields
  644.     DatabaseName = 'Global'
  645.     IndexFieldNames = 'Code'
  646.     MasterFields = 'Code'
  647.     MasterSource = sBoje
  648.     TableName = 'BOJE.DB'
  649.     AutoOpen = True
  650.     AutoFlush = True
  651.     FreeToModify = False
  652.     FreeToDelete = True
  653.     FreeToInsert = True
  654.     Left = 432
  655.     Top = 93
  656.     object tBojaCode: TAutoIncField
  657.       FieldName = 'Code'
  658.     end
  659.     object tBojaProizvodi: TIntegerField
  660.       FieldName = 'Proizvodi'
  661.     end
  662.     object tBojaNaziv: TStringField
  663.       FieldName = 'Naziv'
  664.       Size = 60
  665.     end
  666.     object tBojaGovor: TIntegerField
  667.       FieldName = 'Govor'
  668.       Calculated = True
  669.     end
  670.     object tBojaJa: TIntegerField
  671.       FieldName = 'Ja'
  672.       Calculated = True
  673.     end
  674.     object tBojaItems: TIntegerField
  675.       FieldName = 'Items'
  676.     end
  677.   end
  678.   object tBoje: TMyTable
  679.     BeforePost = SifBoje_BP
  680.     DatabaseName = 'Global'
  681.     IndexFieldNames = 'PARTNER;PROIZVODI;CODE'
  682.     MasterFields = 'JA;PROIZVODI;BOJA'
  683.     MasterSource = sStavke
  684.     TableName = 'SIF_BOJA.DB'
  685.     AutoOpen = True
  686.     AutoFlush = True
  687.     FreeToModify = False
  688.     FreeToDelete = True
  689.     FreeToInsert = True
  690.     Left = 485
  691.     Top = 93
  692.     object tBojePartner: TIntegerField
  693.       FieldName = 'Partner'
  694.     end
  695.     object tBojeProizvodi: TIntegerField
  696.       FieldName = 'Proizvodi'
  697.     end
  698.     object tBojeSifra: TStringField
  699.       FieldName = 'Sifra'
  700.       Size = 40
  701.     end
  702.     object tBojeCode: TIntegerField
  703.       FieldName = 'Code'
  704.     end
  705.     object tBojeNaziv: TStringField
  706.       FieldName = 'Naziv'
  707.       Size = 60
  708.     end
  709.     object tBojeItems: TIntegerField
  710.       FieldName = 'Items'
  711.     end
  712.   end
  713.   object tAtomi: TMyTable
  714.     DatabaseName = 'Global'
  715.     IndexFieldNames = 'PAKUNG;KOLICINA'
  716.     MasterFields = 'PAKUNG;ATOM'
  717.     MasterSource = sStavke
  718.     TableName = 'ATOMI.DB'
  719.     AutoOpen = True
  720.     AutoFlush = True
  721.     FreeToModify = False
  722.     FreeToDelete = True
  723.     FreeToInsert = True
  724.     Left = 379
  725.     Top = 93
  726.     object tAtomiPakung: TIntegerField
  727.       FieldName = 'Pakung'
  728.     end
  729.     object tAtomiKolicina: TFloatField
  730.       FieldName = 'Kolicina'
  731.       Precision = 9
  732.     end
  733.   end
  734.   object tMjere: TMyTable
  735.     DatabaseName = 'Global'
  736.     IndexFieldNames = 'Jedinica;Govor'
  737.     MasterFields = 'Code;Govor'
  738.     MasterSource = sJedinice
  739.     TableName = 'MJERE.DB'
  740.     AutoOpen = True
  741.     AutoFlush = True
  742.     FreeToModify = False
  743.     FreeToDelete = True
  744.     FreeToInsert = True
  745.     Left = 8
  746.     Top = 177
  747.     object tMjereJedinica: TIntegerField
  748.       FieldName = 'Jedinica'
  749.     end
  750.     object tMjereGovor: TIntegerField
  751.       FieldName = 'Govor'
  752.     end
  753.     object tMjereNaziv: TStringField
  754.       FieldName = 'Naziv'
  755.       Size = 60
  756.     end
  757.   end
  758.   object tJedinice: TMyTable
  759.     DatabaseName = 'Global'
  760.     IndexFieldNames = 'CODE'
  761.     MasterFields = 'JEDMJ'
  762.     MasterSource = sRoba
  763.     TableName = 'JEDINICE.DB'
  764.     AutoOpen = True
  765.     AutoFlush = True
  766.     FreeToModify = False
  767.     FreeToDelete = True
  768.     FreeToInsert = True
  769.     Left = 326
  770.     Top = 135
  771.     object tJediniceCode: TAutoIncField
  772.       FieldName = 'Code'
  773.     end
  774.     object tJediniceSifra: TStringField
  775.       FieldName = 'Sifra'
  776.       Size = 40
  777.     end
  778.     object tJediniceGovor: TIntegerField
  779.       FieldName = 'Govor'
  780.       Calculated = True
  781.     end
  782.   end
  783.   object tOrgJed: TMyTable
  784.     DatabaseName = 'Global'
  785.     IndexFieldNames = 'PARTNER;CODE'
  786.     MasterFields = 'DOBAVLJAC;ORGJEDDOB'
  787.     MasterSource = sGlava
  788.     TableName = 'ORG_JED.DB'
  789.     AutoOpen = True
  790.     AutoFlush = True
  791.     FreeToModify = False
  792.     FreeToDelete = True
  793.     FreeToInsert = True
  794.     Left = 61
  795.     Top = 177
  796.   end
  797.   object tCeneRobe: TMyTable
  798.     DatabaseName = 'Lokal'
  799.     IndexFieldNames = 'Roba;Boja;MinKol;Valuta'
  800.     TableName = 'CENEROBE.DB'
  801.     AutoOpen = True
  802.     AutoFlush = True
  803.     FreeToModify = True
  804.     FreeToDelete = True
  805.     FreeToInsert = True
  806.     Left = 61
  807.     Top = 135
  808.     object tCeneRobeRoba: TIntegerField
  809.       FieldName = 'Roba'
  810.     end
  811.     object tCeneRobeBoja: TIntegerField
  812.       FieldName = 'Boja'
  813.     end
  814.     object tCeneRobeMinKol: TFloatField
  815.       FieldName = 'MinKol'
  816.       Precision = 9
  817.     end
  818.     object tCeneRobeValuta: TIntegerField
  819.       FieldName = 'Valuta'
  820.     end
  821.     object tCeneRobeCijena: TFloatField
  822.       FieldName = 'Cijena'
  823.       Precision = 9
  824.     end
  825.     object tCeneRobeRabat: TFloatField
  826.       FieldName = 'Rabat'
  827.       Precision = 9
  828.     end
  829.     object tCeneRobeRabatI: TFloatField
  830.       FieldName = 'RabatI'
  831.       Precision = 9
  832.     end
  833.     object tCeneRobeRabat2: TFloatField
  834.       FieldName = 'Rabat2'
  835.       Precision = 9
  836.     end
  837.     object tCeneRobeRabat2I: TFloatField
  838.       FieldName = 'Rabat2I'
  839.       Precision = 9
  840.     end
  841.     object tCeneRobeVPC: TFloatField
  842.       FieldName = 'VPC'
  843.       Precision = 9
  844.     end
  845.   end
  846.   object xSkladiste2: TMyTable
  847.     DatabaseName = 'Lokal2'
  848.     IndexFieldNames = 'Code'
  849.     TableName = 'SKLADIST.DB'
  850.     AutoOpen = False
  851.     AutoFlush = False
  852.     FreeToModify = False
  853.     FreeToDelete = True
  854.     FreeToInsert = True
  855.     Left = 324
  856.     Top = 223
  857.     object xSkladiste2Code: TAutoIncField
  858.       FieldName = 'Code'
  859.     end
  860.     object xSkladiste2KontoRobe: TIntegerField
  861.       FieldName = 'KontoRobe'
  862.     end
  863.     object xSkladiste2KontoNVPRobe: TIntegerField
  864.       FieldName = 'KontoNVPRobe'
  865.     end
  866.     object xSkladiste2KontoPPRobe: TIntegerField
  867.       FieldName = 'KontoPPRobe'
  868.     end
  869.     object xSkladiste2KontoRUC: TIntegerField
  870.       FieldName = 'KontoRUC'
  871.     end
  872.     object xSkladiste2KontoManjak: TIntegerField
  873.       FieldName = 'KontoManjak'
  874.     end
  875.     object xSkladiste2KontoTroskaProdaje: TIntegerField
  876.       FieldName = 'KontoTroskaProdaje'
  877.     end
  878.     object xSkladiste2KontoKvar: TIntegerField
  879.       FieldName = 'KontoKvar'
  880.     end
  881.     object xSkladiste2KontoTrgRoba: TIntegerField
  882.       FieldName = 'KontoTrgRoba'
  883.     end
  884.     object xSkladiste2KontoKalkPorez: TIntegerField
  885.       FieldName = 'KontoKalkPorez'
  886.     end
  887.     object xSkladiste2KontoTroskaNabave: TIntegerField
  888.       FieldName = 'KontoTroskaNabave'
  889.     end
  890.     object xSkladiste2KontoRabata: TIntegerField
  891.       FieldName = 'KontoRabata'
  892.     end
  893.     object xSkladiste2OrgJed: TIntegerField
  894.       FieldName = 'OrgJed'
  895.     end
  896.     object xSkladiste2Knjiga: TIntegerField
  897.       FieldName = 'Knjiga'
  898.     end
  899.     object xSkladiste2Items: TIntegerField
  900.       FieldName = 'Items'
  901.     end
  902.   end
  903.   object tPosta: TMyTable
  904.     DatabaseName = 'Global'
  905.     IndexFieldNames = 'Code'
  906.     MasterFields = 'Posta'
  907.     MasterSource = sPart
  908.     TableName = 'POSTA.DB'
  909.     AutoOpen = True
  910.     AutoFlush = True
  911.     FreeToModify = False
  912.     FreeToDelete = True
  913.     FreeToInsert = True
  914.     Left = 379
  915.     Top = 177
  916.     object tPostaCode: TAutoIncField
  917.       FieldName = 'Code'
  918.     end
  919.     object tPostaSifra: TStringField
  920.       FieldName = 'Sifra'
  921.       Size = 40
  922.     end
  923.     object tPostaZemlja: TIntegerField
  924.       FieldName = 'Zemlja'
  925.     end
  926.     object tPostaBroj: TIntegerField
  927.       FieldName = 'Broj'
  928.     end
  929.   end
  930.   object tPart: TMyTable
  931.     DatabaseName = 'Global'
  932.     IndexFieldNames = 'Code'
  933.     MasterFields = 'Partner'
  934.     MasterSource = sPartner
  935.     TableName = 'PARTNER.DB'
  936.     AutoOpen = True
  937.     AutoFlush = True
  938.     FreeToModify = False
  939.     FreeToDelete = True
  940.     FreeToInsert = True
  941.     Left = 167
  942.     Top = 177
  943.     object tPartCode: TAutoIncField
  944.       FieldName = 'Code'
  945.     end
  946.     object tPartSifra: TStringField
  947.       FieldName = 'Sifra'
  948.       Size = 40
  949.     end
  950.     object tPartNaziv: TStringField
  951.       FieldName = 'Naziv'
  952.       Size = 80
  953.     end
  954.     object tPartMjesto: TStringField
  955.       FieldName = 'Mjesto'
  956.       Size = 40
  957.     end
  958.     object tPartUlicaBroj: TStringField
  959.       FieldName = 'UlicaBroj'
  960.       Size = 60
  961.     end
  962.     object tPartPosta: TIntegerField
  963.       FieldName = 'Posta'
  964.     end
  965.     object tPartZemlja: TIntegerField
  966.       FieldName = 'Zemlja'
  967.     end
  968.     object tPartJezik: TIntegerField
  969.       FieldName = 'Jezik'
  970.     end
  971.     object tPartTelefon: TStringField
  972.       FieldName = 'Telefon'
  973.     end
  974.     object tPartTelefax: TStringField
  975.       FieldName = 'Telefax'
  976.     end
  977.     object tPartMobitel: TStringField
  978.       FieldName = 'Mobitel'
  979.     end
  980.     object tPartModem: TStringField
  981.       FieldName = 'Modem'
  982.     end
  983.     object tPartKontaktOsoba: TStringField
  984.       FieldName = 'KontaktOsoba'
  985.       Size = 40
  986.     end
  987.     object tPartMaticni: TStringField
  988.       FieldName = 'Maticni'
  989.       Size = 30
  990.     end
  991.     object tPartDjelatnost: TIntegerField
  992.       FieldName = 'Djelatnost'
  993.     end
  994.     object tPartBanka: TIntegerField
  995.       FieldName = 'Banka'
  996.     end
  997.     object tPartInoBanka: TIntegerField
  998.       FieldName = 'InoBanka'
  999.     end
  1000.     object tPartValuta: TIntegerField
  1001.       FieldName = 'Valuta'
  1002.     end
  1003.     object tPartZiroRN: TIntegerField
  1004.       FieldName = 'ZiroRN'
  1005.     end
  1006.     object tPartPoziv: TSmallintField
  1007.       FieldName = 'Poziv'
  1008.     end
  1009.     object tPartModel: TStringField
  1010.       FieldName = 'Model'
  1011.       Size = 30
  1012.     end
  1013.     object tPartRabat2: TBooleanField
  1014.       FieldName = 'Rabat2'
  1015.     end
  1016.     object tPartRabat2Kolicina: TBooleanField
  1017.       FieldName = 'Rabat2Kolicina'
  1018.     end
  1019.     object tPartItems: TIntegerField
  1020.       FieldName = 'Items'
  1021.     end
  1022.   end
  1023.   object tPartner: TMyTable
  1024.     DatabaseName = 'Lokal'
  1025.     IndexFieldNames = 'Partner'
  1026.     MasterFields = 'Vlasnik'
  1027.     MasterSource = sSkladiste
  1028.     TableName = 'SIF_PART.DB'
  1029.     AutoOpen = True
  1030.     AutoFlush = True
  1031.     FreeToModify = False
  1032.     FreeToDelete = True
  1033.     FreeToInsert = True
  1034.     Left = 220
  1035.     Top = 177
  1036.     object tPartnerSifra: TStringField
  1037.       FieldName = 'Sifra'
  1038.       Size = 40
  1039.     end
  1040.     object tPartnerDobavljac: TStringField
  1041.       FieldName = 'Dobavljac'
  1042.       Size = 1
  1043.     end
  1044.     object tPartnerDrzava: TStringField
  1045.       FieldName = 'Drzava'
  1046.       Size = 1
  1047.     end
  1048.     object tPartnerPartner: TIntegerField
  1049.       FieldName = 'Partner'
  1050.     end
  1051.     object tPartnerGovor: TIntegerField
  1052.       FieldName = 'Govor'
  1053.     end
  1054.     object tPartnerUgovRabat: TFloatField
  1055.       FieldName = 'UgovRabat'
  1056.       Precision = 9
  1057.     end
  1058.     object tPartnerRokPlacanja: TSmallintField
  1059.       FieldName = 'RokPlacanja'
  1060.     end
  1061.     object tPartnerVeceKolicine: TBooleanField
  1062.       FieldName = 'VeceKolicine'
  1063.     end
  1064.     object tPartnerUgovRabat2: TFloatField
  1065.       FieldName = 'UgovRabat2'
  1066.       Precision = 9
  1067.     end
  1068.     object tPartnerRokPlacanja2: TSmallintField
  1069.       FieldName = 'RokPlacanja2'
  1070.     end
  1071.     object tPartnerVeceKolicine2: TBooleanField
  1072.       FieldName = 'VeceKolicine2'
  1073.     end
  1074.     object tPartnerBiljeske: TMemoField
  1075.       FieldName = 'Biljeske'
  1076.       BlobType = ftMemo
  1077.       Size = 30
  1078.     end
  1079.     object tPartnerItems: TIntegerField
  1080.       FieldName = 'Items'
  1081.     end
  1082.   end
  1083.   object xStavke: TMyTable
  1084.     AutoCalcFields = False
  1085.     DatabaseName = 'Lokal2'
  1086.     IndexFieldNames = 'BROJUFE;STAVKA'
  1087.     MasterFields = 'Code'
  1088.     MasterSource = sxGlava
  1089.     TableName = 'UFES_KOM.DB'
  1090.     AutoOpen = False
  1091.     AutoFlush = False
  1092.     FreeToModify = False
  1093.     FreeToDelete = True
  1094.     FreeToInsert = True
  1095.     Left = 272
  1096.     Top = 224
  1097.     object xStavkeBrojUFE: TIntegerField
  1098.       FieldName = 'BrojUFE'
  1099.     end
  1100.     object xStavkeStavka: TSmallintField
  1101.       FieldName = 'Stavka'
  1102.     end
  1103.     object xStavkeArtikl: TIntegerField
  1104.       FieldName = 'Artikl'
  1105.     end
  1106.     object xStavkeBoja: TIntegerField
  1107.       FieldName = 'Boja'
  1108.     end
  1109.     object xStavkeAtom: TFloatField
  1110.       FieldName = 'Atom'
  1111.     end
  1112.     object xStavkeMinKol: TFloatField
  1113.       FieldName = 'MinKol'
  1114.     end
  1115.     object xStavkeProizvodi: TIntegerField
  1116.       FieldName = 'Proizvodi'
  1117.     end
  1118.     object xStavkePakung: TIntegerField
  1119.       FieldName = 'Pakung'
  1120.     end
  1121.     object xStavkeOpis: TStringField
  1122.       FieldName = 'Opis'
  1123.       Size = 40
  1124.     end
  1125.     object xStavkeKolicina: TFloatField
  1126.       FieldName = 'Kolicina'
  1127.     end
  1128.     object xStavkeCijenaX: TFloatField
  1129.       FieldName = 'CijenaX'
  1130.     end
  1131.     object xStavkeXKol: TFloatField
  1132.       FieldName = 'XKol'
  1133.     end
  1134.     object xStavkeCijena: TFloatField
  1135.       FieldName = 'Cijena'
  1136.     end
  1137.     object xStavkeVrijednost: TFloatField
  1138.       FieldName = 'Vrijednost'
  1139.     end
  1140.     object xStavkeRabat: TFloatField
  1141.       FieldName = 'Rabat'
  1142.     end
  1143.     object xStavkeRabatI: TFloatField
  1144.       FieldName = 'RabatI'
  1145.     end
  1146.     object xStavkeRabat2: TFloatField
  1147.       FieldName = 'Rabat2'
  1148.     end
  1149.     object xStavkeRabat2I: TFloatField
  1150.       FieldName = 'Rabat2I'
  1151.     end
  1152.     object xStavkeRabatV: TFloatField
  1153.       FieldName = 'RabatV'
  1154.     end
  1155.     object xStavkeFaktCijena: TFloatField
  1156.       FieldName = 'FaktCijena'
  1157.     end
  1158.     object xStavkeFaktVrijednost: TFloatField
  1159.       FieldName = 'FaktVrijednost'
  1160.     end
  1161.     object xStavkeTransport: TFloatField
  1162.       FieldName = 'Transport'
  1163.     end
  1164.     object xStavkeTransportI: TFloatField
  1165.       FieldName = 'TransportI'
  1166.     end
  1167.     object xStavkeTransportV: TFloatField
  1168.       FieldName = 'TransportV'
  1169.     end
  1170.     object xStavkeOstaliTr: TFloatField
  1171.       FieldName = 'OstaliTr'
  1172.     end
  1173.     object xStavkeOstaliTrI: TFloatField
  1174.       FieldName = 'OstaliTrI'
  1175.     end
  1176.     object xStavkeOstaliTrV: TFloatField
  1177.       FieldName = 'OstaliTrV'
  1178.     end
  1179.     object xStavkeSkladCijena: TFloatField
  1180.       FieldName = 'SkladCijena'
  1181.     end
  1182.     object xStavkeSkladVrijednost: TFloatField
  1183.       FieldName = 'SkladVrijednost'
  1184.     end
  1185.     object xStavkeXRabat: TFloatField
  1186.       FieldName = 'XRabat'
  1187.     end
  1188.     object xStavkeXRabatI: TFloatField
  1189.       FieldName = 'XRabatI'
  1190.     end
  1191.     object xStavkeXRabat2: TFloatField
  1192.       FieldName = 'XRabat2'
  1193.     end
  1194.     object xStavkeXRabat2I: TFloatField
  1195.       FieldName = 'XRabat2I'
  1196.     end
  1197.     object xStavkeVPC: TFloatField
  1198.       FieldName = 'VPC'
  1199.     end
  1200.     object xStavkeMarza: TFloatField
  1201.       FieldName = 'Marza'
  1202.     end
  1203.     object xStavkeMarzaI: TFloatField
  1204.       FieldName = 'MarzaI'
  1205.     end
  1206.     object xStavkeRUC: TFloatField
  1207.       FieldName = 'RUC'
  1208.     end
  1209.     object xStavkeRUCV: TFloatField
  1210.       FieldName = 'RUCV'
  1211.     end
  1212.     object xStavkeVPCijena: TFloatField
  1213.       FieldName = 'VPCijena'
  1214.     end
  1215.     object xStavkeVPVrijednost: TFloatField
  1216.       FieldName = 'VPVrijednost'
  1217.     end
  1218.     object xStavkeTarifaPoreza: TIntegerField
  1219.       FieldName = 'TarifaPoreza'
  1220.     end
  1221.     object xStavkePorezP: TFloatField
  1222.       FieldName = 'PorezP'
  1223.     end
  1224.     object xStavkePorez1P: TFloatField
  1225.       FieldName = 'Porez1P'
  1226.     end
  1227.     object xStavkePorez2P: TFloatField
  1228.       FieldName = 'Porez2P'
  1229.     end
  1230.     object xStavkePorez3P: TFloatField
  1231.       FieldName = 'Porez3P'
  1232.     end
  1233.     object xStavkePorezV: TFloatField
  1234.       FieldName = 'PorezV'
  1235.     end
  1236.     object xStavkePorez1V: TFloatField
  1237.       FieldName = 'Porez1V'
  1238.     end
  1239.     object xStavkePorez2V: TFloatField
  1240.       FieldName = 'Porez2V'
  1241.     end
  1242.     object xStavkePorez3V: TFloatField
  1243.       FieldName = 'Porez3V'
  1244.     end
  1245.     object xStavkeMPCijena: TFloatField
  1246.       FieldName = 'MPCijena'
  1247.     end
  1248.     object xStavkeMPVrijednost: TFloatField
  1249.       FieldName = 'MPVrijednost'
  1250.     end
  1251.   end
  1252.   object xGlava: TMyTable
  1253.     AutoCalcFields = False
  1254.     DatabaseName = 'Lokal2'
  1255.     IndexFieldNames = 'Code'
  1256.     TableName = 'UFE_KOM.DB'
  1257.     AutoOpen = False
  1258.     AutoFlush = False
  1259.     FreeToModify = False
  1260.     FreeToDelete = True
  1261.     FreeToInsert = True
  1262.     Left = 220
  1263.     Top = 224
  1264.     object xGlavaBrojUFE: TIntegerField
  1265.       FieldName = 'BrojUFE'
  1266.     end
  1267.     object xGlavaCode: TIntegerField
  1268.       FieldName = 'Code'
  1269.     end
  1270.     object xGlavaKnjizeno: TStringField
  1271.       FieldName = 'Knjizeno'
  1272.       Size = 1
  1273.     end
  1274.     object xGlavaDatumKnj: TDateField
  1275.       FieldName = 'DatumKnj'
  1276.     end
  1277.     object xGlavaSkladiste: TIntegerField
  1278.       FieldName = 'Skladiste'
  1279.     end
  1280.     object xGlavaZarada: TSmallintField
  1281.       FieldName = 'Zarada'
  1282.     end
  1283.     object xGlavaProvizija: TFloatField
  1284.       FieldName = 'Provizija'
  1285.     end
  1286.     object xGlavaOsnovica: TSmallintField
  1287.       FieldName = 'Osnovica'
  1288.     end
  1289.     object xGlavaDatumDok: TDateField
  1290.       FieldName = 'DatumDok'
  1291.     end
  1292.     object xGlavaDobavljac: TIntegerField
  1293.       FieldName = 'Dobavljac'
  1294.     end
  1295.     object xGlavaOrgJedDob: TIntegerField
  1296.       FieldName = 'OrgJedDob'
  1297.     end
  1298.     object xGlavaSifreDobavljaca: TBooleanField
  1299.       FieldName = 'SifreDobavljaca'
  1300.     end
  1301.     object xGlavaReversBr: TStringField
  1302.       FieldName = 'ReversBr'
  1303.       Size = 50
  1304.     end
  1305.     object xGlavaOtpremnicaBr: TStringField
  1306.       FieldName = 'OtpremnicaBr'
  1307.       Size = 50
  1308.     end
  1309.     object xGlavaDatumDVO: TDateField
  1310.       FieldName = 'DatumDVO'
  1311.     end
  1312.     object xGlavaRokPlacanja: TSmallintField
  1313.       FieldName = 'RokPlacanja'
  1314.     end
  1315.     object xGlavaZahtjevBr: TStringField
  1316.       FieldName = 'ZahtjevBr'
  1317.       Size = 50
  1318.     end
  1319.     object xGlavaIznos: TFloatField
  1320.       FieldName = 'Iznos'
  1321.     end
  1322.     object xGlavaVrijednost: TFloatField
  1323.       FieldName = 'Vrijednost'
  1324.     end
  1325.     object xGlavaRazlika: TFloatField
  1326.       FieldName = 'Razlika'
  1327.     end
  1328.     object xGlavaSkladVrijednost: TFloatField
  1329.       FieldName = 'SkladVrijednost'
  1330.     end
  1331.     object xGlavaVPVrijednost: TFloatField
  1332.       FieldName = 'VPVrijednost'
  1333.     end
  1334.     object xGlavaPorez: TFloatField
  1335.       FieldName = 'Porez'
  1336.     end
  1337.     object xGlavaPorez1: TFloatField
  1338.       FieldName = 'Porez1'
  1339.     end
  1340.     object xGlavaPorez2: TFloatField
  1341.       FieldName = 'Porez2'
  1342.     end
  1343.     object xGlavaPorez3: TFloatField
  1344.       FieldName = 'Porez3'
  1345.     end
  1346.     object xGlavaPorezi: TFloatField
  1347.       FieldName = 'Porezi'
  1348.     end
  1349.     object xGlavaMPVrijednost: TFloatField
  1350.       FieldName = 'MPVrijednost'
  1351.     end
  1352.     object xGlavaKonto: TIntegerField
  1353.       FieldName = 'Konto'
  1354.     end
  1355.     object xGlavaTrosakDirekt: TBooleanField
  1356.       FieldName = 'TrosakDirekt'
  1357.     end
  1358.     object xGlavaKontoTroska: TIntegerField
  1359.       FieldName = 'KontoTroska'
  1360.     end
  1361.     object xGlavaKontoTroskaD: TIntegerField
  1362.       FieldName = 'KontoTroskaD'
  1363.     end
  1364.     object xGlavaStopaTroska: TFloatField
  1365.       FieldName = 'StopaTroska'
  1366.     end
  1367.     object xGlavaTransport: TFloatField
  1368.       FieldName = 'Transport'
  1369.     end
  1370.     object xGlavaOstaliTroskovi: TFloatField
  1371.       FieldName = 'OstaliTroskovi'
  1372.     end
  1373.     object xGlavaTransportNaKonto: TFloatField
  1374.       FieldName = 'TransportNaKonto'
  1375.     end
  1376.     object xGlavaTransportNaRobu: TFloatField
  1377.       FieldName = 'TransportNaRobu'
  1378.     end
  1379.     object xGlavaTransportNaRobi: TFloatField
  1380.       FieldName = 'TransportNaRobi'
  1381.     end
  1382.     object xGlavaTransportOstaje: TFloatField
  1383.       FieldName = 'TransportOstaje'
  1384.     end
  1385.     object xGlavaOstaloNaKonto: TFloatField
  1386.       FieldName = 'OstaloNaKonto'
  1387.     end
  1388.     object xGlavaOstaloNaRobu: TFloatField
  1389.       FieldName = 'OstaloNaRobu'
  1390.     end
  1391.     object xGlavaOstaloNaRobi: TFloatField
  1392.       FieldName = 'OstaloNaRobi'
  1393.     end
  1394.     object xGlavaOstaloOstaje: TFloatField
  1395.       FieldName = 'OstaloOstaje'
  1396.     end
  1397.     object xGlavaTrosakMod: TBooleanField
  1398.       FieldName = 'TrosakMod'
  1399.     end
  1400.     object xGlavaRabatIznos: TBooleanField
  1401.       FieldName = 'RabatIznos'
  1402.     end
  1403.     object xGlavaImaRabat2: TBooleanField
  1404.       FieldName = 'ImaRabat2'
  1405.     end
  1406.     object xGlavaRabat2Kolicina: TBooleanField
  1407.       FieldName = 'Rabat2Kolicina'
  1408.     end
  1409.     object xGlavaVeceKolicine: TBooleanField
  1410.       FieldName = 'VeceKolicine'
  1411.     end
  1412.     object xGlavaIstiRabat: TBooleanField
  1413.       FieldName = 'IstiRabat'
  1414.     end
  1415.     object xGlavaRabat1: TFloatField
  1416.       FieldName = 'Rabat1'
  1417.     end
  1418.     object xGlavaRabat2: TFloatField
  1419.       FieldName = 'Rabat2'
  1420.     end
  1421.     object xGlavaRabatI: TFloatField
  1422.       FieldName = 'RabatI'
  1423.     end
  1424.     object xGlavaUzeoRabat: TFloatField
  1425.       FieldName = 'UzeoRabat'
  1426.     end
  1427.     object xGlavaOstajeRabat: TFloatField
  1428.       FieldName = 'OstajeRabat'
  1429.     end
  1430.     object xGlavaRabatMod: TBooleanField
  1431.       FieldName = 'RabatMod'
  1432.     end
  1433.     object xGlavaMarzaIznos: TBooleanField
  1434.       FieldName = 'MarzaIznos'
  1435.     end
  1436.     object xGlavaIstaMarza: TBooleanField
  1437.       FieldName = 'IstaMarza'
  1438.     end
  1439.     object xGlavaUzmiRabat: TBooleanField
  1440.       FieldName = 'UzmiRabat'
  1441.     end
  1442.     object xGlavaMarza: TFloatField
  1443.       FieldName = 'Marza'
  1444.     end
  1445.     object xGlavaMarzaI: TFloatField
  1446.       FieldName = 'MarzaI'
  1447.     end
  1448.     object xGlavaUzeoMarzu: TFloatField
  1449.       FieldName = 'UzeoMarzu'
  1450.     end
  1451.     object xGlavaOstajeMarza: TFloatField
  1452.       FieldName = 'OstajeMarza'
  1453.     end
  1454.     object xGlavaMarzaMod: TBooleanField
  1455.       FieldName = 'MarzaMod'
  1456.     end
  1457.     object xGlavaPodesiFV: TBooleanField
  1458.       FieldName = 'PodesiFV'
  1459.     end
  1460.     object xGlavaPodesiVPC: TBooleanField
  1461.       FieldName = 'PodesiVPC'
  1462.     end
  1463.     object xGlavaPodesiMPC: TBooleanField
  1464.       FieldName = 'PodesiMPC'
  1465.     end
  1466.   end
  1467.   object tCodes: TMyTable
  1468.     DatabaseName = 'Lokal'
  1469.     IndexFieldNames = 'Code'
  1470.     MasterFields = 'Code'
  1471.     MasterSource = sGlava
  1472.     TableName = 'CODES.DB'
  1473.     AutoOpen = True
  1474.     AutoFlush = True
  1475.     FreeToModify = True
  1476.     FreeToDelete = True
  1477.     FreeToInsert = True
  1478.     Left = 114
  1479.     Top = 135
  1480.     object tCodesCode: TAutoIncField
  1481.       FieldName = 'Code'
  1482.     end
  1483.     object tCodesKnjizeno: TStringField
  1484.       FieldName = 'Knjizeno'
  1485.       Size = 1
  1486.     end
  1487.     object tCodesVrsta: TSmallintField
  1488.       FieldName = 'Vrsta'
  1489.     end
  1490.     object tCodesBroj: TIntegerField
  1491.       FieldName = 'Broj'
  1492.     end
  1493.   end
  1494.   object tStavke: TMyTable
  1495.     AfterPost = tStavkeAfterPost
  1496.     BeforeDelete = tStavkeBeforeDelete
  1497.     AfterDelete = tStavkeAfterDelete
  1498.     OnCalcFields = tStavkeCalcFields
  1499.     OnNewRecord = tStavkeNewRecord
  1500.     DatabaseName = 'Lokal'
  1501.     IndexFieldNames = 'BROJUFE;STAVKA'
  1502.     MasterFields = 'Code'
  1503.     MasterSource = sGlava
  1504.     TableName = 'UFES_KOM.DB'
  1505.     OnNewLastRecord = tStavkeNewLastRecord
  1506.     AutoOpen = True
  1507.     AutoFlush = True
  1508.     FreeToModify = False
  1509.     FreeToDelete = True
  1510.     FreeToInsert = True
  1511.     Left = 9
  1512.     Top = 227
  1513.     object tStavkeBrojUFE: TIntegerField
  1514.       FieldName = 'BrojUFE'
  1515.       Visible = False
  1516.     end
  1517.     object tStavkeStavka: TSmallintField
  1518.       DisplayWidth = 6
  1519.       FieldName = 'Stavka'
  1520.     end
  1521.     object tStavkeOpis: TStringField
  1522.       DisplayWidth = 19
  1523.       FieldName = 'Opis'
  1524.       Size = 40
  1525.     end
  1526.     object tStavkeKolicina: TFloatField
  1527.       DisplayLabel = 'Koli∩┐╜ina'
  1528.       DisplayWidth = 7
  1529.       FieldName = 'Kolicina'
  1530.       Precision = 9
  1531.     end
  1532.     object tStavkeCijena: TFloatField
  1533.       Tag = 2
  1534.       DisplayWidth = 14
  1535.       FieldName = 'Cijena'
  1536.       Visible = False
  1537.       Precision = 9
  1538.     end
  1539.     object tStavkeVrijednost: TFloatField
  1540.       Tag = -1
  1541.       FieldName = 'Vrijednost'
  1542.       Visible = False
  1543.       Precision = 9
  1544.     end
  1545.     object tStavkeRabat: TFloatField
  1546.       FieldName = 'Rabat'
  1547.       Visible = False
  1548.       Precision = 9
  1549.     end
  1550.     object tStavkeRabatI: TFloatField
  1551.       Tag = 2
  1552.       FieldName = 'RabatI'
  1553.       Visible = False
  1554.       Precision = 9
  1555.     end
  1556.     object tStavkeRabat2: TFloatField
  1557.       FieldName = 'Rabat2'
  1558.       Visible = False
  1559.       Precision = 9
  1560.     end
  1561.     object tStavkeRabat2I: TFloatField
  1562.       Tag = 2
  1563.       FieldName = 'Rabat2I'
  1564.       Visible = False
  1565.       Precision = 9
  1566.     end
  1567.     object tStavkeFaktCijena: TFloatField
  1568.       Tag = 2
  1569.       DisplayLabel = 'Fakt. cijena'
  1570.       DisplayWidth = 12
  1571.       FieldName = 'FaktCijena'
  1572.       Precision = 9
  1573.     end
  1574.     object tStavkeFaktVrijednost: TFloatField
  1575.       Tag = -1
  1576.       DisplayLabel = 'Fakt. Vrijednost'
  1577.       DisplayWidth = 16
  1578.       FieldName = 'FaktVrijednost'
  1579.       Precision = 9
  1580.     end
  1581.     object tStavkeTransport: TFloatField
  1582.       FieldName = 'Transport'
  1583.       Visible = False
  1584.       Precision = 9
  1585.     end
  1586.     object tStavkeTransportI: TFloatField
  1587.       Tag = 2
  1588.       FieldName = 'TransportI'
  1589.       Visible = False
  1590.       Precision = 9
  1591.     end
  1592.     object tStavkeTransportV: TFloatField
  1593.       Tag = -1
  1594.       FieldName = 'TransportV'
  1595.       Visible = False
  1596.       Precision = 9
  1597.     end
  1598.     object tStavkeOstaliTr: TFloatField
  1599.       FieldName = 'OstaliTr'
  1600.       Visible = False
  1601.       Precision = 9
  1602.     end
  1603.     object tStavkeOstaliTrI: TFloatField
  1604.       Tag = 2
  1605.       FieldName = 'OstaliTrI'
  1606.       Visible = False
  1607.       Precision = 9
  1608.     end
  1609.     object tStavkeOstaliTrV: TFloatField
  1610.       Tag = -1
  1611.       FieldName = 'OstaliTrV'
  1612.       Visible = False
  1613.       Precision = 9
  1614.     end
  1615.     object tStavkeSkladCijena: TFloatField
  1616.       Tag = -2
  1617.       FieldName = 'SkladCijena'
  1618.       Visible = False
  1619.       Precision = 9
  1620.     end
  1621.     object tStavkeSkladVrijednost: TFloatField
  1622.       Tag = -1
  1623.       FieldName = 'SkladVrijednost'
  1624.       Visible = False
  1625.       Precision = 9
  1626.     end
  1627.     object tStavkeXRabat: TFloatField
  1628.       FieldName = 'XRabat'
  1629.       Visible = False
  1630.       Precision = 9
  1631.     end
  1632.     object tStavkeXRabatI: TFloatField
  1633.       Tag = 2
  1634.       FieldName = 'XRabatI'
  1635.       Visible = False
  1636.       Precision = 9
  1637.     end
  1638.     object tStavkeXRabat2: TFloatField
  1639.       FieldName = 'XRabat2'
  1640.       Visible = False
  1641.       Precision = 9
  1642.     end
  1643.     object tStavkeXRabat2I: TFloatField
  1644.       Tag = 2
  1645.       FieldName = 'XRabat2I'
  1646.       Visible = False
  1647.       Precision = 9
  1648.     end
  1649.     object tStavkeMarza: TFloatField
  1650.       FieldName = 'Marza'
  1651.       Visible = False
  1652.       Precision = 9
  1653.     end
  1654.     object tStavkeMarzaI: TFloatField
  1655.       Tag = 2
  1656.       FieldName = 'MarzaI'
  1657.       Visible = False
  1658.       Precision = 9
  1659.     end
  1660.     object tStavkeRUC: TFloatField
  1661.       Tag = -2
  1662.       FieldName = 'RUC'
  1663.       Visible = False
  1664.       Precision = 9
  1665.     end
  1666.     object tStavkeVPCijena: TFloatField
  1667.       Tag = 2
  1668.       FieldName = 'VPCijena'
  1669.       Visible = False
  1670.       Precision = 9
  1671.     end
  1672.     object tStavkeVPVrijednost: TFloatField
  1673.       Tag = -1
  1674.       FieldName = 'VPVrijednost'
  1675.       Visible = False
  1676.       Precision = 9
  1677.     end
  1678.     object tStavkeMPCijena: TFloatField
  1679.       Tag = 2
  1680.       FieldName = 'MPCijena'
  1681.       Visible = False
  1682.       Precision = 9
  1683.     end
  1684.     object tStavkeMPVrijednost: TFloatField
  1685.       Tag = -1
  1686.       FieldName = 'MPVrijednost'
  1687.       Visible = False
  1688.       Precision = 9
  1689.     end
  1690.     object tStavkeAtom: TFloatField
  1691.       Alignment = taCenter
  1692.       FieldName = 'Atom'
  1693.       Visible = False
  1694.       Precision = 9
  1695.     end
  1696.     object tStavkeMinKol: TFloatField
  1697.       Alignment = taLeftJustify
  1698.       FieldName = 'MinKol'
  1699.       Visible = False
  1700.       OnGetText = tStavkeMinKolGetText
  1701.       Precision = 9
  1702.     end
  1703.     object tStavkeVrsta: TSmallintField
  1704.       FieldName = 'Vrsta'
  1705.       Visible = False
  1706.       Calculated = True
  1707.     end
  1708.     object tStavkeRabatV: TFloatField
  1709.       Tag = -1
  1710.       FieldName = 'RabatV'
  1711.       Visible = False
  1712.       Precision = 9
  1713.     end
  1714.     object tStavkeRUCV: TFloatField
  1715.       Tag = -1
  1716.       FieldName = 'RUCV'
  1717.       Visible = False
  1718.       Precision = 9
  1719.     end
  1720.     object tStavkeCijenaX: TFloatField
  1721.       Tag = 2
  1722.       FieldName = 'CijenaX'
  1723.       Visible = False
  1724.       Precision = 9
  1725.     end
  1726.     object tStavkeXKol: TFloatField
  1727.       FieldName = 'XKol'
  1728.       Visible = False
  1729.       Precision = 9
  1730.     end
  1731.     object tStavkePorezP: TFloatField
  1732.       FieldName = 'PorezP'
  1733.       Visible = False
  1734.       OnGetText = GetPercentText
  1735.       Precision = 9
  1736.     end
  1737.     object tStavkePorezV: TFloatField
  1738.       Tag = -1
  1739.       FieldName = 'PorezV'
  1740.       Visible = False
  1741.       Precision = 9
  1742.     end
  1743.     object tStavkePorez1P: TFloatField
  1744.       FieldName = 'Porez1P'
  1745.       Visible = False
  1746.       OnGetText = GetPercentText
  1747.       Precision = 9
  1748.     end
  1749.     object tStavkePorez1V: TFloatField
  1750.       Tag = -1
  1751.       FieldName = 'Porez1V'
  1752.       Visible = False
  1753.       Precision = 9
  1754.     end
  1755.     object tStavkePorez2P: TFloatField
  1756.       FieldName = 'Porez2P'
  1757.       Visible = False
  1758.       OnGetText = GetPercentText
  1759.       Precision = 9
  1760.     end
  1761.     object tStavkePorez2V: TFloatField
  1762.       Tag = -1
  1763.       FieldName = 'Porez2V'
  1764.       Visible = False
  1765.       Precision = 9
  1766.     end
  1767.     object tStavkePorez3P: TFloatField
  1768.       FieldName = 'Porez3P'
  1769.       Visible = False
  1770.       OnGetText = GetPercentText
  1771.       Precision = 9
  1772.     end
  1773.     object tStavkePorez3V: TFloatField
  1774.       Tag = -1
  1775.       FieldName = 'Porez3V'
  1776.       Visible = False
  1777.       Precision = 9
  1778.     end
  1779.     object tStavkeTarifaPoreza: TIntegerField
  1780.       FieldName = 'TarifaPoreza'
  1781.       Visible = False
  1782.     end
  1783.     object tStavkeArtikl: TIntegerField
  1784.       FieldName = 'Artikl'
  1785.       Visible = False
  1786.     end
  1787.     object tStavkeBoja: TIntegerField
  1788.       FieldName = 'Boja'
  1789.       Visible = False
  1790.     end
  1791.     object tStavkeJa: TIntegerField
  1792.       FieldName = 'Ja'
  1793.       Visible = False
  1794.       Calculated = True
  1795.     end
  1796.     object tStavkeProizvodi: TIntegerField
  1797.       FieldName = 'Proizvodi'
  1798.       Visible = False
  1799.       Calculated = True
  1800.     end
  1801.     object tStavkePakung: TIntegerField
  1802.       FieldName = 'Pakung'
  1803.       Visible = False
  1804.       Calculated = True
  1805.     end
  1806.     object tStavkeVPC: TFloatField
  1807.       Tag = 2
  1808.       FieldName = 'VPC'
  1809.       Visible = False
  1810.     end
  1811.     object tStavkeDobavljac: TIntegerField
  1812.       FieldName = 'Dobavljac'
  1813.       Visible = False
  1814.       Calculated = True
  1815.     end
  1816.     object tStavkePartner: TIntegerField
  1817.       FieldName = 'Partner'
  1818.       Visible = False
  1819.       Calculated = True
  1820.     end
  1821.   end
  1822.   object tGlava: TMyTable
  1823.     AutoCalcFields = False
  1824.     BeforePost = tGlavaBeforePost
  1825.     AfterPost = tGlavaAfterPost
  1826.     BeforeDelete = tGlavaBeforeDelete
  1827.     OnCalcFields = tGlavaCalcFields
  1828.     OnNewRecord = tGlavaNewRecord
  1829.     DatabaseName = 'Lokal'
  1830.     IndexFieldNames = 'BROJUFE'
  1831.     TableName = 'UFE_KOM.DB'
  1832.     OnNewLastRecord = tGlavaNewLastRecord
  1833.     AutoOpen = True
  1834.     AutoFlush = True
  1835.     FreeToModify = False
  1836.     FreeToDelete = True
  1837.     FreeToInsert = True
  1838.     Left = 167
  1839.     Top = 135
  1840.     object tGlavaKnjizeno: TStringField
  1841.       DisplayLabel = 'K'
  1842.       FieldName = 'Knjizeno'
  1843.       Size = 1
  1844.     end
  1845.     object tGlavaBrojUFE: TIntegerField
  1846.       DisplayLabel = 'Primka broj'
  1847.       DisplayWidth = 10
  1848.       FieldName = 'BrojUFE'
  1849.     end
  1850.     object tGlavaSifreDobavljaca: TBooleanField
  1851.       FieldName = 'SifreDobavljaca'
  1852.       Visible = False
  1853.     end
  1854.     object tGlavaDatumKnj: TDateField
  1855.       DisplayLabel = 'Datum knj.'
  1856.       FieldName = 'DatumKnj'
  1857.       Visible = False
  1858.     end
  1859.     object tGlavaDatumDok: TDateField
  1860.       DisplayLabel = 'Datum rev.'
  1861.       DisplayWidth = 10
  1862.       FieldName = 'DatumDok'
  1863.       Visible = False
  1864.     end
  1865.     object tGlavaOtpremnicaBr: TStringField
  1866.       FieldName = 'OtpremnicaBr'
  1867.       Visible = False
  1868.       Size = 50
  1869.     end
  1870.     object tGlavaReversBr: TStringField
  1871.       DisplayLabel = 'Revers broj'
  1872.       DisplayWidth = 20
  1873.       FieldName = 'ReversBr'
  1874.       Size = 50
  1875.     end
  1876.     object tGlavaZahtjevBr: TStringField
  1877.       FieldName = 'ZahtjevBr'
  1878.       Visible = False
  1879.       Size = 50
  1880.     end
  1881.     object tGlavaDatumDVO: TDateField
  1882.       DisplayLabel = 'Datum DVO'
  1883.       FieldName = 'DatumDVO'
  1884.     end
  1885.     object tGlavaRokPlacanja: TSmallintField
  1886.       DisplayLabel = 'RP'
  1887.       DisplayWidth = 2
  1888.       FieldName = 'RokPlacanja'
  1889.     end
  1890.     object tGlavaIznos: TFloatField
  1891.       Tag = -1
  1892.       DisplayLabel = 'Iznos reversa'
  1893.       DisplayWidth = 17
  1894.       FieldName = 'Iznos'
  1895.       OnChange = NovaRazlika
  1896.       Precision = 9
  1897.     end
  1898.     object tGlavaVrijednost: TFloatField
  1899.       Tag = -1
  1900.       DisplayLabel = 'Knji∩┐╜eni iznos'
  1901.       DisplayWidth = 17
  1902.       FieldName = 'Vrijednost'
  1903.       OnChange = NovaRazlika
  1904.       OnGetText = GetFloatKuneX
  1905.       Precision = 9
  1906.     end
  1907.     object tGlavaRazlika: TFloatField
  1908.       Tag = -1
  1909.       DisplayLabel = '... preostaje'
  1910.       DisplayWidth = 14
  1911.       FieldName = 'Razlika'
  1912.       Precision = 9
  1913.     end
  1914.     object tGlavaZem: TStringField
  1915.       FieldName = 'Zem'
  1916.       Visible = False
  1917.       Size = 1
  1918.       Calculated = True
  1919.     end
  1920.     object tGlavaTrosakDirekt: TBooleanField
  1921.       FieldName = 'TrosakDirekt'
  1922.       Visible = False
  1923.       OnChange = KolikoNaKonto
  1924.     end
  1925.     object tGlavaStopaTroska: TFloatField
  1926.       FieldName = 'StopaTroska'
  1927.       Visible = False
  1928.       OnChange = KolikoNaKonto
  1929.       Precision = 9
  1930.     end
  1931.     object tGlavaTransport: TFloatField
  1932.       Tag = -1
  1933.       FieldName = 'Transport'
  1934.       Visible = False
  1935.       OnChange = KolikoNaKonto
  1936.       Precision = 9
  1937.     end
  1938.     object tGlavaOstaliTroskovi: TFloatField
  1939.       Tag = -1
  1940.       FieldName = 'OstaliTroskovi'
  1941.       Visible = False
  1942.       OnChange = KolikoNaKonto
  1943.       Precision = 9
  1944.     end
  1945.     object tGlavaTransportNaKonto: TFloatField
  1946.       Tag = -1
  1947.       FieldName = 'TransportNaKonto'
  1948.       Visible = False
  1949.       Precision = 9
  1950.     end
  1951.     object tGlavaTransportNaRobu: TFloatField
  1952.       Tag = -1
  1953.       FieldName = 'TransportNaRobu'
  1954.       Visible = False
  1955.       OnChange = KolikoTransportaOstaje
  1956.       Precision = 9
  1957.     end
  1958.     object tGlavaTransportNaRobi: TFloatField
  1959.       Tag = -1
  1960.       FieldName = 'TransportNaRobi'
  1961.       Visible = False
  1962.       OnChange = KolikoTransportaOstaje
  1963.       Precision = 9
  1964.     end
  1965.     object tGlavaTransportOstaje: TFloatField
  1966.       Tag = -1
  1967.       FieldName = 'TransportOstaje'
  1968.       Visible = False
  1969.       Precision = 9
  1970.     end
  1971.     object tGlavaOstaloNaKonto: TFloatField
  1972.       Tag = -1
  1973.       FieldName = 'OstaloNaKonto'
  1974.       Visible = False
  1975.       Precision = 9
  1976.     end
  1977.     object tGlavaOstaloNaRobu: TFloatField
  1978.       Tag = -1
  1979.       FieldName = 'OstaloNaRobu'
  1980.       Visible = False
  1981.       OnChange = KolikoOstalogOstaje
  1982.       Precision = 9
  1983.     end
  1984.     object tGlavaOstaloNaRobi: TFloatField
  1985.       Tag = -1
  1986.       FieldName = 'OstaloNaRobi'
  1987.       Visible = False
  1988.       OnChange = KolikoOstalogOstaje
  1989.       Precision = 9
  1990.     end
  1991.     object tGlavaOstaloOstaje: TFloatField
  1992.       Tag = -1
  1993.       FieldName = 'OstaloOstaje'
  1994.       Visible = False
  1995.       Precision = 9
  1996.     end
  1997.     object tGlavaTrosakMod: TBooleanField
  1998.       FieldName = 'TrosakMod'
  1999.       Visible = False
  2000.     end
  2001.     object tGlavaRabatIznos: TBooleanField
  2002.       FieldName = 'RabatIznos'
  2003.       Visible = False
  2004.     end
  2005.     object tGlavaRabat2Kolicina: TBooleanField
  2006.       FieldName = 'Rabat2Kolicina'
  2007.       Visible = False
  2008.     end
  2009.     object tGlavaIstiRabat: TBooleanField
  2010.       FieldName = 'IstiRabat'
  2011.       Visible = False
  2012.     end
  2013.     object tGlavaRabat1: TFloatField
  2014.       FieldName = 'Rabat1'
  2015.       Visible = False
  2016.       Precision = 9
  2017.     end
  2018.     object tGlavaRabat2: TFloatField
  2019.       FieldName = 'Rabat2'
  2020.       Visible = False
  2021.       Precision = 9
  2022.     end
  2023.     object tGlavaRabatI: TFloatField
  2024.       Tag = -1
  2025.       FieldName = 'RabatI'
  2026.       Visible = False
  2027.       OnChange = tGlavaUzeoRabatChange
  2028.       Precision = 9
  2029.     end
  2030.     object tGlavaUzeoRabat: TFloatField
  2031.       Tag = -1
  2032.       FieldName = 'UzeoRabat'
  2033.       Visible = False
  2034.       OnChange = tGlavaUzeoRabatChange
  2035.       Precision = 9
  2036.     end
  2037.     object tGlavaOstajeRabat: TFloatField
  2038.       Tag = -1
  2039.       FieldName = 'OstajeRabat'
  2040.       Visible = False
  2041.       Precision = 9
  2042.     end
  2043.     object tGlavaRabatMod: TBooleanField
  2044.       FieldName = 'RabatMod'
  2045.       Visible = False
  2046.     end
  2047.     object tGlavaMarzaIznos: TBooleanField
  2048.       FieldName = 'MarzaIznos'
  2049.       Visible = False
  2050.     end
  2051.     object tGlavaIstaMarza: TBooleanField
  2052.       FieldName = 'IstaMarza'
  2053.       Visible = False
  2054.     end
  2055.     object tGlavaUzmiRabat: TBooleanField
  2056.       FieldName = 'UzmiRabat'
  2057.       Visible = False
  2058.     end
  2059.     object tGlavaMarza: TFloatField
  2060.       FieldName = 'Marza'
  2061.       Visible = False
  2062.       Precision = 9
  2063.     end
  2064.     object tGlavaMarzaI: TFloatField
  2065.       Tag = -1
  2066.       FieldName = 'MarzaI'
  2067.       Visible = False
  2068.       OnChange = tGlavaUzeoMarzuChange
  2069.       Precision = 9
  2070.     end
  2071.     object tGlavaUzeoMarzu: TFloatField
  2072.       Tag = -1
  2073.       FieldName = 'UzeoMarzu'
  2074.       Visible = False
  2075.       OnChange = tGlavaUzeoMarzuChange
  2076.       Precision = 9
  2077.     end
  2078.     object tGlavaOstajeMarza: TFloatField
  2079.       Tag = -1
  2080.       FieldName = 'OstajeMarza'
  2081.       Visible = False
  2082.       Precision = 9
  2083.     end
  2084.     object tGlavaMarzaMod: TBooleanField
  2085.       FieldName = 'MarzaMod'
  2086.       Visible = False
  2087.     end
  2088.     object tGlavaImaRabat2: TBooleanField
  2089.       FieldName = 'ImaRabat2'
  2090.       Visible = False
  2091.     end
  2092.     object tGlavaVeceKolicine: TBooleanField
  2093.       FieldName = 'VeceKolicine'
  2094.       Visible = False
  2095.     end
  2096.     object tGlavaZarada: TSmallintField
  2097.       FieldName = 'Zarada'
  2098.       Visible = False
  2099.     end
  2100.     object tGlavaPodesiFV: TBooleanField
  2101.       FieldName = 'PodesiFV'
  2102.       Visible = False
  2103.     end
  2104.     object tGlavaPodesiVPC: TBooleanField
  2105.       FieldName = 'PodesiVPC'
  2106.       Visible = False
  2107.     end
  2108.     object tGlavaSkladVrijednost: TFloatField
  2109.       Tag = -1
  2110.       FieldName = 'SkladVrijednost'
  2111.       Visible = False
  2112.       Precision = 9
  2113.     end
  2114.     object tGlavaVPVrijednost: TFloatField
  2115.       Tag = -1
  2116.       FieldName = 'VPVrijednost'
  2117.       Visible = False
  2118.       Precision = 9
  2119.     end
  2120.     object tGlavaPorez1: TFloatField
  2121.       Tag = -1
  2122.       FieldName = 'Porez1'
  2123.       Visible = False
  2124.       Precision = 9
  2125.     end
  2126.     object tGlavaPorez2: TFloatField
  2127.       Tag = -1
  2128.       FieldName = 'Porez2'
  2129.       Visible = False
  2130.       Precision = 9
  2131.     end
  2132.     object tGlavaPorez3: TFloatField
  2133.       Tag = -1
  2134.       FieldName = 'Porez3'
  2135.       Visible = False
  2136.       Precision = 9
  2137.     end
  2138.     object tGlavaPorez: TFloatField
  2139.       Tag = -1
  2140.       FieldName = 'Porez'
  2141.       Visible = False
  2142.       Precision = 9
  2143.     end
  2144.     object tGlavaMPVrijednost: TFloatField
  2145.       Tag = -1
  2146.       FieldName = 'MPVrijednost'
  2147.       Visible = False
  2148.       Precision = 9
  2149.     end
  2150.     object tGlavaVrsta: TIntegerField
  2151.       FieldName = 'Vrsta'
  2152.       Visible = False
  2153.       Calculated = True
  2154.     end
  2155.     object tGlavaJa: TIntegerField
  2156.       FieldName = 'Ja'
  2157.       Visible = False
  2158.       Calculated = True
  2159.     end
  2160.     object tGlavaProvizija: TFloatField
  2161.       FieldName = 'Provizija'
  2162.       Visible = False
  2163.       Precision = 9
  2164.     end
  2165.     object tGlavaOsnovica: TSmallintField
  2166.       FieldName = 'Osnovica'
  2167.       Visible = False
  2168.     end
  2169.     object tGlavaCode: TIntegerField
  2170.       FieldName = 'Code'
  2171.       Visible = False
  2172.     end
  2173.     object tGlavaDobavljac: TIntegerField
  2174.       FieldName = 'Dobavljac'
  2175.       Visible = False
  2176.     end
  2177.     object tGlavaOrgJedDob: TIntegerField
  2178.       FieldName = 'OrgJedDob'
  2179.       Visible = False
  2180.     end
  2181.     object tGlavaSkladiste: TIntegerField
  2182.       FieldName = 'Skladiste'
  2183.       Visible = False
  2184.     end
  2185.     object tGlavaPodesiMPC: TBooleanField
  2186.       FieldName = 'PodesiMPC'
  2187.       Visible = False
  2188.     end
  2189.     object tGlavaKonto: TIntegerField
  2190.       FieldName = 'Konto'
  2191.       Visible = False
  2192.     end
  2193.     object tGlavaKontoTroska: TIntegerField
  2194.       FieldName = 'KontoTroska'
  2195.       Visible = False
  2196.     end
  2197.     object tGlavaKontoTroskaD: TIntegerField
  2198.       FieldName = 'KontoTroskaD'
  2199.       Visible = False
  2200.     end
  2201.     object tGlavaPorezi: TFloatField
  2202.       Tag = -1
  2203.       FieldName = 'Porezi'
  2204.       Visible = False
  2205.     end
  2206.   end
  2207. end
  2208.