{{indexmenu_n>1}}
====== Application Menus =====
\\
==== Customized Menus Collection (Replacing the APPWIZARD) ====
\\
In some cases, the APPWIZARD (2 levels of menus) ma be too small, or even we want to customize even more deeply the design of the application menus. \\
\\
For this, we have the **entry-point="ColeccionConMenuPersonalizado"** attribute in the app node, to indicate the collection we want to execute immediately after the user has logged in. (Regardless of whether the normal login is done or it has also been customized, [[http://www.xoneisp.com/xonewiki/doku.php?id=b.-programacion:b02.-menus-aplicacion:start&#pantalla_de_login_personalizada | see the previous option. ]]). By using this attribute, we will ignore completely the appwizard.xml file and the programmer will be in charge to design its own menus in the collection indicated in such attribute.
\\
\\
Currently we have two ways to make the menus for the application: \\
\\
- By editing the **APPWIZARD.XML** file (We have 2 levels of Menus).
- If we want to customize the menus to make them completely to our liking or we have more than two levels of menus, we can make our own collection of personalized menus, with the design we want. To indicate the Framework not to use the **APPWIZARD.XML** file and uses instead our customized menus collection, we have to define the **entry-point="NombreColeccionConMenuPersonalizado"** attribute in the app node.
\\
===== Appwizard.xml =====
\\
The **Appwizard.xml** file defines the menus structure for the application.
\\
==== Sctructure of the APPWIZARD.XML file ====
\\
\\
\\
* In the previous structure the **** node will be repeated as many times as different user we are going to have in our application.
* Within the **"
\\
There are several places where we can define the mask (permissions) to a collection: \\
\\
^ **Attribute** ^ **Node** ^
| **mask** | In file **appwizard.xml** in the call to the collection |
| **editmask** | In the **COLL** node of definition of a coll |
| **mask** | In the **PROP** of call to a **CONTENTS** collection |
| **nomenmask** | In the **COLL** node of definition of a collection (Mask when we call from a magnifying glass to this collection. ) |
\\
/*
=====Pantalla de login personalizada=====
En algunos casos, podríamos necesitar personalizar la pantalla habitual de login.
Lo único que tenemos que hacer es definir una colección con el diseño que queramos para el login. A esta colección hay que ponerle un atributo **login-coll="true"** que es el provoca que dicha colección se convierta en "Pantalla de Login".
Fichero mappings.xml
000000
Fichero código.vbs que se incluye en la colección **Empresas**
function login()
Dim st_msg,ObjB,st_erraut,CollB,CollC,ObjC
st_msg=""
'Forzar al usuario a introducir nombre de usuario y contraseña
if This("MAP_USUARIO")="" or This("MAP_PWD")="" then
st_msg="Introduzca nombre de usuario y clave"
end if
if st_msg <> "" then
appdata.failwithmessage -8100,st_msg
else
st_erraut=""
Set CollB=appdata.GetCollection("Usuarios")
CollB.filter="LOGIN='"+Cstr(This("MAP_USUARIO")) +"'"
CollB.StartBrowse
Set ObjB=CollB.CurrentItem
if ObjB is nothing then
st_erraut="Nombre de usuario o password incorrecto"
end if
Set ObjB=nothing
CollB.EndBrowse
CollB.Clear
Set CollB=nothing
'Si todo OK, intentamos el logueo
if st_erraut="" then
This.Variables("##LOGIN_USERCOLL##")="Usuarios"
This.Variables("##LOGIN_NEWUSER##")="LOGIN,"+This("MAP_USUARIO")
This.Variables("##LOGIN_NEWPASS##")="PWD,"+This("MAP_PWD")
This.Variables("##LOGIN_NEWNOUSERIN##")=0
appdata.failwithmessage -11888,"##LOGIN_START##"
else
appdata.failwithmessage -8100,st_erraut
end if
end if
end function
*/