[delphi-br] Impressão do Cupom Não Fiscal Vinculado na Bematech

Tue, 27 Nov 2007 07:47:02 -0800 

Galera estou tentando imprimir o cupom não fiscal vinculado na bematech da 
farmacia popular, mas não estou conseguindo veja como estou fazendo:

// Imprimir Cupom vinculado da Farmacia Popular
if wwVENDAS.FieldByName('FARMACIA_POPULAR').AsString = 'S' then
begin
    if FileExists('C:\FarmaciaPopular\Status_FP.txt') then    
    begin
        Bematech_FI_AbreComprovanteNaoFiscalVinculado( xxxFormaPagto, Pchar( 
FormatFloat('########0,00',wwVENDASTOTAL.Value) ), Pchar(vNumeroCupom) );
        AssignFile(F,'C:\FarmaciaPopular\Status_FP.txt');
        Reset(F);
        Descricao := '';
        while not Eof(F) do
        begin
            Readln(F,Descricao);
            Bematech_FI_UsaComprovanteNaoFiscalVinculado( 
Pchar(Descricao)+#13+#10 );
        end;
        CloseFile(F);
        Bematech_FI_FechaComprovanteNaoFiscalVinculado();
    end;
end;

Alguém tem alguma diga, obrigado

Sergio Kawahara

[As partes desta mensagem que não continham texto foram removidas]

Responder a