Árvore de páginas

Versões comparadas

Chave

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

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:BackOffice
Módulo:Financeiro
Idioma:Português(Brasil)
Função:

FINA087A - Recebimentos Diversos


02. DESCRIÇÃO

...

O ponto de entrada A087TUDOK permite a validação do painel de recebimentos diversos.

...

Ponto de entrada utilizado por todos os países.

Execução do ponto de entrada: ExecBlock('A087TUDOK',.F.,.F.,nPanel)

...

Exemplos

...

.

03. PARÂMETROS

Nome

Tipo

Descrição

nPanel

Numérico

Refere-se ao numero do parâmetro atual.

04. RETORNO

Nome

Tipo

Descrição

lValida

Lógico

.T. a validação foi aceita

.F. a validação não foi aceita

05. EXEMPLO DE UTILIZAÇÃO

Bloco de código
languagevb
themeMidnight
firstline1
titleA087TUDOK
linenumberstrue
#INCLUDE "Totvs.ch"

User Function A087TUDOK()

Local lValida := .T.
Local nX := 1


//Para o cliente 001 com loja 01 o tipo valor deve ser sempre em dinheiro.
If Alltrim(cCliente) == "001" .And. Alltrim(cLoja) == "01"

	For nX := 1 to Len(aCols)
		
		If 

...

Alltrim(aCols[nX][1]) <> "EF"

...


			lValida := .F.

...


		Endif

	Next

Endif

If !lValida

	Alert("Para o Cliente 001 com Loja 001 o Tipo Valor deve ser Em Dinheiro")

...



Endif

...



Return

...

Idioma

...

Português(Brasil)

...

Versões

...

Microsiga_Protheus11

...

Sistemas Operacionais Suportados

...

Todos

...

Compatível com as Bases de Dados

...

Todas

...

Parâmetros

...

nPanel (referente ao número do parâmetro atual)

...

Retorno

...

lValida(logico)
.T. a validação foi aceita

.F. a validação não foi aceita

...

Programa Fonte

...

 lValida