Página 1 de 1

Como fazer Fita Detalhe da mem fiscal em clipper para Bemate

Enviado: 21 Set 2011 06:57
por juniorcamilo
Amigos tem como criar funcao para puchar (donWload) da Fita detalhe das impressoras Fiscais Bematech em clipper?

Como fazer Fita Detalhe da mem fiscal em clipper para Bemate

Enviado: 21 Set 2011 11:31
por Gilberto M Silva
Vc já foi no site da Bematech? acredito que lá tem tudo sobre o PAF-ECF para sua impressora onde inclui esse relatório.

Código: Selecionar todos

    // Leitura da Memoria Fiscal

           setcolor( "N/BG,W+/R,,,,BG/N" )
           @ 09,25 clear to 12,43
           @ 09,25 to 12,43
           @ 10,26 prompt " Via ARQUIVO    "
           @ 11,26 prompt " Via IMPRESSORA "
           menu to opcao
           do case

              case opcao = 1

                   // Via Arquivo

                   arquivo := fcreate("LEITURA.TXT")
                   fim     := " "
                   buffer := ""
                   data_inicial := data_final := space( 08 )
                   set color to
                   set color to w+/gr
                   @ 11,30 clear to 14,54
                   @ 11,30 to 14,54
                   @ 12,31 say "Data Inicial:" get data_inicial pict "99/99/99"
                   @ 13,31 say "Data Final..:" get data_final   pict "99/99/99"
                   read
                   set color to w*
                   @ 16,31 say "Aguarde... o arquivo est  sendo criado."

                   data_inicial := substr( data_inicial, 1, 2 )+substr( data_inicial, 4, 2 )+substr( data_inicial, 7, 2 )
                   data_final   := substr( data_final, 1, 2 )+substr( data_final, 4, 2 )+substr( data_final, 7, 2 )
                   Comando      := Chr( 27 )+Chr( 251 )+"08|"+data_inicial+"|"+data_final+"|R|"+Chr( 27 )
                   FWrite( Porta, @Comando, Len( Comando ) )

                   Do While .T.
                      FRead( Porta, @Fim, 1 )
                      buffer = buffer + fim
                      If Transform( Asc( Fim ), "999" ) = "  3"
                         Exit
                      EndIf
                   EndDo

                   set color to
                   @ 16,31 say space( 40 )
                   FWrite( arquivo, buffer, len(buffer) )
                   set color to
                   set color to w+/b
                   @ 13,09 clear to 16,59
                   @ 13,09 to 16,59
                   @ 14,11 say "O arquivo gerado foi LEITURA.TXT com o conte£do"
                   @ 15,11 say "da Mem¢ria Fiscal. Pressione qualquer tecla..."
                   inkey( 0 )

              case opcao = 2

                   // Via ImpressÆo
                   
                   data_inicial := data_final := space( 08 )
                   set color to
                   set color to w+/gr
                   @ 11,30 clear to 14,54
                   @ 11,30 to 14,54
                   @ 12,31 say "Data Inicial:" get data_inicial pict "99/99/99"
                   @ 13,31 say "Data Final..:" get data_final   pict "99/99/99"
                   read
                   data_inicial := substr( data_inicial, 1, 2 )+substr( data_inicial, 4, 2 )+substr( data_inicial, 7, 2 )
                   data_final   := substr( data_final, 1, 2 )+substr( data_final, 4, 2 )+substr( data_final, 7, 2 )
                   Comando      := Chr( 27 )+Chr( 251 )+"08|"+data_inicial+"|"+data_final+"|I|"+Chr( 27 )
                   FWrite( Porta, @Comando, Len( Comando ) )
                   ver_status()

              

           endcase

Como fazer Fita Detalhe da mem fiscal em clipper para Bemate

Enviado: 22 Set 2011 07:12
por juniorcamilo
Gilberto M Silva escreveu:Vc já foi no site da Bematech? acredito que lá tem tudo sobre o PAF-ECF para sua impressora onde inclui esse relatório.
Valeu Gilberto, mas em minha pergunta acho que nao fui claro, quero dizer a fitadetalhe venda a venda com os itens!?

Como fazer Fita Detalhe da mem fiscal em clipper para Bemate

Enviado: 22 Set 2011 10:05
por anacatacombs
Meu caro, não sei se tem como não.
Até aonde eu sei, tem como fazer a leitura da memoria fiscal da impressora, mas como um "espelho do cupom" .. sai o totalizador diário, tipo o resumo da redução Z.
Qual modelo da impressora?
Existe alguma outra forma de resolver o problema sem precisar retirar esses dados da impressora?

Como fazer Fita Detalhe da mem fiscal em clipper para Bemate

Enviado: 10 Out 2011 10:27
por pena
bom dia, tem sim como fazer, ele cria um arquivo txt com tudo que foi impresso na ecf.

Como fazer Fita Detalhe da mem fiscal em clipper para Bemate

Enviado: 17 Out 2011 10:15
por pena
só mais um detalhe, foi + ou -, o que aconteceu comigo, em um cliente, deu pau no servidor, eles perderam as vendas de todo um dia, pela fita detalhe é meio complicado de conseguir obter esses dados, mas na bematech que era o meu caso, tem uma função que gera o sintegra, o que fiz foi gerar este arquivo e a partir dele consegui relançar os cupons, pelo menos os produtos, e pela fita detalhe, o cliente foi analisando caso a caso, para ver se tinha venda no crediario neste dia, ae foi so entrar nestes cupons e informar o cliente e o prazo.