Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Ponto de Entrada:GFEA1108

Descrição:Verificar qual a inscrição estadual correta a ser utilizada

Alterar para que o responsável pelo frete seja o emissor do documento

Localização:

Na função que exporta os dados do responsável pelo frete (Reg 317 e Reg515) 

Programa Fonte:

GFEA110 - Exportar Notas Fiscais - Layout 3.1

GFEA110B - Exportar Notas Fiscais - Layout 5.0

Parâmetros:

NomeTipoDecscriçãoObrigatório
PARAMIXB[1]CaractereIntegerFilial do SistemaSim
PARAMIXB[2]CaractereCodigo Tipo DocumentoSim
PARAMIXB[3]CaractereEmissor do DocumentoSim
PARAMIXB[4]CaractereSerie do DocumentoSim
PARAMIXB[5]CaractereNumero do DocumentoSim
Indicação do layout (317 ou 515)Sim

Retorno:

NomeTipoDescriçãoObrigatório
cRetString

Inscrição Estadual RG

Não
Bloco de código
languagedelphi
titleExemplo: GFEA1108
linenumberstrue
#INCLUDE "PROTHEUS.CH"

User Function GFEA1108()
	local cRet := ''
	local nLayout := PARAMIXB[1]
	
	if nLayout == 515
		if !EMPTY((cAliasSQL)->GW1_EMISDC)
			cRet := (cAliasSQL)->GW1_EMISDC
		EndIf		
	Elseif nLayout == 317
		if !EMPTY(GW1->GW1_EMISDC)
			cRet := GW1->GW1_EMISDC
		EndIf
	EndIf
return cRet