Como recuperar o próximo número de pagamento para pagamentos do Gerenciamento de Pagamentos ao usar a Montagem de Rotinas Diversas no eConnect

Este artigo descreve como obter o próximo número para pagamentos na Gestão de Contas a Pagar ao usar a Montagem de Rotinas Diversas no eConnect do Microsoft Dynamics GP.

Aplica-se a: Microsoft Dynamics GP
Número Original da Base de Conhecimento: 939276

Introdução

O Assembly de Rotinas Diversas no eConnect contém métodos que você pode usar para recuperar o próximo número de documento para vários tipos de documento no Microsoft Dynamics GP.

O código de exemplo a seguir ilustra como recuperar o próximo número de pagamento para pagamentos do Gerenciamento de Pagamentos usando o código do Microsoft Visual C# e usando o código do Microsoft Visual Basic .NET 2003.

Antes de usar o código de exemplo, você precisa definir as seguintes referências:

• eConnect.MiscRoutines.dll
• System.Enterprise.Services

Para definir essas referências, siga estas etapas:

1. No Microsoft Visual Studio, clique com o botão direito do mouse em Referências. No Gerenciador de Soluções, clique em Adicionar Referência.
2. Abra a seguinte pasta: C:\Program Files\Microsoft Great Plains\eConnect9\Objects\DOT NET
3. Clique na referência eConnect.MiscRoutines.dll.
4. Em .NET, clique na referência System.Enterprise.Services .

Código de exemplo do Visual Csharp

using System;
using System.Collections.Generic;
using System.Text;
using Microsoft.GreatPlains.eConnect.MiscRoutines;

namespace MiscRoutinesConsole
{
    class ClassMiscRoutines
    {
        static void Main(string[] args)
        {
            try
            {
                string cnString = @"Data Source=MYSERVER;initial catalog=TWO;integrated security=SSPI;
                persist security info=False;packet size=4096";
                
                GetNextDocNumbers oNextDoc = new GetNextDocNumbers();
                string nextPMPaymentNumber = "";

                nextPMPaymentNumber = oNextDoc.GetNextPMPaymentNumber(GetNextDocNumbers.IncrementDecrement.Increment, cnString);
                Console.WriteLine("The next PM Payment Number is " + nextPMPaymentNumber);
                Console.WriteLine("Press <Enter> to close...");
                Console.Read();
            }
            catch (Exception ex)
            {
                Console.WriteLine(ex.ToString());
                Console.WriteLine("Press <Enter> to close...");
                Console.Read();
            }
        }
    }
}

Código de exemplo do Visual Basic .NET 2003

Imports Microsoft.GreatPlains.eConnect.MiscRoutines
Module MiscRoutines

    Sub Main()
        Try
            Dim cnString As String = "Data Source=MYSERVER;initial catalog=TWO;integrated security=SSPI;
            persist security info=False;packet size=4096"
            
            Dim oNextDoc As New GetNextDocNumbers()
            Dim nextPMPaymentNumber As String = ""

            nextPMPaymentNumber = oNextDoc.GetNextPMPaymentNumber(GetNextDocNumbers.IncrementDecrement.Increment, cnString)
            Console.WriteLine("The next PM Payment Number is " & nextPMPaymentNumber)
            Console.WriteLine("Press <Enter> to close...")
            Console.Read()
        Catch ex As Exception
            Console.WriteLine(ex.ToString())
            Console.WriteLine("Press <Enter> to close...")
            Console.Read()
        End Try
    End Sub
End Module