Attribute VB_Name = "Module1"
'------- D E C L A R A Ç Ã O   D A   F U N Ç Ã O   D A   D L L G 2 _ G E R A D O R -------

Public Declare Function Gera_AtoCotepe1704 Lib "DLLG2_Gerador.dll" (ByVal ComPortOrFileName As String, _
                                                                    ByVal Modelo As String, _
                                                                    ByVal RegFileName As String, _
                                                                    ByVal DataReducao As String) As Integer
                                                                    
'------- M E N S A G E N S   D E   R E T O R N O -------

Public Const COMANDOEXECUTADO = "Arquivo ATO COTEPE 17/04 gerado com sucesso."
Public Const ERRO_EMITELEITURAX = "Erro ao executar comando EmiteLeituraX."
Public Const ERRO_EMITELEITURAMF = "Erro ao executar comando EmiteLeituraMF."
Public Const ERRO_EMITELEITURAMFD = "Erro ao executar comando EmiteLeituraFitaDetalhe."
Public Const ERRO_CMDINEXISTENTE = "Comando Inexistente."
Public Const ERRO_DADOSIMPRESSAO = "Erro ao obter dados de impressão."
Public Const ERRO_ACESSARARQUIVO = "Erro ao acessar o arquivo."
Public Const ERRO_DATAINVALIDA = "Erro ao executar comando.Data inválida."
Public Const ERRO_NAOEXISTEREDUCAO = "Não existe redução executada na data informada."
Public Const ERRO_MODELOINVALIDO = "Modelo não permitido."
Public Const ERRO_COMANDOINVALIDO = "Comando inválido."
Public Const ERRO_DLLNAOENCONTRADA = "Biblioteca não foi encontrada."
Public Const ERRO_SEMSINALCTS = "Sem Sinal de CTS."
Public Const ERRO_DEFAULT = "Erro Desconhecido."

'------- M E N S A G E N S   D O   A P L I C A T I V O -------

Public Const AGUARDE = "AGUARDE..."

'------- V E R S Ã O   D O   A P L I C A T I V O -------

Public Const VERSAO_APLICATIVO = "1.0"

'------- T I T U L O   D A S   J A N E L A S   D O   A P L I C A T I V O -------

Public Const TITULOJANELA = "Gerador Ato Cotepe 17/04"
