AddIn dynamics gp

Hilo iniciado por TOMAS EDUARDO ALCA OJEDA el 11 de junio de 2014

Viendo 4 entradas - de la 1 a la 4 (de un total de 4)
  • Autor
    Entradas
  • #11318
    RangoTOMAS EDUARDO ALCA OJEDA
    TOMAS EDUARDO ALCA OJEDA
    Participante
    APRENDIZ
    999 Rincoins

    Buen día. Tengo un AddIn con una ventana para ingresar dos valores relacionado a la ventana y requiero que se dispare en la opción de entrada de tracciones de cuenta por pagar – Adicionales, como lo específico en mí programa. saludos

    #11319
    RangoRoberto Cruz
    Roberto Cruz
    Participante
    APRENDIZ
    999 Rincoins

    Estimado Tomas,

    Adjunto un código que te ayudará hacer lo que necesites.

    1.- En la declaración:

    Public Class GPAddIn
    Implements IDexterityAddIn

    .

    .

    .

    Shared vTuVentana As FrmTuVentana

    Dim myHandler As System.EventHandler

    2.- En la parte del Sub Initialize() Implements IDexterityAddin.Initialize:

    myHandler = New System.EventHandler(AddressOf OpenTuVentana)
    DIVTransactionEntry.AddMenuHandler(myHandler, “Nombre de tu ventana”)

    AddHandler vTransacInventarioForm.IvTransactionEntry.IvDocumentNumber.LeaveAfterOriginal, AddressOf OpenTuVentana

    3.- Finalmente el llamado al formulario:

    Private Sub OpenTuVentana(ByVal sender As Object, ByVal e As EventArgs)
    If vTuVentana Is Nothing Then
    Try
    vTuVentana = New FrmTuVentana
    Catch ex As Exception
    MsgBox(ex.Message)
    End Try
    Else
    If vTuVentana.Created = False Then
    vTuVentana = New FrmTuVentana()
    End If
    End If

    If Not (Dynamics.Forms.IvTransactionEntry.IvTransactionEntry.IvDocumentNumber.Value Is Nothing) AndAlso _
    Dynamics.Forms.IvTransactionEntry.IvTransactionEntry.IvDocumentNumber.Value <> String.Empty Then
    vTuVentana._TipoOpe = “TransactionEntry” ‘_TipoOpe, es alguna variable de tu formulario
    vTuVentana.Show()
    vTuVentana.Activate()
    vTuVentana.CargarDatos(Dynamics.Forms.IvTransactionEntry.IvTransactionEntry.IvDocumentNumber.Value)
    Else
    MsgBox(“Debe ingresar el número de documento”, MsgBoxStyle.Exclamation, “Validar datos”)
    End If

    End Sub

    Saludos, y espero que te sirva.

    Edú Cruz

    thaugo399@gmail.com

    #11320
    RangoTOMAS EDUARDO ALCA OJEDA
    TOMAS EDUARDO ALCA OJEDA
    Participante
    APRENDIZ
    999 Rincoins

    Mil Gracias Edú, por tu apoyo.

    Saludos

    #11321
    RangoRoberto Cruz
    Roberto Cruz
    Participante
    APRENDIZ
    999 Rincoins

    De nada, cualquier cosa con respecto a Microsoft Dynamics GP me la haces saber… es bueno compartir lo poco que se sabe.

    Saludos,

    Edú Cruz

    thaugo399@gmail.com

Viendo 4 entradas - de la 1 a la 4 (de un total de 4)
  • Debes estar registrado para responder a este debate.
Carrito de compra