Agregar número de telefono al parte

Actualmente dentro del parte aparece el numero de telefono adicional del cliente pero no es el principal, entonces para poder ver el número del cliente se tiene que ir dentro del cliente y desde ahi visualizarlo.

Lo que se pretende es que se pueda visualizar directamente el número de teléfono principal.

Table of Contents

Agregar campo al formulario

El primer paso sera agregar el nuevo campo al formulario, para ello se hace click derecho en la cabecera del parte y se le da a configurar formulario.

Ahora dentro del formulario se da click derecho / nuevo control / texto.

Se ajusta la posición del campo.

Se ajustan algunas propiedades como, ancho, etiqueta …

Hacemos click derecho sobre el nuevo campo y se le da un nombre identificativo al campo.

Script de formulario

Ahora se va a crear el script asociado al formulario, en la misma pantalla que hemos configurado el campo en la parte de abajo tenemos el editor de codigo.

Se va a poner el siguiente código:

using AhoraCore;
using AhoraOCX;
using AhoraSistema;
using static AhoraCore.VBA.Interaction;
using static AhoraCore.VbMsgBoxResult;
using static AhoraCore.VbMsgBoxStyle;
using System;


namespace AhoraScriptsPantalla
{
    public class AhoraPartes_frmParte : AhoraOCX.AhoraBaseScript
    {
		
		public override void Shown()
		{
			try
			{

				//Saca el valor de idCliente del campo IdCliente
				Valor IdCliente = ((ComboUsuario)gForm.Controls["IdCliente"]).Value;

				//Compruebe que este el IdCliente
                if(IdCliente != "") {

                //Saca el numero de telefono de la base datos
                Valor NumTlf = gCn.DameValorCampo($"SELECT NumTelefono FROM clientes_datos WHERE IdCliente='{IdCliente}'");

                    //Comprueba si esta el numero
                    if(NumTlf != ""){
                        
                        //Se agrega el numero de telefono
                        ((ITextoUsuario)gForm.Controls["PersTlfCliente"]).Value = NumTlf;
                    }
				}
				
			}
			catch (Exception ex)
			{
				gCn.Tr.Trace(TracerOrigen.TError, this.GetType().Name, nameof(Show), 0, ex.Message);
			}
		}





    }
}