Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 5

changes.mady.by.user Breno Soares Pereira Ferreira

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Breno Soares Pereira Ferreira

Gravado em

Chave

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

...

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

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

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

...