Index: KLPUTZCallBacks.mac.rou =================================================================== diff -u -r734 -r1704 --- KLPUTZCallBacks.mac.rou (.../KLPUTZCallBacks.mac.rou) (revision 734) +++ KLPUTZCallBacks.mac.rou (.../KLPUTZCallBacks.mac.rou) (revision 1704) @@ -1,3 +1,17 @@ + ; Filteren van uitzonderingen + ; Via de callback wordt bepaald of een product van toepassing is of niet + ; De callbacks krijgen KLNr en PRNr als parameters en moeten een boolean Allow teruggeven + + ; Gemonteerde spoelbak en sifonladen SPOELBAK(KLNr,PRNr) Quit ($LG(##class(Prod.Kenmerk.DataDefinitie).Get("TBX",PRNr,"KLAS"))?1(1"SP".E,1"SY")) - \ No newline at end of file + + ; Gemonteerde hoge Binnenlade +TBXHOGEBINNENLADE(KLNr,PRNr) + Quit ($LG(##class(Prod.Kenmerk.DataDefinitie).Get("TBX",PRNr,"LT"))="B")&&($LG(##class(Prod.Kenmerk.DataDefinitie).Get("TBX",PRNr,"RH"))="D") + + ; Gemonteerde TipOn +TBXTIPON(KLNr,PRNr) + Quit ($LG(##class(Prod.Kenmerk.DataDefinitie).Get("TBX",PRNr,"BM"))="T") + + \ No newline at end of file