-------------------------------------------------------------------------------------------------------------------------------------

FUNCTION UpisBarKodaUNal_Fin()

Upisuje barkod u polje barkod u bazi Nal_fin Na bazi sadraja polja barkod u bazi kol_dat
-------------------------------------------------------------------------------------------------------------------------------------

FUNCTION RasporediSredstvoRadniku()

Svakom proknjienim sredstvu kome nije pridruen radnik dodeljuje ifru 71
funkcija se moe primeniti samo u Agenciji VIDEOKOM jer se sva sredstva vode na radnika 71
--------------------------------------------------------------------------------------------------------------------------------------

FUNCTION DodajTarifuSredstvu()

Funkcija svakom proknjienim sredstvu kome nije pridruena tarifa automatski dodaje tarifu
funkcija se moe primeniti  kod svih korisnika
--------------------------------------------------------------------------------------------------------------------------------------

FUNCTION UpisiMarzuArtikala()

Funkcija koja upisuje % mare iz baze nal_mat (kalkulacija) u bazu kol_dat kod artikala
--------------------------------------------------------------------------------------------------------------------------------------

FUNCTION KolDatIzdvojiAktivne()

Izdvoja sve aktivne slogove iz baze KOL_DAT a koja je aktivna za vie korisnika tako sto u polje
URADJEN upisuje *
--------------------------------------------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------------------------------------------

FUNCTION KolDatNovaSifra()

Funkcija prepravlja samo zajednike baze KOL_DAT i otvara polja za nove sifre
--------------------------------------------------------------------------------------------------------------------------------------

FUNCTION PresifrirajKnjizenjaRobu()

Izvrava se posle funkcije KOLDATNOVASIFRA()  vri preifriranje robe po bazama 
AUTOKNJI,CENOVNIK,FINAN,NAL_FIN,NAL_MAT,NIVELAC,NIVE_MAT,OTP_MAT,
PORUCENO,PREDRAC,PRODAJAS,SALDA,STAV_PRO
--------------------------------------------------------------------------------------------------------------------------------------

FUNCTION PreSifrirajKolDat()

Izvrava se polse funkcije PRESIFRIRAJKNJIZENJAROBU()
Preifrira bazu kol_dat sa staih na nove sifre 
Po izvrenju funkcije potrebno je uraditi arhive i sinhronizaciju ,rekonstrukciju i svoenje stanja konta 
za sve korisnike i sve godine
--------------------------------------------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------------------------------------------

FUNCTION Izm_tar()

Menja tarifnu grupu i stopu poreza . Umesto jedne tarife i stope poreza upisuje kroz baze 
KOL_ unesenu tarifu i stopu poreza.
Iz baza prvo u pomonu bazu uita sve razliite tarife i stope poreza a zatim se za svaku unosi nova
tarifa i stopa poreza
--------------------------------------------------------------------------------------------------------------------------------------

FUNCTION ISP(nStaraStopa,nNovaStopa)

Menja Stopu poreza.
--------------------------------------------------------------------------------------------------------------------------------------

FUNCTION PopuniBazuSaNabavnimCenama()

FORMIRANJE BAZE SA NABAVNIM CENAMA
iz kalkulacija cita nabavne cene u upisuje u bazu NAB_CEN
--------------------------------------------------------------------------------------------------------------------------------------

FUNCTION IBN() 

Izmena Broja Naloga
Unosi se stari  i novi broj naloga
--------------------------------------------------------------------------------------------------------------------------------------

FUNCTION IDN() 

Izmena Datuma Naloga
Unosi se broj naloga stari datum i novi datum
--------------------------------------------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------------------------------------------

FUNCTION OvlascenaLica(msif)

Ovlaena lica Iz baze OVL_LICA podatke upisuje u bazu KOR_DAT i bazu KLIJENTI
--------------------------------------------------------------------------------------------------------------------------------------

FUNCTION ISR() 

Izmena Sifre Robe unosi se stara i nova sifra
--------------------------------------------------------------------------------------------------------------------------------------

Function UpisPartneraNaKontu()

Upisuje partnera u polje partner za konto na bazi podatka o pratneru na drugom kontu i broju naloga
NPR: U konto 13400 se upisuje partner na bazi sadraja polja partner za konto 43500 i broja naloga
--------------------------------------------------------------------------------------------------------------------------------------

UpisGrupeITarifeUNal_Fin()
Upisuje grupu i tarifu koje se nalaze u sve KOL_DAT u bazu NAL_FIN 
--------------------------------------------------------------------------------------------------------------------------------------

