*!*		Am adaugat coloana X34 in xact cu valoarea "id_jtva_coloana" si coloana X34 in XNOTE.

Set Deleted On
Set Century On
Set Date Dmy
Set Ansi On
Set Exact On
Set Date Dmy
Set Safety Off
Set Exclusive Off
Close Databases

lcDir = [D:\ROA_Branch\ROACONT\COMUN\datemenu\]
lcXnote = lcDir + [xnote.dbf]
Use (lcXnote) In 0 Shared

Select Distinct x21,x34 From xnote Into Cursor crsrezumat
Select crsrezumat
Browse

Select xnote
Replace x34 With [id_jnetax] For x21 = [neimpozab]
Replace x34 With [id_jtax] For Inlist(x21,[pnBazaFactura],[pnBazaNir],[pnBazaVanz],[pnDiscount],[totftva])
Replace x34 With [id_jtva] For Inlist(x21,[pnTvaDiscount],[pnTvaFactura],[pnTvaNir],[pnTvaVanzIn],[pnTvaVanzOut],[tottva])

Select Distinct x21,x34 From xnote Into Cursor crsrezumat
Select crsrezumat
Browse

Use In xnote
Use In crsrezumat