Mam zakup wewnątrzwspólnotowy który księguje w dwóch rożnych programach, i aby tego uniknąć chce zrobić aby z mojego programu można było wyeksportować dane do R2księga ale zaczymałem się na jednym etapie i nie wiem jak sobie z tym poradzić.
Przykładowy kod eksportu:
Kod: Zaznacz cały
A *********************************************************
RW N - Wewn.nab.tow.
Waluta EUR
Kurs 4.1461 30-01-18 021/A/NBP/2018
KursV 4.1461 30-01-18 021/A/NBP/2018
VPLN 1
VNPD
D 31-01-18
T 31-01-18
T2 31-01-18
E 31-01-18
N 5test
B
TZ
K Firma30
n
Nazwa NazwaA
Ulica UlicaA
NrDom 111
NrLok 222
Kod 33333
Miejsc Miejsc
Poczta Miejsc
d aaaaaa@$%bbbbbbbbb@$%ccccccccc
u
p FR00000000000
kr 8
Z
O Zakup
X 10 10000.00 23 2300.00 12300.
PLA 10000.00 31-01-18 Gotówka 10000.00 31-01-18 EUR
WPLA 2411.91 4.1461
Y ---------------------------------------------------------
Większość działa jak należy za wyjątkiem jednej rzeczy a dokładnie kursu waluty. Czy jest możliwość importu dokumentu bez kursu waluty lub bez potrzeby jej wpisywania, tak aby program księgowy sam pobrał sobie dane.
Jak chce dodać pozycję gdzie kurs mam podany :
Kod: Zaznacz cały
Kurs 4.1461 30-01-18 021/A/NBP/2018
Kurs 4.1461 30-01-18 021/A/NBP/2018
Gdy dam
Kod: Zaznacz cały
Kurs 4.1461
Kurs 4.1461
A gdy usunę tylko tabelę1.
Linia: 4, kontrahent: , nr dow.:
'' is not a valid date
Kod: Zaznacz cały
Kurs 4.1461 30-01-18
Kurs 4.1461 30-01-18
1.
Linia: 4, kontrahent: , nr dow.:
Kurs z tego dnia już istnieje.
Kurs z tego dnia już istnieje.
Call stack:
WalutyData.TdtmWaluty.CheckUniqueDate
WalutyData.TdtmWaluty.tblWalutyPozBeforePost
Data.DB.TDataSet.DoBeforePost
RADOTables.RADOTable.DoBeforePost
Data.DB.TDataSet.DataEvent
Data.DB.TDataSet.Post
RADOTables.RADOTable.Post
Data.DB.TDataSet.CheckBrowseMode
Data.Win.ADODB.TCustomADODataSet.LocateRecord
Data.Win.ADODB.TCustomADODataSet.Lookup
Data.DB.TField.CalcLookupValue
Data.DB.TDataSet.CalculateFields
RADOTables.RADOTable.CalculateFields
Data.DB.TDataSet.GetCalcFields
Data.Win.ADODB.TCustomADODataSet.InternalGetRecord
Data.Win.ADODB.TCustomADODataSet.GetRecord
Data.DB.TDataSet.GetRecord
Data.DB.TDataSet.GetNextRecord
Data.DB.TDataSet.GetNextRecords
Data.DB.TDataSet.SetBufferCount
Z uwagi na to iż ten kurs psuje mi mój import, jak to najlepiej obejść bez podawania daty tego kursu ewentualnie czy da się zrobić import tak abym mógł podać kwotę w € a program R2księga sam pobierze kurs i przeliczy na złotówki całość ?