Linha Microsiga Protheus

Árvore de páginas

  • Criado por Usuário desconhecido (yuri.gimenes), última alteração em 16 dez, 2021

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Serviços
Módulo:Fiscal


02. DESCRIÇÃO

O Ponto de entrada MT103GUIA  permite ao Cliente gerar ou não a Guia de ICMS ST.

Importante!

A utilização desse ponto de entrada é de responsabilidade exclusiva do cliente, pois terá impacto direto na escrituração das notas e dos livros fiscais.

Utilize com cautela!

03. ESPECIFICAÇÃO

Parâmetros do ponto de entrada:

NomeTipoDescrição
cAliasNFEArray of RecordAlias da tabela de cabeçalho da NF
cAliasForArray of RecordAlias da tabela de Fornecedor
cCodFilArray of RecordCódigo da Filial
cCodForArray of RecordCódigo do Fornecedor
cCodLojArray of RecordCódigo da Loja
cEspDocArray of RecordEspécie do Documento

Retorno

NomeTipoDescrição
lResultLógico

.T. Gera - .F. Não gera



Importante!

É necessário criar um campo na tabela SA2 indicando se o Fornecedor é Optante ou não pelo Crédito Presumido.

04. EXEMPLO DE UTILIZAÇÃO


MT103GUIA
User Function MT103GUIA()

Local cAliasNFE := PARAMIXB[1] 
Local cAliasFor := PARAMIXB[2] 
Local cCodFil   := PARAMIXB[3] 
Local cCodFor   := PARAMIXB[4] 
Local cCodLoj   := PARAMIXB[5] 
Local cEspDoc   := PARAMIXB[6] 
Local lResult   := .F.
Local aAliAtu   := GetArea() 

If AllTrim(cEspDoc) == "CTR"   
	dbSelectArea(cAliasFor)   
	dbSetOrder(1)   
		If dbSeek(cCodFil+cCodFor+cCodLoj) .and. A2_OPTCRPR == "S"        
			lResult := .T.   
		Endif
Endif

RestArea(aAliAtu)  

Return lResult


05. DEMAIS INFORMAÇÕES

  • Não há