Re: Prawa do typu dokumentu w Handlu
Jest możliwość blokady wystawienia dokumentu.
Należy dopisać krótki skrypt w Raporty -> Procedury -> Procedury dokumentu sprzedaży
Kod:
int Sub OnBeforeInsert(long lId)
mapValue mvPrawa
mvPrawa.Type( string )
mvPrawa.Set( "Admin", "@FVS1@FVS2@FVS3@")
mvPrawa.Set( "Anna", "@FVS1@")
// mvPrawa.Set( "nazwa_użytkownika", "@typy_dokumentow_rozdzielane_małpkami@")
// analogicznie tu można dodawać kolejnych użytkowników
buf = mvPrawa.Get( CurrentUser )
baseDK dk
dk.GetRecById( lId )
if find regular "{*}@" + dk.GetField("typ_dk") + "@{*}" then
OnBeforeInsert = 0
else
message "Nie masz prawa do wystawienia dokumentu "+ dk.GetField("typ_dk")
OnBeforeInsert = -6000
endif
EndSub
