Pesquisar na Comunidade

Bom dia a todos! Passei uma situação semana passada com relação ao CST 51 (diferimento), onde precisava colocar a tag <pICSMS> com zero, além de outras tags como <vICMSOp>, <vICMSDif>, etc. Porem neste caso, a rotina do contida em pcnNFeW.pas suprime estas tags no XML, quer dizer, elas não são geradas caso tenham o valor zero. Mas isto gera rejeição, ao menos no ambiente 4.0 de webservices. Mas notei que é utilizada a procedure wCampo(), e existe o parâmetro "ocorrencias", que hoje é setado com 0 (zero), mas setando para 1 (um), a tag é gerada mesmo com o conteúdo zero. Gostaria de saber se é possível fazer a alteração disto para o cst 51, pois como eu mencionei, não há condições de validar a NFe sem esta alteração. Segue a imagem do ponto onde encontra-se a programação a ser alterada: Minha sugestão, já alterando os campo necessário (parâmetro "ocorrencias" com o valor 1 (um): Gerador.wCampo(tcStr , 'N13' , 'modBC' , 01, 01 , 1, modBCToStr(nfe.Det[i].Imposto.ICMS.modBC), DSC_MODBC); Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'N14' , 'pRedBC' , 01, IIf(Usar_tcDe4,07,05), 1, nfe.Det[i].Imposto.ICMS.pRedBC , DSC_PREDBC); Gerador.wCampo(tcDe2 , 'N15' , 'vBC' , 01, 15 , 1, nfe.Det[i].Imposto.ICMS.vBC , DSC_VBC); Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'N16' , 'pICMS' , 01, IIf(Usar_tcDe4,07,05), 1, nfe.Det[i].Imposto.ICMS.pICMS , DSC_PICMS); Gerador.wCampo(tcDe2 , 'N16a', 'vICMSOp' , 01, 15 , 1, nfe.Det[i].Imposto.ICMS.vICMSOp , DSC_VICMS); Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'N16b', 'pDif' , 01, IIf(Usar_tcDe4,07,05), 1, nfe.Det[i].Imposto.ICMS.pDif , DSC_PICMS); Gerador.wCampo(tcDe2 , 'N16c', 'vICMSDif' , 01, 15 , 1, nfe.Det[i].Imposto.ICMS.vICMSDif , DSC_VICMS); Gerador.wCampo(tcDe2 , 'N17' , 'vICMS' , 01, 15 , 1, nfe.Det[i].Imposto.ICMS.vICMS , DSC_VICMS); Espero mais uma vez estar contribuindo positivamente. Um ótima semana a todos. Grande abraço! Emerson Crema Max Scalla Informática Ltda.

Olá Colegas, O governando do PR aumentou a alíquota interna do PR de 12% para 18%. Conforme Lei n. 18.371 produzindo efeitos a partir de 1º de abril de 2015. Mas depois decretou uma alteração no RICMS na parte de diferimento parcial, conforme o decreto 955/15 revogando o art 108 paragrafo 1, que não poderia ser aplicado o diferimento de 33,33% para Sub. Tribt.. produzindo efeitos a partir de 1º de abril de 2015. Com a revogação eu agora posso emitir uma Nota com substituição tributária e com diferimento de ICMS. Agora vem a dúvida no layout do XML, pois tenho a CST 10, a qual consigo destacar os campos de ST, mas não o diferemento parcial de ICMS. Se mando no 10 com o diferimento, retorna o erro de diferença de valores, pois o cálculo de ICMS não bate: Nota(s) não confirmadas: 70402->Valor do ICMS difere do produto BC e Aliquota (nItem:1, vICMS informado: 120.0100, vICMS calculado: 180.0000) E tenho o campo CST 51 que tenho os campos para informar o diferimento de ICMS, mas não tenho como destacar o ICMS-ST. Resumindo, não posso utilizar o 10 e nem o 51. Talvez utilizar o 90? Alguém já passou por isso? Tem alguma idéia de como proceder? Obrigado Rodrigo Curitiba-PR

Olá pessoal estou tendo a seguinte mensagem de validação ao enviar uma nota com ICMS CST 51 com os campos pRedBC ou pDif com valor 100.0000 Tamanho maior que o máximo permitido [100] Verifiquei que no código fonte pcnNFeW.pas aonde monta o CST51 esta utilizando 06 casas conforme abaixo no IIf(Usar_tcDe4,06,05) como o valor 100.0000 que contém quatro casas decimais o valor passe de 06 caracteres sendo utilizado 07; Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'N14', 'pRedBC ', 01, IIf(Usar_tcDe4,06,05), 0, nfe.Det[i].Imposto.ICMS.pRedBC, DSC_PREDBC); Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'N16b', 'pDif ', 01, IIf(Usar_tcDe4,06,05), 0, nfe.Det[i].Imposto.ICMS.pDif, DSC_PICMS); Alterei essas linhas para usar 07 conforme abaixo e resolveu. Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'N14', 'pRedBC ', 01, IIf(Usar_tcDe4,07,05), 0, nfe.Det[i].Imposto.ICMS.pRedBC, DSC_PREDBC); ... Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'N16b', 'pDif ', 01, IIf(Usar_tcDe4,07,05), 0, nfe.Det[i].Imposto.ICMS.pDif, DSC_PICMS); Em anexo o código fonte com a alteração, se for possível commitar no SVN essa alteração. pcnNFeW.pas