AddIn dynamics gp

Question

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

Roberto Cruz · Answer

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

TOMAS EDUARDO ALCA OJEDA · Answer

Mil Gracias Edú, por tu apoyo. Saludos

Roberto Cruz · Answer

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