*!* 01.04.2009
*!* marius.mutu
*!* xsets, xitems... de pe server in loc din executabil

*!* 27.05.2011
*!* marius.mutu
*!* creare cursor cparteneriemail pentru addressbook la trimitere email din listare cu foxypreviewer
	
**********************************************************
PROCEDURE update_nomenclator

	*!*	DO update_coresp_tip_part
	*!*	DO update_coresp_tip_cont
	DO update_lunilean

	*** tabele meniu deschise din proiect
	LOCAL lcCaleDateMenu

	lcCaleDateMenu=gcAppPath+[\COMUN\DATEMENU\]

	IF !USED('MILA1')
		USE &lcCaleDateMenu.MILA1 IN 0 ALIAS MILA1
	ENDIF
	
*!*		IF !USED('XREQUEST')
*!*			USE &lcCaleDateMenu.XREQUEST IN 0 ALIAS XREQUEST
*!*		ENDIF
*!*		IF !USED('xitems')
*!*			USE &lcCaleDateMenu.xitems IN 0 ALIAS xitems
*!*		ENDIF
*!*	*!*		IF !USED('YACT')
*!*	*!*			USE &lcCaleDateMenu.YACT IN 0 ALIAS YACT
*!*	*!*		ENDIF
*!*		IF !USED('XSETS')
*!*			USE &lcCaleDateMenu.XSETS IN 0 ALIAS XSETS ORDER TAG ID_SET
*!*		ENDIF
*!*		IF !USED('xACT')
*!*			USE &lcCaleDateMenu.xACT IN 0 ALIAS xACT
*!*		ENDIF
*!*		IF !USED('xnote')
*!*			USE &lcCaleDateMenu.xnote IN 0 ALIAS xnote
*!*		ENDIF

	IF !USED('menu1')
		USE &lcCaleDateMenu.menu1 IN 0 ALIAS menu1 EXCL
	ENDIF

	IF !USED('INFISIERE')
		USE &lcCaleDateMenu.INFISIERE IN 0 ALIAS INFISIERE
	ENDIF

	IF !USED('nom_meniu')
		USE &lcCaleDateMenu.nom_meniu IN 0 ALIAS nom_meniu
	ENDIF

	IF !USED('refaceri')
		USE &lcCaleDateMenu.refaceri IN 0 ALIAS refaceri
	ENDIF

	IF !USED('tabela_fisa_cont')
		USE &lcCaleDateMenu.tabela_fisa_cont IN 0 ALIAS tabela_fisa_cont
	ENDIF
	
	*!* 06.06.2007
	*!* marius.mutu
	CREATE CURSOR dual (dummy c(10))
	INSERT INTO dual (dummy) VALUES ("")
	
	lnSucces = xdate() && xdate.prg
	IF m.lnSucces > 0
		*!* 27.05.2011
		lnSucces = update_parteneriemail() && updateserver.prg
		*!* 27.05.2011 ^
	ENDIF 

	IF m.lnSucces > 0
		llSucces = update_saft_taxtable()
		lnSucces = IIF(m.llSucces, 1, -1)
	ENDIF 	
	IF m.lnSucces > 0	
		llSucces = update_saft_mecanisme_plati()
		lnSucces = IIF(m.llSucces, 1, -1)		
	ENDIF 		
	RETURN lnSucces
ENDPROC && update_nomenclator