Histórico da Página
GFE06501 -
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxPermite verificar a data de vencimento informada
Características do Requisito
Linha de Produto: | Microsiga Protheus |
Segmento: | Supply Chain - Logística |
Módulo: | SIGAGFE |
Ponto de Entrada - GFE06501
Descrição:XXXXXXXXXXXX | Permite verificar a data de vencimento informada. | ||||||
Localização: | Antes de gerar a Fatura de Frete por Faixa ou na criação automática de Faturas de Frete | ||||||
Programa Fonte: | GFEA065 - Digitação de Documentos de Frete | ||||||
Parâmetro:dDtVenc |
| ||||||
Retorno:XXXXXXXXXXXXXXXXXXXX | Retorna uma variável do tipo 'Data' |
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
#INCLUDE "PROTHEUS.CH" User Function#INCLUDE "Topconn.ch" #INCLUDE "PARMTYPE.CH" USER FUNCTION GFE06501() Local dDataVenc := PARAMIXB[1] Return Local dDtLimite := "20200101" //Exemplo de utilização dDataVenc := DTOS(dDataVenc) If dDataVenc <= dDtLimite dDtLimite := STOD(dDtLimite) Alert("A Data de Vencimento informada deve ser posterior a "+ DtOC(dDtLimite)) ENDIF dDataVenc := STOD(dDataVenc) RETURN dDataVenc |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas