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

[KDP] Podsumowanie na paskach pionowo
https://forum.mix-soft.pl/viewtopic.php?f=15&t=7192		 Strona 1 z 1
Autor:  user_Sam [ 2016-04-06, 10:14 ]
Tytuł:  [KDP] Podsumowanie na paskach pionowo
Witam
Czy jest możliwość żeby zrobić podsumowanie dla wszystkich pracowników na raporcie "Paski pionowo", takie jak na liście płac?
Od czego zacząć(nie mam doświadczenia w pisaniu raportów w KDP)?
Z góry dziękuje za wszelkie podpowiedzi :)

Pozdrawiam
Autor:  rafal [ 2016-04-06, 16:08 ]
Tytuł:  Re: [KDP] Podsumowanie na paskach pionowo
Jak nie masz doświadczenia to trudno powiedzieć od czego masz zacząć.

A jakie doświadczenie masz?
Autor:  user_Sam [ 2016-04-06, 23:00 ]
Tytuł:  Re: [KDP] Podsumowanie na paskach pionowo
W raportach AmBasic raczej trochę dłubałem niż tworzyłem coś konkretnego.
W zasadzie chodzi o utworzenie listy płac, której układ byłby pionowy właśnie jak na raporcie "Paski pionowo", ale tam nie ma podsumowania jak na standardowej liście płac. Po prostu kadrowa stwierdziła że taki wygląd listy płac, który jest w standardzie Symfonii jest nie do przyjęcia i chce mieć listę płac jak na wspomnianym raporcie.
Pomyślałem że najłatwiej będzie do "Paski pionowo" dorobić podsumowanie niż przerabiać układ w "Lista płac".
Autor:  user_Sam [ 2016-04-07, 20:22 ]
Tytuł:  Re: [KDP] Podsumowanie na paskach pionowo
To może bardziej konkretne pytanie. Udało mi się wrzucić wartości i nazwy elementów płacowych do mapy dla jednego pracownika. Jak zwiększyć wartości w MapValue odpowiednich składników dla następnych pracowników?

Kod:
MapValue MapaPodsumowan
MapaPodsumowan.Type(float)
Summary summPask
int nSklCount, id
InfoSkladnik skl
string sWartosc

nSklCount = summPask.GetComponentCount()

  for i = 1 to i > nSklCount
         id = summPask.GetComponent(i)
      DaneSkladnika(skl, #id)
      if summPask.GetFloatValue(1, i) || zerowe || skl.typ == "Element kadrowy" then
                   sWartosc = summPask.GetStringValue(1, i)
                   MapaPodsumowan.Set(skl.GetNazwaDoDruku(), val(sWartosc))    
           endif
    next i
Autor:  szepczący [ 2016-05-17, 22:14 ]
Tytuł:  Re: [KDP] Podsumowanie na paskach pionowo
Jeśli chcesz, aby na końcu w tej mapie każdemu ze składników była przypisana suma wartości danego składnika to proponuję taką modyfikację:
Kod:
MapValue MapaPodsumowan
MapaPodsumowan.Type(float)
Summary summPask
int nSklCount, id
InfoSkladnik skl
float fWartosc

nSklCount = summPask.GetComponentCount()

for i = 1 to i > nSklCount
   id = summPask.GetComponent(i)
   DaneSkladnika(skl, #id)
   if summPask.GetFloatValue(1, i) || zerowe || skl.typ == "Element kadrowy" then
      fWartosc = summPask.GetValue(1, i)
      if MapaPodsumowan.Index(skl.GetNazwaDoDruku()) then
         fWartosc = fWartosc + MapaPodsumowan.Get(skl.GetNazwaDoDruku())
         MapaPodsumowan.Set(skl.GetNazwaDoDruku(), fWartosc)
      else
         MapaPodsumowan.Set(skl.GetNazwaDoDruku(), fWartosc)
      endif
   endif
next i
Strona 1 z 1 Strefa czasowa UTC+1godz. [letni]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/