Ivan de Souza

é isso mesmo! É que eu tinha apagado somente as pastas fontes e pacotes. Apaguei todo o trunk, baixei de novo e compilou certinho! Agora voltemos à questão da ReduçãoZ da epson. Amanhã terei uma resposta e posto aqui. Mais uma vez, obrigado!

Só aproveitando o tópico, desinstalei, apaguei e atualizei os fontes do svn e na hora de compilar o ACBr_PAF, dá um erro na unit ACBrEPCBloco_0_Class, na função TBloco_0.WriteRegistro0000, na linha: Add( LFill( '0000' ) + LFill( CodVerToStr(COD_VER) ) + LFill( strTIPO_ESCRIT ) + LFill( strIND_SIT_ESP ) + LFill( strNUM_REC_ANTERIOR) + LFill( DT_INI ) + LFill( DT_FIN ) + LFill( NOME ) + LFill( CNPJ ) + LFill( UF ) + LFill( COD_MUN, 7 ) + LFill( SUFRAMA, 9, True ) + LFill( strIND_NAT_PJ ) + LFill( strIND_ATIV ) ); com a mensagem de uso indevido de parâmetros para a função LFill. Retirei o True da linha LFill( SUFRAMA, 9, True ) + e instalou normalmente.

Eu atualizei a pouco tempo o ACBR mas pelo jeito meus fontes não foram contemplados com essa mudança. Vou testar hoje no fim do dia e posto o resultado. Obrigado!

passei o log mais acima, mas posto aqui novamente. ---------------------- log 19:39:22:642 RX <- [sTX][224][NUL][sOH][FS][192][132][FS][FS][NUL][NUL][FS][ETX]029A -- 19:39:22:643 TX -> [sTX][225][14][ACK][FS][NUL][sOH][ETX]0117 RI- 19:39:23:250 RX <- [sTX][225][NUL][sOH][FS][192][128][FS][FS][NUL][NUL][FS][FS]10215[ETX]03AC -- 19:40:12:275 DataHora TX -> [sTX][226][ENQ][ESC][sTX][FS][NUL][NUL][ETX]0125 19:40:12:428 RX <- [sTX][226][NUL][sOH][FS][192][128][FS][FS][NUL][NUL][FS][FS]12032013[FS]191653[ETX]0595 -- 19:40:31:116 Estado TX -> [sTX][227][bS][16][FS][NUL][NUL][ETX]011C 19:40:31:261 RX <- [sTX][227][NUL][sOH][FS][192][128][FS][FS][NUL][NUL][FS][FS]1[ETX]02E6 -- 19:40:43:625 TX -> [sTX][228][ENQ][ESC][sTX][FS][NUL][NUL][ETX]0127 19:40:43:771 RX <- [sTX][228][NUL][sOH][FS][192][128][FS][FS][NUL][NUL][FS][FS]12032013[FS]191725[ETX]0597 -- 19:42:13:018 TX -> [sTX][229][bS][sOH][FS][NUL][sOH][FS]12032013[FS]191225[ETX]0408 19:45:48:668 RX <- [sTX][229][NUL][sOH][FS][192][128][FS][FS][ENQ][ESC][ETX][FS][ETX]02BE ----------------- ERRO ----------------- Erro retornado pela Impressora: Epson Erro: 0503 - Data em intervalo inválido. ---------------------------------------- -- 19:46:03:532 Estado TX -> [sTX][230][bS][16][FS][NUL][NUL][ETX]011F 19:46:04:683 RX <- [sTX][230][NUL][sOH][FS][192][128][FS][FS][NUL][NUL][FS][FS]1[ETX]02E9 --------------------------------------------------------- Estava passando assim: frmPrincipal.ecfImpressora.ReducaoZ(frmPrincipal.ecfImpressora.DadosReducaoZClass.DataDoMovimento); nessa linha ele manda somente a data. Daí passei a fazer assim: frmPrincipal.ecfImpressora.ReducaoZ(Now);

