gabriellc

consegui ajustar, segue anexado os arquivos pas, com as seguintes alteracoes: adicionado os campos codIncCPRP e tetoRemun, conforme leiaute S-1.0 do esocial , do evento S1010. e ajustado o tamanho min e max dos seguintes campos que nao estavam de acordo com o leiaute: codIncIRRF pcesConversaoeSocial.pas pcesS1010.pas

na versao do schema s-01, existe esses dois campos, codIncCPRP e tetoremun, que ainda nao existem no componente para alimentar.. tentei adicionar, ate consegui gerou o campo no xml corretamente, mas nao consegui validar esses campos, o comando validar XML da erro. ..... <xs:element name="codIncCPRP" minOccurs="0"> <xs:simpleType> <xs:annotation> <xs:documentation>Código de incidência da rubrica para as contribuições do Regime Próprio de Previdência Social - RPPS/regime militar.</xs:documentation> </xs:annotation> <xs:restriction base="xs:string"> <xs:enumeration value="00"> <xs:annotation> <xs:documentation>Não é base de cálculo de contribuições devidas ao RPPS/regime militar</xs:documentation> </xs:annotation> </xs:enumeration> <xs:enumeration value="11"> <xs:annotation> <xs:documentation>Base de cálculo de contribuições devidas ao RPPS/regime militar</xs:documentation> </xs:annotation> </xs:enumeration> <xs:enumeration value="12"> <xs:annotation> <xs:documentation>Base de cálculo de contribuições devidas ao RPPS/regime militar - 13º salário</xs:documentation> </xs:annotation> </xs:enumeration> <xs:enumeration value="31"> <xs:annotation> <xs:documentation>Contribuição descontada do segurado e beneficiário</xs:documentation> </xs:annotation> </xs:enumeration> <xs:enumeration value="32"> <xs:annotation> <xs:documentation>Contribuição descontada do segurado e beneficiário - 13º salário</xs:documentation> </xs:annotation> </xs:enumeration> <xs:enumeration value="91"> <xs:annotation> <xs:documentation>Suspensão de incidência em decorrência de decisão judicial</xs:documentation> </xs:annotation> </xs:enumeration> </xs:restriction> </xs:simpleType> </xs:element> <xs:element name="tetoRemun" minOccurs="0" type="TS_sim_nao"> <xs:annotation> <xs:documentation>Informar se a rubrica compõe o teto remuneratório específico (art. 37, XI, da CF/1988).</xs:documentation> <xs:documentation>Validação: Preenchimento obrigatório se a natureza jurídica do declarante for Administração Pública (grupo [1]).</xs:documentation> </xs:annotation> </xs:element> .....

boa tarde pessoal, a cidade de campina grande - PB, acabou de modificar seu webservice para o WEBISS, como proceder para configurar?

Pessoal, programando os retornos do tef, me veio uma duvida para preenchimento da forma de pagamento da NFCE, se o pagamento no TEF for feito por vale alimentacao ou vales... ele me retornar credito ou debito? (nao tenho vales pra testar) outro ponto, no preenchimento da forma de pagamento na NFCE as formas 10=Vale Alimentação 11=Vale Refeição 12=Vale Presente 13=Vale Combustível elas sao para os vales em CARTAO magnetico, ou para os vales em papel(nem sei se ainda existe).?

nao esta dando em todos nao! o problema eh pra quem nao pagou a taxa de emissao do governo da PB! na noticia do site diz que ia liberar excepcionalmente, mais em alguns clientes meus nao liberou nao! unica solucao que achei foi virar pra contigencia todas as notas!

cara, fiz minha homologacao semana passada com a qualita, nesse teste eles nao fazem assim, nao sei pq, ele diz pra deixar o cartao no pinpad, eles simplesmente mandam fechar a aplicacao quando aparece a msg "Homologação SITEF"

seguinte pessoal, nos meus testes aconteceu o seguinte: comeco a venda na hora de inserir o cartao, tento passar no magnetico ele da erro que o cartao eh de chip! insiro de um modo que ele de erro na leitura do chip, quando ele pede pra reinserir eu passo o cartao no magnetico e ele aceita! nao sei se esse comportamento eh normal!

