Posty bez odpowiedzi |oraz Aktywne tematy Dzisiaj jest 2024-03-28, 15:05x



Odpowiedz w temacie  [ Posty: 4 ] 
Import z pliku problem 
Autor Wiadomość

Rejestracja: 2011-08-26, 12:51
Posty: 29
Post Import z pliku problem
Witam,
Po aktualizacji FK do najnowszej wersji mam problem z wczytywaniem dokumentów
a dokładniej wyciągu bankowego nie zaczytuje się kontrahent samo tylko konto

#format "SDF"

Section("", "dokument")
{
rex([1],"{?}{?}")
if(equal(@rex1,"K"))
{
def( "KontoKasy", "100-1" )
$klucz = "RK"
$obslugujJak= "RK"
}
else
{
def( "KontoKasy", "130-1" )
$klucz = "RB"
$obslugujJak= "RB"
}

$nazwa = "X"
$tresc = "Raport kasowy"
rex([5], "{????}{??}{??}")

@ldt=cat(@rex1,"-",@rex2,"-","31")
$datadok = Date(@ldt)
$dataokr = Date(@ldt)
$dataoper = Date(@ldt)
$kontoKasy = def( "KontoKasy" )

$dSkrot=$obslugujJak
Exit()
@poz = 0

Def("break","")
while(! Def("break") ){
Def("issomething","")
section( "", "", "" )
{
Def("issomething","x")
MakeSec( "zapis")
{
$strona = 0
$kwota = Money([43])

//bez prefiksu 'FS ' lub 'PA '
rex([37],"{???}{*}$")
$numerDok = @rex2

rex([5], "{????}{??}{??}")
$opis = cat( [7], "-", [37], " ", Date(cat(@rex1,"-",@rex2,"-",@rex3)) )


$typOpisu = 1
$pozycja=@@poz
$rozbicie=0
rex([5], "{????}{??}{??}")
$dataKPKW=Date(cat(@rex1,"-",@rex2,"-",@rex3))

rex([1],"{?}{?}")
if(equal(@rex2,"W"))
{
rex([37],"{???}")
switch (@rex1)
{
case "PA "
$konto = cat("201-2-1-",[57])
break

case "KPA"
$konto = cat("201-2-1-",[57])
break

case "FS "
$konto = cat("201-2-1-",[57])
break

case "KFS"
$konto = cat("201-2-1-",[57])
break

case else
$konto = cat("202-2-1-",[57])
}

$kontoRap=0

MakeSec("rozliczenie")
{
rex([37],"{???}{*}$")
$dSymbol = @rex2
$kwota = [43]
$ustawowe = 1
$zaliczka = 0
}
}
else
{
$konto = def( "KontoKasy" )
$kontoRap=1
}
}

MakeSec( "zapis")
{
$strona = 1
$kwota = Money([43])

//bez prefixu
rex([37],"{???}{*}$")
$numerDok = @rex2

rex([5], "{????}{??}{??}")
$opis = cat( [7], "-", [37], " ", Date(cat(@rex1,"-",@rex2,"-",@rex3)) )

$typOpisu = 1
$pozycja=@@poz
$rozbicie=1

rex([5], "{????}{??}{??}")
$dataKPKW=Date(cat(@rex1,"-",@rex2,"-",@rex3))

rex([1],"{?}{?}")
if(equal(@rex2,"W"))
{
$konto = def( "KontoKasy" )
$kontoRap = 1
}
else
{
rex([37],"{???}")
switch (@rex1)
{
case "PA "
$konto = cat("201-2-1-",[57])
break

case "KPA"
$konto = cat("201-2-1-",[57])
break

case "FS "
$konto = cat("201-2-1-",[57])
break

case "KFS"
$konto = cat("201-2-1-",[57])
break

case else
$konto = cat("202-2-1-",[57])
}

$kontoRap = 0

MakeSec("rozliczenie")
{
rex([37],"{???}{*}$")
$dSymbol = @rex2
$kwota = [43]
$ustawowe = 1
$zaliczka = 0
}
}

}

@@poz=sum2(@@poz,1)

}
if ( ! Def("issomething","") )
{
Def("break","abc")
}
}
}


2016-02-05, 13:18
Wyświetl profil
Autor Wiadomość
 


Ekspert
Ekspert

Rejestracja: 2007-11-16, 15:08
Posty: 3982
Pomógł: 445
Post Re: Import z pliku problem
Skontaktuj się z Ekspertem w celu umówienia sposobu dostarczenia szablonu i pliku do importu do diagnozy.

_________________
Skontaktuj się z Ekspertem | Zamów dodatek

tel. 22 7 538 538
ekspert@mojaSymfonia.pl
http://www.mojaSymfonia.pl


2016-02-05, 14:29
Wyświetl profil
Ekspert
Ekspert
Awatar użytkownika

Rejestracja: 2009-03-07, 11:13
Posty: 597
Pomógł: 34
Post Re: Import z pliku problem
Wersja 2016 zjadła profil importu? Możliwe, że nie odtworzyłeś go dokładnie. W podanym przez Ciebie pliku nie ma wczytywania kontrahentów. Musiałoby być coś w stylu
Kod:
Section("", "Kontrahent")
albo
Kod:
MakeSec("Kontrahent")
. Ewentualnie
Kod:
include
.


2016-02-08, 13:34
Wyświetl profil

