Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user Breno Soares Pereira Ferreira

Gravado em

comparado com

Nova versão 3

changes.mady.by.user Breno Soares Pereira Ferreira

Gravado em

Chave

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

...

LocalizaçãoFunction A650Comp() - Responsável por efetuar comparação dos saldos com o limite em moeda forte, retornando .T. ou .F. (.T.-> Aprovado / .F.-> Reprovado)
Parâmetros

.

NomeTipoDescriçãoObrigatório
lRetArrayRecebe um valor lógico com o resultado da avaliação de crédito feita pelo sistema: (Se receber .T., CRÉDITO OK ; Se receber .F., CRÉDITO COM PROBLEMA.)Sim

.

Retorno

.

NomeTipoObrigatórioDescriçãoValores
lRetLógicoSimDeve retornar se o crédito está OK (.T.) ou não (.F.) 

.T. - Aprovado

.F. - Reprovado

.

Observação

...

Bloco de código
firstline1
titleExemplo
linenumberstrue
#INCLUDE 'TOTVS.CH'
#INCLUDE 'PROTHEUS.CH'

User Function A650AVALCLocal()
	Local lRet := PARAMIXB[1]

	If !lRet .And. SA1->(Found()) .And. SA1->A1_COD == '000001'    
		lRet := .T.
	EndIf
Return lRet

...