amigo se voce estiver guardando o CSC no banco de dados pode ser isso eh um problema de conversao de caracteres ! tive esse mesmo problema.

corrigindo tirei o exception de poucopapel, estava atrapalhando, e adicionei o exception para offline if stSemPapel in Result then raise Exception.Create(ACBrStr(cACBrDeviceEnviaStrFailCount)); if stErro in Result then raise Exception.Create(ACBrStr(cACBrDeviceEnviaStrFailCount)); if stTampaAberta in Result then raise Exception.Create(ACBrStr(cACBrDeviceEnviaStrFailCount)); if stOffLine in Result then raise Exception.Create(ACBrStr(cACBrDeviceEnviaStrFailCount)); ACBrPosPrinter.pas

acho q resolvi juliomar, vou enviar os pas, para que voces analisem como fiz nas pressas para fazer meus testes, o codigo nao ficou muito limpo, mais da pra voces melhorarem se acharem nescessario. modifiquei esta funcao : function TACBrPosPrinter.LerStatusImpressora: TACBrPosPrinterStatus; var OldAtivo: Boolean; begin Result := []; OldAtivo := Ativo; try Ativo := True; if not (FDevice.IsSerialPort or FDevice.IsTCPPort) then Result := Result + [stNaoSerial]; if Result = [] then begin FPosPrinterClass.LerStatus( Result ); if stSemPapel in Result then raise Exception.Create(ACBrStr(cACBrDeviceEnviaStrFailCount)); if stPoucoPapel in Result then raise Exception.Create(ACBrStr(cACBrDeviceEnviaStrFailCount)); if stErro in Result then raise Exception.Create(ACBrStr(cACBrDeviceEnviaStrFailCount)); if stTampaAberta in Result then raise Exception.Create(ACBrStr(cACBrDeviceEnviaStrFailCount)); if (stGavetaAberta in Result) and ConfigGaveta.SinalInvertido then Result := Result - [stGavetaAberta]; end; finally Ativo := OldAtivo; end; end; e esta: procedure TACBrPosPrinter.EnviarStringDevice(AString: AnsiString); var CmdInit: AnsiString; Tratado:boolean; begin if AString = '' then exit; AtivarPorta; LerStatusImpressora; if not FInicializada then begin CmdInit := FPosPrinterClass.ComandoInicializa; FInicializada := (pos( CmdInit, AString ) > 0); if (not FInicializada) and (AString <> FPosPrinterClass.Cmd.Zera) then begin GravarLog('EnviarStringDevice - Inicializando: '+CmdInit, True); AString := CmdInit + AString; FInicializada := True; end; end; Tratado := False; if Assigned(FOnEnviarStringDevice) then FOnEnviarStringDevice(AString, Tratado); try if not Tratado then begin GravarLog('EnviarStringDevice( ' + AString + ')', True); FDevice.EnviaString(AString); end else GravarLog('OnEnviarStringDevice( ' + AString + ')', True); finally if ControlePorta then DesativarPorta; end; ACBrPosPrinter.pas

estou fazendo os testes no demo do acbrposprinter, sempre testo primeiro no demo, para depois implementar no meu sistema!, o demo esta sem modificaçoes! do mesmo modo que o trunk baixou! unica diferenca é que habilitei o controleporta!

estranho é que, no demo o lerstatus esta funcionando, retirei o papel mandei lerstatus, ele retonar estes status: stPoucoPapel, stSemPapel, stOffLine,

nao juliomar, esse outro problema ai, era o seguinte, eu estava tratando quando perdia conexao com a impressora, tipo no meio da impressao eu desligava ela, quando o ACBR tentava retomar a impressao ele dava erro de acesso negado por ela ter um "delay" depois que o windows reconhece, dai o componente tentava enviar outro comando enquanto o windows ainda estava "ativando" a porta, dai um sleep resolveu! esse "problema" eu so removo o papel e mando o comando imprimir, ela nao da erro nenhum, recolocando o papel a impressora imprime normal! nao sei se é comportamento da impressora ou no acbr, deu pra entendeu + ou -?

