Linha Microsiga Protheus

Árvore de páginas

GFEXFA04 - 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:GFEXFA04

Descrição:

Altera a data de previsão de entrega

Localização:

Na função PrevDtEnt que retorna a data e hora prevista de entrega a partir de uma data base.
Apenas quando o tipo de prazo for com base na tarifa GV6->GV6_CONSPZ == "1"

Programa Fonte:

GFEXFUNA - Funções Genéricas (SIGAGFE)

Parâmetros:

Nome

Tipo

Descrição

Obrigatório

aRetArrayRetorno Array contendo:
aRet[1] : Data Prevista
aRet[2] : Hora Prevista
aRet[3] : Sucesso/Falha		Sim

Retorno:

Nome

Tipo

Descrição

Obrigatório

aRet

Array

Retorno Array contendo:
aRet[1] : Data Prevista
aRet[2] : Hora Prevista
aRet[3] : Sucesso/Falha

Sim

Exemplo: GFEXFA04
#INCLUDE "PROTHEUS.CH"

User Function GFEXFA04()

    Local aRet    := PARAMIXB[1]
    Local nDia    := 0
    Local dtHora
    Local nQtPraz := GV6->GV6_QTPRAZ

    IF GV6->GV6_CONTPZ == '3'  

        IF Empty(aRet[1])
            dtHora := dDataBase
        else
            dtHora := aRet[1]
        EndIF    

        aRet[1] := dtHora    
        aRet[3] := .T.        
    Endif

Return aRet