Registro tipo D3

[tchuck]

Pessoal estou gerando o Registro D3 porem o ACBr esta gerando esse bloco fora da ordem posições estao erradas são elas:

Situação Tributária Código da Situação Tributaria conforme tabela constante no item 7.2.1.5

Alíquota Alíquota, conforme item 7.2.1.6

esses dois ai estao gerando fora da possição...

[EMBarbosa]

Por favor, poste como está sendo gerado, e como deveria gerar.

Se possível, código para reproduzir no demo, ou melhor ainda como corrigir.

[tchuck]

Aqui pelo Acbr esta gerando os arquivo Situação Tributária e Alíquota nas seguintes posições:

Tamanho Posição

Situação Tributária 01 189 189

Alíquota 04 190 193

sendo que pelo Anexo as posições estao diferentes conforme abaixo...

13 Situação Tributária 01 89 89

14 Alíquota 04 90 93

essa questao de possição to vendo q o pessoal do raceita ta fazendo uma bagunça vi q esta errado a digitação..

[tchuck]

pessoal eu acabei de atualizar meu Acbr porem mexeram no registro D3 e agora esta faltando campos e os registros ficou bagunçado

agora esta assim na ACBrPAF_D_Class

strRegistroD3 := strRegistroD3 + LFill('D3') +

LFill(RegD2.NUM_DAV, 13) +

LFill(DT_INCLUSAO, 'yyyymmdd') +

LFill(NUM_ITEM, 3, 0) +

RFill(COD_ITEM, 14) +

RFill(DESC_ITEM, 100, ifThen(RegistroValido, ' ', '?')) +

LFill(QTDE_ITEM, 7, DEC_QTDE_ITEM) +

RFill(UNI_ITEM, 3) +

LFill(VL_UNIT, 8, DEC_VL_UNIT) +

LFill(VL_DESCTO, 8, 2) +

LFill(VL_ACRES, 8, 2) +

LFill(VL_TOTAL, 14, 2) +

RFill(SIT_TRIB,7,' ') +

LFill(IND_CANC) +

LFill(DEC_QTDE_ITEM, 1) +

LFill(DEC_VL_UNIT, 1) +

sLineBreak;

porem na RFill(SIT_TRIB,7,' ') + mudaram aqui adicinando o ' ' assim fica com espaço enorme por causa dessa mudança,

e o tamanho para a SIT_TRIB é 1 e nao 7 alem disso e esta faltando a ALIQ

meu sistema virou uma bagunça com essas mudanças...

[EMBarbosa]

Sim. Foi alterado pelo eselvati na revisão 3032. Precisa ver com ele os motivos.

Não achei na documentação onde está dizendo pra colocar o índice da alíquota. Isso é o que está fazendo o campo ficar com tamanho 7 ao invés de 5 (1 para tipo aliquota+ 4 aliquota) que estava antigamente.

Se está lhe causando muitos problemas você tem liberdade para voltar para o código antigo:

RFill(SIT_TRIB,1) +

LFill(ALIQ,4) +[/code]


EDIT: Obrigado por reportar, vamos aguardar ele se manifestar...

[tchuck]

EMBarbosa

No meu Ato Cotep no anexo III registro D3 Item 14, esta sim pedindo a Aliquota, não sei qual o seu reteiro ou o documento q olhou, mas no meu esta aqui pedindo olhei todos os Anexo do Ato Cotep 1.09 e totos pedem a aliquota...

[EMBarbosa]

EMBarbosa

No meu Ato Cotep no anexo III registro D3 Item 14, esta sim pedindo a Aliquota não qual o seu reteiro mas no meu esta aqui pedindo olhei todos os reteiros e totos pedem a aliquota...

Isso. No meu também. Está pedindo a situação e a alíquota, e não o índice da alíquota.

[tchuck]

So oq foi removido não é o Indece...

Entao como foi removido quando gero o arquivo eletronico fica um espaço aonde deveria sair a Aliquota esse não estava acontecendo se eu voltar e colocar as opção q vc falou volta agerar corretamente o layout...

[EMBarbosa]

É. Não está saindo porque você não está passando a alíquota para a situação tributária.

Veja o comentário feito na revisão 3032 (é sempre bom acompanhar o log do SVN além do arquivo changelog):

