Doc. Ref. 9708 Título: El formulario de interacciones en Hexa V8 Autor: Philippe Calvó Última actualización: 27/04/2015 #interacción #usuario #formulario #web #windows #forms #proceso #resultado

---

El formulario de interacciones en Hexa V8

El formulario de interacciones permite solicitar al usuario varios datos a la vez. Es muy útil en la parametrización de scripts para pedir datos previos a la ejecución de un proceso.

Cada uno de los datos solicitados por una interacción, está basada en el formulario de solicitud individual de un dato y siguie las mismas reglas

Las interacciones están basadas en el objeto "Interact" de la clase "cInteract" que siempre está instanciado y disponible desde los script de Hexa. En el siguiente ejemplo básico se muestra claramente cómo inicializarlo, añadir valores, mostrarlo y, fnalmente, utilizar los valores y acciones realizadas por el usuario.

El formulario se adapta automáticamente a cada tipo de valor y muestra ayudas en los casos convenientes.

Sub Main (PS0, PS1, PS2)
    'Inicializar el objeto
    Interact.Reinicia "AltaCliente", "Alta de Cliente y Contacto"
    
    'Indica que se mostrará el botón "Cancelar" además de "Aceptar"
    Interact.Cancelable = True
    
    'Creación de valores a introducir por el usuario.
    'Parámetros: Nombre del valor, texto a mostrar, tipo de dato, clave en caso de datos múltiples y valor por defecto
    Interact.NuevoValor "Nombre", "Nombre completo", "Texto", "1", ""
    Interact.NuevoValor "Familia0", "Sector", "Familia0Clientes", "1", ""
    Interact.NuevoValor "GenDet", "Generar detalle", "Booleano", "1", ""
    Interact.NuevoValor "Inicio", "Fecha de inicio", "Fecha", "1", ""
    
    'Mostrar el formulario
    Formularios.MInteract
    
    'Si el usuario no ha pulsado el botón aceptar (ha cerrado el formulario directamente), salir
    If Not Interact.Aceptado Then Exit Sub
    
    'Si el usuario ha pulsado el botón cancelar, avisar y salir
    If Interact.Cancelado=True Then Formularios.MBx ("Proceso cancelado") : Exit Sub

    'En vez de ejecutar un proceso, simplemente mostramos lo que ha introducido el usuario
    Formularios.Mbx "El nombre introducido es: " & Interact.Valor ("Nombre")
    Formularios.Mbx "El sector escogido es: " & Interact.Valor ("Familia0")
    If FH.ESSi (Interact.Valor ("Familia0")) Then Formularios.Mbx "Se ha escogido generar detalle" Else Formularios.Mbx "Se ha escogido no generar detalle"
    Formularios.Mbx "La fecha de inicio escogida es: " & Interact.Valor ("Inicio")
End Sub

Volver a la búsqueda anterior