Function OznaciNeaktivnuRobu()
Upisije u polje DUPLI_NAZ u bazi KOL_DAT upisuje "Ne" ako ne postoje knjiienja za robu
--------------------------------------------------------------------------------------------------------------------------------------

Function SkiniOznakuNeaktivnuRobu()
Upisije u polje DUPLI_NAZ u bazi KOL_DAT upisuje "  " RESETUJE ONAENU ROBE IZ 
FUNKCIJE  OznaciNeaktivnuRobu()
--------------------------------------------------------------------------------------------------------------------------------------

Function Ms_Replace(nDataBase,nOrder,cFiledName,xWith,bFor)
replace polje nDataBase=Broj Npr.3 Nal_Fin
Primer: Ms_Replace(3,-1,'Konto','21100   ',"konto='20400   '")
Objanjenje otvara bazu NAL_FIN bez indeksa u polje konto upisuje 21100 ako je sadraj polja konto 20400
 --------------------------------------------------------------------------------------------------------------------------------------

Function Ms_Delete(nDataBase,nOrder,bFor)
brise slog baze podataka
Primer: Ms_Delete(3,-1,"konto='20400   '")
Objanjenje otvara bazu NAL_FIN bez indeksa brise slog ako je sadraj polja konto 20400
 --------------------------------------------------------------------------------------------------------------------------------------

Function DC_BATCH('test.dcb',Date(),Time())
Function DC_BatchNewThread('test.dcb')
izvrsava komande iz fajla sa extenzijom DCB RADI KAO INTERPRETER 
Primer: Test.dcb
	open_dbf(3,.f.,0)
	set index to
	DbGoTop()
	REPLACE KONTO_S WITH "123" for .not. eof()
	DbCloseAll()
	msgbox("gotovo")

 --------------------------------------------------------------------------------------------------------------------------------------
Function UcinakOperatera()
broji stavke knjienja kroz finasijski nalog za sve operatere koji su ikada radili sa programom
 --------------------------------------------------------------------------------------------------------------------------------------
 --------------------------------------------------------------------------------------------------------------------------------------
Function Izdvojiaktivnurobu()
 Funkcija treba da izdvoji sve aktivne slogove iz baze KOL_DAT a koja je aktivna za jednog korisnika
sva roba koja je znaena sa Ne treba da bude brisana
UPOZORENJE : 	Ako je baza KOL_DAT zajednika za vie godina mora da se baza postavi na novi 
		direktorijum i da vai samo za tekuu i sledee godine a da se ne koristi za predho
		dne godine..   Autor
OBAVETENJE:	U polje DUPLI_NAZ se upisuje Da Ako je roba ima knjienje
				a Ne Ako nema knjienje za uneti period.
				Po zavretku rada sa ovom funkcijom i brisanja nepotrebnih podataka 
				pokrenite funkciju ISPRAZNIDUPLI_NAZ()da bi se u polje DUPLI_NAZ 
				upisale blanko pozicije.
				Autor
--------------------------------------------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------------------------------------------------------
Function ISPRAZNIDUPLI_NAZ()
				Funkcija u bazi KOL_DAT u polje DUPLI_NAZ upisuje blanko pozicije.
				Autor
--------------------------------------------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------------------------------------------------------
Function ObrisiNeaktivnuRobu()
				Funkcija u bazi KOL_DAT oznaava za brisanje slogove koji u polju DUPLI_NAZ
				imaju upisan sadraj Ne to znai da su Neaktivni.
				Autor
--------------------------------------------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------------------------------------------------------
Function PresifriranjeRobe()
				VRSI PREIFRIANJE ROBE ZA POJEDINOG KORISNIKA
				PRE OVE FUNKCIJE SKLONITE ROBU KOJA NEMA KNJIENJE
				U TEKUOJ GODINI 
				FUNKCIJAMA Izdvojiaktivnurobu() i ObrisiNeaktivnuRobu()

--------------------------------------------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------------------------------------------
Function UpisGrupeITarifeUNal_Fin()
				Program uzima grupu i tarifu iz baze koliinskih 
				konta i upisuje ih u bazu NAL_FIN (u knjienja)
--------------------------------------------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------------------------------------------------------
Function PSO()
				Program menja ifru OBJEKTA KNJIENJE I SKRAUJE JE NA DUINU 3 
				uzima vrednost polja objekat i pretvara u karakter 01 u 001 Npr. strzero(Val(cObjekt),3)
--------------------------------------------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------------------------------------------------------
Function ObjekatOstalaAdrMleko()
				Program menja objekat 00 kod OTKUPA MLEKA za ostala adresna konta i iz baze ADR_DATO
				41 ita adresni konto iz polja izj uzima objekat i upisuje ga u bazu nal_fin.dbf
				zatim to isto odradi i u bazi FINAN.dbf

