Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Andre Luis Wisnheski

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Andre Luis Wisnheski

Gravado em

Chave

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

XGFE070A - Verifica se o Documento de Frete por ser adicionado à Fatura.

Características do Requisito

Linha de Produto:

Protheus

Segmento:

Distribuição e Logística

Módulo:

SIGAGFE

Ponto de Entrada - XGFE070A

Descrição:

Ao selecionar o Documento de Frete para adicionado à Fatura, é possível realizar uma validação.

Localização:

Ao adicionar o Documento de Frete à Fatura.

Programa Fonte:

GFEA070A

Parâmetros:

NomeTipoDescriçãoObrigatório
PARAMIXB[1]CaracterFilial da FaturaSim
PARAMIXB[2]CaracterEmissor da FaturaSim
PARAMIXB[3]CaracterSérie da FaturaSim
PARAMIXB[4]CaracterNúmero da FaturaSim
PARAMIXB[5]DataData de Emissão da FaturaSim
PARAMIXB[6]CaracterAlias da tabela temporária com os Documentos de Frete selecionadosSim

Retorno:

Nome

Tipo

Descrição

Obrigatório

lRet

Boolean

Indica se o Documento de Frete pode ser adicionado

Sim

Observação:

Após a execução das validações do Ponto de Entrada, é realizada a validação normal da rotina.
A validação do Ponto de Entrada pode ter validado, porém a validação da rotina pode não aceitar a inclusão do documento. 

 


Bloco de código
languagedelphithemeMidnight
titleExemplo: XGFE070A
linenumberstrue
User Function XGFE070A()
	Local cxFilial := PARAMIXB[1]
	Local cxEmiFat := PARAMIXB[2]
	Local cxSerFat := PARAMIXB[3]
	Local cxNrFat := PARAMIXB[4]
	Local cxDtEmis := PARAMIXB[5]
	Local cxAliasTmp := PARAMIXB[6]
	local lRet := .T.
	dbSelectArea("GW6")
	// Realiza todas as validação necessárias
	GW6->( dbSetOrder(1) )
	If GW6->(dbSeek(cxFilial + cxEsp + cxEmisDf + cxSerie + cxNrDc + DTOS(dxDtEmis)))
		 // Se documento não está aprovado no ECM não permite vincular na fatura
		lRet := .F.
	EndIf
Return lRet