procedure inifiles
	set exclusive on
  ccale="\gestprod"
*  ccale="\tt"
  carti="arti.dbf" &&
*  crepre=ccale+"\repre.dbf"
  crepre="client.dbf" &&
  ccfisc="BONCLI.dbf" && bonuri consum
  clcfisc="lBC.dbf" &&
  cfou="fourni.dbf" &&
*  cgest=ccale+"\gestiuni.dbf"
  ccli="client.dbf" &&
  cnir="blfou.dbf" && recptii
  clnir="lblf.dbf" &&
  cFISCF="CFISCF.dbf" && CHITANTE FURNIZOR
  clFISCF="lCFISCF.dbf"
  cnt="notetran.dbf" && note transfer
  clnt="lnt.dbf" &&
  cachit="achit.dbf"
  cnP="notaPRED.dbf" && note transfer
  clnP="lnP.dbf" &&
  CORD="xordfab.dbf"
  curm="urm_dvi.dbf"
  cxecr2nc="xecr2nc.dbf"
  cxecr2="xecr2.dbf"
  cxecr1="xecr1.dbf"
  cfac="faccli.dbf" && facturi
  clfac="lfacc.dbf" &&
  cfaci="facimp.dbf" && facturi
  clfaci="lfaci.dbf" &&
  cFISCC="CFISCC.dbf" && CHITANTE CLIENTI
  clFISCC="lCFISCC.dbf" &&
  cmisc="mvtsto.dbf"
sele 1
	USE &carti ALIAS arti exclusive
	zap
SELE 3
	USE &ccfisc ALIAS comcli exclusive
 	zap
	USE &clcfisc ALIAS lcomc  exclusive
	zap
SELE 3
	USE &cfiscC ALIAS comcli exclusive
 	zap
	USE &clfiscC ALIAS lcomc  exclusive
	zap
SELE 3
	USE &cfiscF ALIAS comcli exclusive
 	zap
	USE &clfiscF ALIAS lcomc  exclusive
	zap

sele 25
	USE &cmisc ALIAS misc  exclusive
	zap
sele 8
		USE &cnt ALIAS nir exclusive
		zap
		USE &clnt ALIAS lnir exclusive
		zap
sele 8
		USE &cnP ALIAS nir exclusive
		zap
		USE &clnP ALIAS lnir exclusive
		zap
sele 8
		USE &cnir ALIAS nir exclusive
		zap
		USE &clnir ALIAS lnir exclusive
		zap
sele 10
		USE &ccli ALIAS cli exclusive
		zap
		USE &cFOU ALIAS cli exclusive
		zap
sele 11
		USE &cfac ALIAS fac exclusive
		zap
		USE &clfac ALIAS lfac exclusive
		zap		
sele 11
		USE &cfaci ALIAS fac exclusive
		zap
		USE &clfaci ALIAS lfac exclusive
		zap		

sele 11
        use &CORD alias ord
		zap
		use &curm alias urm
		zap
sele 12
		USE &cACHIT 
		ZAP
sele 12
		use  &cxecr2nc alias nc
		zap
		use &cxecr2 alias nc
		zap
		use &cxecr1 alias nc
		zap

return