NFC-E CALCULOS

Fórum sobre desenvolvimento de software para atender as exigências da legislação fiscal e tributária (NFe, NFCe, NFSe, SPEED, Projeto ACBr, TEF, ECD, EFD, etc.)

Moderador: Moderadores

Responder
Fernando queiroz
Usuário Nível 4
Usuário Nível 4
Mensagens: 779
Registrado em: 13 Nov 2014 00:41
Localização: Porto Alegre/RS

NFC-E CALCULOS

Mensagem por Fernando queiroz »

Alguem teria o calculo para NFC-e de:

ICMS
IPI
PIS
COFINS

Eu estou fazendo assim:

Código: Selecionar todos

				M->cXml += '<imposto>'
				M->cXml += '<ICMS>'

				IF ALLTRIM(NFCEITENS->ICMS_ST) = "00"
					M->cXml += '<ICMS00>'
						M->cXml += '<orig>'          +NFCEITENS->ICMS_ORIGE                  +'</orig>'
						M->cXml += '<CST>'           +ALLTRIM(NFCEITENS->ICMS_ST)            +'</CST>'				
						M->cXml += '<modBC>3</modBC>'  
						M->cXml += '<vBC>'			 +ltrim(str(NFCEITENS->n_vBC,14,2))		 +'</vBC>'
						M->cXml += '<pICMS>'         +ltrim(str(NFCEITENS->n_pICMS,7,4))     +'</pICMS>'
						M->cXml += '<vICMS>'         +ltrim(str(NFCEITENS->n_vICMS,14,2))    +'</vICMS>'
					M->cXml += '</ICMS00>'	
						M->vBC            +=NFCEITENS->n_vBC
						M->vICMS          +=NFCEITENS->n_vICMS
				ELSEIF ALLTRIM(NFCEITENS->ICMS_ST) = "10"
					M->cXml += '<ICMS10>'
						M->cXml += '<orig>'          +NFCEITENS->ICMS_ORIGE                  +'</orig>'
						M->cXml += '<CST>'           +ALLTRIM(NFCEITENS->ICMS_ST)            +'</CST>'
					M->cXml += '</ICMS10>'	

				ELSEIF ALLTRIM(NFCEITENS->ICMS_ST) = "20"
					M->cXml += '<ICMS20>'
						M->cXml += '<orig>'          +NFCEITENS->ICMS_ORIGE                  +'</orig>'
						M->cXml += '<CST>'           +ALLTRIM(NFCEITENS->ICMS_ST)            +'</CST>'
					M->cXml += '</ICMS20>'	

				ELSEIF ALLTRIM(NFCEITENS->ICMS_ST) = "30"
					M->cXml += '<ICMS30>'
						M->cXml += '<orig>'          +NFCEITENS->ICMS_ORIGE                  +'</orig>'
						M->cXml += '<CST>'           +ALLTRIM(NFCEITENS->ICMS_ST)            +'</CST>'
					M->cXml += '</ICMS30>'	

				ELSEIF ALLTRIM(NFCEITENS->ICMS_ST) = "40"
					M->cXml += '<ICMS40>'
						M->cXml += '<orig>'          +NFCEITENS->ICMS_ORIGE                  +'</orig>'
						M->cXml += '<CST>'           +ALLTRIM(NFCEITENS->ICMS_ST)            +'</CST>'
					M->cXml += '</ICMS40>'	

				ELSEIF ALLTRIM(NFCEITENS->ICMS_ST) = "41"
					M->cXml += '<ICMS41>'
						M->cXml += '<orig>'          +NFCEITENS->ICMS_ORIGE                  +'</orig>'
						M->cXml += '<CST>'           +ALLTRIM(NFCEITENS->ICMS_ST)            +'</CST>'
					M->cXml += '</ICMS41>'						
					
				ELSEIF ALLTRIM(NFCEITENS->ICMS_ST) = "50"
					M->cXml += '<ICMS50>'
						M->cXml += '<orig>'          +NFCEITENS->ICMS_ORIGE                  +'</orig>'
						M->cXml += '<CST>'           +ALLTRIM(NFCEITENS->ICMS_ST)            +'</CST>'
					M->cXml += '</ICMS50>'	

				ELSEIF ALLTRIM(NFCEITENS->ICMS_ST) = "51"
					M->cXml += '<ICMS51>'
						M->cXml += '<orig>'          +NFCEITENS->ICMS_ORIGE                  +'</orig>'
						M->cXml += '<CST>'           +ALLTRIM(NFCEITENS->ICMS_ST)            +'</CST>'
					M->cXml += '</ICMS51>'
					
				ELSEIF ALLTRIM(NFCEITENS->ICMS_ST) = "60"
					M->cXml += '<ICMS60>'
						M->cXml += '<orig>'          +NFCEITENS->ICMS_ORIGE                  +'</orig>'
						M->cXml += '<CST>'           +ALLTRIM(NFCEITENS->ICMS_ST)            +'</CST>'
					M->cXml += '</ICMS60>'	

				ELSEIF ALLTRIM(NFCEITENS->ICMS_ST) = "70"
					M->cXml += '<ICMS70>'
						M->cXml += '<orig>'          +NFCEITENS->ICMS_ORIGE                  +'</orig>'
						M->cXml += '<CST>'           +ALLTRIM(NFCEITENS->ICMS_ST)            +'</CST>'
					M->cXml += '</ICMS70>'	

				ELSEIF ALLTRIM(NFCEITENS->ICMS_ST) = "90"
					M->cXml += '<ICMS90>'
						M->cXml += '<orig>'          +NFCEITENS->ICMS_ORIGE                  +'</orig>'
						M->cXml += '<CST>'           +ALLTRIM(NFCEITENS->ICMS_ST)            +'</CST>'
					M->cXml += '</ICMS90>'	
				ENDIF
				M->cXml += '</ICMS>'		
				
				IF PRODUTOS->q_PISst = "01"
					M->cXml += '<PIS>'
					M->cXml += '<PISOutr>'
					M->cXml += '<CST>01</CST>'
					M->cXml += '<vBC>'               +ltrim(str(NFCEITENS->q_vBC,14,2))  +'</vBC>'
					M->cXml += '<pPIS>'              +ltrim(str(NFCEITENS->q_pPIS,7,4))  +'</pPIS>'
					M->cXml += '<vPIS>'              +ltrim(str(NFCEITENS->q_vPIS,14,2)) +'</vPIS>'
					M->cXml += '</PISOutr>'
					M->cXml += '</PIS>'						
					M->vPIS           +=NFCEITENS->q_vPIS
							
				ENDIF
				IF PRODUTOS->s_COFst = "01"
					M->cXml += '<COFINS>'
					M->cXml += '<COFINSOutr>'
					M->cXml += '<CST>01</CST>'
					M->cXml += '<vBC>'               +ltrim(str(NFCEITENS->s_vBC,14,2))    +'</vBC>'
					M->cXml += '<pCOFINS>'           +ltrim(str(NFCEITENS->s_pCOFINS,7,4)) +'</pCOFINS>'
					M->cXml += '<vCOFINS>'           +ltrim(str(NFCEITENS->s_vCOFINS,14,2))+'</vCOFINS>'
					M->cXml += '</COFINSOutr>'
					M->cXml += '</COFINS>'		
					M->vCOFINS        +=NFCEITENS->s_vCOFINS						
				ENDIF
				M->cXml += '</imposto>'
				M->cXml += '</det>'