Rejestracja: 2011-08-26, 12:51
Posty: 29
Post Re: Import z pliku problem
pierw wczytuje dokumenty a potem wyciąg i w tym pierwszym pliku jest takie coś tak MakeSec("Kontrahent")
może coś sage zmieniła że to przystało działać tylko co ?

#format "SDF"

Section("", "dokument")
{
rex([1],"{?}{?}")
if(equal(@rex1,"K"))
{
def( "KontoKasy", "100-1" )
$klucz = "RK"
$obslugujJak= "RK"
}
else
{
def( "KontoKasy", "130-1" )
$klucz = "RB"
$obslugujJak= "RB"
}

$nazwa = "X"
$tresc = "Raport kasowy"
rex([5], "{????}{??}{??}")

@ldt=cat(@rex1,"-",@rex2,"-","31")
$datadok = Date(@ldt)
$dataokr = Date(@ldt)
$dataoper = Date(@ldt)
$kontoKasy = def( "KontoKasy" )

$dSkrot=$obslugujJak
Exit()
@poz = 0

Def("break","")
while(! Def("break") ){
Def("issomething","")
section( "", "", "" )
{
Def("issomething","x")
MakeSec( "zapis")
{
$strona = 0
$kwota = Money([43])

//bez prefiksu 'FS ' lub 'PA '
rex([37],"{???}{*}$")
$numerDok = @rex2

rex([5], "{????}{??}{??}")
$opis = cat( [7], "-", [37], " ", Date(cat(@rex1,"-",@rex2,"-",@rex3)) )


$typOpisu = 1
$pozycja=@@poz
$rozbicie=0
rex([5], "{????}{??}{??}")
$dataKPKW=Date(cat(@rex1,"-",@rex2,"-",@rex3))

rex([1],"{?}{?}")
if(equal(@rex2,"W"))
{
rex([37],"{???}")
switch (@rex1)
{
case "PA "
$konto = cat("201-2-1-K",[57])
break

case "KPA"
$konto = cat("201-2-1-K",[57])
break

case "FS "
$konto = cat("201-2-1-K",[57])
break

case "KFS"
$konto = cat("201-2-1-K",[57])
break

case else
$konto = cat("202-2-1-K",[57])
}

$kontoRap=0

MakeSec("rozliczenie")
{
rex([37],"{???}{*}$")
$dSymbol = @rex2
$kwota = [43]
$ustawowe = 1
$zaliczka = 0
}
}
else
{
$konto = def( "KontoKasy" )
$kontoRap=1
}
}

MakeSec( "zapis")
{
$strona = 1
$kwota = Money([43])

//bez prefixu
rex([37],"{???}{*}$")
$numerDok = @rex2

rex([5], "{????}{??}{??}")
$opis = cat( [7], "-", [37], " ", Date(cat(@rex1,"-",@rex2,"-",@rex3)) )

$typOpisu = 1
$pozycja=@@poz
$rozbicie=1

rex([5], "{????}{??}{??}")
$dataKPKW=Date(cat(@rex1,"-",@rex2,"-",@rex3))

rex([1],"{?}{?}")
if(equal(@rex2,"W"))
{
$konto = def( "KontoKasy" )
$kontoRap = 1
}
else
{
rex([37],"{???}")
switch (@rex1)
{
case "PA "
$konto = cat("201-2-1-K",[57])
break

case "KPA"
$konto = cat("201-2-1-K",[57])
break

case "FS "
$konto = cat("201-2-1-K",[57])
break

case "KFS"
$konto = cat("201-2-1-K",[57])
break

case else
$konto = cat("202-2-1-K",[57])
}

$kontoRap = 0

MakeSec("rozliczenie")
{
rex([37],"{???}{*}$")
$dSymbol = @rex2
$kwota = [43]
$ustawowe = 1
$zaliczka = 0
}
}

}

@@poz=sum2(@@poz,1)

}
if ( ! Def("issomething","") )
{
Def("break","abc")
}
}
}


2016-02-08, 14:25
Wyświetl profil
Wyświetl posty nie starsze niż:  Sortuj wg  
Odpowiedz w temacie   [ Posty: 4 ] 
   Podobne tematy   Autor   Odpowiedzi   Odsłony   Ostatni post 
Na tym forum nie ma nowych nieprzeczytanych postów. Import danych z pliku do FK przez Import Specialny

w Programy Księgowe

vlad_korobka

1

4403

2015-07-06, 22:33

wrob Wyświetl najnowszy post

Na tym forum nie ma nowych nieprzeczytanych postów. Import danych z pliku

w Programowanie

sebastianl84

11

5062

2012-01-17, 01:00

leonek Wyświetl najnowszy post

Na tym forum nie ma nowych nieprzeczytanych postów. Import WNT z pliku

w Techniczne

kadamowi

1

2454

2017-09-09, 15:56

rafal Wyświetl najnowszy post

Na tym forum nie ma nowych nieprzeczytanych postów. import z pliku do WNT MK

w Programowanie

tamthoi

0

2164

2018-04-18, 17:16

tamthoi Wyświetl najnowszy post



Kto jest online

Użytkownicy przeglądający to forum: Nie ma żadnego zarejestrowanego użytkownika i 24 gości


Nie możesz tworzyć nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz dodawać załączników

Szukaj:
Przejdź do:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group.
Support forum phpbb by phpBB Assistant