mojaSymfonia FORUM
https://forum.mix-soft.pl/

Id Kontrahenta na dokumencie Sprzedaży
https://forum.mix-soft.pl/viewtopic.php?f=15&t=7475		 Strona 1 z 1
Autor:  borgrapid [ 2016-10-14, 00:57 ]
Tytuł:  Id Kontrahenta na dokumencie Sprzedaży
Witam serdecznie.

Dodałem do raportu Eksport e-Faktury następujący kod :

Kod:
int sub MiejsceOdbioruTowaru()
   

    Eksport.PoczatekPodsekcji( "MiejsceOdbioru" )
     
    Eksport.Pole("odkodpocz", basDK.GetField ("odkodpocz" ) )
    Eksport.Pole("odid", (Using "%l", basDK.GetField("odid")))
    Eksport.Pole("odkod", basDK.GetField("odkod"))
   
    basKH.SetKey("id")
    basKH.SetKeySeg( "id", 65665 )

    Eksport.Pole("IdOdbiorcy",  basKH.GetField("poledod1"))

   
    Eksport.KoniecSekcji()

endsub


Ładnie eksportuje mi się kod odbiorcy z dokumentu sprzedaży, ale w Polu IdOdbiorcy zawsze pokazuje mi się id Nabywcy mimo iż tutaj na siłę wskazuje jakiegoś kontrahenta z bazy po id to tak jakby nie brał on tego id pod uwagę. Czy ktoś może mi powiedzieć gdzie robię błąd? Chciałbym z dokumentu handlowego odwołać się do kontrahenta, który jest odbiorcą i wyświetlić jego dane zawarte w polu "poledod1"
Autor:  borgrapid [ 2016-10-15, 00:19 ]
Tytuł:  Re: Id Kontrahenta na dokumencie Sprzedaży
Witam serdecznie,

Po głębszej analizie problemu znalazłem rozwiązanie.
Jestem początkującym w raportach i może rozwiązanie nie jest eleganckie ale najważniejsze że działa. Oto mój kod: (Brakowało 3 linijek w środku)
Kod:
    Eksport.PoczatekPodsekcji( "MiejsceOdbioru" )
    Eksport.Pole("odkodpocz", basDK.GetField ("odkodpocz" ) )
    Eksport.Pole("odid", (Using "%l", basDK.GetField("odid")))
    Eksport.Pole("odkod", basDK.GetField("odkod"))
   
    long IDKH = basDK.GetField("odid")
    baseKH kh
    kh.GetRecById(IDKH)

    Eksport.Pole("ILNOdbiorcy",(kh.GetField("poledod1")))
    Eksport.KoniecSekcji()
Autor:  kpiotr [ 2016-10-17, 11:21 ]
Tytuł:  Re: Id Kontrahenta na dokumencie Sprzedaży
Jeszcze pozwolę sobie wskazać, gdzie dokładnie był błąd:
Kod:
    basKH.SetKey("id")
    basKH.SetKeySeg( "id", 65665 )

    basKH.GetRec(EQ) // TUTAJ

    Eksport.Pole("IdOdbiorcy",  basKH.GetField("poledod1"))


Ustawiłeś segment, ale nie rozkazałeś mu wyszukać kontrahenta.
Tak na przyszłość, jakbyś kiedyś (a zapewne będziesz) musiał szukać po kluczu innym niż id.
Autor:  borgrapid [ 2016-10-21, 21:27 ]
Tytuł:  Re: Id Kontrahenta na dokumencie Sprzedaży
Bardzo dziękuję za pomoc:)
Strona 1 z 1 Strefa czasowa UTC+1godz. [letni]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/