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

Symfonia - Problem ze strukturą InfoDok
https://forum.mix-soft.pl/viewtopic.php?f=15&t=4718		 Strona 2 z 2
Autor:  wrob [ 2013-02-22, 02:43 ]
Tytuł:  Re: Symfonia - Problem ze strukturą InfoDok
poz3,4,5 mozesz nie wypełniać pozatym w integracji dziala prościej bo mozna i tak jak podales i uzywajac tez .konto="210-1"
Autor:  matrix-1990 [ 2013-02-22, 17:04 ]
Tytuł:  Re: Symfonia - Problem ze strukturą InfoDok
a masz może dokumentacje do metod dla BKontrahent? Lub w jaki sposób dodać rekord? Bo próbowałem i za pomocą

Kod:
AddNew()...Save() i Edit()...Save()


ale udało mi się tylko albo wyedytowac kontrahenta albo wyszukać
Autor:  matrix-1990 [ 2013-02-25, 13:47 ]
Tytuł:  Re: Symfonia - Problem ze strukturą InfoDok
@UP
podbijam wątek, czy ktoś mógłby pomóc mi ze wstawieniem nowego kontrahenta? męczę się już 3 dni na różne strony i nie idzie :<
Autor:  wrob [ 2013-02-26, 15:01 ]
Tytuł:  Re: Symfonia - Problem ze strukturą InfoDok
Kod:
dispatch xKontrahent = xFactory.NewObject("BKontrahent")
err = xKontrahent.Edit()
if err then error "Bee"
xKontrahent.UstawKod("nowykth")
xKontrahent.nazwa = "nowykth spzoo"
err = xKontrahent.Save()
if err then
  xKontrahent.Undo()
  error "bee"
else
  message "ok"
  error ""
endif
Autor:  matrix-1990 [ 2013-03-01, 13:40 ]
Tytuł:  Re: Symfonia - Problem ze strukturą InfoDok
działa, dzięki wielkie!!!
narazie dzięki twoim postom mam wszystko co jest potrzebne do ruszenia z moim projektem :)
Autor:  michalkurzak [ 2021-10-13, 14:02 ]
Tytuł:  Re: Symfonia - Problem ze strukturą InfoDok
Hej :)
Stary temat, ale czy ktoś ma przykład jak stworzyć Transakcję przez strukturę InfoDok?
Autor:  grzes [ 2024-02-22, 03:21 ]
Tytuł:  Re: Symfonia - Problem ze strukturą InfoDok
witam.

Podbije temat, ustawianie nowej transakcji dla zapisów dodanych przez infodok-a

czy komuś się to udało?


z góry dziękuje za pomoc.
Autor:  rafal [ 2024-02-22, 09:55 ]
Tytuł:  Re: Symfonia - Problem ze strukturą InfoDok
fragment standardowego raportu FK (nota.sci) dodający nową transakcję
Kod:
[...]
int sub NewZapis()
   if !dokument then NewDokument()

   //zapis po WN
   Clear( bZap)
   SetField( bZap, "id", 0)
   SetField( bZap, "idDlaRozliczen", idDlaRozliczen += 1)
   SetField( bZap, "dokument", idDok)
   SetField( bZap, "pozycja", pozycjaDok += 1)
   SetField( bZap, "rozbicie", 0)
   SetField( bZap, "typopisu", 1)
   SetField( bZap, "nrRozbKP", 3)
   SetField( bZap, "kwota", ValFmt(Kwota(Odsetki.zl)))
   SetField( bZap, "strona", 0)
   SetField( bZap, "dataOkr", dataokrDlaNoty())
   SetField( bZap, "opis", "odsetki " + nazwaDok)
   SetField( bZap, "synt", GetField( bTra, "synt"))
   SetField( bZap, "poz1", GetField( bTra, "poz1"))
   SetField( bZap, "poz2", GetField( bTra, "poz2"))
   SetField( bZap, "poz3", GetField( bTra, "poz3"))
   SetField( bZap, "poz4", GetField( bTra, "poz4"))
   SetField( bZap, "poz5", GetField( bTra, "poz5"))
   InsRec( bZap)
    BaseError( bZap, 4)

   //nowa transakcja
   Clear( bTrab)
   SetField( bTrab, "Id", 0)
   SetField( bTrab, "transNoty", idTra)
   SetField( bTrab, "synt", GetField( bTra, "synt"))
   SetField( bTrab, "poz1", GetField( bTra, "poz1"))
   SetField( bTrab, "poz2", GetField( bTra, "poz2"))
   SetField( bTrab, "poz3", GetField( bTra, "poz3"))
   SetField( bTrab, "poz4", GetField( bTra, "poz4"))
   SetField( bTrab, "poz5", GetField( bTra, "poz5"))
   SetField( bTrab, "baza", GetField( bTra, "baza"))
   SetField( bTrab, "kontrahent", idKth)
   SetField( bTrab, "pozycja", idKth)
   SetField( bTrab, "strona", 0)
   SetField( bTrab, "data", notaData)
   SetField( bTrab, "dataOkr", dataokrDlaNoty())
   SetField( bTrab, "dataOstat", notaData)
   SetField( bTrab, "dSkrot", GetField( bBuf, "skrot"))
   SetField( bTrab, "dNumer", GetField( bBuf, "numer"))
   SetField( bTrab, "dSymbol", GetField( bBuf, "nazwa"))
   SetField( bTrab, "bufor", 1)
   SetField( bTrab, "pozNum", GetField( bZap, "idDlaRozliczen"))
   SetField( bTrab, "dokId", idDok)
   SetField( bTrab, "dokRok", IndeksRoku())
   SetField( bTrab, "kwota", ValFmt(Kwota((Odsetki.zl*cnt))))
    SetField( bTrab, "doRozlZl", ValFmt(Kwota((Odsetki.zl*cnt))))
   SetField( bTrab, "orgStrona", 0)

   //Termin platnosci dla nowego dokumentu z odsetkami.
   //#9543,#9544
   DateExt d
   d.fromStr( notaData )
   d.Add( settingsTerminPlatnosci() )
   SetField( bTrab, "termin", d.toStr() )

   InsRec( bTrab)
    BaseError( bTrab, 4)
[...]
Strona 2 z 2 Strefa czasowa UTC+1godz. [letni]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/