Descrição

Ponto de Entrada criado para bloquear a porcentagem de despesas.

Observações

 

Exemplos

#include 'protheus.ch'

User function PEOC4701()

Return 10

Preview

Veja também

 

Idioma

Português(Brasil)

Versões

Todas

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

 

Parâmetros

n/a

Retorno

Inteiro até 100

Eventos de chamada do Ponto de Entrada

.
.
.
// Ponto de entrada criado para travar a porcentagem de despesas
if ExistBlock("PEOC4701")
nFixPerc := ExecBlock("PEOC4701",.f.,.f.)
AADD(aParamBox,\{1, STR0066, nFixPerc, "@E 99.99", "MV_PAR15 >= 0 .AND. MV_PAR15 < 100", , ".F.", 40, .F.\})
else
AADD(aParamBox,\{1, STR0066, 0, "@E 99.99", "MV_PAR15 >= 0 .AND. MV_PAR15 < 100", , ".T.", 40, .F.\})
EndIf
.
.
.

Variáveis

 

Programa Fonte

OFIOC470.PRW