De acordo com a versao ER 01.09, a sit tributaria deve seguir o seguinte formato

xxTnnnn onde xx=indice da aliquota + T + aliquota

ex: 01T1800

Como eu disse, vou esperar o eselvati se manifestar.

Se estiver dando problemas a você, volte o código aí localmente até segunda ordem.

Eu não posso simplesmente mudar o código no SVN sem saber se foi ou não um equívoco, pois não fui em quem fiz a alteração.

[tchuck]

Ok entendo, vou aguardar...

obrigado

[Régys Silveira]

Estive olhando o arquivo citado, o acerto para a ER 1.09 já havia sido feito por mim, mas alguém alterou a geração do arquivo equivocadamente para um formato errado.

Acertei novamente o arquivo para gerar conforme a ER 1.09 e enviei para o SVN, a propriedade SIT_TRIB deve ser preenchida com T, F, I, N, S e a propriedade ALIQ recebe a alíquota em percentual, tudo isso conforme a ER 1.09.

Qualquer dúvida entre poste aqui.

[tchuck]

regys.silveira muito obrigado

era isso q eu estava questionando pois estava tudo certo e depois vi q meus arquivos estava gerando errados e percebi q mudaram a classe D erradamente

[Ederson Selvati]

Pessoal

Foi por conta de um equivoco na hora da homologação, peço desculpas pelo transtorno causado com a modificação.

Agora eu e Alfredo (amigo do Regys) tivemos problemas na geracao do arquivo de movimento por conta da herança dos campos no arquivo R, como numero de serie e coo por exemplo. na hora da homologação, ao se alterar algum campo de um registro pai, caso exista o campo na tabela filha, este nao deveria ser alterado, ou entao, se altera-se na tabela pai, deveria-se alterar na tabela filha. Mas como o ACBrPAF faz essa ligação a nivel de geracao do arquivo dava-se divergencia com relacao ao banco de dados, dai conseguimos resolver implementando triggers no BD. Uma sugestão seria adicionar os campos necessários também nos registros filhos, ficaria redundante, mas daria pra se executar mais facilmente os testes. Outra mudança necessária é nos parametros do ECF, porém as alterações estão com o Alfredo.

Abraços

Ederson Selvati

[Ederson Selvati]

Pessoal, no relatorio de parametros do PAF tive que fazer as modificacoes abaixo:

Retirar as linhas 3 e 4, por acharem que a linha 1 e 2 tratam do mesmo tema.

1    Relatorio.Add('ITEM 3: Emitir DAV, impresso em equip. não');

2    Relatorio.Add(padL('fiscal, conf. defin. no inciso III do art.1º', TamColSimNao, '.') + GetDescrFlag( AInfoPafECF.RealizaDAVNaoFiscal));

    Relatorio.Add('ITEM 4: Emite DAV, impresso no ECF, como');

    Relatorio.Add('Relat. Ger.,conforme defin. no inciso');

    Relatorio.Add(padL('III do art.1º', TamColSimNao, '.') + GetDescrFlag( AInfoPafECF.RealizaDAVECF ));

    Relatorio.Add('ITEM 6: Registro de lançamento de mesa ou');

    Relatorio.Add(padL('conta de cliente', TamColSimNao, '.') + GetDescrFlag( AInfoPafECF.RealizaLancamentoMesa ));

    Relatorio.Add('Req VI');

3    Relatorio.Add('ITEM 2: imprime o DAV conforme o modelo');

4    Relatorio.Add(padL('constante no Anexo II', TamColSimNao, '.') + GetDescrFlag( AInfoPafECF.DAVConfAnexoII ));

Ederson Selvati

[tchuck]

os Item 3 e 4 São diferentes do Item 1 e 2 pois eles se refere ao modelo se esta de acordo com o modelo q esta nos anexos...

ja o item 1 e 2 se refere ao equipamento q esta sendo emitido o dav

os homologadores aqui no ES pede todos os itens se nao vc tem q adicionar eles de qualquer forma...

[Ederson Selvati]

Pois é, pelos lados de cá mandaram remover, não vou procurar entender o porque, só sei que a cada dia nossa vida se torna mais dificil por conta destas exigencias.

Ederson Selvati