IsBlind

Tempo de leitura: 1 minuto

Olá, no post de hoje iremos aprender como usar a função IsBlind em ADVPL. Essa função tem como objetivo validar se a conexão efetuada com o TOTVS Protheus é através de interface gráfica ou não(via job por exemplo).  Ela é uma das funções de controle de processamento em ADVPL. 

Sintaxe:

IsBlind()
 

Retorno:

 

Exemplo da função IsBlind em ADVPL:

#include 'protheus.ch'
#include 'rwmake.ch'
#INCLUDE "TBICONN.CH"
/*{Protheus.doc} User Function fIsBlind
    Link de referência:https://tdn.totvs.com/pages/releaseview.action?pageId=6814878
    (Essa função tem por finalidade mostrar a função IsBlind em ADVPL)
    @type  Function
    @author Adilio Costa
    @since 12/12/2024
    @version 1.0
   @Inscreva-se no Blog ProtheusAdvpl:
https://www.protheusadvpl.com.br
@Inscreva-se no Canal ProtheusAdvpl:
https://www.youtube.com/protheusadvpl
@Siga-nos no Instagram:
https://www.instagram.com/protheusadvpl
@Conheça os Cursos e Formações ProtheusAdvpl:
https://cursos-e-formacoes-protheusadvpl.gr-site.com/

|Se esse conteúdo foi útil pra você nos ajude divulgando 
ele e nossas redes sociais!!|
*/

User Function fIsBlind()
	Local aArea      := FWGetArea()
	Local cMsg  := ""

	//Verifica o tipo de conexão com o Protheus, se retornar verdadeiro é sem interface,
	//se retornar falso é com interface.
	If(IsBlind())
		cMsg := "A conexão com o Protheus é sem interface."
	Else
		cMsg := "A conexão com o Protheus foi com interface."
	EndIf

	FWAlertInfo(cMsg, "Função IsBlind")

	FWRestArea(cMsg)
Return

Bem, finalizamos mais um post aqui no blog. Espero que você tenha entendido, qualquer dúvida nos envie um e-mail para adiliocosta@protheusadvpl.com.br. Grande abraço e fica com Deus.

Links de referência(s):

 
Receba as últimas atualizações do ProtheusAdvpl
Deixe seu melhor email
Nós respeitamos sua privacidade.

Deixe um comentário

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *