Bematech_FI_EspelhoMFD

BemaFI32

Bematech_FI_EspelhoMFD

Bematech_FI_EspelhoMFD

 

Gera o espelho MFD.

 

Parâmetros:

 

NomeArquivo: STRING com o path + nome do arquivo txt a ser gerado, com o tamanho de até 512 caracteres.

 

DadoInicial: STRING com o dado inicial para o download da MFD, com o formato DD/MM/AAAA para data ou "999999" para COO.

 

DadoFinal: STRING com o dado final para o download da MFD, com o formato DD/MM/AAAA para data ou "999999" para COO.

 

TipoDownload: STRING indicando o tipo de download, onde:

"D": download por data.

"C": download por COO.

 

Usuario: STRING contendo a identificacao do usuario, com o tamanho de até 1 caracter.

 

ChavePublica: STRING com a chave pública para assinatura do arquivo, com 256 caracteres.

 

ChavePrivada: STRING com a chave privada para assinatura do arquivo, com 256 caracteres.

 

Possíveis retornos da Função (INTEIRO):

 

0: Erro de comunicação.

1: OK.

-1 - Erro de execução.

-2: Parâmetro inválido na função.

-4: O arquivo de inicialização BemaFI32.ini não foi encontrado no diretório de sistema do Windows.

-5: Erro ao abrir a porta de comunicação.

-27: Status da impressora diferente de 6,0,0 (ACK, ST1 e ST2).

 

Observação:

·As chaves pública e privada devem estar previamente geradas pelas função genkkey.

Exemplo:

 

' Exemplo em Visual Basic

iRetorno := Bematech_FI_EspelhoMFD("C:\TESTE.TXT", "01/08/2009", "31/08/2009", "D", "1", "A499F300F731F6892F44B83A5DD9D97CFFFD0ABE96E29B4B4B4EB2F9E5BCFFCF0A52EAFDF05779F90B3A199BE5776B13373CB2E71D8AB67F4080CE27B226FFF032B6A7182C90C935EF2F4D343A743B60307EE4961F0C5EB02B1CEEF48D647C02E9BE164DC404B833F80C5B4268C04039547E7D5E242537B02360674B569208BD", "D19598300478932ACFFE16CB6903552F15FDBD2D3B9659FAD79C3603C07B875919E9D8B28919B8F4C20C6AE23268A636D1206F5E6BC79D89B6152804B15A9781C90E0A2D5064FB5B7CC01048AD8C66768F76D71647E7D39F8EDD714044CEA68F2A40106849132B01D14DDEB3FBA6FC1A9FBE9EA71BAB9293707A4EAD29CB6F3D")

 

// Exemplo em Delphi

cArquivo := 'C:\TESTE.TXT';

cDataInicial := '01/08/2009';

cDataFinal := '31/08/2009';

cTipo := 'D';

cUsuario := '1';

cChavePublica := 'A499F300F731F6892F44B83A5DD9D97CFFFD0ABE96E29B4B4B4EB2F9E5BCFFCF0A52EAFDF05779F90B3A199BE5776B13373CB2E71D8AB67F4080CE27B226FFF032B6A7182C90C935EF2F4D343A743B60307EE4961F0C5EB02B1CEEF48D647C02E9BE164DC404B833F80C5B4268C04039547E7D5E242537B02360674B569208BD';

cChavePrivada := 'D19598300478932ACFFE16CB6903552F15FDBD2D3B9659FAD79C3603C07B875919E9D8B28919B8F4C20C6AE23268A636D1206F5E6BC79D89B6152804B15A9781C90E0A2D5064FB5B7CC01048AD8C66768F76D71647E7D39F8EDD714044CEA68F2A40106849132B01D14DDEB3FBA6FC1A9FBE9EA71BAB9293707A4EAD29CB6F3D';

iRetorno := Bematech_FI_EspelhoMFD( pchar( cArquivo ), pchar( cDataInicial ), pchar( cDataFinal ), pchar( cTipo ), pchar( cUsuario ), pchar( cChavePublica ), pchar( cChavePrivada ) );