Gracias!
function crea_menu()
********************************************************************************************
聽local oMenu
聽 MENU oMenu
聽 聽 聽 聽MENUITEM "Archivo"
聽 聽 聽 聽MENUITEM "Mantenimiento Ficheros"
聽 聽 聽 聽 聽 聽 聽 MENU
聽 聽 聽 聽 聽 聽 聽 聽 聽 MENUITEM "Mantenimiento Art铆culos" MESSAGE "Altas / Bajas / Modificaci贸n de Art铆culos" ACTION MANART()
聽 聽 聽 聽 聽 聽 聽 聽 聽 MENUITEM "Mantenimiento Clientes" MESSAGE "Altas / Bajas / Modificaci贸n de Clientes" ACTION MANCLI()
聽 聽 聽 聽 聽 聽 聽 聽 聽 MENUITEM "Mantenimiento Proveedores" MESSAGE "Altas / Bajas / Modificaci贸n de Proveedores" ACTION MANPRO()
聽 聽 聽 聽 聽 聽 聽 聽 聽 MENUITEM "Mantenimiento Agentes" MESSAGE "Altas / Bajas / Modificaci贸n de Agentes"
聽 聽 聽 聽 聽 聽 聽 聽 聽 MENUITEM "Mantenimiento Subfamilias" MESSAGE "Altas / Bajas / Modificaci贸n de Subfamilias"
聽 聽 聽 聽 聽 聽 聽 聽 聽 MENUITEM "Mantenimiento Familias" MESSAGE "Altas / Bajas / Modificaci贸n de Familias"
聽 聽 聽 聽 聽 聽 聽 聽 聽 MENUITEM "Mantenimiento Almacenes" MESSAGE "Altas / Bajas / Modificaci贸n de Almacenes"
聽 聽 聽 聽 聽 聽 聽 聽 聽 MENUITEM "Mantenimiento Empresas" MESSAGE "Altas / Bajas / Modificaci贸n de Empresas" ACTION MANEMP()
聽 聽 聽 聽 聽 聽 聽 聽 聽 MENUITEM "Mantenimiento Fichas T茅cnias" MESSAGE "Altas / Bajas / Modificaci贸n de Fichas T茅cnicas"
聽 聽 聽 聽 聽 聽 聽 ENDMENU
聽ENDMENU