Linha Microsiga Protheus

Árvore de páginas

  • Criado por Usuário desconhecido (fernando.gabriel), última alteração em 08 ago, 2022

CONTEÚDO

  1. Dados Gerais
  2. Descrição
  3. Sintaxe
  4. Parâmetros
  5. Retorno
  6. Exemplo

01. DADOS GERAIS

Produto:

TOTVS Backoffice

Linha de Produto:

Linha Protheus

Segmento:

Backoffice

Módulo:

TOTVS Backoffice (Linha Protheus) - Faturamento (SIGAFAT)

Função:M461ADT
Abrangências:Microsiga Protheus 12
Versões:Microsiga Protheus 12
Compatível Países:Todos
Sistemas Operacionais:Todos
Compatível com as Bases de Dados:Todos
Nível de Acesso:Nível 1 (Acesso Clientes)
Idiomas:Todos


02. DESCRIÇÃO

O ponto de entrada é executado na preparação do Documento de Saída no faturamento, para validar se os itens do Pedido de Venda serão ou não faturados. 

03. SINTAXE

M461ADT({ cPedido , cItem }) --> lRet

04. PARÂMETROS

Nome Tipo Descrição
PARAMIXB[1]Caractere Número do Pedido de Venda 
PARAMIXB[2]CaractereItem do Pedido de Venda


05. RETORNO

Nome Tipo Descrição Obrigatório 
lRetLógico 

.T. - Item do pedido será faturado

.F. - Não será faturado

X

06. EXEMPLO

#INCLUDE "PROTHEUS.CH"
#INCLUDE "TOTVS.CH"

User Function M461ADT()

Local cPedido  := PARAMIXB[1] //Número do Pedido de Venda 
Local cItem    := PARAMIXB[2] //Item do Pedido de Venda
Local lRet     := Nil
    
iF cPedido == "TOTVS" .AND. cItem != "02" 
    lRet := .F.
    Alert("O item do Pedido de Venda não será Faturado")
Else 
    lRet := .T.
EndIf         
    
Return lRet