|
|
Strona 1 z 1
|
[ Posty: 7 ] |
|
[HMP] zakładanie kontrahenta
Autor |
Wiadomość |
maciek_ch
Rejestracja: 2009-01-07, 20:50 Posty: 22
|
[HMP] zakładanie kontrahenta
importując faktury potrzebuje zakładać nowych kontrahentów jednak Iorec nadal nie daje możliwości założenia kontrahenta jak go założyć z raportu ambasica?
szukam w dokumentacji i nie widzę, a na forum tylko stary wątek z 2013 roku
|
2018-01-05, 14:19 |
|
|
Autor |
Wiadomość |
Mix-soft.pl
|
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4000 Pomógł: 448
|
Re: [HMP] zakładanie kontrahenta
Za pomocą obiektu BKontrahent. W HMP ten obiekt też funkcjonuje.
|
2018-01-05, 15:04 |
|
|
maciek_ch
Rejestracja: 2009-01-07, 20:50 Posty: 22
|
Re: [HMP] zakładanie kontrahenta
ok, dziekuję ale czy jest jakiś manual do tego? manual do xFactory? próba uruchomienia Kod: string errKh dispatch xKontrahent = xFactory.NewObject("BKontrahent")
errKh = xKontrahent.Edit()
xKontrahent.UstawKod("AlaMaKota") xKontrahent.nazwa = "AlaMaKota Sp. z o.o."
errKh = xKontrahent.Save()
if errKh then xKontrahent.Undo() endif zwraca "obiekt OLE nie zostałe zainicjowany"
|
2018-01-06, 11:18 |
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4000 Pomógł: 448
|
Re: [HMP] zakładanie kontrahenta
Używałem tego w FKP (tam na 100% działa) i założyłem, że w HMP też to jest zaimplementowane.
Pozostaje pisanie bezpośrednio do bazy.
|
2018-01-06, 18:55 |
|
|
wojtek
Rejestracja: 2010-02-10, 21:24 Posty: 260 Pomógł: 4
|
Re: [HMP] zakładanie kontrahenta
Witam, Mam podobny problem.... Zakładanie kh akurat mi wychodzi - natomiast problem pojawia się przy podmianie kontrahenta na istniejącym dokumencie - EditSp(Ior) powoduje że na dokumencie kontrahent zamienia się z obecnie funkcjonującym ,ale na dokumencie zostają przeliczone ceny zgodnie z obowiącującym cennikiem :( Kod: while dokErr dokumId = GetLineId() sDokumId = using "%l",dokumId dk.setkey("id") dk.setkeyseg("id",dokumId) errDk= dk.GetRec(EQ)
if !errDk then
skhkod = dk.Getfield("khkod") skhnazwa = dk.Getfield("khnazwa") skhadres = dk.Getfield("khadres") skhdom = dk.Getfield("khdom") skhlokal = dk.Getfield("khlokal") skhmiasto = dk.Getfield("khmiasto") skhkodpocz = dk.Getfield("khkodpocz") skhnip = dk.Getfield("khnip")
// message skhnip IF !SprawdzKh(mid(skhnazwa,1,40),skhnip) then dodaj_kh(skhnazwa,skhadres,skhdom,skhlokal,skhmiasto,skhkodpocz, skhnip) else if skhnip != "" then KodKhDokument = PoprawNIP(skhnip) else KodKhDokument = mid(skhnazwa,1,40) endif endif
// if dk.dk.Getfield("subtypi") == 86 then
ior.clear() ior.SetField("id", sDokumId) //ior.SetField("bufor","1") //message KodKhDokument
ior.SetField("KhKod", KodKhDokument) Errorek = EditSp(ior) if Errorek then message using "%l",errorek // message "err" else print using "%s %l","Edytowano dok o id=",dokumId print lf endif else message "błąd otwarcia dokumentu" endif
dokErr = SetTaggedPos ( NX)
wend message "wykonano poprawnie" NoOutput() Czy da się tylko podmienić kontrahenta bez ruszania niczego innego na wystawionym dokumencie? Podczas ręcznej edycji dokumentu pojawia się pytanie o to czy przeliczyć ceny. Jak w IORec wybrać opcję nie przeliczania cen przy zamianie kontrrahenta?
|
2018-01-06, 20:25 |
|
|
wojtek
Rejestracja: 2010-02-10, 21:24 Posty: 260 Pomógł: 4
|
Re: [HMP] zakładanie kontrahenta
(1)
A tutaj funkcja do zakładania kh bezpośrednio do bazy - Pewnie się przyda: Kod: //----------------------------------------------------------------------------------- string sub dodaj_kh(string khnazwa,string khadres,string khdom,string khlokal,string khmiasto,string khkodpocz, string khnip) //-----------------------------------------------------------------------------------
basekh kh // kh.setkey("nip") // kh.setkeyseg("nip", PoprawNIP(num))
// kh.getrec(EQ) // if !kh.getrec(EQ) then // message "pusty NIP" // exit // else kh.setfield("id", 0) kh.setfield("flag", 0) kh.setfield("subtypi", 0) kh.setfield("typi", 0) kh.setfield("znaczniki", 0) kh.setfield("rodzaj", 3100) kh.setfield("katalog", 2100) kh.setfield("info", "0") kh.setfield("osoba", "") if khnip != "" then kh.setfield("kod", PoprawNIP(khnip) ) kh.setfield("nazwa", khnazwa ) KodKhDokument = PoprawNIP(khnip) else kh.setfield("kod", mid(khnazwa,1,40)) kh.setfield("nazwa", khnazwa) KodKhDokument = mid(khnazwa,1,40) endif kh.setfield("miejscowosc", khmiasto) kh.setfield("ulica", khadres) kh.setfield("dom", khdom) kh.setfield("lokal",khlokal) kh.setfield("kodpocz", khkodpocz) kh.setfield("regon", "") kh.setfield("pesel", "") kh.setfield("nip", khnip) kh.setfield("statusUE", 0) kh.setfield("idkraju", 5801) kh.setfield("tel1", "") kh.setfield("tel2", "") kh.setfield("fax", "") //kh.setfield("email", GetSubElem("Seller","email", plik)) kh.setfield("naglowek", "") kh.setfield("nazwisko", "") kh.setfield("imie", "") kh.setfield("idfk", 0) kh.setfield("idfk2", 0) kh.setfield("bnazwa", "") kh.setfield("bkonto", "") kh.setfield("grupaceni", 255) kh.setfield("upust", 0) kh.setfield("limiti", 0) kh.setfield("limitkwota", 0) kh.setfield("limitwaluta", "") kh.setfield("plattypi", 255) kh.setfield("plattermin", 0) kh.setfield("stanpl", 0) kh.setfield("stannl", 0) kh.setfield("khfk", "") kh.setfield("rejon", "") kh.setfield("formaplatn", 0) kh.setfield("typks", "Krajowy") kh.setfield("negoc", "0") kh.setfield("www", "") kh.setfield("wprowadzil", "") kh.setfield("datawpr", "") kh.setfield("zmodyfikowal", "") kh.setfield("datamod", "") kh.setfield("poledod1", "") kh.setfield("poledod2", "") kh.setfield("poledod3", "") kh.setfield("poledod4", "") kh.setfield("poledod5", "") kh.setfield("poledod6", "") kh.setfield("poledod7", "") kh.setfield("poledod8", "") kh.setfield("osfiz", 0) kh.setfield("zapas", "") kh.setfield("subtyp", "0") kh.setfield("typ", "0") kh.setfield("znacznik", "0") kh.setfield("grupacen","255") kh.setfield("plattyp","255") kh.setfield("limit", "0")
kh.insrec()
//message KodKhDokument + " 2" // endif endsub
|
2018-01-06, 20:28 |
|
|
maciek_ch
Rejestracja: 2009-01-07, 20:50 Posty: 22
|
Re: [HMP] zakładanie kontrahenta
działa bardzo dziękuję!
|
2018-01-07, 14:39 |
|
|
|
Strona 1 z 1
|
[ Posty: 7 ] |
|
Kto jest online |
Użytkownicy przeglądający to forum: Nie ma żadnego zarejestrowanego użytkownika i 13 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
|
|
|
|