home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BUG 11
/
BUGCD1998_02.ISO
/
aplic
/
trade
/
_setup.1
/
main.exe
/
0
/
RCDATA
/
TDATAIFA2
/
TDATAIFA2.txt
Wrap
Text File
|
1998-01-05
|
39KB
|
1,644 lines
object DataIfa2: TDataIfa2
Tag = 1
OnDestroy = DIzlaznaFakturaKomisijaDestroy
Left = 209
Top = 159
Height = 295
Width = 543
object sGlava: TDataSource
DataSet = tGlava
Left = 8
Top = 47
end
object sStavke: TDataSource
DataSet = tStavke
Left = 167
Top = 89
end
object sPartner: TDataSource
DataSet = tPartner
Left = 8
Top = 89
end
object sOrgJed: TDataSource
DataSet = tOrgJed
Left = 379
Top = 47
end
object sArtikl: TDataSource
DataSet = tArtikl
Left = 8
Top = 5
end
object sBoje: TDataSource
DataSet = tBoje
Left = 220
Top = 5
end
object sMjere: TDataSource
DataSet = tMjere
Left = 326
Top = 47
end
object sArtikl2: TDataSource
DataSet = tArtikl2
Left = 61
Top = 5
end
object sBoje2: TDataSource
DataSet = tBoje2
Left = 273
Top = 5
end
object sRoba: TDataSource
DataSet = tRoba
Left = 61
Top = 89
end
object sBoja: TDataSource
DataSet = tBoja
Left = 167
Top = 5
end
object sJedinice: TDataSource
DataSet = tJedinice
Left = 167
Top = 47
end
object sAtomi: TDataSource
DataSet = tAtomi
Left = 114
Top = 5
end
object sPart: TDataSource
DataSet = tPart
Left = 485
Top = 47
end
object sValuta: TDataSource
DataSet = DGlava.tValuta
Left = 220
Top = 89
end
object sImeRobe: TDataSource
DataSet = tImeRobe
Left = 114
Top = 47
end
object sImeBoje: TDataSource
DataSet = tImeBoje
Left = 61
Top = 47
end
object sKonto4: TDataSource
DataSet = tKonto4
Left = 220
Top = 47
end
object sSkladiste: TDataSource
DataSet = tSkladiste
Left = 114
Top = 89
end
object sPakung: TDataSource
DataSet = tPakung
Left = 432
Top = 47
end
object sKonto5: TDataSource
DataSet = tKonto5
Left = 273
Top = 47
end
object sCeneRobe: TDataSource
DataSet = tCeneRobe
Left = 326
Top = 5
end
object sCijene2: TDataSource
DataSet = tCijene2
Left = 379
Top = 5
end
object sCijeneX: TDataSource
DataSet = tCijeneX
Left = 432
Top = 5
end
object sCodes: TDataSource
DataSet = tCodes
Left = 485
Top = 5
end
object sxGlava: TDataSource
DataSet = xGlava
Left = 256
Top = 220
end
object tOrgJed: TMyTable
DatabaseName = 'Global'
IndexFieldNames = 'PARTNER;CODE'
MasterFields = 'KUPAC;ORGJEDKUP'
MasterSource = sGlava
TableName = 'ORG_JED.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 220
Top = 173
end
object tKonto4: TMyTable
DatabaseName = 'Global'
IndexFieldNames = 'CODE'
MasterFields = 'KONTOTROSKA'
MasterSource = sGlava
TableName = 'KONTA.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 61
Top = 173
end
object tSkladiste: TMyTable
DatabaseName = 'Lokal'
IndexFieldNames = 'MJESTO;VRSTATER;VLASNIK;CODE'
MasterFields = 'ZEM;VRSTA;JA;SKLADISTE'
MasterSource = sGlava
TableName = 'SKLADIST.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 61
Top = 215
object tSkladisteNaziv: TStringField
FieldName = 'Naziv'
Visible = False
Size = 80
end
object tSkladisteVlasnik: TIntegerField
FieldName = 'Vlasnik'
Visible = False
end
object tSkladisteVrstaTer: TSmallintField
FieldName = 'VrstaTer'
Visible = False
end
object tSkladisteMjesto: TStringField
FieldName = 'Mjesto'
Size = 1
end
object tSkladisteLokacija: TIntegerField
FieldName = 'Lokacija'
end
object tSkladisteCode: TAutoIncField
FieldName = 'Code'
end
object tSkladisteSifra: TStringField
FieldName = 'Sifra'
Size = 40
end
object tSkladisteDrzava: TIntegerField
FieldName = 'Drzava'
end
object tSkladisteZarada: TSmallintField
FieldName = 'Zarada'
end
object tSkladisteVP_Sklad: TIntegerField
FieldName = 'VP_Sklad'
end
object tSkladisteItems: TIntegerField
FieldName = 'Items'
end
end
object tKonto5: TMyTable
DatabaseName = 'Global'
IndexFieldNames = 'CODE'
MasterFields = 'KONTOTROSKAD'
MasterSource = sGlava
TableName = 'KONTA.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 114
Top = 173
end
object tPart2: TMyTable
DatabaseName = 'Global'
IndexFieldNames = 'Code'
TableName = 'PARTNER.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 379
Top = 173
object tPart2Poziv: TSmallintField
FieldName = 'Poziv'
end
object tPart2Model: TStringField
FieldName = 'Model'
Size = 30
end
object tPart2Rabat2: TBooleanField
FieldName = 'Rabat2'
end
object tPart2Rabat2Kolicina: TBooleanField
FieldName = 'Rabat2Kolicina'
end
object tPart2Code: TAutoIncField
FieldName = 'Code'
end
object tPart2Sifra: TStringField
FieldName = 'Sifra'
Size = 40
end
object tPart2ZiroRN: TIntegerField
FieldName = 'ZiroRN'
end
object tPart2Items: TIntegerField
FieldName = 'Items'
end
end
object tCijene: TMyTable
DatabaseName = 'Lokal'
IndexFieldNames = 'Artikl;Boja;MinKol;VPC'
MasterFields = 'Artikl;Boja;MinKol'
MasterSource = sStavke
TableName = 'CIJENE.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 114
Top = 131
object tCijeneArtikl: TIntegerField
FieldName = 'Artikl'
end
object tCijeneBoja: TIntegerField
FieldName = 'Boja'
end
object tCijeneMinKol: TFloatField
FieldName = 'MinKol'
Precision = 9
end
object tCijeneVPC: TFloatField
FieldName = 'VPC'
Precision = 9
end
object tCijeneKolicina: TFloatField
FieldName = 'Kolicina'
Precision = 9
end
end
object tIzlaz: TMyTable
DatabaseName = 'Lokal'
IndexFieldNames = 'Artikl;Boja;MinKol;Vrsta;VPC'
MasterFields = 'Artikl;Boja;MinKol;VPS'
MasterSource = sStavke
TableName = 'IZLAZ.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 485
Top = 131
object tIzlazArtikl: TIntegerField
FieldName = 'Artikl'
end
object tIzlazBoja: TIntegerField
FieldName = 'Boja'
end
object tIzlazMinKol: TFloatField
FieldName = 'MinKol'
Precision = 9
end
object tIzlazVrsta: TSmallintField
FieldName = 'Vrsta'
end
object tIzlazVPC: TFloatField
FieldName = 'VPC'
Precision = 9
end
object tIzlazKolicina: TFloatField
FieldName = 'Kolicina'
Precision = 9
end
end
object tAtomi: TMyTable
DatabaseName = 'Global'
IndexFieldNames = 'PAKUNG;KOLICINA'
MasterFields = 'PAKUNG;ATOM'
MasterSource = sStavke
TableName = 'ATOMI.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 379
Top = 89
object tAtomiPakung: TIntegerField
FieldName = 'Pakung'
end
object tAtomiKolicina: TFloatField
FieldName = 'Kolicina'
Precision = 9
end
end
object tImeRobe: TMyTable
DatabaseName = 'Global'
IndexFieldNames = 'Roba;Govor'
MasterFields = 'Code;Govor'
MasterSource = sRoba
TableName = 'IME_ROBE.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 432
Top = 131
object tImeRobeRoba: TIntegerField
FieldName = 'Roba'
end
object tImeRobeGovor: TIntegerField
FieldName = 'Govor'
end
object tImeRobeNaziv: TStringField
FieldName = 'Naziv'
OnGetText = tImeRobeNazivGetText
Size = 60
end
end
object tArtikl2: TMyTable
BeforePost = SifArtD_BP
DatabaseName = 'Global'
IndexFieldNames = 'PARTNER;CODE'
MasterFields = 'JA;Code'
MasterSource = sRoba
TableName = 'SIF_ROBE.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 326
Top = 89
object tArtikl2Partner: TIntegerField
FieldName = 'Partner'
end
object tArtikl2Sifra: TStringField
FieldName = 'Sifra'
Size = 40
end
object tArtikl2Code: TIntegerField
FieldName = 'Code'
end
object tArtikl2Naziv: TStringField
FieldName = 'Naziv'
Size = 60
end
object tArtikl2Proizvodi: TIntegerField
FieldName = 'Proizvodi'
end
object tArtikl2Grupa: TIntegerField
FieldName = 'Grupa'
end
object tArtikl2PodGrupa: TIntegerField
FieldName = 'PodGrupa'
end
object tArtikl2Amortizacija: TIntegerField
FieldName = 'Amortizacija'
end
object tArtikl2Revalorizacija: TIntegerField
FieldName = 'Revalorizacija'
end
object tArtikl2Otkup: TStringField
FieldName = 'Otkup'
Size = 1
end
object tArtikl2Items: TIntegerField
FieldName = 'Items'
Visible = False
end
end
object tRoba: TMyTable
AutoCalcFields = False
OnCalcFields = tRobaCalcFields
DatabaseName = 'Global'
IndexFieldNames = 'Code'
MasterFields = 'Code'
MasterSource = sArtikl
TableName = 'ROBA.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 8
Top = 215
object tRobaCode: TAutoIncField
FieldName = 'Code'
end
object tRobaProizvodi: TIntegerField
FieldName = 'Proizvodi'
end
object tRobaNaziv: TStringField
FieldName = 'Naziv'
Size = 60
end
object tRobaTarifaPoreza: TIntegerField
FieldName = 'TarifaPoreza'
end
object tRobaTarifaCarine: TIntegerField
FieldName = 'TarifaCarine'
end
object tRobaVrsta: TIntegerField
FieldName = 'Vrsta'
end
object tRobaJedMj: TIntegerField
FieldName = 'JedMj'
end
object tRobaPakiranje: TIntegerField
FieldName = 'Pakiranje'
end
object tRobaBarKod: TStringField
FieldName = 'BarKod'
Size = 13
end
object tRobaTezina: TFloatField
FieldName = 'Tezina'
Precision = 9
end
object tRobaBezbojno: TBooleanField
FieldName = 'Bezbojno'
end
object tRobaJa: TIntegerField
FieldName = 'Ja'
Visible = False
Calculated = True
end
object tRobaGovor: TIntegerField
FieldName = 'Govor'
Calculated = True
end
object tRobaItems: TIntegerField
FieldName = 'Items'
end
end
object tArtikl: TMyTable
BeforePost = SifArt_BP
DatabaseName = 'Global'
IndexFieldNames = 'PARTNER;CODE'
MasterFields = 'JA;ARTIKL'
MasterSource = sStavke
TableName = 'SIF_ROBE.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 273
Top = 89
object tArtiklPartner: TIntegerField
FieldName = 'Partner'
end
object tArtiklSifra: TStringField
FieldName = 'Sifra'
Size = 40
end
object tArtiklCode: TIntegerField
FieldName = 'Code'
end
object tArtiklNaziv: TStringField
FieldName = 'Naziv'
Size = 60
end
object tArtiklProizvodi: TIntegerField
FieldName = 'Proizvodi'
end
object tArtiklItems: TIntegerField
FieldName = 'Items'
Visible = False
end
end
object tImeBoje: TMyTable
DatabaseName = 'Global'
IndexFieldNames = 'Boja;Govor'
MasterFields = 'Code;Govor'
MasterSource = sBoja
TableName = 'IME_BOJA.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 379
Top = 131
object tImeBojeBoja: TIntegerField
FieldName = 'Boja'
end
object tImeBojeGovor: TIntegerField
FieldName = 'Govor'
end
object tImeBojeNaziv: TStringField
FieldName = 'Naziv'
OnGetText = tImeBojeNazivGetText
Size = 60
end
end
object tBoje2: TMyTable
BeforePost = SifBojeD_BP
DatabaseName = 'Global'
IndexFieldNames = 'PARTNER;PROIZVODI;CODE'
MasterFields = 'Ja;Proizvodi;Code'
MasterSource = sBoja
TableName = 'SIF_BOJA.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 8
Top = 131
object tBoje2Partner: TIntegerField
FieldName = 'Partner'
end
object tBoje2Proizvodi: TIntegerField
FieldName = 'Proizvodi'
end
object tBoje2Sifra: TStringField
FieldName = 'Sifra'
Size = 40
end
object tBoje2Code: TIntegerField
FieldName = 'Code'
end
object tBoje2Naziv: TStringField
FieldName = 'Naziv'
Size = 60
end
object tBoje2Items: TIntegerField
FieldName = 'Items'
Visible = False
end
end
object tBoja: TMyTable
AutoCalcFields = False
OnCalcFields = tBojaCalcFields
DatabaseName = 'Global'
IndexFieldNames = 'Code'
MasterFields = 'Code'
MasterSource = sBoje
TableName = 'BOJE.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 432
Top = 89
object tBojaCode: TAutoIncField
FieldName = 'Code'
end
object tBojaProizvodi: TIntegerField
FieldName = 'Proizvodi'
end
object tBojaNaziv: TStringField
FieldName = 'Naziv'
Size = 60
end
object tBojaGovor: TIntegerField
FieldName = 'Govor'
Calculated = True
end
object tBojaJa: TIntegerField
FieldName = 'Ja'
Calculated = True
end
object tBojaItems: TIntegerField
FieldName = 'Items'
Visible = False
end
end
object tBoje: TMyTable
BeforePost = SifBoje_BP
DatabaseName = 'Global'
IndexFieldNames = 'PARTNER;PROIZVODI;CODE'
MasterFields = 'JA;PROIZVODI;BOJA'
MasterSource = sStavke
TableName = 'SIF_BOJA.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 485
Top = 89
object tBojePartner: TIntegerField
FieldName = 'Partner'
end
object tBojeProizvodi: TIntegerField
FieldName = 'Proizvodi'
end
object tBojeSifra: TStringField
FieldName = 'Sifra'
Size = 40
end
object tBojeCode: TIntegerField
FieldName = 'Code'
end
object tBojeNaziv: TStringField
FieldName = 'Naziv'
Size = 60
end
object tBojeItems: TIntegerField
FieldName = 'Items'
Visible = False
end
end
object tPakung: TMyTable
DatabaseName = 'Global'
IndexFieldNames = 'Jedinica;Code'
MasterFields = 'JedMj;Pakiranje'
MasterSource = sRoba
TableName = 'PAKUNG.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 273
Top = 173
object tPakungCode: TAutoIncField
FieldName = 'Code'
end
object tPakungJedinica: TIntegerField
FieldName = 'Jedinica'
end
object tPakungSifra: TStringField
FieldName = 'Sifra'
Size = 40
end
object tPakungMinKolicina: TFloatField
FieldName = 'MinKolicina'
Precision = 9
end
object tPakungImaAtoma: TBooleanField
FieldName = 'ImaAtoma'
end
object tPakungCijene: TFloatField
FieldName = 'Cijene'
Precision = 9
end
end
object tMjere: TMyTable
DatabaseName = 'Global'
IndexFieldNames = 'Jedinica;Govor'
MasterFields = 'Code;Govor'
MasterSource = sJedinice
TableName = 'MJERE.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 167
Top = 173
object tMjereJedinica: TIntegerField
FieldName = 'Jedinica'
end
object tMjereGovor: TIntegerField
FieldName = 'Govor'
end
object tMjereNaziv: TStringField
FieldName = 'Naziv'
OnGetText = tMjereNazivGetText
Size = 60
end
end
object tJedinice: TMyTable
AutoCalcFields = False
OnCalcFields = tJediniceCalcFields
DatabaseName = 'Global'
IndexFieldNames = 'CODE'
MasterFields = 'JEDMJ'
MasterSource = sStavke
TableName = 'JEDINICE.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 8
Top = 173
object tJediniceCode: TAutoIncField
FieldName = 'Code'
end
object tJediniceSifra: TStringField
FieldName = 'Sifra'
Size = 40
end
object tJediniceGovor: TIntegerField
FieldName = 'Govor'
Calculated = True
end
end
object tCijene2: TMyTable
DatabaseName = 'Lokal'
IndexFieldNames = 'ARTIKL;BOJA;MINKOL;VPC'
MasterFields = 'ARTIKL;BOJA;MINKOL;CIJENAX'
MasterSource = sStavke
TableName = 'CIJENE.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 167
Top = 131
object tCijene2Artikl: TIntegerField
FieldName = 'Artikl'
end
object tCijene2Boja: TIntegerField
FieldName = 'Boja'
end
object tCijene2MinKol: TFloatField
FieldName = 'MinKol'
end
object tCijene2VPC: TFloatField
DisplayWidth = 10
FieldName = 'VPC'
end
object tCijene2Kolicina: TFloatField
DisplayLabel = 'Zaliha'
DisplayWidth = 10
FieldName = 'Kolicina'
end
end
object tCeneRobe: TMyTable
DatabaseName = 'Lokal'
IndexFieldNames = 'Roba;Boja;MinKol;Valuta'
TableName = 'CENEROBE.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = True
FreeToDelete = True
FreeToInsert = True
Left = 61
Top = 131
object tCeneRobeRoba: TIntegerField
FieldName = 'Roba'
end
object tCeneRobeBoja: TIntegerField
FieldName = 'Boja'
end
object tCeneRobeMinKol: TFloatField
FieldName = 'MinKol'
Precision = 9
end
object tCeneRobeValuta: TIntegerField
FieldName = 'Valuta'
end
object tCeneRobeCijena: TFloatField
FieldName = 'Cijena'
Precision = 9
end
object tCeneRobeRabat: TFloatField
FieldName = 'Rabat'
Precision = 9
end
object tCeneRobeRabatI: TFloatField
FieldName = 'RabatI'
Precision = 9
end
object tCeneRobeRabat2: TFloatField
FieldName = 'Rabat2'
Precision = 9
end
object tCeneRobeRabat2I: TFloatField
FieldName = 'Rabat2I'
Precision = 9
end
object tCeneRobeVPC: TFloatField
FieldName = 'VPC'
Precision = 9
end
end
object tPosta: TMyTable
DatabaseName = 'Global'
IndexFieldNames = 'Code'
MasterFields = 'Posta'
MasterSource = sPart
TableName = 'POSTA.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 485
Top = 173
object tPostaCode: TAutoIncField
FieldName = 'Code'
end
object tPostaSifra: TStringField
FieldName = 'Sifra'
Size = 40
end
object tPostaZemlja: TIntegerField
FieldName = 'Zemlja'
end
object tPostaBroj: TIntegerField
FieldName = 'Broj'
end
end
object tPart: TMyTable
DatabaseName = 'Global'
IndexFieldNames = 'Code'
MasterFields = 'Partner'
MasterSource = sPartner
TableName = 'PARTNER.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 326
Top = 173
object tPartNaziv: TStringField
FieldName = 'Naziv'
Visible = False
Size = 80
end
object tPartMjesto: TStringField
FieldName = 'Mjesto'
Visible = False
Size = 40
end
object tPartUlicaBroj: TStringField
FieldName = 'UlicaBroj'
Visible = False
Size = 60
end
object tPartCode: TAutoIncField
FieldName = 'Code'
end
object tPartSifra: TStringField
FieldName = 'Sifra'
Size = 40
end
object tPartPosta: TIntegerField
FieldName = 'Posta'
end
object tPartItems: TIntegerField
FieldName = 'Items'
end
end
object tPartner: TMyTable
DatabaseName = 'Lokal'
IndexFieldNames = 'Partner'
MasterFields = 'LOKACIJA'
MasterSource = sSkladiste
TableName = 'SIF_PART.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 432
Top = 173
object tPartnerPartner: TIntegerField
FieldName = 'Partner'
end
object tPartnerDobavljac: TStringField
FieldName = 'Dobavljac'
Size = 1
end
object tPartnerDrzava: TStringField
FieldName = 'Drzava'
Visible = False
Size = 1
end
object tPartnerUgovRabat2: TFloatField
FieldName = 'UgovRabat2'
Visible = False
Precision = 9
end
object tPartnerRokPlacanja2: TSmallintField
FieldName = 'RokPlacanja2'
Visible = False
end
object tPartnerVeceKolicine2: TBooleanField
FieldName = 'VeceKolicine2'
Visible = False
end
object tPartnerSifra: TStringField
FieldName = 'Sifra'
Size = 40
end
object tPartnerGovor: TIntegerField
FieldName = 'Govor'
end
object tPartnerItems: TIntegerField
FieldName = 'Items'
end
object tPartnerPoOrgJed: TBooleanField
FieldName = 'PoOrgJed'
end
end
object tCijeneX: TMyTable
DatabaseName = 'Lokal'
IndexFieldNames = 'Artikl;Boja;MinKol'
MasterFields = 'ARTIKL;BOJA;MINKOL'
MasterSource = sStavke
TableName = 'CIJENEX.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 220
Top = 131
object tCijeneXArtikl: TIntegerField
FieldName = 'Artikl'
end
object tCijeneXBoja: TIntegerField
FieldName = 'Boja'
end
object tCijeneXMinKol: TFloatField
FieldName = 'MinKol'
end
object tCijeneXKolicina: TFloatField
DisplayLabel = 'Zaliha'
DisplayWidth = 10
FieldName = 'Kolicina'
end
end
object xGlava: TMyTable
DatabaseName = 'Lokal2'
IndexFieldNames = 'Code'
TableName = 'IFE2.DB'
AutoOpen = False
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 300
Top = 220
object xGlavaBrojIFE: TIntegerField
FieldName = 'BrojIFE'
end
object xGlavaCode: TIntegerField
FieldName = 'Code'
end
object xGlavaKnjizeno: TStringField
FieldName = 'Knjizeno'
Size = 1
end
object xGlavaDatumKnj: TDateField
FieldName = 'DatumKnj'
end
object xGlavaKupac: TIntegerField
FieldName = 'Kupac'
end
object xGlavaOrgJedKup: TIntegerField
FieldName = 'OrgJedKup'
end
object xGlavaSkladiste: TIntegerField
FieldName = 'Skladiste'
end
object xGlavaOrgJed: TIntegerField
FieldName = 'OrgJed'
end
object xGlavaSifreDobavljaca: TBooleanField
FieldName = 'SifreDobavljaca'
end
object xGlavaDatumDok: TDateField
FieldName = 'DatumDok'
end
object xGlavaRacunBr: TStringField
FieldName = 'RacunBr'
Size = 50
end
object xGlavaOtpremnicaBr: TStringField
FieldName = 'OtpremnicaBr'
Size = 50
end
object xGlavaZahtjevnicaBr: TStringField
FieldName = 'ZahtjevnicaBr'
Size = 50
end
object xGlavaDatumDVO: TDateField
FieldName = 'DatumDVO'
end
object xGlavaRokPlacanja: TSmallintField
FieldName = 'RokPlacanja'
end
object xGlavaVrijednost: TFloatField
FieldName = 'Vrijednost'
end
object xGlavaVPVrijednost: TFloatField
FieldName = 'VPVrijednost'
end
object xGlavaTrosakDirekt: TBooleanField
FieldName = 'TrosakDirekt'
end
object xGlavaKontoTroska: TIntegerField
FieldName = 'KontoTroska'
end
object xGlavaKontoTroskaD: TIntegerField
FieldName = 'KontoTroskaD'
end
object xGlavaStopaTroska: TFloatField
FieldName = 'StopaTroska'
end
object xGlavaTransport: TFloatField
FieldName = 'Transport'
end
object xGlavaOstaliTroskovi: TFloatField
FieldName = 'OstaliTroskovi'
end
object xGlavaTransportNaKonto: TFloatField
FieldName = 'TransportNaKonto'
end
object xGlavaTransportNaRobu: TFloatField
FieldName = 'TransportNaRobu'
end
object xGlavaOstaloNaKonto: TFloatField
FieldName = 'OstaloNaKonto'
end
object xGlavaOstaloNaRobu: TFloatField
FieldName = 'OstaloNaRobu'
end
object xGlavaRabatIznos: TBooleanField
FieldName = 'RabatIznos'
end
object xGlavaImaRabat2: TBooleanField
FieldName = 'ImaRabat2'
end
object xGlavaRabat2Kolicina: TBooleanField
FieldName = 'Rabat2Kolicina'
end
object xGlavaVeceKolicine: TBooleanField
FieldName = 'VeceKolicine'
end
object xGlavaIstiRabat: TBooleanField
FieldName = 'IstiRabat'
end
object xGlavaRabat1: TFloatField
FieldName = 'Rabat1'
end
object xGlavaRabat2: TFloatField
FieldName = 'Rabat2'
end
object xGlavaRabatMod: TBooleanField
FieldName = 'RabatMod'
end
object xGlavaPodesiCijenu: TBooleanField
FieldName = 'PodesiCijenu'
end
object xGlavaPodesiVPC: TBooleanField
FieldName = 'PodesiVPC'
end
end
object xStavke: TMyTable
DatabaseName = 'Lokal2'
IndexFieldNames = 'BROJIFE;STAVKA'
MasterFields = 'Code'
MasterSource = sxGlava
TableName = 'IFE2S.DB'
AutoOpen = False
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 340
Top = 220
object xStavkeBrojIFE: TIntegerField
FieldName = 'BrojIFE'
end
object xStavkeStavka: TSmallintField
FieldName = 'Stavka'
end
object xStavkeArtikl: TIntegerField
FieldName = 'Artikl'
end
object xStavkeBoja: TIntegerField
FieldName = 'Boja'
end
object xStavkeAtom: TFloatField
FieldName = 'Atom'
end
object xStavkeMinKol: TFloatField
FieldName = 'MinKol'
end
object xStavkeProizvodi: TIntegerField
FieldName = 'Proizvodi'
end
object xStavkePakung: TIntegerField
FieldName = 'Pakung'
end
object xStavkeJedMj: TIntegerField
FieldName = 'JedMj'
end
object xStavkeOpis: TStringField
FieldName = 'Opis'
Size = 40
end
object xStavkeKolicina: TFloatField
FieldName = 'Kolicina'
end
object xStavkeCijenaX: TFloatField
FieldName = 'CijenaX'
end
object xStavkeXKol: TFloatField
FieldName = 'XKol'
end
object xStavkeCijena: TFloatField
FieldName = 'Cijena'
end
object xStavkeVrijednost: TFloatField
FieldName = 'Vrijednost'
end
object xStavkeRabat: TFloatField
FieldName = 'Rabat'
end
object xStavkeRabatI: TFloatField
FieldName = 'RabatI'
end
object xStavkeRabat2: TFloatField
FieldName = 'Rabat2'
end
object xStavkeRabat2I: TFloatField
FieldName = 'Rabat2I'
end
object xStavkeRabatV: TFloatField
FieldName = 'RabatV'
end
object xStavkeVPCijena: TFloatField
FieldName = 'VPCijena'
end
object xStavkeVPVrijednost: TFloatField
FieldName = 'VPVrijednost'
end
end
object tCodes: TMyTable
DatabaseName = 'Lokal'
IndexFieldNames = 'Code'
MasterFields = 'Code'
MasterSource = sGlava
TableName = 'CODES.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = True
FreeToDelete = True
FreeToInsert = True
Left = 273
Top = 131
object tCodesCode: TAutoIncField
FieldName = 'Code'
end
object tCodesKnjizeno: TStringField
FieldName = 'Knjizeno'
Size = 1
end
object tCodesVrsta: TSmallintField
FieldName = 'Vrsta'
end
object tCodesBroj: TIntegerField
FieldName = 'Broj'
end
end
object tStavke: TMyTable
AfterPost = tStavkeAfterPost
BeforeDelete = tStavkeBeforeDelete
AfterDelete = tStavkeAfterDelete
OnCalcFields = tStavkeCalcFields
OnNewRecord = tStavkeNewRecord
DatabaseName = 'Lokal'
IndexFieldNames = 'BROJIFE;STAVKA'
MasterFields = 'Code'
MasterSource = sGlava
TableName = 'IFE2S.DB'
OnNewLastRecord = tStavkeNewLastRecord
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 114
Top = 215
object tStavkeBrojIFE: TIntegerField
FieldName = 'BrojIFE'
Visible = False
end
object tStavkeStavka: TSmallintField
DisplayWidth = 6
FieldName = 'Stavka'
end
object tStavkeArtikl: TIntegerField
FieldName = 'Artikl'
Visible = False
end
object tStavkeBoja: TIntegerField
FieldName = 'Boja'
Visible = False
end
object tStavkeAtom: TFloatField
FieldName = 'Atom'
Visible = False
end
object tStavkeMinKol: TFloatField
FieldName = 'MinKol'
Visible = False
OnGetText = tStavkeMinKolGetText
end
object tStavkeProizvodi: TIntegerField
FieldName = 'Proizvodi'
Visible = False
end
object tStavkePakung: TIntegerField
FieldName = 'Pakung'
Visible = False
end
object tStavkeJedMj: TIntegerField
FieldName = 'JedMj'
Visible = False
end
object tStavkeOpis: TStringField
DisplayLabel = '�ifra'
DisplayWidth = 20
FieldName = 'Opis'
Size = 40
end
object tStavkeKolicina: TFloatField
DisplayLabel = 'Koli�ina'
FieldName = 'Kolicina'
end
object tStavkeCijenaX: TFloatField
FieldName = 'CijenaX'
Visible = False
end
object tStavkeXKol: TFloatField
FieldName = 'XKol'
Visible = False
end
object tStavkeCijena: TFloatField
FieldName = 'Cijena'
Visible = False
end
object tStavkeVrijednost: TFloatField
FieldName = 'Vrijednost'
Visible = False
end
object tStavkeRabat: TFloatField
FieldName = 'Rabat'
Visible = False
end
object tStavkeRabatI: TFloatField
FieldName = 'RabatI'
Visible = False
end
object tStavkeRabat2: TFloatField
FieldName = 'Rabat2'
Visible = False
end
object tStavkeRabat2I: TFloatField
FieldName = 'Rabat2I'
Visible = False
end
object tStavkeRabatV: TFloatField
FieldName = 'RabatV'
Visible = False
end
object tStavkeVPCijena: TFloatField
DisplayLabel = 'VPC'
FieldName = 'VPCijena'
end
object tStavkeVPVrijednost: TFloatField
DisplayLabel = 'VP Vrijednost'
DisplayWidth = 14
FieldName = 'VPVrijednost'
end
object tStavkeVPS: TSmallintField
FieldName = 'VPS'
Visible = False
Calculated = True
end
object tStavkeMjesto: TStringField
FieldName = 'Mjesto'
Visible = False
Size = 1
Calculated = True
end
object tStavkeJA: TIntegerField
FieldName = 'JA'
Visible = False
Calculated = True
end
end
object tGlava: TMyTable
AutoCalcFields = False
BeforePost = tGlavaBeforePost
AfterPost = tGlavaAfterPost
BeforeDelete = tGlavaBeforeDelete
OnCalcFields = tGlavaCalcFields
OnNewRecord = tGlavaNewRecord
DatabaseName = 'Lokal'
IndexFieldNames = 'BROJIFE'
TableName = 'IFE2.DB'
OnNewLastRecord = tGlavaNewLastRecord
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 326
Top = 131
object tGlavaKnjizeno: TStringField
DisplayLabel = 'K'
FieldName = 'Knjizeno'
Size = 1
end
object tGlavaBrojIFE: TIntegerField
DisplayLabel = 'Izdatnica br.'
FieldName = 'BrojIFE'
end
object tGlavaCode: TIntegerField
FieldName = 'Code'
Visible = False
end
object tGlavaDatumKnj: TDateField
DisplayLabel = 'Knji�eno'
FieldName = 'DatumKnj'
end
object tGlavaKupac: TIntegerField
FieldName = 'Kupac'
Visible = False
end
object tGlavaOrgJedKup: TIntegerField
FieldName = 'OrgJedKup'
Visible = False
end
object tGlavaSkladiste: TIntegerField
FieldName = 'Skladiste'
Visible = False
end
object tGlavaOrgJed: TIntegerField
FieldName = 'OrgJed'
Visible = False
end
object tGlavaSifreDobavljaca: TBooleanField
FieldName = 'SifreDobavljaca'
Visible = False
end
object tGlavaDatumDok: TDateField
DisplayLabel = 'Datum dok.'
FieldName = 'DatumDok'
end
object tGlavaRacunBr: TStringField
DisplayLabel = 'Revers broj'
DisplayWidth = 15
FieldName = 'RacunBr'
Size = 50
end
object tGlavaOtpremnicaBr: TStringField
DisplayLabel = 'Otpremnica broj'
DisplayWidth = 20
FieldName = 'OtpremnicaBr'
Visible = False
Size = 50
end
object tGlavaZahtjevnicaBr: TStringField
DisplayLabel = 'Zahtjevnica broj'
DisplayWidth = 15
FieldName = 'ZahtjevnicaBr'
Size = 50
end
object tGlavaDatumDVO: TDateField
DisplayLabel = 'Datum DVO'
FieldName = 'DatumDVO'
end
object tGlavaRokPlacanja: TSmallintField
DisplayLabel = 'RP'
DisplayWidth = 2
FieldName = 'RokPlacanja'
end
object tGlavaVrijednost: TFloatField
FieldName = 'Vrijednost'
Visible = False
end
object tGlavaVPVrijednost: TFloatField
DisplayLabel = 'Vrijednost reversa'
DisplayWidth = 17
FieldName = 'VPVrijednost'
end
object tGlavaTrosakDirekt: TBooleanField
FieldName = 'TrosakDirekt'
Visible = False
OnChange = KolikoNaKonto
end
object tGlavaKontoTroska: TIntegerField
FieldName = 'KontoTroska'
Visible = False
end
object tGlavaKontoTroskaD: TIntegerField
FieldName = 'KontoTroskaD'
Visible = False
end
object tGlavaStopaTroska: TFloatField
FieldName = 'StopaTroska'
Visible = False
end
object tGlavaTransport: TFloatField
FieldName = 'Transport'
Visible = False
OnChange = KolikoNaKonto
end
object tGlavaOstaliTroskovi: TFloatField
FieldName = 'OstaliTroskovi'
Visible = False
OnChange = KolikoNaKonto
end
object tGlavaTransportNaKonto: TFloatField
FieldName = 'TransportNaKonto'
Visible = False
end
object tGlavaTransportNaRobu: TFloatField
FieldName = 'TransportNaRobu'
Visible = False
end
object tGlavaOstaloNaKonto: TFloatField
FieldName = 'OstaloNaKonto'
Visible = False
end
object tGlavaOstaloNaRobu: TFloatField
FieldName = 'OstaloNaRobu'
Visible = False
end
object tGlavaRabatIznos: TBooleanField
FieldName = 'RabatIznos'
Visible = False
end
object tGlavaImaRabat2: TBooleanField
FieldName = 'ImaRabat2'
Visible = False
end
object tGlavaRabat2Kolicina: TBooleanField
FieldName = 'Rabat2Kolicina'
Visible = False
end
object tGlavaVeceKolicine: TBooleanField
FieldName = 'VeceKolicine'
Visible = False
end
object tGlavaIstiRabat: TBooleanField
FieldName = 'IstiRabat'
Visible = False
end
object tGlavaRabat1: TFloatField
FieldName = 'Rabat1'
Visible = False
end
object tGlavaRabat2: TFloatField
FieldName = 'Rabat2'
Visible = False
end
object tGlavaRabatMod: TBooleanField
FieldName = 'RabatMod'
Visible = False
end
object tGlavaPodesiCijenu: TBooleanField
FieldName = 'PodesiCijenu'
Visible = False
end
object tGlavaPodesiVPC: TBooleanField
FieldName = 'PodesiVPC'
Visible = False
end
object tGlavaZEM: TStringField
FieldName = 'ZEM'
Visible = False
Size = 1
Calculated = True
end
object tGlavaVrsta: TSmallintField
FieldName = 'Vrsta'
Visible = False
Calculated = True
end
object tGlavaJA: TIntegerField
FieldName = 'JA'
Visible = False
Calculated = True
end
end
object xSkladiste: TMyTable
DatabaseName = 'Lokal2'
IndexFieldNames = 'Code'
TableName = 'SKLADIST.DB'
AutoOpen = False
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 185
Top = 219
object xSkladisteCode: TAutoIncField
FieldName = 'Code'
end
object xSkladisteZarada: TSmallintField
FieldName = 'Zarada'
end
object xSkladisteVP_Sklad: TIntegerField
FieldName = 'VP_Sklad'
end
end
object tPartner2: TMyTable
DatabaseName = 'Lokal'
IndexFieldNames = 'Partner'
TableName = 'SIF_PART.DB'
AutoOpen = True
AutoFlush = True
FreeToModify = False
FreeToDelete = True
FreeToInsert = True
Left = 432
Top = 219
object tPartner2Partner: TIntegerField
FieldName = 'Partner'
end
object tPartner2Tretman: TBooleanField
FieldName = 'Tretman'
end
object tPartner2UrabatIznos: TBooleanField
FieldName = 'UrabatIznos'
end
object tPartner2XrabatIznos: TBooleanField
FieldName = 'XrabatIznos'
end
object tPartner2UrabatVar: TBooleanField
FieldName = 'UrabatVar'
end
object tPartner2XrabatVar: TBooleanField
FieldName = 'XrabatVar'
end
object tPartner2UunosFV: TBooleanField
FieldName = 'UunosFV'
end
object tPartner2XunosFV: TBooleanField
FieldName = 'XunosFV'
end
object tPartner2UunosVPC: TBooleanField
FieldName = 'UunosVPC'
end
object tPartner2XunosVPC: TBooleanField
FieldName = 'XunosVPC'
end
object tPartner2XdatumDok: TBooleanField
FieldName = 'XdatumDok'
end
object tPartner2XdatumDVO: TBooleanField
FieldName = 'XdatumDVO'
end
object tPartner2XdatumValute: TBooleanField
FieldName = 'XdatumValute'
end
object tPartner2XrokPlacanja: TBooleanField
FieldName = 'XrokPlacanja'
end
object tPartner2Xotpremnica: TBooleanField
FieldName = 'Xotpremnica'
end
object tPartner2Xnarudzbenica: TBooleanField
FieldName = 'Xnarudzbenica'
end
object tPartner2Xtroskovi: TBooleanField
FieldName = 'Xtroskovi'
end
object tPartner2UpoDobavljacu: TBooleanField
FieldName = 'UpoDobavljacu'
end
object tPartner2XpoDobavljacu: TBooleanField
FieldName = 'XpoDobavljacu'
end
object tPartner2UnudiRabat: TBooleanField
FieldName = 'UnudiRabat'
end
object tPartner2XnudiRabat: TBooleanField
FieldName = 'XnudiRabat'
end
end
end