Painel de líderes

Enviei ajuste para o repositório com base na sua sugestão, rev. 21830. Favor atualizar os fontes e testar.

Acrescentar a cidade Nova Xavantina-MT no cidades.ini [5106257] Nome=Nova Xavantina UF=MT Provedor=Agili NomeURL_H=agiliblue.agilicloud.com.br NomeURL_P=agiliblue.agilicloud.com.br Cidades.ini

Senhores, boa tarde. Fizemos alguns testes na versão simplificada do evento 2206 e precisamos modificar algumas linhas para validar corretamente. Segue o arquivo anexo, coloquei comentários nas linhas alteradas com a data de 06/05/2021, abaixo tb estará disponível sSecao := 'infoContrato'; altContratual.infoContrato.CodCargo := INIRec.ReadString(sSecao, 'codCargo', ''); altContratual.infoContrato.CodFuncao := INIRec.ReadString(sSecao, 'codFuncao', ''); altContratual.infoContrato.CodCateg := INIRec.ReadInteger(sSecao, 'codCateg', 0); altContratual.infoContrato.codCarreira := INIRec.ReadString(sSecao, 'codCarreira', ''); altContratual.infoContrato.dtIngrCarr := StringToDateTime(INIRec.ReadString(sSecao, 'dtIngrCarr', '0')); altContratual.infoContrato.nmCargo := INIRec.ReadString(sSecao, 'nmCargo', ''); //06/05/2021 altContratual.infoContrato.CBOCargo := INIRec.ReadString(sSecao, 'CBOCargo', ''); //06/05/2021 altContratual.infoContrato.dtIngrCargo := StringToDateTime(INIRec.ReadString(sSecao, 'dtIngrCargo', '0')); //06/05/2021 altContratual.infoContrato.nmFuncao := INIRec.ReadString(sSecao, 'nmFuncao', ''); //06/05/2021 altContratual.infoContrato.CBOFuncao := INIRec.ReadString(sSecao, 'CBOFuncao', ''); //06/05/2021 altContratual.infoContrato.acumCargo := eSStrToSimNaoFacultativo(Ok, INIRec.ReadString(sSecao, 'acumCargo', '')); //06/05/2021 ---------------------------------------------------------------------------------------------------- sSecao := 'horContratual'; if INIRec.ReadString(sSecao, 'qtdHrsSem', '') <> '' then begin altContratual.infoContrato.horContratual.QtdHrsSem := StrtoFloatDef(IniRec.ReadString(sSecao,'qtdHrsSem','0'),0); altContratual.infoContrato.horContratual.TpJornada := eSStrToTpJornada(Ok, INIRec.ReadString(sSecao, 'tpJornada', '1')); altContratual.infoContrato.horContratual.DscTpJorn := INIRec.ReadString(sSecao, 'dscTpJorn', ''); altContratual.infoContrato.horContratual.dscJorn := INIRec.ReadString(sSecao, 'dscJorn', ''); //06/05/2021 altContratual.infoContrato.horContratual.tmpParc := StrTotpTmpParc(Ok, INIRec.ReadString(sSecao, 'tmpParc', '0')); end; Eduardo / Keli pcesS2206.pas

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Testado com sucesso @BigWings. Agradeço pelo apoio. Vlw! (Pode fechar esse tópico)

Cara, peço desculpas pelo tópico, e se possível podem finalizar. o layout está impecável ( eu que fiz ) hahaha o que houve foram erros de preenchimento, quando há uma quebra indevida de linha, dai ele acusa aquela mensagem, de resto está tudo certo. Valeu pela atenção mesmo assim e desconsiderem o arquivo acima.

Boa tarde. Vale lembrar que ele ainda não foi finalizado e que o nome pode ser ajustado, de qualquer forma, fique a vontade para testar. Att.

Bom dia, Depende da tag IndPres para informar ou não a tag, veja esse tópico:

ACBrNFSeX está na pasta branches ainda e não no trunk2

Não entendi se o erro é do ACBr ou rejeição da SEFAZ na consulta... Sobre a função de validação já tem um tópico com sugestão de correção.

Bom dia. Infelizmente, não podemos subir a alteração na forma como está. Ele usa recursos (Expressões Regulares) que não estão disponíveis no Delphi 7 nem no Lazarus. Se você puder nos mandar um link do algoritmo de validação, talvez consigamos converter para uma versão compatível.

Muito obrigado pela contribuição. Fiz a implementação baseada nela. Subi as alterações para o SVN na Revisão 21804. Pelo que vi está tudo certo. Queira por favor atualizar, testar e reportar qualquer problema. Mais uma vez obrigado.

Sim, eu havia feito update hoje pela manhã, estou na revision 21803. Desta vez olhei em outros arquivos para ver se há mais algum que repita a mesma estrutura, mas não encontrei nenhum outro. Creio que sejam apenas estes dois.

Ok essas alterações eu enviei no SVN na revisão 21801. Os schemas eu vou pedir ao @Italo Giurizzato Junior pra conferir.

Boa tarde Marcelo. Como a Juliana disse anteriormente, eu subi a sua última versão com algumas alterações devido detalhes que encontrei. Peço que atualize o seu código via SVN e faça um novo upload de alterações. Antes, avalie as alterações que estão no SVN. Não é uma lista de todas alterações, mas por favor, dê atenção em especial ao seguinte: "pcesConversaoeSocial.pas" : linha 413 definição do tipo tpIndSubstPatrOpPort para manter a compatibilidade com o código anterior na medida do possível; "pcesS1200.pas": linha 1099 - Variável "A:TStringList" declarada é desnecessária Arquivo ACBreSocial-Change-log - não foi alterado Revisão 21800 Boa Tarde Joceandro. Queremos agradecer muito sua contribuição. Eu não consegui identificar o que você fez que ainda não está na versão atual do SVN. Mas como as alterações foram muitas, eu posso ter deixado de perceber algo. Por favor, faça atualização e reporte qualquer problema que encontrar. Suas contribuições são muito bem vindas.

Bom dia Amigos, consegui encontrar a solução fica registrado pra quem mais tiver essa duvida. é só setar no cedente. ACBrBoleto1.Cedente.TipoInscricao := pFisica;