Acabo de receber a notícia desse cliente que não saiu a redução do dia. Somente hoje, com a Z pendente. Alguma dica a mais?

Vou fazer isso. Amanhã posto o resultado. Obrigado!

Eu só tô mandando a data do movimento. A hora eu não passo. Eu faço assim: frmPrincipal.ecfImpressora.ReducaoZ(frmPrincipal.ecfImpressora.DadosReducaoZClass.DataDoMovimento); e ese método DataDoMovimento é TDateTime, mas manda somente a data

Olá! Na ocasião desse erro, havia parado sem eu fazer muita coisa. Então, como voltou o erro em outro cliente e esse erro persiste, estou anexando o log aqui pra ver se alguém sabe o que pode ser. Um detalhe que eu reparei: - O ECF está em horário de verão com o relógio atrasado uns 40 minutos do relógio do PC. Ex: No PC são 19:51 e no ECF são 19:11. Ambiente: - Delphi XE3 update2, Windows 7 64 bits, Epson TM-T81F ---------------------- log 19:39:22:642 RX <- [sTX][224][NUL][sOH][FS][192][132][FS][FS][NUL][NUL][FS][ETX]029A -- 19:39:22:643 TX -> [sTX][225][14][ACK][FS][NUL][sOH][ETX]0117 RI- 19:39:23:250 RX <- [sTX][225][NUL][sOH][FS][192][128][FS][FS][NUL][NUL][FS][FS]10215[ETX]03AC -- 19:40:12:275 DataHora TX -> [sTX][226][ENQ][ESC][sTX][FS][NUL][NUL][ETX]0125 19:40:12:428 RX <- [sTX][226][NUL][sOH][FS][192][128][FS][FS][NUL][NUL][FS][FS]12032013[FS]191653[ETX]0595 -- 19:40:31:116 Estado TX -> [sTX][227][bS][16][FS][NUL][NUL][ETX]011C 19:40:31:261 RX <- [sTX][227][NUL][sOH][FS][192][128][FS][FS][NUL][NUL][FS][FS]1[ETX]02E6 -- 19:40:43:625 TX -> [sTX][228][ENQ][ESC][sTX][FS][NUL][NUL][ETX]0127 19:40:43:771 RX <- [sTX][228][NUL][sOH][FS][192][128][FS][FS][NUL][NUL][FS][FS]12032013[FS]191725[ETX]0597 -- 19:42:13:018 TX -> [sTX][229][bS][sOH][FS][NUL][sOH][FS]12032013[FS]191225[ETX]0408 19:45:48:668 RX <- [sTX][229][NUL][sOH][FS][192][128][FS][FS][ENQ][ESC][ETX][FS][ETX]02BE ----------------- ERRO ----------------- Erro retornado pela Impressora: Epson Erro: 0503 - Data em intervalo inválido. ---------------------------------------- -- 19:46:03:532 Estado TX -> [sTX][230][bS][16][FS][NUL][NUL][ETX]011F 19:46:04:683 RX <- [sTX][230][NUL][sOH][FS][192][128][FS][FS][NUL][NUL][FS][FS]1[ETX]02E9

Boa noite! Tenho um cliente que quando vai emitir a redução Z do movimento, no próprio dia do movimento, dá erro de comunicação com o ECF, isso depois de fechar movimento, ler dados da redução Z, etc ... quando vai emitir a redução Z dá o erro de comunicação. A redução só é tirada no dia seguinte, automaticamente pelo ECF. Estou enviando o log do ECF em anexo, caso alguém possa me ajudar! Grande abraço a todos! Ivan LogECF.rar LogECF.rar

É isso mesmo! Obrigado!

Boa tarde a todos! Quando eu atribuo o arquivo Eventos.fr3 à propriedade me dá o Access Violation: exception class : EAccessViolation exception message : Access violation at address 1B979A76 in module 'frx17.bpl'. Read of address 00000000. main thread ($1e44): 1b979a76 +012 frx17.bpl Frxclass TfrxReport.LoadFromFile 1adbae51 +065 ACBrNFeDanfeFRpkg.bpl Acbrnfedanfefr TACBrNFeDANFEFR.PrepareReportEvento 1adbaa1d +03d ACBrNFeDanfeFRpkg.bpl Acbrnfedanfefr TACBrNFeDANFEFR.GetPreparedReportEvento Alguma dica?

