Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Retorno
URET(qualquer) ExpL1: Indicando se o Orçamento é válido



Portuguese

Pagetitle
A415TDOK - Validação da tudook
A415TDOK - Validação da tudook

Ponto-de-Entrada: A415TDOK - Validação da tudook


Versões:Microsiga Protheus 8.11 , Microsiga Protheus 10
Idiomas:Espanhol , Inglês


Descrição:

VALIDACAO

DA

TUDOOK

-

ORCAMENTO

DE

VENDA
Este

ponto

de

entrada

é

disparado

na

validação

da

"tudook

" da

rotina

de

orcamento

Orçamento de

venda.

Programa Fonte
.PRW
Sintaxe

A415TDOK - Validação da tudook ( < UPAR> ) --> URET"tudook" ao salvar um Orçamento de Venda


Exemplo de uso:

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

User function A415TDOK() 

Local lRet := .T. //Variável utilizada para controle e validação ao clicar no botão SALVAR do Orçamento de venda

dbSelectArea("TMP1")
dbGotop()

If M->CJ_CLIENTE == "000001" .And. TMP1->CK_VALOR >= 1000
    lRet := .F.
    MsgAlert("Não é possível incluir orçamento para o cliente "+M->CJ_CLIENTE+" com valor maior ou igual à $1000,00")
EndIf

Return(lRet)

Parâmetros:
NomeTipoDescriçãoDefaultObrigatórioReferênciaUPARQualquerNenhumX