Exibir origem

CONTEÚDO

Dados Gerais
Descrição
Sintaxe
Retorno
Exemplo

01. DADOS GERAIS

Produto:
Linha de Produto:
Segmento:
Módulo:
Função:	MATA461 - Documentos de Saída MATA410 - Pedido de Vendas
Abrangências:	Microsiga Protheus 12
Versões:	Microsiga Protheus 12
Compatível Países:	Brasil
Sistemas Operacionais:	Todos
Compatível com as Bases de Dados:	Todos
Nível de Acesso:	Nível 1 (Acesso Clientes)
Idiomas:	Português

02. DESCRIÇÃO

O Ponto de Entrada é executado na rotina Documentos de Saída (MATA461) e no Pedido de Vendas (MATA410),permitindo definir a data de entrega no momento de preparar o Documento de Saída, conforme a exibição do pergunte abaixo.

Linha Microsiga Protheus > PE MT46DTEN Definir data de entrega nos Documentos de Saída > image-2026-1-8_14-55-53.png

03. SINTAXE

MT46DTEN()--->DATA

04. RETORNO

dDtEntrega

05. EXEMPLO

#INCLUDE 'PROTHEUS.CH'
#INCLUDE 'TOTVS.CH'  
User Function MT46DTEN()
    Local dDtEntrega    := cTod("//")
    Local lMata410      := Findfunction("MATA410") //Pedido de Vendas
    Local lMata461      := Findfunction("MATA461") // Documento de Saida

    If lMata410
        msgyesno("PE MT46DTEN","PE-MT46DTEN  - PEDIDO: ")
        dDtEntrega := cTod("30/01/2026")
    EndIf

    If lMata461
        msgyesno("PE MT46DTEN","PE-MT46DTEN  ")
        dDtEntrega := cTod("30/12/2027")
    EndIf

Return dDtEntrega