Reimpressão do Último Cupom

using System;
using Cappta.Gp.Api.Com;

namespace CappAPIIntegration
{
    class Program
    {
        static void Main(string[] args)
        {
            //Não esqueça de realizar a autenticação aqui \o/

            int tipoVia = 1; //Ambas as vias (Loja e cliente)

            int resultado = cappta.ReimprimirUltimoCupom(tipoVia);
            if (resultado != 0)
            {
                Console.WriteLine("Não foi possível iniciar a operação. Código de erro {0}", resultado);
                return;
            }

            //Agora basta continuar o fluxo de iteração da reimpressão
        }
    }
}

program cappapiintegration;

uses Cappta_Gp_Api_Com_1_0_TLB, SysUtils;

var
  cappta : IClienteCappta;
  resultado : integer;
  tipoVia : integer = 1; // -- Ambas as vias (Loja e cliente)

begin
  // -- Não esqueça de realizar a autenticação aqui \o/ --

  resultado := cappta.ReimprimirUltimoCupom(tipoVia);
  if resultado <> 0 then
  begin
       WriteLn(Format('Não foi possível iniciar a operação. Código de erro %d', [resultado]));
       exit;
  end;

  // -- Agora basta continuar o fluxo de iteração da reimpressão --
end.

Imports Cappta.Gp.Api.Com
Imports Cappta.Gp.Api.Com.Model

Module Module1

    Sub Main()
        'Não esqueça de realizar a autenticação aqui \o/

        Dim cappta As ClienteCappta = New ClienteCappta()

        Dim tipoVia = 1

        Dim resultado = cappta.ReimprimirUltimoCupom(tipoVia)
        If resultado <> 0 Then
            Console.WriteLine("Não foi possível iniciar a operação. Código de erro", resultado)
            Return
        End If

        'Agora basta continuar o fluxo de iteração da reimpressão
    End Sub
End Module