function pos_check_schicht(parameter,text_par,hObject)

if parameter <= 0 % pos_check
    set(text_par,'ForegroundColor','r');
    set(hObject,'BackgroundColor',[0.9961    0.4902    0.4784]);
    set(text_par,'TooltipString',['"',get(text_par,'string'),'" muss groesser Null sein'],...         
        'ForegroundColor','r');
    drawnow;
end