01. DADOS GERAIS

Produto:

TOTVS Backoffice

Linha de Produto:

Linha Protheus 

Segmento:

Backoffice SP 

Módulo:FATURAMENTO (SIGAFAT)
Função:

DOCUMENTOS DE SAÍDA (MATA461)

Ticket:25894217
Requisito/Story/Issue:DSERFAT-33057

02. DESCRIÇÃO

Implementação do ponto de entrada MT46DTEN para permitir definir a Data de Entrega.  

03. DEMAIS INFORMAÇÕES

#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


04. ASSUNTOS RELACIONADOS

DT PE MT46DTEN - Definir data de entrega - Documentos de Saída