--------------------------------------------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------------------------------------------------------
Function  BrisiPovuceneRezervacije(cDokRezervacije)
				Funkcija brie dugovnu stranu kod rezervacija koje su odpremljene 
				Kad se povue rezervacija povlai se samo potrana strana a dugovna ostaje da visi
				ovim se briu slogovi koji vise na dugovnoj strani 
				Funkcija radi samo u sluaju kad su povuene cele rezervacije
--------------------------------------------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------------------------------------------------------
DNEVNA_PRODAJA_IZ_NAL_FIN()
				Funkcija koja kreira fajlove za dnevnu prodaju iz NAL_FIN baze.
				Funkcija radi u slucaju kada se desi da nije kreiran fajl za dnevnu prodaju
				pa se on naknadno kreira direktno iz NAL_FIN 
--------------------------------------------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------------------------------------------------------
UDATEPOPDV()
				Funkcija koja UPDATE baze DOK_DAT.DBF DEFINISI.DBF i KPLAN.DBF
				na direktorijumu GLAVNI+"\"+"NOVI_PDV" mora da budu smestene baze
				sa novim podacima 
--------------------------------------------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------------------------------------------------------
NapuniBazuSEMEKONT() Funkcija puni bazu seme kontiranaj iz ranijih devinicija
--------------------------------------------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------------------------------------------------------
PopuniDokKolKon() Funkcija popunjava baze Dok_kol,dok_koli,dok_kolo,dok_kols tarifom,j_mer,grupa,porez,inv_br
--------------------------------------------------------------------------------------------------------------------------------------

POPUNIBAZUJEDIMERE()

--------------------------------------------------------------------------------------------------------------------------------------
BrisiFajloveOperatera(.f.)
				Ako se posalje parametar .t. obrisae privremene fajlove svih operatera
				Ako se posalje parametar .F. mogue je brisanje baza prijavljenog operatera
--------------------------------------------------------------------------------------------------------------------------------------

ROBMATPRO="F" Fiskalni rauno mesto stolova (bata,ank. tersaa

----------------------------------------------------------------------------------------------------------------------------------------

Function IzdvojiaktivnePartnere()			Izdvajanje poslovnih partnera iz zajednicke baze ADR_DAT .

-----------------------------------------------------------------------------------------------------------------------------------
FUNCTION PromeniTekstUIniFajlu(cNazivIniFajla,cGrupa_u_IniFajlu,cPolje_u_iniFajlu,cStariSadrzaj,cNoviSadrzaj)
				*Primer
				*Sadraj ini fajla 
				*cNazivIniFajla=OPENDBF.INI
				*cGrupa_u_IniFajlu:=[FILEPLACE]
				*cPolje_u_iniFajlu=DOK_DAT
				*cStariSadrzaj=(Yes),(No),(KPLAN15),(TEKUCI)
				*cNoviSadrzaj=(Yes),(No),(KPLAN19),(TEKUCI)
				*Funcija=PromeniTekstUIniFajlu("OPENDBF.INI","FILEPLACE","DOK_DAT","(Yes),(No),(KPLAN15),(TEKUCI)","(Yes),(No),(KPLAN19),(TEKUCI)")

 -----------------------------------------------------------------------------------------------------------------------------------
FUNCTION PreusmeravanjeStampe()

				Funkcija preusmerava stampu kod restoranskog reima rada sa svakog raunara
				Grupa je definisana za stmpu na lokalnom printeru .Ako je umrezeno vise raunara
				potrebno je da se preusmeri tampa na mreni tampa sa raunara na mrei

 -----------------------------------------------------------------------------------------------------------------------------------

FUNCTION BNC("dokument","konto","Objekt","DoDatuma") Altenativni

-----------------------------------------------------------------------------------------------------------------------------------

FUNCTION PopuniKonta_VrstKol()
				Funkcija popunjava konto1 do konto10 u bazi kol_dat
				kontima koja su uneta u bazi vrstakol


-----------------------------------------------------------------------------------------------------------------------------------
FUNCTION IsprazniDatumeProiz_i_Knjizenja()
				Funkcija prazni polja  PROIZ_LIST ,KNJIZENO u njih upisuje prazan datum
				Zbog povlaenja prijemnice ova polja se popune pa je pre proizvodnje potrebno 
				da se ova polja izprazne da bi mogla da se uradi automatska proizvodnja od 
				datuma do datuma.


-----------------------------------------------------------------------------------------------------------------------------------