ja surtei com isso :% :% :% :% :% :%
HARBOUR 3.2, HWGUI 2.23 B3, SEFAZCLASS, PDFClass, ADO + MariaDB/MySQL, RMChart
Voltar ao topo
Avatar do usuário
fladimir
Colaborador
Colaborador
Mensagens: 2445
Registrado em: 15 Nov 2006 20:21

NFC-E CALCULOS

Mensagem por fladimir »

NFCe com IPI PIS COFINS... não tem algo errado ai?
Sun Tzu há mais de três mil anos cita nas epígrafes de seu livro “A Arte da Guerra“:

“Concentre-se nos pontos fortes, reconheça as fraquezas, agarre as oportunidades e proteja-se contra as ameaças”.
“Se não é vantajoso, nunca envie suas tropas; se não lhe rende ganhos, nunca utilize seus homens; se não é uma situação perigosa, nunca lute uma batalha precipitada”.

Até 2017    Desktop Console [ Legado ] Harbour | MinGW | DBF | CDX | FastReport | MySQL


Novos Projetos:

   Desktop Visual           Windev Desktop
   Celular Android/iOS   Windev Mobile
   WEB                            Windev Web

Sejamos gratos a Deus.
Voltar ao topo
Fernando queiroz
Usuário Nível 4
Usuário Nível 4
Mensagens: 779
Registrado em: 13 Nov 2014 00:41
Localização: Porto Alegre/RS

NFC-E CALCULOS

Mensagem por Fernando queiroz »

fladimir escreveu:NFCe com IPI PIS COFINS... não tem algo errado ai?
Exatamente!!!!

gostaria de saber o que vai na NFC-e , somente ICMS? , gostaria de ver um xml de NFC-e para ter uma ideia do que fazer

como proceder com produtos da cesta basica, produtos com ST, preciso finalizar essa NCF-e pois o cliente ja levou uma multa de R$ 51.000,00 por nao ter o cupom implantado.


:( :( :( :( :(
HARBOUR 3.2, HWGUI 2.23 B3, SEFAZCLASS, PDFClass, ADO + MariaDB/MySQL, RMChart
Voltar ao topo
Avatar do usuário
Poka
Usuário Nível 4
Usuário Nível 4
Mensagens: 563
Registrado em: 25 Out 2004 21:26
Localização: Leme/SP

NFC-E CALCULOS

Mensagem por Poka »

Olá

veja se ajuda

Poka
Anexos
35180105774148000105650020000003061879875780-procNFe.xml
(13.6 KiB) Baixado 59 vezes
Voltar ao topo
Avatar do usuário
rochinha
Administrador
Administrador
Mensagens: 4664
Registrado em: 18 Ago 2003 20:43
Localização: São Paulo - Brasil
Contato:
Contato rochinha

NFC-E CALCULOS

Mensagem por rochinha »

Amiguinhos,

Fernando queiroz
Baixe a tabela de naturezas que disponibilizei, ela apresenta quais CST/CSOSN usar para cada CFOP:

TABELAS: Natureza de Operação com CENQ e CST/CSOSN.
OPS! LINK QUEBRADO? Veja ESTE TOPICO antes e caso não encontre ENVIE seu email com link do tópico para [url=mailto://fivolution@hotmail.com]fivolution@hotmail.com[/url]. Agradecido.

@braços : ? )

A justiça divina tarda mas não falha, enquanto que a justiça dos homens falha porque tarda.
Voltar ao topo
Responder

Voltar para “Legislação Fiscal e Tributária”