email jest zapisany w danych kadrowych. Przykład pobrania
viewtopic.php?f=15&t=2839lub bezpośrednio z bazy danych
| mojaSymfonia FORUM https://forum.mix-soft.pl/ |
|
| adres e-mail z kartoteki pracownika https://forum.mix-soft.pl/viewtopic.php?f=15&t=6981 |
Strona 1 z 1 |
| Autor: | mlodszy2 [ 2016-01-04, 09:30 ] |
| Tytuł: | adres e-mail z kartoteki pracownika |
Witam, W jaki sposób można pobrać z kartoteki pracownika jego adres e-mail. Wiem jak wszystkie inne dane podać a e-maila nie mogę znaleźć w żadnym raporcie. Pozdrawiam |
|
| Autor: | rafal [ 2016-01-04, 11:30 ] |
| Tytuł: | Re: adres e-mail z kartoteki pracownika |
Jaki program? Chodzi o AmBasic? |
|
| Autor: | mlodszy2 [ 2016-01-04, 14:16 ] |
| Tytuł: | Re: adres e-mail z kartoteki pracownika |
tak, dokładnie |
|
| Autor: | rafal [ 2016-01-04, 15:04 ] |
| Tytuł: | Re: adres e-mail z kartoteki pracownika |
A program? |
|
| Autor: | mlodszy2 [ 2016-01-04, 15:09 ] |
| Tytuł: | Re: adres e-mail z kartoteki pracownika |
Kadry i Płace ERP |
|
| Autor: | rafal [ 2016-01-04, 16:58 ] |
| Tytuł: | Re: adres e-mail z kartoteki pracownika |
email jest zapisany w danych kadrowych. Przykład pobrania viewtopic.php?f=15&t=2839lub bezpośrednio z bazy danych |
|
| Autor: | mlodszy2 [ 2016-01-15, 14:36 ] |
| Tytuł: | Re: adres e-mail z kartoteki pracownika |
Witam, Przerobiłem to delikatnie: Kod: string sErrTylkoZOknaPrac = "Raport można wywołać tylko z okna pracowników!{{icon=s}}" long idgrupy = val( Arg0 ) int typ = val( Arg1 ) if !idgrupy && !typ then message sErrTylkoZOknaPrac : error "" SetGroup(idgrupy, typ, TR_PRACOWNICY, okres()) HRMgr hMgr HRComponent hComp HRValue hVal Int ValIndex long IdSk string Mail String GetAttrAt InfoPrac prac long idprac = GetFirst() if !(IdSk = IdSkladnika("E-mail pracownika")) then message "Błąd" while idprac hMgr.SetEmpId(idprac) hMgr.AddHRComponent(IdSk) hMgr.LoadValues("","") hMgr.GetComponent(hComp,IdSk) print "Adres:", lf if hComp.GetValuesCount() > 0 then hComp.GetValue(hVal,hComp.GetValuesCount(),hComp.GetAttrIndexById(14513)) Mail = hVal.strValue print Mail, lf else print "Brak Adresu", lf endif if idprac = GetNext() then LF wend ale mam tu pewinen problem. Taką mam sytuację: Pracownik 1 - adres Pracownik 2 - adres Pracownik 3 - BRAK Pracownik 4 - adres powyższy kod w momencie napotkania braku adresu (pracownik 3) następnym pracownikom nie pobiera adresu. Ma ktoś jakiś pomysł co jest nie tak? |
|
| Autor: | mlodszy2 [ 2016-01-15, 19:22 ] |
| Tytuł: | Re: adres e-mail z kartoteki pracownika |
Załatwione Brakowało 1 linijki: Kod: hMgr.FreeValues() |
|
| Strona 1 z 1 | Strefa czasowa UTC+1godz. [letni] |
| Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group http://www.phpbb.com/ |
|