FRM : 41067 Cannot find menu item id ( forms 10g Menus/Forms Conversion )

Question

Hi All ,
We have menus converted into forms 10g using the forms migration assistant FMA ( frmplsqlconv ) . Now , we had the menus (.mmb) which had used Shared Menus.
After conversion observed that there were some duplicate copies of the shared menus created automatically and each reference where this shared menu was used was replaced by the newly created ones.
Now , when I open the form that uses the menu I get the following error :
FRM : 41067 Cannot find menu item id
On debuggin observed the the above error was generated at :
set_menu_item_property(SHARED_MENU.ITEM,.... )
Not sure how this worked in forms earlier version and not working in 10g now.
Could anyone please let me know how to go about to fix this issue and why is this happening at the first point.
Is re-creating the menu from scratch the only option to resolve the issue ?
Please advise ..
Thanks ,

Answer 1

Hi
Error Message: FRM-41067: Cannot find Menu Item: invalid ID.
Error Cause:An invalid ID was passed to a built-in subprogram.
Action:Verify that a proper call to FIND_MENU_ITEM will be performed. Level: 20 Type: Errori think c1 returns null pls check ur Query in the cursor ; run & test if it returns data or not & check the name of the menu that should actually match with the name stored in the db.
If the error still existing then u can get reide of it with a simple line check using FIND_MENU_ITEM as follow...
PROCEDURE disable_menu_items IS
mi_id MenuItem;
val varchar2(10);
BEGIN
IF :Global.user_code '01' THEN
IF :GLOBAL.VC_ROLE_CODE '01' THEN
declare
cursor c1 is
select vc_menu_code,vc_menu_name from
makess.mk_module_menu a where
vc_module_code='06' and
not exists(select vc_menu_code
from makess.mk_roles_menu_inv b
where vc_comp_code=:global.vc_comp_code
and a.vc_menu_code=b.vc_menu_code
and ch_role_code=:global.vc_role_code);
BEGIN
for crec in c1
mi:=FIND_MENU_ITEM('MENU.MENUITEM');
  IF NOT ID_NULL(mi) THEN
loop
set_menu_item_property(crec.vc_menu_name,ENABLED,Property_false);
end loop;
END IF;
END;
:global.check:='N';
END IF;
END IF;
END;Hope this helps...
Regards,
Abdetu...