Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Daniel Ferraz Lacerda

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Daniel Ferraz Lacerda

Gravado em

Chave

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

...

F473EFOK validaTela de Efetivação

 

 

Descrição

Criado ponto de entrada F473EFEOK utilizado para validar operação no momento da Efetivação da Concliliação Automática (FINA473)

 ObservaçãoRetorno .T. (para que permita ser feita a Efetivação) e .F. (para que a efetivação não seja realizada)

Exemplos

 

#include 'totvs.ch'

 

USER fUNCTION F473EFOK

 

Local oModel := PARAMIXB[11]
Local oModelDet := oModel:getModel('CONDETAIL')
Local nValor
Local lOK := .F.
Local cCampUse := PARAMIXB[12,1]

 

nValor := oModelDet:GetValue('IG_VLREXT')
if nvalor > 10 .and. !Empty(cCampUse)
lOk := .T.
Alert("Efetivação realizada")
Else
Alert("Efetivação não pode ser realizada, Valor abaixo e Campo de Usuário não preenchido")
Endif

 


Return lOK


Idioma

Português(Brasil)

Versões

Microsiga_Protheus12

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Parâmetros

PARAMIXB - Array completo contendo as informações da tela de efetivação

Retorno

.T. ou .F.

Variáveis

PARAMIXB[1]

Programa Fonte

FINA473A

...