estou usando o ACBrMonitor

Quando eu atribuo o arquivo Eventos.fr3 à propriedade me dá o Access Violation: exception class : EAccessViolation exception message : Access violation at address 1B979A76 in module 'frx17.bpl'. Read of address 00000000. main thread ($1e44): 1b979a76 +012 frx17.bpl Frxclass TfrxReport.LoadFromFile 1adbae51 +065 ACBrNFeDanfeFRpkg.bpl Acbrnfedanfefr TACBrNFeDANFEFR.PrepareReportEvento 1adbaa1d +03d ACBrNFeDanfeFRpkg.bpl Acbrnfedanfefr TACBrNFeDANFEFR.GetPreparedReportEvento

Me desculpem ... já vi aqui:

Será que posso fazer com o FastReport?

Bom dia! No Delphi XE3 não tem mais o RaveReports e nem sinal do lançamento deste componente . O ACBRMonitor só imprime usando o RaveCB. Como fazer? Obrigado a todos! Ivan

E para imprimir a Carta de Correção? Como faço?

Entendi. Isso acontece com o separador de decimal também? Ele usa o DecimalSeparator = '.' ?

Um trabalho insano mas necessário caso se busque a compatibilidade do ACBr com todas as versões do Delphi. Mas acho que por enquanto isso pode ficar a cargo do programador em colocar em sua versão Delphi as alterações necessárias, tais como faço no meu fonte. Acredito que mesmo num sistema MultiThread funcionaria o uso do FormatSettings antes do comando ACBr.

Eu faço esse tratamento dentro do meu fonte sempre que preciso gravar os dados no banco, pois gravo com comandos SQL. Então eu faço: FormatSettings.DecimalSeparator := SEPARADOR_DECIMAL_BD[1]; FormatSettings.DateSeparator := SEPARADOR_DATA_BD[1]; FormatSettings.ShortDateFormat := FORMATO_DATA_BD; mudando para as configurações do banco e FormatSettings.DecimalSeparator := SEPARADOR_DECIMAL_SOFT[1]; FormatSettings.DateSeparator := SEPARADOR_DATA_SOFT[1]; FormatSettings.ShortDateFormat := FORMATO_DATA_SOFT; voltando para as configurações do painel de controle. Então sempre que puxar os dados da redução ou qualquer outro comando do ECF vou ter que mudar para o padrão de comunicação do ECF?

Uso Delphi XE3, Windows 7 64 bits, MySql 5.0 Community. Nos testes que eu fiz, tanto o DadosReducaoZ e DadosUltimaReducaoZ trouxeram as mesmas informações. Inclusive não trouxeram o Geral de Operação Não Fiscal.

Se eu colocar no meu fonte: FormatSettings.ShortDateFormat := 'dd/MM/yy'; FormatSettings.DateSeparator := '/'; antes de gerar os DadosUltimaReducaoZ funciona 100%

Depurei aqui e ele me traz: DataDoMovimento := StringToDateTime( copy(RetCmd,1,2)+DateSeparator+ copy(RetCmd,3,2)+DateSeparator+ copy(RetCmd,7,2), 'dd/mm/yy' ); Isso dentro da classe da Daruma. Daí teria que mudar na classe, pois a maioria dos formatos de data vem no formato "dd/mm/yyyy". Sugestões?

Daniel, Fiz do jeito que você me sugeriu, porém quando mando executar o comando DadosUltimaReducaoZ ele me dá a mensagem de erro: "01/02/13" is not a valid date and time. Essa é a data que meu ECF está atualmente. E esse erro é dentro da classe. Sabe me dizer o que pode ser? Obrigado, Ivan

Ok, Daniel, Muito obrigado! Vou testar aqui e posto o resultado!