Versões comparadas

Chave

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

...

Bloco de código
languagevb
themeMidnight
firstline1
titleF240BORD
linenumberstrue
#include "protheus.ch"

/*/{Protheus.doc} F240BORD
    El punto de entrada F240BORD se utilizará para tratamiento complementario después que el sistema grabe el borderó.   @author 
	@since 03/07/2012
	@version 12.1.2410
/*/  #Include "Protheus.ch"

User Function F240BORD()

    Local nValor as Numeric
    Local cNum   as Caracter

 	nValor := SEB -> SEB_VALOR
 	cNum   := SEB -> SEB_NUM 

    // Ejemplo de validación si el valor del borderó fuera igual a cero.
    If nValor == 0
        MsgInfo("O¡El borderôborderó " + cNum + " temtiene valor ZEROCERO!")
    EndIf

Return