Użytkownicy Oprogramowania Humansoft

JuliusPL · Dołączył: 11 Mar 2016 Posty: 36 Przeczytał: 0 tematów Ostrzeżeń: 0/5

Korzystając ze stanu rozrachunków mamy informację o ile płatność dokumentu została przeterminowana, natomiast kiedy jest na terminie, parametr wyświetla 0.
Jak sprawić aby była wyświetlana informacja ile jeszcze zostało do terminu płatności np: -14 (czternaście dni do upłynięcia terminu płatności)?

JanuszHermesa

_data - TTOD(termin_pl)

JuliusPL · Dołączył: 11 Mar 2016 Posty: 36 Przeczytał: 0 tematów Ostrzeżeń: 0/5

Właśnie o to mi chodzi. Poniżej kod uwzględniający pozycje bez terminu płatności (PK, BW, itp)

JuliusPL · Dołączył: 11 Mar 2016 Posty: 36 Przeczytał: 0 tematów Ostrzeżeń: 0/5

Dzień dobry,
czy jest możliwość (ja nie znalazłem), aby w rozrachunkach/ stan rozrachunków dodawać komentarze do pozycji, które można by było później drukować wraz z zestawieniem.

Po co to: Robimy zestawienie, obdzwianiamy dłużników, i dobrze aby informacje gdzies umieszczać, że zapłaci za tydzień, albo nie odbiera itp itd

JanuszHermesa

Niestety hermessql nie dorobił się jeszcze notatek windykacyjnych.
Trzeba samemu je zrobić.
W wersji bardzo prostej wystarczy jedno pole tekstowe dodać do dok_rozr i funkcja pytaj opisana w SDK. Ale z doświadczenia wiem że po chwili to będzie ciut za mało tak że prosty formularz trzeba wykonać.

JuliusPL · Dołączył: 11 Mar 2016 Posty: 36 Przeczytał: 0 tematów Ostrzeżeń: 0/5

Dziękuję bardzo,
na tą chwilę to by mi wystarczyło, pole tekstowe i tyle.

Czy można liczyć na małą pomoc jak to zrealizować?

JanuszHermesa

poniższe rozwiązanie nie jest "ładne" estetycznie ani programistycznie, ale bardzo szybkie do realizacji.
Jeżeli komuś się przyda to proszę bardzo
1. zakładamy pole w bazie i w zależności od potrzeb za VARCHAR wpisujemy spodziewaną długość
alter table dok_rozr add qnot_wind varchar(max)
2. tworzymy funkcję użytkownika w hermesie na liście należności i zobowiązania i wklejamy co poniżej
lnid=id
lnrec=RECNO()
lcoldnotwind=wartoscpola("qnot_wind","dok_rozr","id",lnid,"")
lcNotatka = ALLTRIM(pytajtxt("Notatka windykacyjna", lcoldnotwind, "!", "") )
lccomm="update dok_rozr set qnot_wind='"+lcNotatka +"' where id="+STR(lnid)
mysqlexec(lccomm)
_screen.activeform.CntPozycje.grdPozycje.RefreshView()
GO lnRec
3. dodajemy do widoku/wydruku pole dok_rozr.qnot_wind

koniec

JuliusPL · Dołączył: 11 Mar 2016 Posty: 36 Przeczytał: 0 tematów Ostrzeżeń: 0/5

Dziękuje bardzo. Działa.
Faktycznie, formularz byłby bardziej czytelny.
Pole do edycji tekstu jest małe i brakuje przycisków typu Zapisz, Anuluj.