GeMIS_WEB/GUI/yourBarMate/TestGetCategories.p

{ propertiesYBM.i }

DEF TEMP-TABLE tWarenGrp LIKE WarenGrp.

RUN ybmgetCategories.r ( OUTPUT TABLE tWarenGrp ).

FOR EACH tWarenGrp:
    DISPLAY tWarengrp EXCEPT BezL.
END.