Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Gabriela Luane De Lima

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Hercilio Henning Neto

Gravado em

Chave

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

...

GFEXFA01 - PERMITIR ALTERAR A DATA DE PREVISÃO DE ENTREGA

...

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Supply Chain - Logística

Módulo:

SIGAGFE

  

Ponto de Entrada:GFEXFB16 GFEXFA01

Descrição:

Permitir ajustar a data e horário do prazo de entrega de acordo com a regra do cliente em Cálculo de Frete

Localização:

Durante o cálculo de frete, após a identificação do prazo de entrega padrão do sistema.Após a liberação do romaneio de carga, para tabelas de frete que calculam prazo pela Tarifa da Tabela de Frete

Programa Fonte:

GFEXFBH - Cálculo de Frete

GFEXFUNA - Função PrevEntreg

Parâmetros:

NomeTipoDescriçãoObrigatório
PARAMIXB[1]CaracterData Previsão de EntregaSim
PARAMIXB[2]CaracterHora Previsão de EntregaSim

Parâmetros:

-

Retorno:

NomeTipoDescriçãoObrigatório
aRetArray

Array com a data e o horário informados no específico.indicando se houve erro no cálculo da data

Sim
Bloco de código
languagedelphi
titleExemplo: GFEXFB15GFEXFA01
linenumberstrue
#INCLUDE 'PROTHEUS.CH'
Useruser Functionfunction GFEXFB16GFEXFA01()

	Local dDataPr := PARAMIXB[1]
	Local cHrPrev := PARAMIXB[2]
	Local aRet := { CTOD("25/12/2018"), "09:00:15" } 
 
Return}
	
	Local dDtPr := DDatabase
	Local cHrPr := "08:00"
	
	if dDtPr == DDatabase
	
		RecLock("GWU",.F.)
			GWU->GWU_DTPENT := dDtPr
			GWU->GWU_HRPENT := cHrPr
		MsUnLock("GWU")	
	Else			
		aRet[1] := .F.
		aRet[2] := "Data prevista não calculada."	
	Endif	
	
return aRet