pessoal, alguem ja teve este "problema"! impressao na bematech 4200th com portal serial virtual, reproduzindo teste com demo posprinter: retirar o papel da impressora, ativar a impressora, mandar o comando imprimir. ele nao retorna erro algum! quando recoloca o papel, a impressora simplesmente imprime! eh isto msm? obrigado

olá daniel, descobri mais ou menos o que eh, esta relacionando com a porta virtual da bematech, eh como se depois que desse o comando ativar no acbrposprinter, na continuacao da impressao ele ja manda outro comando, mais a impressora ainda esta ativando no windows ai dava erro de acesso negado, resolvi dando um sleep(500) depois do comando ativar!

sim, na variavel valor ele passao 0, e na variavel Documento ele passa a hora do PC, variaveis da funcao TACBrTEFDCliSiTef.FazerRequisicao

tem alguma coisa errada neste processo? pq quando da o comando CNC ele abre o menu de cancelamento do Sitef, o que achei estranho eh q no log, as informacoes estao erradas o campo DOCUMENTO ele esta informando a hora, e o campo VALOR esta 0,00 -- 13/06 13:05:55:800 - *** IniciaFuncaoSiTefInterativo. Modalidade: 200 Valor: 0,00 Documento: 130555 Data: 20170613 Hora: 130555 Operador: Restricoes: CliSiTef.log

massa vou tentar e ver se da certo!

a impressora eh a bematech 4200 TH, USB com porta serial emulada.

boa tarde pessoal, estou implementando o cancelamento de transacoes TEF, quando mando o comando CNC, preenchendo todas as informações o acbr abre o menu do SITEF de cancelamento, isso eh normal!? imaginava que quando se dava o comando CNC com as informacoes, ele so dava o comando de cancelar e retornar o status da transacao!

ta tudo OK, digo que o possivel erro seja no acbrposprinter, pq fiz o teste no demo do ACbrPosPrinter, a mesma sequencia, mando o comando imprimir, desligo a impressora no meio da impressao, religuei a impressora e o POsPrinter nao reconhece mais a impressora, so reconhecendo depois de fechar o aplicativo e reabrir!

exatamente, mais pelo que estou vendo o problema eh com o ACBRposprinter, mesmo ligando novamente a impressora, e clicando yes, o ACBRPosPrinter, nao volta a identificar a impressora se ela for desligada durante a impresssao.

Olá Pessoal, Seguinte achei um possivel erro do ACBRPosPrinter, teste reproduzido no demo, liguei tudo normal, conectei a impressora no demo, ativei, mandei imprimir tudo normal, vamos ao erro> quando se manda imprimir e desliga a impressora no meio da impressao, ele nao consegue mais conectar na impressora, nem encontrar mais a porta da impressora, mesmo apos ligar a impressora novamente, ele so volta a encontrar a porta, apos retirar e colocar o CABO USB.

amigo que disponibilizou o exemplo, estou com o seguinte problema, adicionei o acbrposprinter, ta indo tudo legal, imprime a nfce e os comprovantes do tef, o problema ocorre quando desligo a impressora durante a impressao dos comprovantes, ele fica dando erro de imipressao deseja tentar novamente? e fica em loop nesse erro enquanto escolher a opcao yes! no debug o erro que causa o loop é acesso negado no acbrposprinter, alguma ideia de como corrigir? Obrigado

pessoa estou com o mesmo problema, quando se da o comando para imprimir a NFCE, ele so imprime o cabecalho da nota. Acbrposprinter + danfeESCPOS para reproduzir o problema é o seguinte> impressora bematech 4200 TH Configurar o acbrposprinter com a porta diretamente EX: COM?, e o controleporta = true, ele so imprime o cabecalho da nota. se colocar uma porta de compartilhamento EX: \\PC\IMP, ele imprime normal! mais como nao tem como tratar erro de impressao colocando o caminho de compartilhamento(pq ele sempre vai pro spool do windows, assim que a impressora voltar ela imprime), e como para homologar o TEF, ao menos no roteiro tem testes que eh necessario o possivel tratamento de erro de impressao. alguem tem alguma solução! essa do amigo ai de cima tentei e nao deu certo. ps: nao testei em outras impressoras.