aktuelle Form im Menü ermitteln

declare
  v_level		number(2);
  curform		varchar2(100);
begin 
	
	--Plakatvorlage öffnen
  curform := :System.Current_Form;
  
  if upper(curform) = 'KPS_PKT' then
    call_form(:global.v_kps_pve);
  else
  	message('Sie können diese Maske nur aus der Plakatverarbeitung aufrufen.');
  end if;

end;